home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume37 / cproto / patch07 / patch7
Encoding:
Text File  |  1993-05-30  |  31.4 KB  |  1,179 lines
  1. diff  -c2 old/CHANGES new/CHANGES
  2. *** old/CHANGES    Tue Dec 01 21:03:42 1992
  3. --- new/CHANGES    Tue May 25 21:11:18 1993
  4. ***************
  5. *** 1,4 ****
  6. --- 1,28 ----
  7.   Version 3
  8.   
  9. + Patchlevel 7
  10. + 
  11. + - Fix: The processing of string literals is now more robust.
  12. + 
  13. + - Removed the -f4 option which generated prototypes like
  14. + 
  15. +     int main P_((int argc, char **argv));
  16. + 
  17. +   Use the -m option now to put a guard macro around the prototype
  18. +   parameter list.  Use the -m option together with -f3 (which is the
  19. +   default) to produce the same output as the old -f4 option.  The option
  20. +   to set the guard macro name is now -M.
  21. + 
  22. + - Comments in prototype parameter lists are now disabled by default.
  23. +   Use the -c option now to output these comments.
  24. + 
  25. + - Can now process #include directives in which the file is specified with
  26. +   a #define macro.
  27. + 
  28. + - Now does not convert function definitions that take the formal
  29. +   parameter va_alist from <varargs.h>.
  30. + 
  31. + - Now recognizes the GNU C modifiers __const and __inline__.
  32. + 
  33.   Patchlevel 6
  34.   
  35. diff  -c2 old/config.h new/config.h
  36. *** old/config.h    Sat Nov 28 23:27:44 1992
  37. --- new/config.h    Tue May 25 21:48:48 1993
  38. ***************
  39. *** 1,3 ****
  40. ! /* $Id: config.h 3.5 1992/11/29 04:27:30 cthuang Exp $
  41.    *
  42.    * cproto configuration and system dependencies
  43. --- 1,3 ----
  44. ! /* $Id: config.h 3.6 1993/05/26 01:48:42 cthuang Exp $
  45.    *
  46.    * cproto configuration and system dependencies
  47. ***************
  48. *** 4,8 ****
  49.    */
  50.   
  51. ! /* Borland C predefines __MSDOS__ */
  52.   #ifdef __MSDOS__
  53.   #ifndef MSDOS
  54. --- 4,8 ----
  55.    */
  56.   
  57. ! /* Borland C++ for MS-DOS predefines __MSDOS__ */
  58.   #ifdef __MSDOS__
  59.   #ifndef MSDOS
  60. ***************
  61. *** 11,17 ****
  62. --- 11,29 ----
  63.   #endif
  64.   
  65. + /* Borland C++ for OS/2 predefines __OS2__ */
  66. + #ifdef __OS2__
  67. + #ifndef OS2
  68. + #define OS2
  69. + #endif
  70. + #endif
  71. + 
  72.   /* Turbo C preprocessor */
  73.   #ifdef TURBO_CPP
  74.   #define CPP "cpp -P-"
  75. + #else
  76. + #ifdef OS2
  77. + #define popen _popen
  78. + #define pclose _pclose
  79. + #endif
  80.   #endif
  81.   
  82. ***************
  83. *** 43,47 ****
  84.   #endif
  85.   
  86. ! #if __STDC__ || defined(MSDOS)
  87.   #include <stdlib.h>
  88.   #include <string.h>
  89. --- 55,59 ----
  90.   #endif
  91.   
  92. ! #if __STDC__ || defined(MSDOS) || defined(OS2)
  93.   #include <stdlib.h>
  94.   #include <string.h>
  95. diff  -c2 old/cproto.1 new/cproto.1
  96. *** old/cproto.1    Sat Nov 28 23:34:08 1992
  97. --- new/cproto.1    Tue May 25 21:36:04 1993
  98. ***************
  99. *** 1,3 ****
  100. ! .\" $Id: cproto.1 3.7 1992/11/29 04:34:05 cthuang Exp $
  101.   .\"
  102.   .de EX        \"Begin example
  103. --- 1,3 ----
  104. ! .\" $Id: cproto.1 3.8 1993/05/26 01:34:15 cthuang Exp $
  105.   .\"
  106.   .de EX        \"Begin example
  107. ***************
  108. *** 14,18 ****
  109.   .if t .sp .5
  110.   ..
  111. ! .TH CPROTO 1 "October 24, 1992"
  112.   .SH NAME
  113.   cproto \- generate C function prototypes and convert function definitions
  114. --- 14,18 ----
  115.   .if t .sp .5
  116.   ..
  117. ! .TH CPROTO 1 "May 24, 1993"
  118.   .SH NAME
  119.   cproto \- generate C function prototypes and convert function definitions
  120. ***************
  121. *** 96,100 ****
  122.   Set the style of generated function prototypes where
  123.   .I n
  124. ! is a number from 0 to 4.
  125.   For example, consider the function definition
  126.   .EX
  127. --- 96,100 ----
  128.   Set the style of generated function prototypes where
  129.   .I n
  130. ! is a number from 0 to 3.
  131.   For example, consider the function definition
  132.   .EX
  133. ***************
  134. *** 119,123 ****
  135.   int main(int argc, char *argv[]);
  136.   .EE
  137. ! A value of 4 produces prototypes guarded by a macro:
  138.   .EX
  139.   int main P_((int argc, char *argv[]));
  140. --- 119,131 ----
  141.   int main(int argc, char *argv[]);
  142.   .EE
  143. ! .TP
  144. ! .B \-c
  145. ! The parameter comments in the prototypes generated by
  146. ! the \-f1 and \-f2 options are omitted by default.
  147. ! Use this option to enable the output of these comments.
  148. ! .TP
  149. ! .B \-m
  150. ! Put a macro around the parameter list of every generated prototype.
  151. ! For example:
  152.   .EX
  153.   int main P_((int argc, char *argv[]));
  154. ***************
  155. *** 124,139 ****
  156.   .EE
  157.   .TP
  158. ! .B \-c
  159. ! Omit the parameter comments in the prototypes generated by
  160. ! the \-f1 and \-f2 options.
  161. ! This option also omits the comments naming the source files from which
  162. ! the prototypes were generated.
  163. ! .TP
  164. ! .BI \-m name
  165. ! Set the name of the macro used to guard prototypes when option \-f4 is selected.
  166.   The default is "P_".
  167.   .TP
  168.   .B \-d
  169. ! Omit the definition of the prototype macro named by the \-m option.
  170.   .TP
  171.   .B \-p
  172. --- 132,142 ----
  173.   .EE
  174.   .TP
  175. ! .BI \-M name
  176. ! Set the name of the macro used to surround prototype parameter lists
  177. ! when option \-m is selected.
  178.   The default is "P_".
  179.   .TP
  180.   .B \-d
  181. ! Omit the definition of the prototype macro used by the \-m option.
  182.   .TP
  183.   .B \-p
  184. ***************
  185. *** 256,259 ****
  186. --- 259,264 ----
  187.   The environment variable CPROTO is scanned for
  188.   a list of options in the same format as the command line options.
  189. + Options given on the command line override any corresponding
  190. + environment option.
  191.   .SH BUGS
  192.   If an untagged struct, union or enum declaration appears in
  193. diff  -c2 old/cproto.c new/cproto.c
  194. *** old/cproto.c    Sat Nov 28 23:27:52 1992
  195. --- new/cproto.c    Tue May 25 21:36:46 1993
  196. ***************
  197. *** 1,3 ****
  198. ! /* $Id: cproto.c 3.7 1992/11/29 04:27:49 cthuang Exp $
  199.    *
  200.    * C function prototype generator and function definition converter
  201. --- 1,3 ----
  202. ! /* $Id: cproto.c 3.8 1993/05/26 01:36:41 cthuang Exp $
  203.    *
  204.    * C function prototype generator and function definition converter
  205. ***************
  206. *** 4,8 ****
  207.    */
  208.   #ifndef lint
  209. ! static char rcsid[] = "$Id: cproto.c 3.7 1992/11/29 04:27:49 cthuang Exp $";
  210.   #endif
  211.   #include <stdio.h>
  212. --- 4,8 ----
  213.    */
  214.   #ifndef lint
  215. ! static char rcsid[] = "$Id: cproto.c 3.8 1993/05/26 01:36:41 cthuang Exp $";
  216.   #endif
  217.   #include <stdio.h>
  218. ***************
  219. *** 39,42 ****
  220. --- 39,45 ----
  221.   FuncDefStyle func_style = FUNC_NONE;
  222.   
  223. + /* If TRUE, put guard macro around prototype parameters */
  224. + boolean proto_macro = FALSE;
  225. + 
  226.   /* Name of macro to guard prototypes */
  227.   char *macro_name = "P_";
  228. ***************
  229. *** 46,50 ****
  230.   
  231.   /* If TRUE, output comments in prototypes */
  232. ! boolean proto_comments = TRUE;
  233.   
  234.   /* Conditional compilation directive output in front of function definitions */
  235. --- 49,56 ----
  236.   
  237.   /* If TRUE, output comments in prototypes */
  238. ! boolean proto_comments = FALSE;
  239. ! 
  240. ! /* If TRUE, output comments naming source files */
  241. ! boolean file_comments = TRUE;
  242.   
  243.   /* Conditional compilation directive output in front of function definitions */
  244. ***************
  245. *** 231,237 ****
  246.       fputs("  -a, -t           Convert function definitions to ANSI or traditional style\n", stderr);
  247.       fputs("  -b               Rewrite function definitions in both styles\n", stderr);
  248. !     fputs("  -c               Omit comments in generated prototypes\n", stderr);
  249.       fputs("  -e               Output \"extern\" keyword before global declarations\n", stderr);
  250. !     fputs("  -f n             Set function prototype style (0 to 4)\n", stderr);
  251.       fputs("  -p               Disable formal parameter promotion\n", stderr);
  252.       fputs("  -q               Disable include file read failure messages\n", stderr);
  253. --- 237,243 ----
  254.       fputs("  -a, -t           Convert function definitions to ANSI or traditional style\n", stderr);
  255.       fputs("  -b               Rewrite function definitions in both styles\n", stderr);
  256. !     fputs("  -c               Enable comments in prototype parameters\n", stderr);
  257.       fputs("  -e               Output \"extern\" keyword before global declarations\n", stderr);
  258. !     fputs("  -f n             Set function prototype style (0 to 3)\n", stderr);
  259.       fputs("  -p               Disable formal parameter promotion\n", stderr);
  260.       fputs("  -q               Disable include file read failure messages\n", stderr);
  261. ***************
  262. *** 238,242 ****
  263.       fputs("  -s               Output static declarations\n", stderr);
  264.       fputs("  -v               Output variable declarations\n", stderr);
  265. !     fputs("  -m name          Set name of prototype macro\n", stderr);
  266.       fputs("  -d               Omit prototype macro definition\n", stderr);
  267.       fputs("  -P template      Set prototype format template \" int f (a, b)\"\n", stderr);
  268. --- 244,249 ----
  269.       fputs("  -s               Output static declarations\n", stderr);
  270.       fputs("  -v               Output variable declarations\n", stderr);
  271. !     fputs("  -m               Put macro around prototype parameters\n", stderr);
  272. !     fputs("  -M name          Set name of prototype macro\n", stderr);
  273.       fputs("  -d               Omit prototype macro definition\n", stderr);
  274.       fputs("  -P template      Set prototype format template \" int f (a, b)\"\n", stderr);
  275. ***************
  276. *** 297,301 ****
  277.   #endif
  278.   
  279. !     while ((c = getopt(argc, argv, "aB:bC:cD:dE:eF:f:I:m:P:pqstU:Vv")) != EOF) {
  280.       switch (c) {
  281.       case 'I':
  282. --- 304,308 ----
  283.   #endif
  284.   
  285. !     while ((c = getopt(argc, argv, "aB:bC:cD:dE:eF:f:I:mM:P:pqstU:Vv")) != EOF) {
  286.       switch (c) {
  287.       case 'I':
  288. ***************
  289. *** 323,327 ****
  290.           break;
  291.       case 'c':
  292. !         proto_comments = FALSE;
  293.           break;
  294.       case 'd':
  295. --- 330,334 ----
  296.           break;
  297.       case 'c':
  298. !         proto_comments = TRUE;
  299.           break;
  300.       case 'd':
  301. ***************
  302. *** 387,394 ****
  303.       case 'f':
  304.           proto_style = atoi(optarg);
  305. !         if (proto_style < 0 || proto_style > PROTO_MACRO)
  306.           usage();
  307.           break;
  308.       case 'm':
  309.           macro_name = optarg;
  310.           break;
  311. --- 394,404 ----
  312.       case 'f':
  313.           proto_style = atoi(optarg);
  314. !         if (proto_style < 0 || proto_style > PROTO_ANSI)
  315.           usage();
  316.           break;
  317.       case 'm':
  318. +         proto_macro = TRUE;
  319. +         break;
  320. +     case 'M':
  321.           macro_name = optarg;
  322.           break;
  323. ***************
  324. *** 431,435 ****
  325.       process_options(&argc, &argv);
  326.   
  327. !     if (proto_style == PROTO_MACRO && define_macro) {
  328.       printf("#if __STDC__ || defined(__cplusplus)\n");
  329.       printf("#define %s(s) s\n", macro_name);
  330. --- 441,445 ----
  331.       process_options(&argc, &argv);
  332.   
  333. !     if (proto_macro && define_macro) {
  334.       printf("#if __STDC__ || defined(__cplusplus)\n");
  335.       printf("#define %s(s) s\n", macro_name);
  336. ***************
  337. *** 444,448 ****
  338.           proto_style = PROTO_NONE;
  339.           variables_out = FALSE;
  340. !         proto_comments = FALSE;
  341.       }
  342.       process_file(stdin, "stdin");
  343. --- 454,458 ----
  344.           proto_style = PROTO_NONE;
  345.           variables_out = FALSE;
  346. !         file_comments = FALSE;
  347.       }
  348.       process_file(stdin, "stdin");
  349. ***************
  350. *** 484,488 ****
  351.       }
  352.   
  353. !     if (proto_style == PROTO_MACRO && define_macro) {
  354.       printf("\n#undef %s\n", macro_name);
  355.       }
  356. --- 494,498 ----
  357.       }
  358.   
  359. !     if (proto_macro && define_macro) {
  360.       printf("\n#undef %s\n", macro_name);
  361.       }
  362. diff  -c2 old/cproto.h new/cproto.h
  363. *** old/cproto.h    Sat Nov 28 23:27:46 1992
  364. --- new/cproto.h    Tue May 25 21:36:26 1993
  365. ***************
  366. *** 1,3 ****
  367. ! /* $Id: cproto.h 3.6 1992/11/29 04:27:30 cthuang Exp $
  368.    *
  369.    * Declarations for C function prototype generator
  370. --- 1,3 ----
  371. ! /* $Id: cproto.h 3.7 1993/05/26 01:36:04 cthuang Exp $
  372.    *
  373.    * Declarations for C function prototype generator
  374. ***************
  375. *** 92,96 ****
  376.   #define PROTO_ABSTRACT        2    /* comment out parameter names */
  377.   #define PROTO_ANSI        3    /* ANSI C prototype */
  378. - #define PROTO_MACRO        4    /* macro around parameters */
  379.   typedef int PrototypeStyle;
  380.   
  381. --- 92,95 ----
  382. ***************
  383. *** 125,131 ****
  384. --- 124,132 ----
  385.   extern PrototypeStyle proto_style;
  386.   extern FuncDefStyle func_style;
  387. + extern boolean proto_macro;
  388.   extern boolean define_macro;
  389.   extern char *macro_name;
  390.   extern boolean proto_comments;
  391. + extern boolean file_comments;
  392.   extern boolean quiet;
  393.   extern char *func_directive;
  394. diff  -c2 old/grammar.y new/grammar.y
  395. *** old/grammar.y    Sat Nov 28 23:27:42 1992
  396. --- new/grammar.y    Tue May 25 21:48:44 1993
  397. ***************
  398. *** 1,3 ****
  399. ! /* $Id: grammar.y 3.7 1992/11/29 04:27:30 cthuang Exp $
  400.    *
  401.    * yacc grammar for C function prototype generator
  402. --- 1,3 ----
  403. ! /* $Id: grammar.y 3.8 1993/05/26 01:48:42 cthuang Exp $
  404.    *
  405.    * yacc grammar for C function prototype generator
  406. ***************
  407. *** 8,12 ****
  408.   %token <text> '(' '*'
  409.       /* identifiers that are not reserved words */
  410. !     T_IDENTIFIER T_TYPEDEF_NAME
  411.   
  412.       /* storage class */
  413. --- 8,12 ----
  414.   %token <text> '(' '*'
  415.       /* identifiers that are not reserved words */
  416. !     T_IDENTIFIER T_TYPEDEF_NAME T_DEFINE_NAME
  417.   
  418.       /* storage class */
  419. ***************
  420. *** 92,95 ****
  421. --- 92,98 ----
  422.   static SymbolTable *typedef_names;
  423.   
  424. + /* table of define names */
  425. + static SymbolTable *define_names;
  426. + 
  427.   /* table of type qualifiers */
  428.   static SymbolTable *type_qualifiers;
  429. ***************
  430. *** 196,200 ****
  431.           if (strcmp($1->text, $1->name) != 0)
  432.           flags &= ~(DS_CHAR | DS_SHORT | DS_FLOAT);
  433. !         new_symbol(typedef_names, $1->name, flags);
  434.           free_declarator($1);
  435.       }
  436. --- 199,203 ----
  437.           if (strcmp($1->text, $1->name) != 0)
  438.           flags &= ~(DS_CHAR | DS_SHORT | DS_FLOAT);
  439. !         new_symbol(typedef_names, $1->name, NULL, flags);
  440.           free_declarator($1);
  441.       }
  442. ***************
  443. *** 205,209 ****
  444.           if (strcmp($3->text, $3->name) != 0)
  445.           flags &= ~(DS_CHAR | DS_SHORT | DS_FLOAT);
  446. !         new_symbol(typedef_names, $3->name, flags);
  447.           free_declarator($3);
  448.       }
  449. --- 208,212 ----
  450.           if (strcmp($3->text, $3->name) != 0)
  451.           flags &= ~(DS_CHAR | DS_SHORT | DS_FLOAT);
  452. !         new_symbol(typedef_names, $3->name, NULL, flags);
  453.           free_declarator($3);
  454.       }
  455. ***************
  456. *** 346,349 ****
  457. --- 349,359 ----
  458.           new_decl_spec(&$$, $1.text, $1.begin, DS_NONE);
  459.       }
  460. +     | T_TYPEDEF_NAME
  461. +     {
  462. +         Symbol *s;
  463. +         s = find_symbol(typedef_names, $1.text);
  464. +         if (s != NULL)
  465. +         new_decl_spec(&$$, $1.text, $1.begin, s->flags);
  466. +     }
  467.       | struct_or_union_specifier
  468.       | enum_specifier
  469. ***************
  470. *** 355,367 ****
  471.           new_decl_spec(&$$, $1.text, $1.begin, DS_NONE);
  472.       }
  473. !     | T_TYPEDEF_NAME
  474.       {
  475. !         /* A typedef name is actually a type specifier, but since the
  476. !          * typedef symbol table also stores #define names, this production
  477. !          * is here so the <pointer> nonterminal will scan #define names.
  478.            */
  479.           Symbol *s;
  480. !         s = find_symbol(typedef_names, $1.text);
  481. !         new_decl_spec(&$$, $1.text, $1.begin, s->flags);
  482.       }
  483.       ;
  484. --- 365,377 ----
  485.           new_decl_spec(&$$, $1.text, $1.begin, DS_NONE);
  486.       }
  487. !     | T_DEFINE_NAME
  488.       {
  489. !         /* This rule allows the <pointer> nonterminal to scan #define
  490. !          * names as if they were type modifiers.
  491.            */
  492.           Symbol *s;
  493. !         s = find_symbol(define_names, $1.text);
  494. !         if (s != NULL)
  495. !         new_decl_spec(&$$, $1.text, $1.begin, s->flags);
  496.       }
  497.       ;
  498. ***************
  499. *** 665,669 ****
  500.   %%
  501.   
  502. ! #ifdef MSDOS
  503.   #include "lex_yy.c"
  504.   #else
  505. --- 675,679 ----
  506.   %%
  507.   
  508. ! #if defined(MSDOS) || defined(OS2)
  509.   #include "lex_yy.c"
  510.   #else
  511. ***************
  512. *** 688,692 ****
  513.       static char *keywords[] = {
  514.       "const", "volatile", "interrupt",
  515. ! #ifdef MSDOS
  516.       "cdecl", "far", "huge", "near", "pascal",
  517.       "_cdecl", "_export", "_far", "_fastcall", "_fortran", "_huge",
  518. --- 698,702 ----
  519.       static char *keywords[] = {
  520.       "const", "volatile", "interrupt",
  521. ! #if defined(MSDOS) || defined(OS2)
  522.       "cdecl", "far", "huge", "near", "pascal",
  523.       "_cdecl", "_export", "_far", "_fastcall", "_fortran", "_huge",
  524. ***************
  525. *** 696,700 ****
  526.       "__inline", "__interrupt", "__loadds", "__near", "__pascal",
  527.       "__saveregs", "__segment", "__stdcall", "__syscall",
  528. !     "__cs", "__ds", "__es", "__ss", "__seg",
  529.   #endif
  530.       };
  531. --- 706,714 ----
  532.       "__inline", "__interrupt", "__loadds", "__near", "__pascal",
  533.       "__saveregs", "__segment", "__stdcall", "__syscall",
  534. ! #ifdef OS2
  535. !     "__far16",
  536. ! #endif
  537. ! #else
  538. !     "__const", "__inline__",
  539.   #endif
  540.       };
  541. ***************
  542. *** 704,708 ****
  543.       type_qualifiers = new_symbol_table();
  544.       for (i = 0; i < sizeof(keywords)/sizeof(keywords[0]); ++i) {
  545. !     new_symbol(type_qualifiers, keywords[i], DS_NONE);
  546.       }
  547.   }
  548. --- 718,722 ----
  549.       type_qualifiers = new_symbol_table();
  550.       for (i = 0; i < sizeof(keywords)/sizeof(keywords[0]); ++i) {
  551. !     new_symbol(type_qualifiers, keywords[i], NULL, DS_NONE);
  552.       }
  553.   }
  554. ***************
  555. *** 725,729 ****
  556.           if (*s == 'l' || *s == 'y')
  557.           BEGIN LEXYACC;
  558. ! #ifdef MSDOS
  559.           if (*s == 'L' || *s == 'Y')
  560.           BEGIN LEXYACC;
  561. --- 739,743 ----
  562.           if (*s == 'l' || *s == 'y')
  563.           BEGIN LEXYACC;
  564. ! #if defined(MSDOS) || defined(OS2)
  565.           if (*s == 'L' || *s == 'Y')
  566.           BEGIN LEXYACC;
  567. ***************
  568. *** 734,737 ****
  569. --- 748,752 ----
  570.       included_files = new_symbol_table();
  571.       typedef_names = new_symbol_table();
  572. +     define_names = new_symbol_table();
  573.       inc_depth = -1;
  574.       curly = 0;
  575. ***************
  576. *** 740,746 ****
  577.       yyin = infile;
  578.       include_file(name, func_style != FUNC_NONE);
  579. !     if (proto_comments)
  580.       printf("/* %s */\n", cur_file_name());
  581.       yyparse();
  582.       free_symbol_table(typedef_names);
  583.       free_symbol_table(included_files);
  584. --- 755,762 ----
  585.       yyin = infile;
  586.       include_file(name, func_style != FUNC_NONE);
  587. !     if (file_comments)
  588.       printf("/* %s */\n", cur_file_name());
  589.       yyparse();
  590. +     free_symbol_table(define_names);
  591.       free_symbol_table(typedef_names);
  592.       free_symbol_table(included_files);
  593. diff  -c2 old/lex.l new/lex.l
  594. *** old/lex.l    Tue Dec 01 21:04:42 1992
  595. --- new/lex.l    Tue May 25 21:36:16 1993
  596. ***************
  597. *** 1,4 ****
  598.   %{
  599. ! /* $Id: lex.l 3.9 1992/12/02 02:04:35 cthuang Exp $
  600.    *
  601.    * Lexical analyzer for C function prototype generator
  602. --- 1,4 ----
  603.   %{
  604. ! /* $Id: lex.l 3.10 1993/05/26 01:36:04 cthuang Exp $
  605.    *
  606.    * Lexical analyzer for C function prototype generator
  607. ***************
  608. *** 34,38 ****
  609.   DIGIT        [0-9]
  610.   ID        {LETTER}({LETTER}|{DIGIT})*
  611. ! STRING        \"(\\\"|[^"])*\"
  612.   QUOTED        ({STRING}|\'(\\\'|[^'\n])*\'|\\.)
  613.   
  614. --- 34,38 ----
  615.   DIGIT        [0-9]
  616.   ID        {LETTER}({LETTER}|{DIGIT})*
  617. ! STRING        \"(\\.|\\\n|[^"\\])*\"
  618.   QUOTED        ({STRING}|\'(\\\'|[^'\n])*\'|\\.)
  619.   
  620. ***************
  621. *** 56,76 ****
  622.   
  623.   <CPP1>define{WS}+{ID}    {
  624. !                 save_text();
  625. !                 sscanf(yytext, "define %s", buf);
  626. !                 get_cpp_directive();
  627. !                 new_symbol(typedef_names, buf, DS_EXTERN);
  628. !             }
  629.   
  630. - <CPP1>include{WS}*\"[^"]+\"     {
  631.                   save_text();
  632. !                 sscanf(yytext, "include \"%[^\"]\"", buf);
  633. !                 get_cpp_directive();
  634. !                 do_include(buf, FALSE);
  635.               }
  636. ! <CPP1>include{WS}*\<[^>]+\>    {
  637.                   save_text();
  638. !                 sscanf(yytext, "include <%[^>]>", buf);
  639. !                 get_cpp_directive();
  640. !                 do_include(buf, TRUE);
  641.               }
  642.   
  643. --- 56,81 ----
  644.   
  645.   <CPP1>define{WS}+{ID}    {
  646. !                 char name[MAX_TEXT_SIZE], value[MAX_TEXT_SIZE];
  647.   
  648.                   save_text();
  649. !                 sscanf(yytext, "define %s", name);
  650. !                 get_cpp_directive(buf, sizeof(buf));
  651. !                 sscanf(buf, "%s", value);
  652. !                 new_symbol(define_names, name, value, DS_NONE);
  653.               }
  654. ! 
  655. ! <CPP1>include{WS}*    {
  656.                   save_text();
  657. !                 get_cpp_directive(buf, sizeof(buf));
  658. !                 if (buf[0] != '"' && buf[0] != '<') {
  659. !                 Symbol *sym = find_symbol(define_names, buf);
  660. !                 if (sym != NULL && sym->value != NULL) {
  661. !                     strcpy(buf, sym->value);
  662. !                 } else {
  663. !                     buf[0] = '\0';
  664. !                 }
  665. !                 }
  666. !                 if (buf[0] != '\0')
  667. !                 do_include(buf);
  668.               }
  669.   
  670. ***************
  671. *** 96,100 ****
  672.               }
  673.   
  674. ! <CPP1>.         { save_text(); get_cpp_directive(); }
  675.   
  676.   <INITIAL>"("        { save_text_offset(); return '('; }
  677. --- 101,105 ----
  678.               }
  679.   
  680. ! <CPP1>.         { save_text(); get_cpp_directive(NULL, 0); }
  681.   
  682.   <INITIAL>"("        { save_text_offset(); return '('; }
  683. ***************
  684. *** 156,159 ****
  685. --- 161,166 ----
  686.                   else if (find_symbol(typedef_names, yytext) != NULL)
  687.                   return T_TYPEDEF_NAME;
  688. +                 else if (find_symbol(define_names, yytext) != NULL)
  689. +                 return T_DEFINE_NAME;
  690.                   else
  691.                   return T_IDENTIFIER;
  692. ***************
  693. *** 290,302 ****
  694.   }
  695.   
  696. ! /* Scan rest of preprocessor directive.
  697.    */
  698.   static void
  699. ! get_cpp_directive ()
  700.   {
  701. -     static char cont_trigraph[] = { '?', '?', '/', '\0' };
  702.       char c, lastc[4];
  703.       
  704.       lastc[0] = lastc[1] = lastc[2] = lastc[3] = '\0';
  705.   
  706.       while ((c = input()) != 0) {
  707. --- 297,313 ----
  708.   }
  709.   
  710. ! /* Scan rest of preprocessor directive.  If <dest> is not NULL, then store
  711. !  * the text in the buffer pointed to by <dest> having size <n>.
  712.    */
  713.   static void
  714. ! get_cpp_directive (dest, n)
  715. ! char *dest;        /* buffer to store directive text */
  716. ! unsigned n;        /* size of buffer to store directive text */
  717.   {
  718.       char c, lastc[4];
  719.       
  720.       lastc[0] = lastc[1] = lastc[2] = lastc[3] = '\0';
  721. +     if (dest != NULL)
  722. +     *dest = '\0';
  723.   
  724.       while ((c = input()) != 0) {
  725. ***************
  726. *** 303,310 ****
  727.       if (cur_file->convert)
  728.           fputc(c, cur_file->tmp_file);
  729.       switch (c) {
  730.       case '\n':
  731.           cur_file->line_num++;
  732. !         if (lastc[2] != '\\' && strcmp(lastc, cont_trigraph) != 0) {
  733.           BEGIN INITIAL;
  734.           return;
  735. --- 314,322 ----
  736.       if (cur_file->convert)
  737.           fputc(c, cur_file->tmp_file);
  738. + 
  739.       switch (c) {
  740.       case '\n':
  741.           cur_file->line_num++;
  742. !         if (lastc[2] != '\\' && strcmp(lastc, "?\?/") != 0) {
  743.           BEGIN INITIAL;
  744.           return;
  745. ***************
  746. *** 319,322 ****
  747. --- 331,340 ----
  748.       lastc[1] = lastc[2];
  749.       lastc[2] = c;
  750. + 
  751. +     if (dest != NULL && n > 1) {
  752. +         *dest++ = c;
  753. +         *dest = '\0';
  754. +         --n;
  755. +     }
  756.       }
  757.   }
  758. ***************
  759. *** 509,518 ****
  760.    */
  761.   static void
  762. ! do_include (filename, stdinc)
  763. ! char *filename;     /* file to include */
  764. ! boolean stdinc;     /* TRUE if file name specified with angle brackets */
  765.   {
  766. !     char path[MAX_TEXT_SIZE];
  767.       int i;
  768.       FILE *fp;
  769.   
  770. --- 527,538 ----
  771.    */
  772.   static void
  773. ! do_include (file_spec)
  774. ! char *file_spec;     /* path surrounded by "" or <> */
  775.   {
  776. !     int stdinc;     /* 1 = path surrounded by <> */
  777. !     char file[MAX_TEXT_SIZE], path[MAX_TEXT_SIZE];
  778. !     char match, *s;
  779.       int i;
  780. +     unsigned n;
  781.       FILE *fp;
  782.   
  783. ***************
  784. *** 523,536 ****
  785.       }
  786.   
  787. !     sprintf(path, stdinc ? "<%s>" : "\"%s\"", filename);
  788.       if (find_symbol(included_files, path) != NULL)
  789.       return;
  790. !     new_symbol(included_files, path, 0);
  791.   
  792.       for (i = stdinc != 0; i < num_inc_dir; ++i) {
  793.       if (strlen(inc_dir[i]) == 0) {
  794. !         strcpy(path, filename);
  795.       } else {
  796. !         sprintf(path, "%s/%s", inc_dir[i], filename);
  797.       }
  798.       if ((fp = fopen(path, "r")) != NULL) {
  799. --- 543,571 ----
  800.       }
  801.   
  802. !     if (file_spec[0] == '"') {
  803. !     match = '"';
  804. !     stdinc = 0;
  805. !     } else if (file_spec[0] == '<') {
  806. !     match = '>';
  807. !     stdinc = 1;
  808. !     } else {
  809. !     return;
  810. !     }
  811. !     s = strchr(file_spec+1, match);
  812. !     n = (s != NULL) ? (unsigned)(s - file_spec - 1) : 0;
  813. !     strncpy(file, file_spec+1, n);
  814. !     file[n] = '\0';
  815. ! 
  816. !     /* Do nothing if the file was already included. */
  817. !     sprintf(path, stdinc ? "<%s>" : "\"%s\"", file);
  818.       if (find_symbol(included_files, path) != NULL)
  819.       return;
  820. !     new_symbol(included_files, path, NULL, DS_NONE);
  821.   
  822.       for (i = stdinc != 0; i < num_inc_dir; ++i) {
  823.       if (strlen(inc_dir[i]) == 0) {
  824. !         strcpy(path, file);
  825.       } else {
  826. !         sprintf(path, "%s/%s", inc_dir[i], file);
  827.       }
  828.       if ((fp = fopen(path, "r")) != NULL) {
  829. ***************
  830. *** 543,547 ****
  831.       if (!quiet) {
  832.       put_error();
  833. !     fprintf(stderr, "cannot read file %s\n", filename);
  834.       }
  835.   }
  836. --- 578,582 ----
  837.       if (!quiet) {
  838.       put_error();
  839. !     fprintf(stderr, "cannot read file %s\n", file_spec);
  840.       }
  841.   }
  842. diff  -c2 old/Makefile.bc new/Makefile.bc
  843. *** old/Makefile.bc    Sat Nov 28 23:27:32 1992
  844. --- new/Makefile.bc    Tue May 25 21:36:04 1993
  845. ***************
  846. *** 1,3 ****
  847. ! # $Id: Makefile.bc 3.1 1992/03/03 10:45:53 cthuang Exp $
  848.   #
  849.   # Borland C++ makefile for C prototype generator
  850. --- 1,3 ----
  851. ! # $Id: Makefile.bc 3.2 1993/05/26 01:34:15 cthuang Exp $
  852.   #
  853.   # Borland C++ makefile for C prototype generator
  854. ***************
  855. *** 10,14 ****
  856.   YACC = yacc
  857.   CC = bcc
  858. ! CFLAGS = -mc $(DEFINES)
  859.   LIBS = \bc\lib\wildargs.obj
  860.   
  861. --- 10,14 ----
  862.   YACC = yacc
  863.   CC = bcc
  864. ! CFLAGS = -mc $(DEFINES) -w-pin -w-pro
  865.   LIBS = \bc\lib\wildargs.obj
  866.   
  867. ***************
  868. *** 50,65 ****
  869.   
  870.   shar:
  871. -     rmcr $(DIST1) $(DIST2)
  872. -     rmcr $(DIST3) $(DIST4)
  873.       shar $(DIST1) $(DIST2) >cproto.sh1
  874.       shar $(DIST3) $(DIST4) >cproto.sh2
  875.   
  876. - inscr:
  877. -     inscr $(DIST1) $(DIST2)
  878. -     inscr $(DIST3) $(DIST4)
  879. - 
  880.   # DO NOT DELETE THIS LINE -- make depend depends on it.
  881.   
  882. ! cproto.obj: config.h cproto.h symbol.h
  883.   popen.obj: config.h cproto.h
  884.   semantic.obj: config.h cproto.h symbol.h semantic.h
  885. --- 50,59 ----
  886.   
  887.   shar:
  888.       shar $(DIST1) $(DIST2) >cproto.sh1
  889.       shar $(DIST3) $(DIST4) >cproto.sh2
  890.   
  891.   # DO NOT DELETE THIS LINE -- make depend depends on it.
  892.   
  893. ! cproto.obj: config.h cproto.h
  894.   popen.obj: config.h cproto.h
  895.   semantic.obj: config.h cproto.h symbol.h semantic.h
  896. diff  -c2 old/Makefile.msc new/Makefile.msc
  897. *** old/Makefile.msc    Sat Nov 28 23:27:36 1992
  898. --- new/Makefile.msc    Tue May 25 21:36:12 1993
  899. ***************
  900. *** 1,3 ****
  901. ! # $Id: Makefile.msc 3.4 1992/11/29 04:27:30 cthuang Exp $
  902.   #
  903.   # Microsoft C makefile for C prototype generator
  904. --- 1,3 ----
  905. ! # $Id: Makefile.msc 3.5 1993/05/26 01:36:04 cthuang Exp $
  906.   #
  907.   # Microsoft C makefile for C prototype generator
  908. ***************
  909. *** 51,66 ****
  910.   
  911.   shar:
  912. -     rmcr $(DIST1) $(DIST2)
  913. -     rmcr $(DIST3) $(DIST4)
  914.       shar $(DIST1) $(DIST2) >cproto.sh1
  915.       shar $(DIST3) $(DIST4) >cproto.sh2
  916.   
  917. - inscr:
  918. -     inscr $(DIST1) $(DIST2)
  919. -     inscr $(DIST3) $(DIST4)
  920. - 
  921.   # DO NOT DELETE THIS LINE -- make depend depends on it.
  922.   
  923. ! cproto.obj: config.h cproto.h symbol.h
  924.   popen.obj: config.h cproto.h
  925.   semantic.obj: config.h cproto.h symbol.h semantic.h
  926. --- 51,60 ----
  927.   
  928.   shar:
  929.       shar $(DIST1) $(DIST2) >cproto.sh1
  930.       shar $(DIST3) $(DIST4) >cproto.sh2
  931.   
  932.   # DO NOT DELETE THIS LINE -- make depend depends on it.
  933.   
  934. ! cproto.obj: config.h cproto.h
  935.   popen.obj: config.h cproto.h
  936.   semantic.obj: config.h cproto.h symbol.h semantic.h
  937. diff  -c2 old/Makefile.uni new/Makefile.uni
  938. *** old/Makefile.uni    Sat Nov 28 23:27:36 1992
  939. --- new/Makefile.uni    Tue May 25 21:36:12 1993
  940. ***************
  941. *** 1,3 ****
  942. ! # $Id: Makefile.uni 3.5 1992/06/10 20:56:00 cthuang Exp $
  943.   #
  944.   # UNIX makefile for C prototype generator
  945. --- 1,3 ----
  946. ! # $Id: Makefile.uni 3.6 1993/05/26 01:34:15 cthuang Exp $
  947.   #
  948.   # UNIX makefile for C prototype generator
  949. ***************
  950. *** 47,51 ****
  951.   # DO NOT DELETE THIS LINE -- make depend depends on it.
  952.   
  953. ! cproto.o: config.h cproto.h symbol.h
  954.   semantic.o: config.h cproto.h symbol.h semantic.h
  955.   strstr.o: config.h
  956. --- 47,51 ----
  957.   # DO NOT DELETE THIS LINE -- make depend depends on it.
  958.   
  959. ! cproto.o: config.h cproto.h
  960.   semantic.o: config.h cproto.h symbol.h semantic.h
  961.   strstr.o: config.h
  962. diff  -c2 old/patchlev.h new/patchlev.h
  963. *** old/patchlev.h    Tue Dec 01 09:52:28 1992
  964. --- new/patchlev.h    Wed Dec 02 21:16:22 1992
  965. ***************
  966. *** 1 ****
  967. ! #define PATCHLEVEL 6
  968. --- 1 ----
  969. ! #define PATCHLEVEL 7
  970. diff  -c2 old/semantic.c new/semantic.c
  971. *** old/semantic.c    Sat Nov 28 23:27:56 1992
  972. --- new/semantic.c    Tue May 25 21:36:50 1993
  973. ***************
  974. *** 1,3 ****
  975. ! /* $Id: semantic.c 3.7 1992/11/29 04:27:49 cthuang Exp $
  976.    *
  977.    * Semantic actions executed by the parser of the
  978. --- 1,3 ----
  979. ! /* $Id: semantic.c 3.8 1993/05/26 01:36:41 cthuang Exp $
  980.    *
  981.    * Semantic actions executed by the parser of the
  982. ***************
  983. *** 519,524 ****
  984.       fputs(s, outf);
  985.   
  986. !     if (where == FUNC_PROTO && proto_style == PROTO_MACRO &&
  987. !      declarator == func_declarator) {
  988.       fprintf(outf, " %s(", macro_name);
  989.       }
  990. --- 519,523 ----
  991.       fputs(s, outf);
  992.   
  993. !     if (where == FUNC_PROTO && declarator == func_declarator && proto_macro) {
  994.       fprintf(outf, " %s(", macro_name);
  995.       }
  996. ***************
  997. *** 529,534 ****
  998.       fputs(t, outf);
  999.   
  1000. !     if (where == FUNC_PROTO && proto_style == PROTO_MACRO &&
  1001. !      declarator == func_declarator) {
  1002.       fputc(')', outf);
  1003.       }
  1004. --- 528,532 ----
  1005.       fputs(t, outf);
  1006.   
  1007. !     if (where == FUNC_PROTO && declarator == func_declarator && proto_macro) {
  1008.       fputc(')', outf);
  1009.       }
  1010. ***************
  1011. *** 608,616 ****
  1012.   }
  1013.   
  1014. ! /* Generate a prototype for a function that uses varargs by replacing the
  1015. !  * "va_alist" parameter with an empty parameter list.
  1016.    */
  1017. ! static void
  1018. ! check_varargs (declarator)
  1019.   Declarator *declarator;
  1020.   {
  1021. --- 606,613 ----
  1022.   }
  1023.   
  1024. ! /* Return TRUE if the function uses varargs.
  1025.    */
  1026. ! static int
  1027. ! uses_varargs (declarator)
  1028.   Declarator *declarator;
  1029.   {
  1030. ***************
  1031. *** 617,626 ****
  1032.       Parameter *p;
  1033.   
  1034. !     if ((p = declarator->params.first) != NULL && p->next == NULL &&
  1035. !     strcmp(p->declarator->name, "va_alist") == 0)
  1036. !     {
  1037. !     free_param_list(&declarator->params);
  1038. !     declarator->params.first = NULL;
  1039. !     }
  1040.   }
  1041.   
  1042. --- 614,619 ----
  1043.       Parameter *p;
  1044.   
  1045. !     return (p = declarator->params.first) != NULL && p->next == NULL &&
  1046. !     strcmp(p->declarator->name, "va_alist") == 0;
  1047.   }
  1048.   
  1049. ***************
  1050. *** 673,678 ****
  1051.   
  1052.       func_declarator = declarator->head;
  1053.       check_void_param(func_declarator);
  1054. -     check_varargs(func_declarator);
  1055.       set_param_decl_spec(func_declarator);
  1056.   
  1057. --- 666,678 ----
  1058.   
  1059.       func_declarator = declarator->head;
  1060. +     if (uses_varargs(func_declarator)) {
  1061. +     /* Generate a prototype for a function that uses varargs by replacing
  1062. +      * the "va_alist" parameter with an empty parameter list.
  1063. +      */
  1064. +     free_param_list(&func_declarator->params);
  1065. +     func_declarator->params.first = NULL;
  1066. +     }
  1067. + 
  1068.       check_void_param(func_declarator);
  1069.       set_param_decl_spec(func_declarator);
  1070.   
  1071. ***************
  1072. *** 737,743 ****
  1073.       int comment_len, n;
  1074.   
  1075. !     /* Do nothing if the function is already defined in the desired style. */
  1076.       func_declarator = declarator->head;
  1077. !     if (func_declarator->func_def == func_style)
  1078.       return;
  1079.   
  1080. --- 737,746 ----
  1081.       int comment_len, n;
  1082.   
  1083. !     /* Do nothing if the function is already defined in the desired style
  1084. !      * or if the function uses varargs.
  1085. !      */
  1086.       func_declarator = declarator->head;
  1087. !     if (func_declarator->func_def == func_style ||
  1088. !     uses_varargs(func_declarator))
  1089.       return;
  1090.   
  1091. diff  -c2 old/symbol.c new/symbol.c
  1092. *** old/symbol.c    Sat Nov 28 23:28:00 1992
  1093. --- new/symbol.c    Tue May 25 21:36:54 1993
  1094. ***************
  1095. *** 1,3 ****
  1096. ! /* $Id: symbol.c 3.2 1992/11/29 04:27:49 cthuang Exp $
  1097.    *
  1098.    * Implements a symbol table abstract data type.
  1099. --- 1,3 ----
  1100. ! /* $Id: symbol.c 3.3 1993/05/26 01:36:41 cthuang Exp $
  1101.    *
  1102.    * Implements a symbol table abstract data type.
  1103. ***************
  1104. *** 39,42 ****
  1105. --- 39,43 ----
  1106.           next = sym->next;
  1107.           free(sym->name);
  1108. +         free(sym->value);
  1109.           free(sym);
  1110.           sym = next;
  1111. ***************
  1112. *** 98,104 ****
  1113.    */
  1114.   Symbol *
  1115. ! new_symbol (symtab, name, flags)
  1116.   SymbolTable *symtab;    /* symbol table */
  1117.   char *name;        /* symbol name */
  1118.   int flags;        /* symbol attributes */
  1119.   {
  1120. --- 99,106 ----
  1121.    */
  1122.   Symbol *
  1123. ! new_symbol (symtab, name, value, flags)
  1124.   SymbolTable *symtab;    /* symbol table */
  1125.   char *name;        /* symbol name */
  1126. + char *value;        /* symbol value */
  1127.   int flags;        /* symbol attributes */
  1128.   {
  1129. ***************
  1130. *** 109,117 ****
  1131.       sym = (Symbol *)xmalloc(sizeof(Symbol));
  1132.       sym->name = xstrdup(name);
  1133. -     sym->flags = flags;
  1134.       i = hash(name);
  1135.       sym->next = symtab->bucket[i];
  1136.       symtab->bucket[i] = sym;
  1137.       }
  1138.       return sym;
  1139.   }
  1140. --- 111,122 ----
  1141.       sym = (Symbol *)xmalloc(sizeof(Symbol));
  1142.       sym->name = xstrdup(name);
  1143.       i = hash(name);
  1144.       sym->next = symtab->bucket[i];
  1145.       symtab->bucket[i] = sym;
  1146. +     } else {
  1147. +     free(sym->value);
  1148.       }
  1149. +     sym->value = (value != NULL) ? xstrdup(value) : NULL;
  1150. +     sym->flags = flags;
  1151.       return sym;
  1152.   }
  1153. diff  -c2 old/symbol.h new/symbol.h
  1154. *** old/symbol.h    Sat Nov 28 23:27:48 1992
  1155. --- new/symbol.h    Tue May 25 21:36:40 1993
  1156. ***************
  1157. *** 1,3 ****
  1158. ! /* $Id: symbol.h 3.3 1992/03/14 11:57:48 cthuang Exp $
  1159.    *
  1160.    * A symbol table is a collection of string identifiers stored in a
  1161. --- 1,3 ----
  1162. ! /* $Id: symbol.h 3.4 1993/05/26 01:36:04 cthuang Exp $
  1163.    *
  1164.    * A symbol table is a collection of string identifiers stored in a
  1165. ***************
  1166. *** 10,14 ****
  1167.       struct symbol *next;    /* next symbol in list */
  1168.       char *name;         /* name of symbol */
  1169. !     unsigned short flags;    /* symbol attributes */
  1170.   } Symbol;
  1171.   
  1172. --- 10,15 ----
  1173.       struct symbol *next;    /* next symbol in list */
  1174.       char *name;         /* name of symbol */
  1175. !     char *value;        /* value of symbol (for defines) */
  1176. !     short flags;        /* symbol attributes */
  1177.   } Symbol;
  1178.   
  1179.