version 1.1, 1995/10/18 08:47:05 |
version 1.2, 1995/12/22 00:57:08 |
|
|
int lineno; |
int lineno; |
int outline; |
int outline; |
|
|
|
int explicit_file_name; |
|
|
char *action_file_name; |
char *action_file_name; |
char *code_file_name; |
char *code_file_name; |
char *defines_file_name; |
char *defines_file_name; |
|
|
|
|
usage() |
usage() |
{ |
{ |
fprintf(stderr, "usage: %s [-dlrtv] [-b file_prefix] [-p symbol_prefix] filename\n", myname); |
fprintf(stderr, "usage: %s [-dlrtv] [-b file_prefix] [-o outputfile] [-p symbol_prefix] filename\n", myname); |
exit(1); |
exit(1); |
} |
} |
|
|
|
|
lflag = 1; |
lflag = 1; |
break; |
break; |
|
|
|
case 'o': |
|
if (*++s) |
|
output_file_name = s; |
|
else if (++i < argc) |
|
output_file_name = argv[i]; |
|
else |
|
usage(); |
|
explicit_file_name = 1; |
|
continue; |
|
|
case 'p': |
case 'p': |
if (*++s) |
if (*++s) |
symbol_prefix = s; |
symbol_prefix = s; |
|
|
|
|
len = strlen(file_prefix); |
len = strlen(file_prefix); |
|
|
output_file_name = MALLOC(len + 7); |
if (!output_file_name) |
if (output_file_name == 0) |
{ |
no_space(); |
output_file_name = MALLOC(len + 7); |
strcpy(output_file_name, file_prefix); |
if (output_file_name == 0) |
strcpy(output_file_name + len, OUTPUT_SUFFIX); |
no_space(); |
|
strcpy(output_file_name, file_prefix); |
|
strcpy(output_file_name + len, OUTPUT_SUFFIX); |
|
} |
|
|
if (rflag) |
if (rflag) |
{ |
{ |
|
|
|
|
if (dflag) |
if (dflag) |
{ |
{ |
defines_file_name = MALLOC(len + 7); |
if (explicit_file_name) |
if (defines_file_name == 0) |
{ |
no_space(); |
defines_file_name = MALLOC(strlen(output_file_name)); |
strcpy(defines_file_name, file_prefix); |
if (defines_file_name == 0) |
strcpy(defines_file_name + len, DEFINES_SUFFIX); |
no_space(); |
|
strcpy(defines_file_name, output_file_name); |
|
if (!strcmp(output_file_name + (strlen(output_file_name)-2), ".c")) |
|
defines_file_name [strlen(output_file_name)-1] = 'h'; |
|
} |
|
else |
|
{ |
|
defines_file_name = MALLOC(len + 7); |
|
if (defines_file_name == 0) |
|
no_space(); |
|
strcpy(defines_file_name, file_prefix); |
|
strcpy(defines_file_name + len, DEFINES_SUFFIX); |
|
} |
} |
} |
|
|
if (vflag) |
if (vflag) |