home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / gnustuff / tos / updates / update21.zoo / bison / atari.diffs next >
Encoding:
Text File  |  1992-05-13  |  8.3 KB  |  310 lines
  1. *** bison.simple.orig    Wed May 13 19:46:10 1992
  2. --- bison.simple    Wed May 13 19:46:08 1992
  3. ***************
  4. *** 38,43 ****
  5. --- 38,50 ----
  6.   #endif /* not GNU C.  */
  7.   #endif /* alloca not defined.  */
  8.   
  9. + #ifdef atarist
  10. + #include <stdlib.h>
  11. + #include <string.h>
  12. + #include <unistd.h>
  13. + #include <memory.h>
  14. + #endif /* atarist */
  15. + 
  16.   /* This is the parser code that is written into each bison parser
  17.     when the %semantic_parser declaration is not specified in the grammar.
  18.     It was written by Richard Stallman by simplifying the hairy parser
  19. *** files.c.orig    Wed May 13 19:46:29 1992
  20. --- files.c    Wed May 13 19:46:26 1992
  21. ***************
  22. *** 68,73 ****
  23. --- 68,76 ----
  24.   extern int verboseflag;
  25.   extern int definesflag;
  26.   int fixed_outfiles = 0;
  27. + #ifdef atarist
  28. + long _stksize = -1L;
  29. + #endif
  30.   
  31.   
  32.   char*
  33. ***************
  34. *** 115,126 ****
  35.   #endif
  36.     int tmp_len;
  37.   
  38. ! #ifdef MSDOS
  39. !   tmp_base = getenv ("TMP");
  40.     if (tmp_base == 0)
  41.       tmp_base = "";
  42.     strlwr (infile);
  43. ! #endif /* MSDOS */
  44.   
  45.     tmp_len = strlen (tmp_base);
  46.   
  47. --- 118,130 ----
  48.   #endif
  49.     int tmp_len;
  50.   
  51. ! #if defined(MSDOS) || defined(atarist)
  52. !   tmp_base = getenv ("TEMP");
  53. !   if(tmp_base == 0) tmp_base = getenv("TMP");
  54.     if (tmp_base == 0)
  55.       tmp_base = "";
  56.     strlwr (infile);
  57. ! #endif /* MSDOS || atarist */
  58.   
  59.     tmp_len = strlen (tmp_base);
  60.   
  61. ***************
  62. *** 129,137 ****
  63.         /* -o was specified.  The precise -o name will be used for ftable.
  64.        For other output files, remove the ".c" or ".tab.c" suffix.  */
  65.         name_base = spec_outfile;
  66. ! #ifdef MSDOS
  67.         strlwr (name_base);
  68. ! #endif /* MSDOS */
  69.         /* BASE_LENGTH includes ".tab" but not ".c".  */
  70.         base_length = strlen (name_base);
  71.         if (!strcmp (name_base + base_length - 2, ".c"))
  72. --- 133,141 ----
  73.         /* -o was specified.  The precise -o name will be used for ftable.
  74.        For other output files, remove the ".c" or ".tab.c" suffix.  */
  75.         name_base = spec_outfile;
  76. ! #if defined(MSDOS) || defined(atarist)
  77.         strlwr (name_base);
  78. ! #endif /* MSDOS || atarist */
  79.         /* BASE_LENGTH includes ".tab" but not ".c".  */
  80.         base_length = strlen (name_base);
  81.         if (!strcmp (name_base + base_length - 2, ".c"))
  82. ***************
  83. *** 154,160 ****
  84.         /* Append `.tab'.  */
  85.         strcpy (name_base, spec_file_prefix);
  86.         strcat (name_base, ".tab");
  87. ! #ifdef MSDOS
  88.         strlwr (name_base);
  89.   #endif /* MSDOS */
  90.       }
  91. --- 158,164 ----
  92.         /* Append `.tab'.  */
  93.         strcpy (name_base, spec_file_prefix);
  94.         strcat (name_base, ".tab");
  95. ! #if defined(MSDOS) || defined(atarist)
  96.         strlwr (name_base);
  97.   #endif /* MSDOS */
  98.       }
  99. ***************
  100. *** 175,185 ****
  101.   #ifdef VMS
  102.         name_base = stringappend(name_base, short_base_length, "_tab");
  103.   #else
  104. ! #ifdef MSDOS
  105.         name_base = stringappend(name_base, short_base_length, "_tab");
  106.   #else
  107.         name_base = stringappend(name_base, short_base_length, ".tab");
  108. ! #endif /* not MSDOS */
  109.   #endif
  110.         base_length = short_base_length + 4;
  111.       }
  112. --- 179,189 ----
  113.   #ifdef VMS
  114.         name_base = stringappend(name_base, short_base_length, "_tab");
  115.   #else
  116. ! #if defined(MSDOS) || defined(atarist)
  117.         name_base = stringappend(name_base, short_base_length, "_tab");
  118.   #else
  119.         name_base = stringappend(name_base, short_base_length, ".tab");
  120. ! #endif /* not MSDOS || atarist */
  121.   #endif
  122.         base_length = short_base_length + 4;
  123.       }
  124. ***************
  125. *** 187,195 ****
  126.     finput = tryopen(infile, "r");
  127.   
  128.     filename = getenv("BISON_SIMPLE");
  129. ! #ifdef MSDOS
  130.     /* File doesn't exist in current directory; try in INIT directory.  */
  131.     cp = getenv("INIT");
  132.     if (filename == 0 && cp != 0)
  133.       {
  134.         filename = malloc(strlen(cp) + strlen(PFILE) + 2);
  135. --- 191,203 ----
  136.     finput = tryopen(infile, "r");
  137.   
  138.     filename = getenv("BISON_SIMPLE");
  139. ! #if defined(MSDOS) || defined(atarist)
  140.     /* File doesn't exist in current directory; try in INIT directory.  */
  141. + #ifdef atarist
  142. +   cp = getenv("GNULIB");
  143. + #else
  144.     cp = getenv("INIT");
  145. + #endif
  146.     if (filename == 0 && cp != 0)
  147.       {
  148.         filename = malloc(strlen(cp) + strlen(PFILE) + 2);
  149. ***************
  150. *** 203,209 ****
  151.   
  152.     if (verboseflag)
  153.       {
  154. ! #ifdef MSDOS
  155.         outfile = stringappend(name_base, short_base_length, ".out");
  156.   #else
  157.         if (spec_name_prefix)
  158. --- 211,217 ----
  159.   
  160.     if (verboseflag)
  161.       {
  162. ! #if defined(MSDOS) || defined(atarist)
  163.         outfile = stringappend(name_base, short_base_length, ".out");
  164.   #else
  165.         if (spec_name_prefix)
  166. ***************
  167. *** 220,226 ****
  168.         fdefines = tryopen(defsfile, "w");
  169.       }
  170.   
  171. ! #ifdef MSDOS
  172.     actfile = mktemp(stringappend(tmp_base, tmp_len, "acXXXXXX"));
  173.     tmpattrsfile = mktemp(stringappend(tmp_base, tmp_len, "atXXXXXX"));
  174.     tmptabfile = mktemp(stringappend(tmp_base, tmp_len, "taXXXXXX"));
  175. --- 228,234 ----
  176.         fdefines = tryopen(defsfile, "w");
  177.       }
  178.   
  179. ! #if defined(MSDOS) || defined(atarist)
  180.     actfile = mktemp(stringappend(tmp_base, tmp_len, "acXXXXXX"));
  181.     tmpattrsfile = mktemp(stringappend(tmp_base, tmp_len, "atXXXXXX"));
  182.     tmptabfile = mktemp(stringappend(tmp_base, tmp_len, "taXXXXXX"));
  183. ***************
  184. *** 234,240 ****
  185.     fattrs = tryopen(tmpattrsfile,"w+");
  186.     ftable = tryopen(tmptabfile, "w+");
  187.   
  188. ! #ifndef MSDOS
  189.     unlink(actfile);
  190.     unlink(tmpattrsfile);
  191.     unlink(tmptabfile);
  192. --- 242,248 ----
  193.     fattrs = tryopen(tmpattrsfile,"w+");
  194.     ftable = tryopen(tmptabfile, "w+");
  195.   
  196. ! #if !(defined(MSDOS) || defined(atarist))
  197.     unlink(actfile);
  198.     unlink(tmpattrsfile);
  199.     unlink(tmptabfile);
  200. ***************
  201. *** 250,256 ****
  202.     attrsfile = stringappend(name_base, short_base_length, "_stype.h");
  203.     guardfile = stringappend(name_base, short_base_length, "_guard.c");
  204.   #else
  205. ! #ifdef MSDOS
  206.     attrsfile = stringappend(name_base, short_base_length, ".sth");
  207.     guardfile = stringappend(name_base, short_base_length, ".guc");
  208.   #else
  209. --- 258,264 ----
  210.     attrsfile = stringappend(name_base, short_base_length, "_stype.h");
  211.     guardfile = stringappend(name_base, short_base_length, "_guard.c");
  212.   #else
  213. ! #if defined(MSDOS) || defined(atarist)
  214.     attrsfile = stringappend(name_base, short_base_length, ".sth");
  215.     guardfile = stringappend(name_base, short_base_length, ".guc");
  216.   #else
  217. ***************
  218. *** 275,283 ****
  219.     fclose(fparser);
  220.   
  221.     filename = (char *) getenv ("BISON_HAIRY");
  222. ! #ifdef MSDOS
  223.     /* File doesn't exist in current directory; try in INIT directory.  */
  224.     cp = getenv("INIT");
  225.     if (filename == 0 && cp != 0)
  226.       {
  227.         filename = malloc(strlen(cp) + strlen(PFILE1) + 2);
  228. --- 283,295 ----
  229.     fclose(fparser);
  230.   
  231.     filename = (char *) getenv ("BISON_HAIRY");
  232. ! #if defined(MSDOS) || defined(atarist)
  233.     /* File doesn't exist in current directory; try in INIT directory.  */
  234. + #ifdef atarist
  235. +   cp = getenv("GNULIB");
  236. + #else
  237.     cp = getenv("INIT");
  238. + #endif
  239.     if (filename == 0 && cp != 0)
  240.       {
  241.         filename = malloc(strlen(cp) + strlen(PFILE1) + 2);
  242. ***************
  243. *** 366,372 ****
  244.     if (k==0) sys$exit(SS$_NORMAL);
  245.     sys$exit(SS$_ABORT);
  246.   #else
  247. ! #ifdef MSDOS
  248.     if (actfile) unlink(actfile);
  249.     if (tmpattrsfile) unlink(tmpattrsfile);
  250.     if (tmptabfile) unlink(tmptabfile);
  251. --- 378,384 ----
  252.     if (k==0) sys$exit(SS$_NORMAL);
  253.     sys$exit(SS$_ABORT);
  254.   #else
  255. ! #if defined(MSDOS) || defined(atarist)
  256.     if (actfile) unlink(actfile);
  257.     if (tmpattrsfile) unlink(tmpattrsfile);
  258.     if (tmptabfile) unlink(tmptabfile);
  259. *** reader.c.orig    Wed May 13 19:47:03 1992
  260. --- reader.c    Wed May 13 23:11:14 1992
  261. ***************
  262. *** 52,58 ****
  263.   extern int expected_conflicts;
  264.   extern char *token_buffer;
  265.   
  266. ! #ifndef MSDOS
  267.   extern char *realloc ();
  268.   #endif
  269.   
  270. --- 52,58 ----
  271.   extern int expected_conflicts;
  272.   extern char *token_buffer;
  273.   
  274. ! #if !(defined(MSDOS) || defined(atarist))
  275.   extern char *realloc ();
  276.   #endif
  277.   
  278. ***************
  279. *** 901,907 ****
  280.       case '/':
  281.         putc(c, fguard);
  282.         c = getc(finput);
  283. !       if (c != '*' && c != '/');
  284.           continue;
  285.   
  286.         cplus_comment = (c == '/');
  287. --- 901,907 ----
  288.       case '/':
  289.         putc(c, fguard);
  290.         c = getc(finput);
  291. !       if (c != '*' && c != '/')
  292.           continue;
  293.   
  294.         cplus_comment = (c == '/');
  295. *** system.h.orig    Wed May 13 19:47:12 1992
  296. --- system.h    Wed May 13 18:44:37 1992
  297. ***************
  298. *** 1,3 ****
  299. --- 1,10 ----
  300. + #ifdef atarist
  301. + #include <stdlib.h>
  302. + #include <unistd.h>
  303. + #include <memory.h>
  304. + #include <string.h>
  305. + #endif
  306. + 
  307.   #ifdef MSDOS
  308.   #include <stdlib.h>
  309.   #include <io.h>
  310.