Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | :-) (CVS 42) |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: | 11e3296319843356cf09832577f7dea4 |
| User & Date: | drh 2000-06-02 18:52:13 |
Context
|
2000-06-02
| ||
| 23:04 | :-) (CVS 43) check-in: 60f45a3b user: drh tags: trunk | |
| 18:52 | :-) (CVS 42) check-in: 11e32963 user: drh tags: trunk | |
| 15:51 | :-) (CVS 41) check-in: 90cfd617 user: drh tags: trunk | |
Changes
Changes to tool/lemon.c.
2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 |
if( mhflag ){
fprintf(out,"#if INTERFACE\n"); lineno++;
}
name = lemp->name ? lemp->name : "Parse";
if( lemp->arg && lemp->arg[0] ){
int i;
i = strlen(lemp->arg);
while( i>=1 && isalnum(lemp->arg[i-1]) ) i--;
fprintf(out,"#define %sARGDECL ,%s\n",name,&lemp->arg[i]); lineno++;
fprintf(out,"#define %sXARGDECL %s;\n",name,lemp->arg); lineno++;
fprintf(out,"#define %sANSIARGDECL ,%s\n",name,lemp->arg); lineno++;
}else{
fprintf(out,"#define %sARGDECL\n",name); lineno++;
fprintf(out,"#define %sXARGDECL\n",name); lineno++;
fprintf(out,"#define %sANSIARGDECL\n",name); lineno++;
|
| > |
2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 |
if( mhflag ){
fprintf(out,"#if INTERFACE\n"); lineno++;
}
name = lemp->name ? lemp->name : "Parse";
if( lemp->arg && lemp->arg[0] ){
int i;
i = strlen(lemp->arg);
while( i>=1 && isspace(lemp->arg[i-1]) ) i--;
while( i>=1 && (isalnum(lemp->arg[i-1]) || lemp->arg[i-1]=='_') ) i--;
fprintf(out,"#define %sARGDECL ,%s\n",name,&lemp->arg[i]); lineno++;
fprintf(out,"#define %sXARGDECL %s;\n",name,lemp->arg); lineno++;
fprintf(out,"#define %sANSIARGDECL ,%s\n",name,lemp->arg); lineno++;
}else{
fprintf(out,"#define %sARGDECL\n",name); lineno++;
fprintf(out,"#define %sXARGDECL\n",name); lineno++;
fprintf(out,"#define %sANSIARGDECL\n",name); lineno++;
|