home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / sun / volume3 / catcher / patch01 / patch
Encoding:
Text File  |  1991-05-14  |  8.2 KB  |  281 lines
  1. *** Makefile.orig    Tue Jan 29 12:39:44 1991
  2. --- Makefile    Tue Jan 22 07:32:58 1991
  3. ***************
  4. *** 43,49 ****
  5.   install: catcher $(MAN)/catcher.$(MANEXT)
  6.       cp catcher $(BIN)
  7.       chmod 755 $(BIN)/catcher
  8. -     cp catcher.info $(HELPDIR)
  9.   
  10.   $(MAN)/catcher.$(MANEXT): catcher.man
  11.       cp -p catcher.man $(MAN)/catcher.$(MANEXT)
  12. --- 43,48 ----
  13. *** Imakefile.orig    Tue Jan 29 12:39:47 1991
  14. --- Imakefile    Tue Jan 22 07:32:57 1991
  15. ***************
  16. *** 20,26 ****
  17.   ComplexProgramTarget(catcher)
  18.   
  19.   install:: install.man
  20. -     $(INSTALL) -c $(INSTMANFLAGS) catcher.info $(HELPDIR)/catcher.info
  21.   
  22.   manual:
  23.       cd doc; make PRINT="$(PRINT)" PRINTER="$(PRINTER)" manual
  24. --- 20,25 ----
  25. *** README.orig    Tue Jan 29 12:39:47 1991
  26. --- README    Tue Jan 29 12:37:00 1991
  27. ***************
  28. *** 107,109 ****
  29. --- 107,115 ----
  30.   *********************************************************************************
  31.   
  32.            1.0    16 Jan 91    Original release
  33. +      
  34. +          1.0a    29 Jan 91    Patch 1
  35. +                      Fixed Imakefile
  36. +                      Corrected bug in parser
  37. +                      Corrected handling of suffix string
  38. +                      Renamed ungetc to last_char in lex.c
  39. *** lex.c.orig    Tue Jan 29 12:39:53 1991
  40. --- lex.c    Tue Jan 29 12:33:55 1991
  41. ***************
  42. *** 52,59 ****
  43.                    {"value",        VALUE},
  44.                    {"window",       WINDOW_}};
  45.   
  46. - 
  47. - 
  48.   PRIVATE    struct    {char    first;
  49.            char    next;
  50.            int    name;
  51. --- 52,57 ----
  52. ***************
  53. *** 73,85 ****
  54.          curr_file = "stdin";
  55.          f = stdin;
  56.          line_count = 1;
  57. !        ungetc = -1;
  58.          return(TRUE);
  59.          }
  60.       else if (f = fopen(path, "r")) {
  61.          curr_file = strsave(path);
  62.          line_count = 1;
  63. !        ungetc = -1;
  64.          return(TRUE);
  65.          }
  66.       else
  67. --- 71,83 ----
  68.          curr_file = "stdin";
  69.          f = stdin;
  70.          line_count = 1;
  71. !        last_char = -1;
  72.          return(TRUE);
  73.          }
  74.       else if (f = fopen(path, "r")) {
  75.          curr_file = strsave(path);
  76.          line_count = 1;
  77. !        last_char = -1;
  78.          return(TRUE);
  79.          }
  80.       else
  81. ***************
  82. *** 92,99 ****
  83.   {    register    char    c;
  84.       static        int    first = TRUE;
  85.   
  86. !     if (ungetc != -1)
  87. !        c = ungetc, ungetc = -1;
  88.       else if (f == NULL)
  89.          return(EOF);
  90.       else {
  91. --- 90,97 ----
  92.   {    register    char    c;
  93.       static        int    first = TRUE;
  94.   
  95. !     if (last_char != -1)
  96. !        c = last_char, last_char = -1;
  97.       else if (f == NULL)
  98.          return(EOF);
  99.       else {
  100. ***************
  101. *** 182,188 ****
  102.          *p++ = c;
  103.          while (isalnum(c = getch()) || c == '_')
  104.             *p++ = c;
  105. !        ungetc = c;
  106.          *p = '\0';
  107.          temp = strsave(buf);
  108.          for (p = buf; *p; p++)
  109. --- 180,186 ----
  110.          *p++ = c;
  111.          while (isalnum(c = getch()) || c == '_')
  112.             *p++ = c;
  113. !        last_char = c;
  114.          *p = '\0';
  115.          temp = strsave(buf);
  116.          for (p = buf; *p; p++)
  117. ***************
  118. *** 220,226 ****
  119.          while (isdigit(c = getch()))
  120.             *p++ = c;
  121.          *p = '\0';
  122. !        ungetc = c;
  123.          yylval.ival = atoi(buf);
  124.          RETURN(INTEGER);
  125.          }
  126. --- 218,224 ----
  127.          while (isdigit(c = getch()))
  128.             *p++ = c;
  129.          *p = '\0';
  130. !        last_char = c;
  131.          yylval.ival = atoi(buf);
  132.          RETURN(INTEGER);
  133.          }
  134. ***************
  135. *** 240,246 ****
  136.                for (c1 = getch(), j = 1; punc[i + j].first == c; j++)
  137.                   if (c1 == punc[i + j].next)
  138.                      RETURN(punc[i + j].name);
  139. !              ungetc = c1;
  140.                RETURN(punc[i].name);
  141.                }
  142.          yyerror("Invalid character in source file: %c (0x%02x)", c, c);
  143. --- 238,244 ----
  144.                for (c1 = getch(), j = 1; punc[i + j].first == c; j++)
  145.                   if (c1 == punc[i + j].next)
  146.                      RETURN(punc[i + j].name);
  147. !              last_char = c1;
  148.                RETURN(punc[i].name);
  149.                }
  150.          yyerror("Invalid character in source file: %c (0x%02x)", c, c);
  151. *** parse.y.orig    Tue Jan 29 12:39:58 1991
  152. --- parse.y    Tue Jan 29 12:33:56 1991
  153. ***************
  154. *** 30,42 ****
  155.   
  156.   EXPORT    int    parse_errors_occured;
  157.   
  158. ! EXPORT    Catch    config = {NULL, NULL, "Catcher", NULL, '$', '{', '}', NULL, NULL};
  159.   
  160.   PRIVATE    char    *get_last_token();
  161.   
  162.   PRIVATE    char    *curr_file;
  163.   PRIVATE    int    line_count = 1;
  164. ! PRIVATE    char    ungetc = -1;
  165.   
  166.   PRIVATE    Command    *curr_cmd;
  167.   PRIVATE    Option    *curr_opt;
  168. --- 30,42 ----
  169.   
  170.   EXPORT    int    parse_errors_occured;
  171.   
  172. ! EXPORT    Catch    config = {NULL, NULL, "Catcher 1.0a", NULL, '$', '{', '}', NULL, NULL};
  173.   
  174.   PRIVATE    char    *get_last_token();
  175.   
  176.   PRIVATE    char    *curr_file;
  177.   PRIVATE    int    line_count = 1;
  178. ! PRIVATE    char    last_char = -1;
  179.   
  180.   PRIVATE    Command    *curr_cmd;
  181.   PRIVATE    Option    *curr_opt;
  182. ***************
  183. *** 59,66 ****
  184.   
  185.   %token        LBRACE RBRACE
  186.   
  187. ! %token        BY CHOICE COMMAND DEFAULT DELIMITER EXCLUSIVE FINISH HORIZONTAL ICON_ ICON_MASK INIT LABEL
  188. ! %token        MESSAGE NONEXCLUSIVE NUMERIC OPTIONAL OUTPUT PARAMETER START SUFFIX TEXT TO VALUE WINDOW_
  189.   
  190.   %type    <chval>    anon_choice choice
  191.   %type    <cpval>    command_name delimiter icon icon_mask label message suffix text_init value
  192. --- 59,66 ----
  193.   
  194.   %token        LBRACE RBRACE
  195.   
  196. ! %token        BY CHOICE COMMAND DEFAULT DELIMITER EXCLUSIVE HORIZONTAL ICON_ ICON_MASK INIT LABEL
  197. ! %token        MESSAGE NONEXCLUSIVE NUMERIC OPTIONAL OUTPUT PARAMETER SUFFIX TEXT TO VALUE WINDOW_
  198.   
  199.   %type    <chval>    anon_choice choice
  200.   %type    <cpval>    command_name delimiter icon icon_mask label message suffix text_init value
  201. ***************
  202. *** 383,389 ****
  203.   
  204.   {    char    buf1[1024], buf2[1024];
  205.   
  206. !     sprintf(buf1, "%s: line %d: ", curr_file, line_count - ((ungetc == '\n')? 1 : 0));
  207.       sprintf(buf2, s1, s2, s3, s4, s5, s6, s7);
  208.       strcat(buf1, buf2);
  209.       if (strcmp(s1, "syntax error") == 0) {
  210. --- 383,389 ----
  211.   
  212.   {    char    buf1[1024], buf2[1024];
  213.   
  214. !     sprintf(buf1, "%s: line %d: ", curr_file, line_count - ((last_char == '\n')? 1 : 0));
  215.       sprintf(buf2, s1, s2, s3, s4, s5, s6, s7);
  216.       strcat(buf1, buf2);
  217.       if (strcmp(s1, "syntax error") == 0) {
  218. *** patchlevel.h.orig    Tue Jan 29 12:40:00 1991
  219. --- patchlevel.h    Tue Jan 29 12:11:30 1991
  220. ***************
  221. *** 0 ****
  222. --- 1,29 ----
  223. + /************************************************************************/
  224. + /*    Copyright 1987-1991 by Chuck Musciano and Harris Corporation     */
  225. + /*                                    */
  226. + /*    Full ownership of this software, and all rights pertaining to     */
  227. + /*    the for-profit distribution of this software, are retained by     */
  228. + /*    Chuck Musciano and Harris Corporation.  You are permitted to     */
  229. + /*    use this software without fee.  This software is provided "as     */
  230. + /*    is" without express or implied warranty.  You may redistribute     */
  231. + /*    this software, provided that this copyright notice is retained,    */
  232. + /*    and that the software is not distributed for profit.  If you     */
  233. + /*    wish to use this software in a profit-making venture, you must     */
  234. + /*    first license this code and its underlying technology from     */
  235. + /*    Harris Corporation.                         */
  236. + /*                                    */
  237. + /*    Bottom line: you can have this software, you can use it, you     */
  238. + /*    can give it away.  You just can't sell any or all parts of it     */
  239. + /*    without prior permission from Harris Corporation.         */
  240. + /************************************************************************/
  241. + 
  242. + /************************************************************************/
  243. + /*                                    */
  244. + /*    Patch        Comments                    */
  245. + /*      0        Initial release                    */
  246. + /*               comp.sources.x: Volume 11, Issues 6-10    */
  247. + /*                                    */
  248. + /*      1        Bug fixes; see README for details        */
  249. + /*               comp.sources.x: Volume 11, Issue ?        */
  250. + /*                                    */
  251. + /************************************************************************/
  252. *** process.c.orig    Tue Jan 29 12:40:01 1991
  253. --- process.c    Tue Jan 29 12:33:57 1991
  254. ***************
  255. *** 340,350 ****
  256.   {    char    *path;
  257.       FILE    *f;
  258.   
  259. !     path = (char *) malloc(strlen(config.suffix) + 22);
  260.       strcpy(path, "/tmp/catcher.XXXXXX");
  261.       mktemp(path);
  262. !     strcat(path, ".");
  263. !     strcat(path, config.suffix);
  264.       if ((f = fopen(path, "w")) == NULL)
  265.          error("cannot open %s for writing: %s", path, sys_errlist[errno]);
  266.       else if (fwrite(data, 1, strlen(data), f) != strlen(data)) {
  267. --- 340,352 ----
  268.   {    char    *path;
  269.       FILE    *f;
  270.   
  271. !     path = (char *) malloc((config.suffix? strlen(config.suffix) : 0) + 22);
  272.       strcpy(path, "/tmp/catcher.XXXXXX");
  273.       mktemp(path);
  274. !     if (config.suffix) {
  275. !        strcat(path, ".");
  276. !        strcat(path, config.suffix);
  277. !        }
  278.       if ((f = fopen(path, "w")) == NULL)
  279.          error("cannot open %s for writing: %s", path, sys_errlist[errno]);
  280.       else if (fwrite(data, 1, strlen(data), f) != strlen(data)) {
  281.