home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume23 / xenix-gnu / part01 / gcc-1.40.pch next >
Encoding:
Text File  |  1991-09-27  |  40.2 KB  |  1,343 lines
  1. *** gcc-1.40/Makefile    Mon Jul 29 13:15:49 1991
  2. --- Makefile    Mon Jul 29 13:45:38 1991
  3. ***************
  4. *** 157,162 ****
  5. --- 157,167 ----
  6.   # HARD_PARAMS_FLAGS= -Anansi
  7.   # (Says vasta@apollo.com.)
  8.   
  9. + # To compile GCC with Microsoft CC use the following CFLAGS and then
  10. + # 'make msc'.  Note that the resultant cc1 CANNOT compile with optimization
  11. + # switched on, ie stage 2 should not have '-O' in CFLAGS
  12. + CFLAGS = -g $(XCFLAGS)
  13. + PRAGMA=pragmapack.o
  14.   
  15.   # Dependency on obstack, alloca, malloc or whatever library facilities
  16.   # are not installed in the system libraries.
  17. ***************
  18. *** 192,198 ****
  19.    symout.o dbxout.o sdbout.o emit-rtl.o insn-emit.o \
  20.    integrate.o jump.o cse.o loop.o flow.o stupid.o combine.o \
  21.    regclass.o local-alloc.o global-alloc.o reload.o reload1.o caller-save.o \
  22. !  insn-peep.o final.o recog.o insn-recog.o insn-extract.o insn-output.o
  23.   
  24.   # Files to be copied away after each stage in building.
  25.   STAGE_GCC=gcc
  26. --- 197,203 ----
  27.    symout.o dbxout.o sdbout.o emit-rtl.o insn-emit.o \
  28.    integrate.o jump.o cse.o loop.o flow.o stupid.o combine.o \
  29.    regclass.o local-alloc.o global-alloc.o reload.o reload1.o caller-save.o \
  30. !  insn-peep.o final.o recog.o insn-recog.o insn-extract.o insn-output.o $(PRAGMA)
  31.   
  32.   # Files to be copied away after each stage in building.
  33.   STAGE_GCC=gcc
  34. ***************
  35. *** 239,244 ****
  36. --- 244,257 ----
  37.   # is include the system varargs.h.
  38.   
  39.   all: config.status gnulib gcc cc1 cpp float.h gnulib2 # cc1plus
  40. + msc: config.status gnulib cc1 cpp float.h gcc.msc gnulib2 # cc1plus
  41. + 
  42. + gcc.msc:    cc1 cpp version.o $(LIBDEPS)
  43. +     ./cpp -I/usr/include $(CPPFLAGS) $(INCLUDES) gcc.c > tmpgcc.i
  44. +     -./cc1 -quiet $(CFLAGS) -o tmpgcc.s tmpgcc.i
  45. +     /usr/local/lib/gcc-as -o gcc.o tmpgcc.s
  46. +     rm -f tmpgcc.s
  47. +     $(CC) $(CFLAGS) $(LDFLAGS) -o gcc gcc.o version.o $(LIBS)
  48.   
  49.   # Use this instead of `all' if you need to convert the libraries
  50.   # before you can use the compiler.
  51. ***************
  52. *** 433,440 ****
  53.   # from the GNU Emacs distribution.
  54.   # Note some machines won't allow $(CC) without -S on this source file.
  55.   alloca.o:    alloca.c
  56. !     $(CC) $(CFLAGS) -S `echo $(srcdir)/alloca.c | sed 's,^\./,,'`
  57. !     as alloca.s -o alloca.o
  58.   
  59.   # Now the source files that are generated from the machine description.
  60.   
  61. --- 446,452 ----
  62.   # from the GNU Emacs distribution.
  63.   # Note some machines won't allow $(CC) without -S on this source file.
  64.   alloca.o:    alloca.c
  65. !     $(CC) $(CFLAGS) -c `echo $(srcdir)/alloca.c | sed 's,^\./,,'`
  66.   
  67.   # Now the source files that are generated from the machine description.
  68.   
  69. *** gcc-1.40/Makefile.msc
  70. --- Makefile.msc    Wed Jul 10 16:36:39 1991
  71. ***************
  72. *** 0 ****
  73. --- 1,22 ----
  74. + # Microsoft C 5.1's built in cpp does not grok the large macros.
  75. + # Therefore use the AT&T cpp instead for the files that fail.
  76. + # Use this command line:
  77. + #    make -f Makefile -f Makefile.msc msc ALLOCA=alloca.o
  78. + 
  79. + explow.o:    explow.c
  80. +     /lib/cpp -P ${INCLUDES} explow.c >explow.i
  81. +     mv explow.i x.c
  82. +     cc ${CFLAGS} -c x.c
  83. +     mv x.o explow.o
  84. + 
  85. + reload.o:    reload.c
  86. +     /lib/cpp -P ${INCLUDES} reload.c >reload.i
  87. +     mv reload.i x.c
  88. +     cc ${CFLAGS} -c x.c
  89. +     mv x.o reload.o
  90. + 
  91. + recog.o:    recog.c
  92. +     /lib/cpp -P ${INCLUDES} recog.c >recog.i
  93. +     mv recog.i x.c
  94. +     cc ${CFLAGS} -c x.c
  95. +     mv x.o recog.o
  96. *** gcc-1.40/c-parse.y    Mon Jul 29 13:15:54 1991
  97. --- c-parse.y    Wed Jul 10 15:56:21 1991
  98. ***************
  99. *** 1803,1808 ****
  100. --- 1803,1849 ----
  101.             && getc (finput) == 'm'
  102.             && getc (finput) == 'a'
  103.             && ((c = getc (finput)) == ' ' || c == '\t' || c == '\n'))
  104. + #ifdef PRAGMA_PACK
  105. +       {
  106. +         token = yylex();
  107. +             if (token != IDENTIFIER) 
  108. +             goto skipline;
  109. + 
  110. +             if (strcmp(token_buffer, "pack") != 0)
  111. +                 goto skipline;
  112. +         
  113. +         token = yylex();
  114. +           if (token != '(') {
  115. +             error ("invalid #pragma pack expecting '('");
  116. +             goto skipline;
  117. +         }
  118. + 
  119. +         /* setup default alignment first */
  120. + 
  121. +         pragma_pack_default();
  122. + 
  123. +         token = yylex();
  124. +         if (token != ')')
  125. +         {
  126. +             if (token == CONSTANT
  127. +                 && TREE_CODE (yylval.ttype) == INTEGER_CST) {
  128. +                 int l = TREE_INT_CST_LOW (yylval.ttype);
  129. +                 pragma_pack(l);
  130. +             }
  131. +             else {
  132. +                 error ("invalid #pragma pack expecting 1, 2 or 4");
  133. +                 goto skipline;
  134. +             }
  135. + 
  136. +             token = yylex();
  137. +         }
  138. + 
  139. +           if (token != ')') {
  140. +             error ("invalid #pragma pack expecting ')'");
  141. +             goto skipline;
  142. +         }
  143. +         }
  144. + #endif
  145.           goto skipline;
  146.       }
  147.   
  148. *** gcc-1.40/config/tm-xenix386.h
  149. --- config/tm-xenix386.h    Thu Aug 22 15:28:27 1991
  150. ***************
  151. *** 0 ****
  152. --- 1,146 ----
  153. + /* Definitions for Intel 386 running SCO XENIX 386.
  154. +    Copyright (C) 1988 Free Software Foundation, Inc.
  155. + 
  156. + This file is part of GNU CC.
  157. + 
  158. + GNU CC is free software; you can redistribute it and/or modify
  159. + it under the terms of the GNU General Public License as published by
  160. + the Free Software Foundation; either version 1, or (at your option)
  161. + any later version.
  162. + 
  163. + GNU CC is distributed in the hope that it will be useful,
  164. + but WITHOUT ANY WARRANTY; without even the implied warranty of
  165. + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  166. + GNU General Public License for more details.
  167. + 
  168. + You should have received a copy of the GNU General Public License
  169. + along with GNU CC; see the file COPYING.  If not, write to
  170. + the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  171. + 
  172. + 
  173. + #include "tm-i386.h"
  174. + 
  175. + /* Use the XENIX GAS assembler syntax.  */
  176. + 
  177. + #include "tm-xgas386.h"
  178. + 
  179. + /* By default, target has a 80387 -- XENIX emulates it anyway  */
  180. + 
  181. + #define TARGET_DEFAULT 1
  182. + 
  183. + /* Use crt1.o as a startup file and crtn.o as a closing file.  */
  184. + 
  185. + #define STARTFILE_SPEC  "Sseg.o%s %{!p:Scrt0.o%s} %{p:Smcrt0.o%s}"
  186. + #define STANDARD_STARTFILE_PREFIX_1 "/lib/386/"
  187. + 
  188. + /* -v is appropriate for use with GAS */
  189. + 
  190. + #define ASM_SPEC    "%{v} %{g}"
  191. + 
  192. + #define LIB_SPEC "Slibcfp.a%s Slibc.a%s"
  193. + 
  194. + #define FULL_LINK_SPEC "%{!c:%{!M*:%{!E:%{!S:ld %{o*} %l %{g:-g} \
  195. +  %{A} %{r} %{s} %{u*} \
  196. +  %{!nostdlib:%S} %{L*} %{!o:-o a.out} %o %{!nostdlib:gnulib%s %L gnulib%s}\n \
  197. +   }}}}";
  198. + #define LINK_SPEC "-i"
  199. + 
  200. + /* This is for use with G++.  FASCIST_LDR is defined in G++'s Makefile */
  201. + 
  202. + #ifdef FASCIST_LDR
  203. + 
  204. + #define FULL_COLLECT_SPEC \
  205. +   "%{!c:%{!M*:%{!E:%{!S:collect -o %g.S %g.R\n\
  206. + as %g.S -o %g.O\n\
  207. + ld %{o*} %{!o:-o a.out} %{!nostdlib:%S } %l %{g:-g} \
  208. + %{L*} %o %g.O %{!nostdlib:gnulib++%s gnulib%s %L } \n\
  209. + }}}}"
  210. + 
  211. + #define PLUS_FULL_LINK_SPEC \
  212. +   "%{!c:%{!M*:%{!E:%{!S:ld -o %g.R \
  213. +   %{!nostdlib:%S } %l %{g:-g}\
  214. +   %{L*} %o %{!nostdlib:gnulib++%s gnulib%s g++dummy%s %L }\n }}}}";
  215. + 
  216. + #else /* not FASCIST_LDR */
  217. + 
  218. + #define FULL_COLLECT_SPEC \
  219. +   "%{!c:%{!M*:%{!E:%{!S:collect -o %g.S %g.R\n\
  220. + as %g.S -o %g.O\n\
  221. + ld %{o*} %{!o:-o a.out} %{!nostdlib:%S } %g.R %g.O \
  222. +   %{!nostdlib:gnulib++%s gnulib%s %L } \n\
  223. + }}}}"
  224. + 
  225. + #define PLUS_FULL_LINK_SPEC \
  226. +   "%{!c:%{!M*:%{!E:%{!S:ld -r -o %g.R %l %{g:-g}\
  227. +   %{L*} %o %{!nostdlib:%L }\n }}}}";
  228. + 
  229. + #endif /* not FASCIST_LDR */
  230. + 
  231. + /* Specify predefined symbols in preprocessor.  */
  232. + /* You may wish to add -DM_INTERNAT, depending on your libraries. */
  233. + 
  234. + #define CPP_PREDEFINES "-Dunix \
  235. + -DM_I86 -DM_I86SM -DM_SDATA -DM_STEXT -DM_I386 -DM_XENIX -DM_BITFIELDS \
  236. + -Di386 -DM_XOUT -DM_SYS5 -DM_SYSV -DM_SYS3 -DM_SYSIII \
  237. + -DM_WORDSWAP"
  238. + 
  239. + /* no #sccs in preprocessor.  */
  240. + 
  241. + #undef SCCS_DIRECTIVE
  242. + 
  243. + /* no #ident */
  244. + 
  245. + /* #define ASM_OUTPUT_IDENT(FILE, NAME) fprintf (FILE, "\t.ident \"%s\"\n", NAME); */
  246. + 
  247. + /* We dont want to output SDB debugging information.  */
  248. + 
  249. + #undef SDB_DEBUGGING_INFO
  250. + 
  251. + /* We want to output DBX debugging information, for use with GDB only  */
  252. + 
  253. + #define DBX_DEBUGGING_INFO
  254. + 
  255. + /* Implicit library calls should use memcpy, not bcopy, etc.  */
  256. + 
  257. + #define TARGET_MEM_FUNCTIONS
  258. + 
  259. + /* Writing `int' for a bitfield forces int alignment for the structure.  */
  260. + 
  261. + #undef PCC_BITFIELD_TYPE_MATTERS
  262. + 
  263. + /* Generate an external symbol request for __fltused if 80387 selected */
  264. + 
  265. + #undef ASM_FILE_START
  266. + #define ASM_FILE_START(FILE)                    \
  267. +   { fprintf (FILE, "\t.file\t\"%s\"\n", dump_base_name);     \
  268. +     if (TARGET_80387)                         \
  269. +       fprintf (FILE, "\t.stabs\t\"__fltused\",0,0,0,0\n"); }
  270. + 
  271. + 
  272. + /* Machines that use the AT&T assembler syntax
  273. +    also return floating point values in an FP register.  */
  274. + /* Define how to find the value returned by a function.
  275. +    VALTYPE is the data type of the value (as a tree).
  276. +    If the precise function being called is known, FUNC is its FUNCTION_DECL;
  277. +    otherwise, FUNC is 0.  */
  278. + 
  279. + #define VALUE_REGNO(MODE) \
  280. +   (((MODE)==SFmode || (MODE)==DFmode) ? FIRST_FLOAT_REG : 0)
  281. + 
  282. + /* 1 if N is a possible register number for a function value. */
  283. + 
  284. + #define FUNCTION_VALUE_REGNO_P(N) ((N) == 0 || (N)== FIRST_FLOAT_REG)
  285. + 
  286. + /* Put address tables in data segment */
  287. + 
  288. + #undef ASM_OUTPUT_CASE_LABEL
  289. + #define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE)    \
  290. +   { data_section();                        \
  291. +     ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM); }
  292. + 
  293. + #undef ASM_OUTPUT_CASE_END
  294. + #define ASM_OUTPUT_CASE_END(FILE,NUM,INSN) text_section()
  295. + 
  296. + #undef FUNCTION_PROFILER
  297. + #define FUNCTION_PROFILER(FILE, LABELNO)  \
  298. +    fprintf (FILE, "\tmovl $%sP%d,%%edx\n\tcall __mcount\n", LPREFIX, (LABELNO));
  299. *** gcc-1.40/config/tm-xgas386.h
  300. --- config/tm-xgas386.h    Wed Jul 10 15:56:17 1991
  301. ***************
  302. *** 0 ****
  303. --- 1,253 ----
  304. + /* Definitions for AT&T assembler syntax for the Intel 80386.
  305. +    Copyright (C) 1988 Free Software Foundation, Inc.
  306. + 
  307. + This file is part of GNU CC.
  308. + 
  309. + GNU CC is free software; you can redistribute it and/or modify
  310. + it under the terms of the GNU General Public License as published by
  311. + the Free Software Foundation; either version 1, or (at your option)
  312. + any later version.
  313. + 
  314. + GNU CC is distributed in the hope that it will be useful,
  315. + but WITHOUT ANY WARRANTY; without even the implied warranty of
  316. + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  317. + GNU General Public License for more details.
  318. + 
  319. + You should have received a copy of the GNU General Public License
  320. + along with GNU CC; see the file COPYING.  If not, write to
  321. + the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  322. + 
  323. + 
  324. + #ifdef PRAGMA_PACK
  325. + #define TARGET_VERSION fprintf (stderr, " (80386, Xenix GAS syntax, #pragma pack() support included)");
  326. + #else
  327. + #define TARGET_VERSION fprintf (stderr, " (80386, Xenix GAS syntax)");
  328. + #endif
  329. + 
  330. + /* Define the syntax of instructions and addresses.  */
  331. + 
  332. + /* Define some concatenation macros to concatenate an opcode
  333. +    and one, two or three operands.  In other assembler syntaxes
  334. +    they may alter the order of ther operands.  */
  335. + 
  336. + #ifdef __STDC__
  337. + #define AS2(a,b,c) #a " " #b "," #c
  338. + #define AS3(a,b,c,d) #a " " #b "," #c "," #d
  339. + #define AS1(a,b) #a " " #b
  340. + #else
  341. + #define AS1(a,b) "a b"
  342. + #define AS2(a,b,c) "a b,c"
  343. + #define AS3(a,b,c,d) "a b,c,d"
  344. + #endif  
  345. + 
  346. + /* Output the size-letter for an opcode.
  347. +    CODE is the letter used in an operand spec (L, B, W, S or Q).
  348. +    CH is the corresponding lower case letter
  349. +      (except if CODE is L then CH is `l').  */
  350. + #define PUT_OP_SIZE(CODE,CH,FILE) putc (CH,(FILE))
  351. + 
  352. + /* Opcode suffix for fullword insn.  */
  353. + #define L_SIZE "l"
  354. + 
  355. + /* Prefix for register names in this syntax.  */
  356. + #define RP "%"
  357. + 
  358. + /* Prefix for immediate operands in this syntax.  */
  359. + #define IP "$"
  360. + 
  361. + /* Prefix for internally generated assembler labels.  */
  362. + #define LPREFIX ".L"
  363. + 
  364. + /* Output the prefix for an immediate operand, or for an offset operand.  */
  365. + #define PRINT_IMMED_PREFIX(FILE)  fputs ("$", (FILE))
  366. + #define PRINT_OFFSET_PREFIX(FILE)  fputs ("$", (FILE))
  367. + 
  368. + /* Indirect call instructions should use `*'.  */
  369. + #define USE_STAR 1
  370. + 
  371. + /* Prefix for a memory-operand X.  */
  372. + #define PRINT_PTR(X, FILE)
  373. + 
  374. + /* Delimiters that surround base reg and index reg.  */
  375. + #define ADDR_BEG(FILE) putc('(', (FILE))
  376. + #define ADDR_END(FILE) putc(')', (FILE))
  377. + 
  378. + /* Print an index register (whose rtx is IREG).  */
  379. + #define PRINT_IREG(FILE,IREG) \
  380. +   do                                \
  381. +   { fputs (",", (FILE)); PRINT_REG ((IREG), 0, (FILE)); }    \
  382. +   while (0)
  383. +   
  384. + /* Print an index scale factor SCALE.  */
  385. + #define PRINT_SCALE(FILE,SCALE) \
  386. +   if ((SCALE) != 1) fprintf ((FILE), ",%d", (SCALE))
  387. + 
  388. + /* Print a base/index combination.
  389. +    BREG is the base reg rtx, IREG is the index reg rtx,
  390. +    and SCALE is the index scale factor (an integer).  */
  391. + 
  392. + #define PRINT_B_I_S(BREG,IREG,SCALE,FILE) \
  393. +   { ADDR_BEG (FILE);                 \
  394. +     if (BREG) PRINT_REG ((BREG), 0, (FILE));    \
  395. +     if ((IREG) != 0)                \
  396. +       { PRINT_IREG ((FILE), (IREG));        \
  397. +         PRINT_SCALE ((FILE), (SCALE)); }    \
  398. +     ADDR_END (FILE); }
  399. + 
  400. + /* Define the syntax of pseudo-ops, labels and comments.  */
  401. + 
  402. + /* Assembler pseudos to introduce constants of various size.  */
  403. + 
  404. + #define ASM_BYTE "\t.byte "
  405. + #define ASM_SHORT "\t.value "
  406. + #define ASM_LONG "\t.long "
  407. + #define ASM_DOUBLE "\t.double "
  408. + 
  409. + /* String containing the assembler's comment-starter.  */
  410. + 
  411. + #define COMMENT_BEGIN "/"
  412. + 
  413. + /* Output at beginning of assembler file.  */
  414. + /* The .file command should always begin the output.  */
  415. + 
  416. + #undef ASM_FILE_START
  417. + #define ASM_FILE_START(FILE) \
  418. +   fprintf (FILE, "\t.file\t\"%s\"\n", dump_base_name);
  419. + 
  420. + /* Don't write a `.optim' pseudo; this assembler doesn't handle them.  */
  421. + 
  422. + #undef ASM_FILE_START_1
  423. + #define ASM_FILE_START_1(FILE)
  424. + 
  425. + /* Output to assembler file text saying following lines
  426. +    may contain character constants, extra white space, comments, etc.  */
  427. + 
  428. + #define ASM_APP_ON "/APP\n"
  429. + 
  430. + /* Output to assembler file text saying following lines
  431. +    no longer contain unusual constructs.  */
  432. + 
  433. + #define ASM_APP_OFF "/NO_APP\n"
  434. + 
  435. + /* This is how to output an assembler line
  436. +    that says to advance the location counter by SIZE bytes.  */
  437. + 
  438. + #define ASM_OUTPUT_SKIP(FILE,SIZE)  \
  439. +   fprintf ((FILE), "\t.set .,.+%d\n", (SIZE))
  440. + 
  441. + /* Output before read-only data.  */
  442. + 
  443. + #define TEXT_SECTION_ASM_OP ".text"
  444. + 
  445. + /* Output before writable data.  */
  446. + 
  447. + #define DATA_SECTION_ASM_OP ".data"
  448. + 
  449. + /* Define the syntax of labels and symbol definitions/declarations.  */
  450. + 
  451. + /* This says how to output an assembler line
  452. +    to define a global common symbol.  */
  453. + /* We don't use ROUNDED because the standard compiler doesn't,
  454. +    and the linker gives error messages if a common symbol
  455. +    has more than one length value.  */
  456. + 
  457. + #define ASM_OUTPUT_COMMON(FILE, NAME, SIZE, ROUNDED)  \
  458. + ( fputs (".comm ", (FILE)),            \
  459. +   assemble_name ((FILE), (NAME)),        \
  460. +   fprintf ((FILE), ",%d\n", (SIZE)))
  461. + 
  462. + /* This says how to output an assembler line
  463. +    to define a local common symbol.  */
  464. + 
  465. + /* Try lcomm to generate local bss 
  466. +  *
  467. +  * #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED)  \
  468. +  *   (data_section (),                \
  469. +  *    ASM_OUTPUT_LABEL ((FILE), (NAME)),        \
  470. +  *    fprintf ((FILE), "\t.set .,.+%d\n", (ROUNDED)))
  471. +  */
  472. + #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED)  \
  473. + ( fputs (".lcomm ", (FILE)),            \
  474. +   assemble_name ((FILE), (NAME)),        \
  475. +   fprintf ((FILE), ",%d\n", (SIZE)))
  476. + 
  477. + 
  478. + /* This is how to output an assembler line
  479. +    that says to advance the location counter
  480. +    by a multiple of 2**LOG bytes.  */
  481. + 
  482. + #define ASM_OUTPUT_ALIGN(FILE,LOG)    \
  483. +      if ((LOG)!=0) fprintf ((FILE), "\t.align %d\n", (LOG))
  484. + 
  485. + /* This is how to store into the string BUF
  486. +    the symbol_ref name of an internal numbered label where
  487. +    PREFIX is the class of label and NUM is the number within the class.
  488. +    This is suitable for output with `assemble_name'.  */
  489. + 
  490. + #define ASM_GENERATE_INTERNAL_LABEL(BUF,PREFIX,NUMBER)    \
  491. +   sprintf ((BUF), "*.%s%d", (PREFIX), (NUMBER))
  492. + 
  493. + /* This is how to output an internal numbered label where
  494. +    PREFIX is the class of label and NUM is the number within the class.  */
  495. + 
  496. + #define ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM)    \
  497. +   fprintf (FILE, ".%s%d:\n", PREFIX, NUM)
  498. + 
  499. + /* This is how to output a reference to a user-level label named NAME.  */
  500. + 
  501. + #define ASM_OUTPUT_LABELREF(FILE,NAME)    \
  502. +   fprintf (FILE, "_%s", NAME)
  503. + 
  504. + /* This is how to output a command to make the user-level label named NAME
  505. +    defined for reference from other files.  */
  506. + 
  507. + #define ASM_GLOBALIZE_LABEL(FILE,NAME)    \
  508. +   (fputs (".globl ", FILE), assemble_name (FILE, NAME), fputs ("\n", FILE))
  509. + 
  510. + /* How to output an ASCII string constant.  */
  511. + 
  512. + #define ASM_OUTPUT_ASCII(FILE, p, size) \
  513. + { int i=0;                         \
  514. +   while (i < size)                    \
  515. +     { if (i%10 == 0) { if (i!=0) fprintf (FILE, "\n");    \
  516. +                fprintf (FILE, ASM_BYTE); }    \
  517. +       else fprintf (FILE, ",");                \
  518. +     fprintf (FILE, "0x%x",(p[i++] & 0377)) ;}    \
  519. +       fprintf (FILE, "\n"); }
  520. + 
  521. + #define EXTRA_SECTIONS in_cdata
  522. + 
  523. + /* Define the additional functions to select our additional sections.  */
  524. + 
  525. + #define CDATA_SECTION_ASM_OP ".data 1"
  526. + 
  527. + #define EXTRA_SECTION_FUNCTIONS                        \
  528. + void                                    \
  529. + cdata_section ()                            \
  530. + {                                    \
  531. +   if (in_section != in_cdata)                        \
  532. +     {                                    \
  533. +       fprintf (asm_out_file, "%s\n", CDATA_SECTION_ASM_OP);        \
  534. +       in_section = in_cdata;                        \
  535. +     }                                \
  536. + }
  537. + 
  538. + /* Given a decl node or constant node, choose the section to output it in
  539. +    and select that section.  */
  540. + 
  541. +        /* following takes  care of constants  emitted from
  542. +       the hash table entries (see above comment)
  543. +        */
  544. + #define SELECT_SECTION_MODE(MODE,RTX) cdata_section();
  545. + #define SELECT_RTX_SECTION(MODE, RTX) cdata_section();
  546. + #define SELECT_SECTION(DECL)                        \
  547. +   { if (TREE_CODE (DECL) == STRING_CST) {                \
  548. +        if (flag_writable_strings)                    \
  549. +           data_section ();                        \
  550. +        else                                \
  551. +         cdata_section ();                        \
  552. +     }                                    \
  553. +     else if (TREE_READONLY (DECL) && ! TREE_VOLATILE (DECL))        \
  554. +       cdata_section ();                            \
  555. +     else                                \
  556. +       data_section (); }
  557. *** gcc-1.40/config/xm-xenix386.h
  558. --- config/xm-xenix386.h    Fri Jul 12 07:43:58 1991
  559. ***************
  560. *** 0 ****
  561. --- 1,55 ----
  562. + /* Configuration for GNU C-compiler for Intel 80386 running SCO Xenix 386
  563. +    Copyright (C) 1988 Free Software Foundation, Inc.
  564. + 
  565. + This file is part of GNU CC.
  566. + 
  567. + GNU CC is free software; you can redistribute it and/or modify
  568. + it under the terms of the GNU General Public License as published by
  569. + the Free Software Foundation; either version 1, or (at your option)
  570. + any later version.
  571. + 
  572. + GNU CC is distributed in the hope that it will be useful,
  573. + but WITHOUT ANY WARRANTY; without even the implied warranty of
  574. + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  575. + GNU General Public License for more details.
  576. + 
  577. + You should have received a copy of the GNU General Public License
  578. + along with GNU CC; see the file COPYING.  If not, write to
  579. + the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  580. + 
  581. + 
  582. + /* #defines that need visibility everywhere.  */
  583. + #define FALSE 0
  584. + #define TRUE 1
  585. + 
  586. + /* This describes the machine the compiler is hosted on.  */
  587. + #define HOST_BITS_PER_CHAR 8
  588. + #define HOST_BITS_PER_SHORT 16
  589. + #define HOST_BITS_PER_INT 32
  590. + #define HOST_BITS_PER_LONG 32
  591. + 
  592. + /* Arguments to use with `exit'.  */
  593. + #define SUCCESS_EXIT_CODE 0
  594. + #define FATAL_EXIT_CODE 33
  595. + 
  596. + #define USG
  597. + 
  598. + #ifndef __GNUC__
  599. + #define register auto /* Register variables are broken */
  600. + #endif
  601. + 
  602. + /* target machine dependencies.
  603. +    tm.h is a symbolic link to the actual target specific file.   */
  604. + #include "tm.h"
  605. + 
  606. + #define bcopy(a,b,c) memcpy (b,a,c)
  607. + #define bzero(a,b) memset (a,0,b)
  608. + #define bcmp(a,b,c) memcmp (a,b,c)
  609. + 
  610. + #ifdef __GNUC__
  611. + #define alloca(n) __builtin_alloca(n)
  612. + #endif
  613. + 
  614. + /* Implement Microsoft C compatible #pragma pack() */
  615. + 
  616. + #define PRAGMA_PACK
  617. *** gcc-1.40/config.gcc    Mon Jul 29 13:16:42 1991
  618. --- config.gcc    Wed Jul 10 15:56:16 1991
  619. ***************
  620. *** 331,336 ****
  621. --- 331,340 ----
  622.   #    370)
  623.   #        machine=370
  624.   #        ;;
  625. +     xenix386)        # for SCO Xenix/386
  626. +         cpu_type=i386
  627. +         configuration_file=xm-${machine}.h
  628. +         ;;
  629.       esac
  630.   
  631.           # if cpu_type is not set, define cpu_type to machine.
  632. *** gcc-1.40/gcc.c    Mon Jul 29 13:16:57 1991
  633. --- gcc.c    Fri Jul 12 08:15:31 1991
  634. ***************
  635. *** 303,312 ****
  636. --- 303,316 ----
  637.   };
  638.   
  639.   /* Here is the spec for running the linker, after compiling all files.  */
  640. + #ifdef FULL_LINK_SPEC
  641. + char *link_spec = FULL_LINK_SPEC
  642. + #else
  643.   char *link_spec = "%{!c:%{!M*:%{!E:%{!S:ld %{o*} %l\
  644.    %{A} %{d} %{e*} %{N} %{n} %{r} %{s} %{S} %{T*} %{t} %{u*} %{X} %{x} %{z}\
  645.    %{y*} %{!A:%{!nostdlib:%S}} \
  646.    %{L*} %o %{!nostdlib:%G gnulib%s %L gnulib%s %{!A:%E}}\n }}}}";
  647. + #endif
  648.   
  649.   /* Accumulate a command (program name and args), and run it.  */
  650.   
  651. ***************
  652. *** 361,368 ****
  653.   #define STANDARD_STARTFILE_PREFIX "/usr/local/lib/"
  654.   #endif /* !defined STANDARD_STARTFILE_PREFIX */
  655.   
  656.   char *standard_startfile_prefix = STANDARD_STARTFILE_PREFIX;
  657. ! char *standard_startfile_prefix_1 = "/lib/";
  658.   char *standard_startfile_prefix_2 = "/usr/lib/";
  659.   
  660.   /* Clear out the vector of arguments (after a command is executed).  */
  661. --- 365,376 ----
  662.   #define STANDARD_STARTFILE_PREFIX "/usr/local/lib/"
  663.   #endif /* !defined STANDARD_STARTFILE_PREFIX */
  664.   
  665. + #ifndef STANDARD_STARTFILE_PREFIX_1
  666. + #define STANDARD_STARTFILE_PREFIX_1 "/lib/"
  667. + #endif /* !defined STANDARD_STARTFILE_PREFIX_1 */
  668. + 
  669.   char *standard_startfile_prefix = STANDARD_STARTFILE_PREFIX;
  670. ! char *standard_startfile_prefix_1 = STANDARD_STARTFILE_PREFIX_1;
  671.   char *standard_startfile_prefix_2 = "/usr/lib/";
  672.   
  673.   /* Clear out the vector of arguments (after a command is executed).  */
  674. ***************
  675. *** 1383,1389 ****
  676.   
  677.   char *
  678.   handle_braces (p)
  679. !      register char *p;
  680.   {
  681.     register char *q;
  682.     char *filter;
  683. --- 1391,1397 ----
  684.   
  685.   char *
  686.   handle_braces (p)
  687. !      char *p;
  688.   {
  689.     register char *q;
  690.     char *filter;
  691. *** gcc-1.40/pragmapack.c
  692. --- pragmapack.c    Wed Jul 10 16:57:32 1991
  693. ***************
  694. *** 0 ****
  695. --- 1,26 ----
  696. + #define DEFAULT_ALIGN    32
  697. + 
  698. + static int pack_align = DEFAULT_ALIGN;
  699. + static int was_pragma = 0;
  700. + 
  701. + pragma_pack(val)
  702. + int val;
  703. + {
  704. +     pack_align = 8 * val;
  705. +     was_pragma = 1;
  706. + }
  707. + 
  708. + pragma_align_val()
  709. + {
  710. +     return pack_align;
  711. + }
  712. + 
  713. + pragma_pack_default()
  714. + {
  715. +     pack_align = DEFAULT_ALIGN;
  716. + }
  717. + 
  718. + int pragma_pack_seen()
  719. + {
  720. +     return was_pragma;
  721. + }
  722. *** gcc-1.40/stor-layout.c    Mon Jul 29 13:17:35 1991
  723. --- stor-layout.c    Wed Jul 10 15:56:23 1991
  724. ***************
  725. *** 514,519 ****
  726. --- 514,523 ----
  727.        or some divisor of it.  */
  728.   
  729.         layout_decl (field, var_size ? size_unit : const_size);
  730. + #ifdef PRAGMA_PACK
  731. +       if (pragma_pack_seen())
  732. +         DECL_ALIGN(field) = MIN(pragma_align_val(), DECL_ALIGN(field));
  733. + #endif
  734.         desired_align = DECL_ALIGN (field);
  735.   
  736.         /* Record must have at least as much alignment as any field.
  737. *** gcc-1.40/c-parse.tab.c    Mon Jul 29 13:21:25 1991
  738. --- c-parse.tab.c    Mon Jul 29 13:53:35 1991
  739. ***************
  740. *** 3201,3206 ****
  741. --- 3205,3251 ----
  742.             && getc (finput) == 'm'
  743.             && getc (finput) == 'a'
  744.             && ((c = getc (finput)) == ' ' || c == '\t' || c == '\n'))
  745. + #ifdef PRAGMA_PACK
  746. +       {
  747. +         token = yylex();
  748. +             if (token != IDENTIFIER) 
  749. +             goto skipline;
  750. + 
  751. +             if (strcmp(token_buffer, "pack") != 0)
  752. +                 goto skipline;
  753. +         
  754. +         token = yylex();
  755. +           if (token != '(') {
  756. +             error ("invalid #pragma pack expecting '('");
  757. +             goto skipline;
  758. +         }
  759. + 
  760. +         /* setup default alignment first */
  761. + 
  762. +         pragma_pack_default();
  763. + 
  764. +         token = yylex();
  765. +         if (token != ')')
  766. +         {
  767. +             if (token == CONSTANT
  768. +                 && TREE_CODE (yylval.ttype) == INTEGER_CST) {
  769. +                 int l = TREE_INT_CST_LOW (yylval.ttype);
  770. +                 pragma_pack(l);
  771. +             }
  772. +             else {
  773. +                 error ("invalid #pragma pack expecting 1, 2 or 4");
  774. +                 goto skipline;
  775. +             }
  776. + 
  777. +             token = yylex();
  778. +         }
  779. + 
  780. +           if (token != ')') {
  781. +             error ("invalid #pragma pack expecting ')'");
  782. +             goto skipline;
  783. +         }
  784. +         }
  785. + #endif
  786.           goto skipline;
  787.       }
  788.   
  789. *** fix.h.xenix
  790. --- fix.h.xenix    Thu Aug 22 21:18:21 1991
  791. ***************
  792. *** 0 ****
  793. --- 1,198 ----
  794. + # @(#) $Id: fix.h.xenix,v 1.3 1991/08/22 05:39:05 ronald Exp $
  795. + #
  796. + # (C) Copyright 1990, 1991 Ronald Khoo <ronald@ibmpcug.co.uk>
  797. + # Permission granted to use or abuse this program for any purpose,
  798. + # provided that all modified copies are clearly marked as such.
  799. + # No warranty is given for the fitness of this program for any purpose.
  800. + #
  801. + # Please treat this file as a document saying what I did and not really
  802. + # a program.  i.e.  Please read it through before considering running it.
  803. + #
  804. + # This is a quick hack to fix the SCO Xenix 386 include files so that
  805. + # they work with gcc at all.  No attempt has been made to do this
  806. + # in a general way whatsoever, and this script was not made with any
  807. + # reference to the GCC fixincludes script:  I still have no idea what
  808. + # that does.  This works (ish) for me.  Your mileage may vary.
  809. + # My include files were from the 2.3.4 operating system and the 2.3.1b
  810. + # development system.
  811. + #
  812. + # What the script does do:
  813. + #
  814. + # * stream edit files from /usr/include and /usr/include/sys
  815. + #   into /usr/local/lib/gcc-include, skipping those which are
  816. + #   provided by GCC.
  817. + # * make all references to M_I386 refer to __M_I386__ instead.
  818. + #   This enables programs compiled with gcc -ansi not to coredump.
  819. + #   This only works with gcc so don't give these hacked .h files to cc !!
  820. + # * put protection #ifdef tests to all files to allow them to be safely
  821. + #   multiply included.
  822. + # * time_t and size_t seem to be typedefed all over the place.  Protect them.
  823. + # * remove definition and use of va_list in stdio.h -- that's bogus.
  824. + #   (SCO has already fixed this one in 2.3.1)
  825. + # * make types of SIG_IGN, etc consistently void * in sys/signal.h
  826. + #   (to be consistent with <signal.h>)
  827. + # * various other individual hacks I've come across.  Note that these
  828. + #   are entirely ad-hoc.  You can find them in the lines starting with
  829. + #   sed_<name>="
  830. + #
  831. + # In particular, the ad-hocery was intended to make rcs 5.5 compile without
  832. + # hacking, even with all the recommended warning options set.
  833. + # It doesn't quite work -- rcs 5.5's configuration script is slightly broken.
  834. + # I hate gratuitous declarations.
  835. + #
  836. + # Note that this is only a beginning.  I keep finding annoyances which
  837. + # have to be fixed by hand.  Many prototypes are wrong in places like
  838. + # <stdio.h>, <stdlib.h> etc.  An afternoon spent with an editor in one
  839. + # hand and the ANSI standard in the other would probably not go amiss.
  840. + #
  841. + # This script will probably fall flat on its face if you've already
  842. + # modified the system include files to do what it wants to do.
  843. + # Starting from a fresh set may be a reasonable approach.
  844. + #
  845. + # $Log: fix.h.xenix,v $
  846. + # Revision 1.3  1991/08/22  05:39:05  ronald
  847. + # pre-release version for gfm@mencon.oz to try out.
  848. + #
  849. + # Revision 1.2  1991/08/19  10:55:30  ronald
  850. + # Interim release for gcc 1.40, beta testers.
  851. + #
  852. + # Revision 1.1  90/04/25  18:51:21  ronald
  853. + # Initial revision
  854. + # 
  855. + 
  856. + PATH=/etc:/bin:/usr/bin export PATH
  857. + 
  858. + # usage: /usr/local/lib/fix.h.xenix
  859. + 
  860. + lib=${lib-/usr/local/lib}
  861. + include=$lib/gcc-include
  862. + stdinc=${stdinc-/usr/include}
  863. + 
  864. + sed_mi386=" -e '/\\([^_]\\)M_I386/s//\\1__M_I386__/g'"
  865. + sed_timet=" -e '/typedef.*[     ]time_t/ {
  866. + i\\
  867. + #ifndef _TIME_T
  868. + i\\
  869. + #define _TIME_T
  870. + a\\
  871. + #endif /* _TIME_T */
  872. + }'"
  873. + sed_sizet=" -e '/typedef.*[     ]size_t/ {
  874. + i\\
  875. + #ifndef _SIZE_T
  876. + i\\
  877. + #define _SIZE_T
  878. + a\\
  879. + #endif /* _SIZE_T */
  880. + }'"
  881. + # No prizes for guessing what this macro is used for.
  882. + # Also, no prizes for guessing which editor I use.
  883. + # :s/^[     ]*\([^( ]*\)[     ]*\((.*\);[     ]*$/    \/\\\\(\1[     ]*\\\\)([^)][^)]*)\/s\/\/\\\\1 \2\//
  884. + #
  885. + sed_param=" -e '
  886. +     /\(\/\*[^/]*\)\/\*/s//\1 *\/ \/*/
  887. +     /^\/\*.*\/\*.*pdp11[     ]*\$/s/\$/*\//
  888. + '"
  889. + sed_errno=" -e '
  890. +     /\\(perror[     ]*\\)([^)][^)]*)/s//\\1 ( const char * )/
  891. + '"
  892. + sed_stdlib=" -e '
  893. +     /\\(getenv[     ]*\\)([^)][^)]*)/s//\\1 (const char *)/
  894. +     /\\(atoi[     ]*\\)([^)][^)]*)/s//\\1 (const char *)/
  895. +     /.*\\(free[     ]*\\)([^)][^)]*)/s//extern void \\1 ( void * )/
  896. +     /.*\\(malloc[     ]*\\)([^)][^)]*)/s//extern void *\\1 (unsigned)/
  897. +     /.*\\(realloc[     ]*\\)([^)][^)]*)/s//extern void *\\1 (void *, unsigned)/
  898. +     /.*\\(calloc[     ]*\\)([^)][^)]*)/s//extern void *\\1 (unsigned, unsigned)/
  899. + '"
  900. + sed_stdio=" -e '
  901. +     /\\(printf[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, ...)/
  902. +     /\\(fprintf[     ]*\\)([^)][^)]*)/s//\\1 ( FILE *, const char *, ... )/
  903. +     /\\(vfprintf[     ]*\\)([^)][^)]*)/s//\\1 ( FILE *, const char *, char * )/
  904. +     /\\(vprintf[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, char * )/
  905. +     /\\(sprintf[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char *, ... )/
  906. +     /\\(vsprintf[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char *, char * )/
  907. +     /\\(fopen[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, const char * )/
  908. +     /\\(fdopen[     ]*\\)([^)][^)]*)/s//\\1 ( int, const char * )/
  909. +     /\\(fputs[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, FILE * )/
  910. +     /\\(fread[     ]*\\)([^)][^)]*)/s//\\1 ( void *, size_t, size_t, FILE * )/
  911. +     /\\(fwrite[     ]*\\)([^)][^)]*)/s//\\1 ( const void *, size_t, size_t, FILE * )/
  912. +     /typedef.*va_list/d
  913. +     /va_list/s//char */
  914. + '"
  915. + sed_string=" -e '
  916. +      /\\(strlen[     ]*\\)([^)][^)]*)/s//\\1 ( const char * )/
  917. +      /\\(strcat[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char * )/
  918. +      /\\(strncat[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char *, int )/
  919. +      /\\(strcpy[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char * )/
  920. +      /\\(strncpy[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char *, int )/
  921. +      /\\(strchr[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, int )/
  922. +      /\\(strrchr[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, int )/
  923. +      /\\(strcmp[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, const char * )/
  924. +      /\\(strncmp[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, const char *, int )/
  925. +     /define.*strerror.*;[     ]*\$/s/;[     ]*\$//
  926. + '"
  927. + sed_signal=" -e '/int.*(\\*)/s/int/void/g'"
  928. + sed_error=" -e '/^[     ]*ERROR[     ]\\(.*\\)\$/ {
  929. + s//\\1/
  930. + s/\"//g
  931. + s/[     ][     ]*/ /g
  932. + s/.*/    #error \"&\"/
  933. + }'"
  934. + 
  935. + hackit()
  936. + {
  937. +     echo "\r                         \rHacking $1\c"  >&2 
  938. +     idemp=
  939. +     expr "`sed 1q $1`" : '.*ifn.*_H.*' > /dev/null && idemp=yes
  940. +     test "$idemp" || {
  941. +         name=_INCLUDED_`echo $1 | tr './[a-z]' '__[A-Z]'`_AUTOFIX
  942. +         echo "#ifndef $name" > $include/$1
  943. +         echo "#define $name" >> $include/$1
  944. +     }
  945. +     script="$sed_mi386"
  946. +     grep -s size_t $1 > /dev/null &&
  947. +         grep -s _SIZE_T $1 > /dev/null || script="$script $sed_sizet"
  948. +     grep -s time_t $1 > /dev/null &&
  949. +         grep -s _TIME_T $1 > /dev/null || script="$script $sed_timet"
  950. +     case $1 in
  951. +         errno.h)    script="$script $sed_errno"    ;;
  952. +         stdlib.h)    script="$script $sed_stdlib"    ;;
  953. +         string.h)    script="$script $sed_string"    ;;
  954. +         stdio.h)    script="$script $sed_errno $sed_stdio"    ;;
  955. +         sys/param.h)    script="$script $sed_param"    ;;
  956. +         sys/signal.h)    script="$script $sed_signal"    ;;
  957. +         curses.h|sys/emap.h|sys/param.h|sys/sxt.h)
  958. +                 script="$script $sed_error"    ;;
  959. +     esac
  960. +     eval sed "$script" $1 >> $include/$1
  961. +     test "$idemp" || echo "#endif /* $name */" >> $include/$1
  962. + }
  963. + 
  964. + [ -d $include ] || mkdir $include
  965. + [ -d $include/sys ] || mkdir $include/sys
  966. + 
  967. + cd $stdinc || exit 1
  968. + echo "\rHacking files from $stdinc into $include" >&2
  969. + 
  970. + # This bit is useful for hacking the sed scripts above.
  971. + # for i in sys/param.h # stdio.h stdlib.h errno.h curses.h string.h 
  972. + # do hackit $i ; done
  973. + # exit 1
  974. + 
  975. + for i in *.h 
  976. + do
  977. +     case $i in
  978. +         # Use the GCC supplied versions of these files:
  979. +         assert.h|float.h|limits.h|stdarg.h|stddef.h|varargs.h)    ;;
  980. +         *) hackit $i ;;
  981. +     esac
  982. + done
  983. + 
  984. + echo "\rHacking files from $stdinc/sys into $include/sys" >&2
  985. + for i in sys/*.h ; do hackit $i ; done
  986. + 
  987. + cd $include
  988. + cd sys ; chgrp bin . *.h ; chmod 664 *.h ; chmod 775 . ; chown bin . *.h
  989. + cd .. ; chgrp bin . *.h ; chmod 664 *.h ; chmod 775 . ; chown bin . *.h
  990. + 
  991. + echo '\r..... done.  Have a nice day.  --Ronald' >&2
  992. *** fixmin.xenix
  993. --- fixmin.xenix    Thu Aug 22 21:09:28 1991
  994. ***************
  995. *** 0 ****
  996. --- 1,76 ----
  997. + # $Id: fixmin.xenix,v 1.1 1991/08/22 20:06:32 ronald Exp $
  998. + # Change Log is at the end of the file.
  999. + #
  1000. + # This is the bare minimum of header fixing that I could get away with
  1001. + # in order to compile GCC.  This applies to Xenix 2.3.3 with 2.3.1
  1002. + # Development System.  You're on your own with other versions.
  1003. + # These changes should only be in effect while building gcc.
  1004. + # You should undo them, and replace the fixes with something better
  1005. + # in /usr/local/lib/gcc-include once you've installed gcc.
  1006. + 
  1007. + # usage: fixmin.xenix [ undo ]
  1008. + # If the "undo" parameter is specified, reverses the actions of a
  1009. + # previous run of fixmin.
  1010. + 
  1011. + cd /usr/include
  1012. + 
  1013. + if test "$1" = undo ; then
  1014. +     for i in *.bfm ; do
  1015. +         j=`basename $i .bfm`
  1016. +         mv $i $j
  1017. +         echo restored $j >&2
  1018. +     done
  1019. +     cd sys
  1020. +     for i in *.bfm ; do
  1021. +         j=`basename $i .bfm`
  1022. +         mv $i $j
  1023. +         echo restored sys/$j >&2
  1024. +     done
  1025. +     exit 0
  1026. + fi
  1027. + 
  1028. + for i in stdio.h time.h string.h sys/types.h ; do
  1029. +     if egrep '(_SIZE_T|_TIME_T)' $i  > /dev/null || test -r $i.bfm; then
  1030. +         : do nothing, already there
  1031. +     else
  1032. +         echo fixing $i
  1033. +         sed '/typedef.*[     ]size_t/ {
  1034. + i\
  1035. + #ifndef _SIZE_T
  1036. + i\
  1037. + #define _SIZE_T
  1038. + a\
  1039. + #endif
  1040. + }
  1041. + /typedef.*[     ]time_t/ {
  1042. + i\
  1043. + #ifndef _TIME_T
  1044. + i\
  1045. + #define _TIME_T
  1046. + a\
  1047. + #endif
  1048. + }'        $i > $i.new
  1049. +         mv $i $i.bfm
  1050. +         mv $i.new $i
  1051. +     fi
  1052. + done
  1053. + 
  1054. + if sed 1q stdio.h | grep -s 'ifndef[     ][     ]*FILE' > /dev/null ; then
  1055. +     : do nothing -- already there.
  1056. + else
  1057. +     echo stdio.h once more ...
  1058. +     ed stdio.h <<-\EOF
  1059. +         0a
  1060. +         #ifndef FILE
  1061. +         .
  1062. +         $a
  1063. +         #endif
  1064. +         .
  1065. +         w
  1066. + EOF
  1067. + fi
  1068. + #
  1069. + # $Log: fixmin.xenix,v $
  1070. + # Revision 1.1  1991/08/22  20:06:32  ronald
  1071. + # Initial revision
  1072. + #
  1073. *** xenixld.c
  1074. --- xenixld.c    Thu Aug 22 21:17:40 1991
  1075. ***************
  1076. *** 0 ****
  1077. --- 1,264 ----
  1078. + static char rcsid[] = "@(#) $Id: xenixld.c,v 1.2 1991/08/22 20:17:03 ronald Exp $\n";
  1079. + /*
  1080. +  * This is the version distributed by RoboBar limited, currently maintained
  1081. +  * by Ronald Khoo <ronald@ibmpcug.co.uk>
  1082. +  *
  1083. +  * $Log: xenixld.c,v $
  1084. +  * Revision 1.2  1991/08/22  20:17:03  ronald
  1085. +  * Baseline for release with GCC 1.40
  1086. +  * Various mods by Steve, and a hack to prevent loading of COFF files.
  1087. +  *
  1088. +  */
  1089. + /* Linker driver program for Xenix that can handle gcc command lines
  1090. +    Copyright (C) 1990 Christoph Badura
  1091. + 
  1092. +    Comments and buggestions are welcome. Write to bad@flatlin.sub.org.
  1093. + 
  1094. + This file is not part of GNU CC.
  1095. + 
  1096. + This program is free software; you can redistribute it and/or modify
  1097. + it under the terms of the GNU General Public License as published by
  1098. + the Free Software Foundation; either version 1, or (at your option)
  1099. + any later version.
  1100. + 
  1101. + This program is distributed in the hope that it will be useful,
  1102. + but WITHOUT ANY WARRANTY; without even the implied warranty of
  1103. + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  1104. + GNU General Public License for more details.
  1105. + 
  1106. + You should have received a copy of the GNU General Public License
  1107. + along with GNU CC; see the file COPYING.  If not, write to
  1108. + the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  1109. + 
  1110. + */
  1111. + 
  1112. + #include <stdio.h>
  1113. + 
  1114. + #include "config.h"
  1115. + 
  1116. + #ifdef USG
  1117. + #define R_OK 4
  1118. + #define W_OK 2
  1119. + #define X_OK 1
  1120. + #define vfork fork
  1121. + #endif /* USG */
  1122. + 
  1123. + extern void free ();
  1124. + 
  1125. + /* Default prefixes to attach to command names.  */
  1126. + 
  1127. + #ifndef STANDARD_STARTFILE_PREFIX
  1128. + #define STANDARD_STARTFILE_PREFIX "/usr/local/lib/"
  1129. + #endif /* !defined STANDARD_STARTFILE_PREFIX */
  1130. + 
  1131. + char *standard_startfile_prefix = STANDARD_STARTFILE_PREFIX;
  1132. + char *standard_startfile_prefix_1 = "/lib/386/";
  1133. + char *standard_startfile_prefix_2 = "/usr/lib/";
  1134. + 
  1135. + char * progname;        /* who am i */
  1136. + 
  1137. + fatal (char *msg)
  1138. + {
  1139. +     fprintf (stderr, "%s:%s\n", progname, msg);
  1140. +     exit (1);
  1141. + }
  1142. + 
  1143. + xmalloc (size)
  1144. +      int size;
  1145. + {
  1146. +   register int value = malloc (size);
  1147. +   if (!value)
  1148. +     fatal ("Virtual memory full.");
  1149. +   return value;
  1150. + }
  1151. + 
  1152. + xrealloc (void *ptr, int size)
  1153. + {
  1154. +   register int value = realloc (ptr, size);
  1155. +   if (!value)
  1156. +     fatal ("Virtual memory full.");
  1157. +   return value;
  1158. + }
  1159. + 
  1160. + struct lib_path {
  1161. +     struct lib_path *next;
  1162. +     int    length;            /* length of following string */
  1163. +     char *path;
  1164. + };
  1165. + 
  1166. + struct lib_path *lib_path;    /* the library search path */
  1167. + 
  1168. + struct lib_path *
  1169. + add_path (char *name, struct lib_path *prev)
  1170. + {
  1171. +     int size;
  1172. +     struct lib_path *lp;
  1173. + 
  1174. + #ifdef DEBUG
  1175. +     fprintf (stderr, "%s: adding %s to library path\n", progname, name);
  1176. + #endif
  1177. +     lp = (struct lib_path *) xmalloc (sizeof (struct lib_path));
  1178. +     lp->next = prev;
  1179. +     lp->length = strlen (name);
  1180. +     lp->path = name;
  1181. +     return lp;
  1182. + }
  1183. + 
  1184. + /*
  1185. +  * Added by Ronald.Khoo@ibmpcug.co.uk:
  1186. +  * SCO systems have two kinds of libraries, OMF and COFF.  XENIX GCC/G++
  1187. +  * only works with OMF, this hack prevents the program accidentally finding
  1188. +  * COFF libraries earlier in the search path from the corresponding OMF one.
  1189. +  */
  1190. + int
  1191. + islib(char *name)
  1192. + {
  1193. +     int i;
  1194. +     FILE *fp = fopen(name, "r");
  1195. +     if (fp == 0)
  1196. +         return 0;
  1197. +     i = getw(fp);
  1198. +     fclose(fp);
  1199. +     return (i & 0xff) == 0x80 /* OMF */ || (i & 0xffff) == 0xff65 /* ar */;
  1200. + }
  1201. + 
  1202. + char *
  1203. + find_library_1 (char *name)
  1204. + {
  1205. +     struct lib_path *lp;
  1206. +     int name_size, size = 0;
  1207. +     char *temp_name = 0;
  1208. +     int win = 0;
  1209. + 
  1210. +     name_size = strlen (name) + 1;
  1211. +     for (lp=lib_path; lp && !win; lp=lp->next) {
  1212. +     if ((lp->length + name_size + 1) > size) {
  1213. +         size = lp->length + name_size + 1;
  1214. +         if (temp_name)
  1215. +         free (temp_name);
  1216. +         temp_name = 0;
  1217. +     }
  1218. +     if (!temp_name)
  1219. +         temp_name = (char *)xmalloc (size);
  1220. +     strcpy (temp_name, lp->path);
  1221. +     if (temp_name[lp->length - 1] != '/')
  1222. +         strcat (temp_name, "/");
  1223. +     strcat (temp_name, name);
  1224. +     win = islib(temp_name);
  1225. + #ifdef DEBUG
  1226. +     fprintf (stderr, "%s: searching %s -> %d\n", progname, temp_name, win);
  1227. + #endif
  1228. +     }
  1229. +     if (win)
  1230. +     return temp_name;
  1231. +     else {
  1232. +     free (temp_name);
  1233. +     return name;
  1234. +     }
  1235. + }
  1236. + 
  1237. + char *
  1238. + find_library (char *name)
  1239. + {
  1240. +     char *temp_name;
  1241. +     char *lib_name;
  1242. + 
  1243. +     temp_name = (char *)xmalloc (strlen (name) + 7); /* 6 chars for "Slib" and ".a" */
  1244. +     strcpy (temp_name, "lib");
  1245. +     strcat (temp_name, name);
  1246. +     strcat (temp_name, ".a");
  1247. +     if ((lib_name = find_library_1 (temp_name)) == temp_name) {
  1248. +     strcpy (temp_name, "Slib"); /* system libraries start with "Slib" */
  1249. +     strcat (temp_name, name);
  1250. +     strcat (temp_name, ".a");
  1251. +     lib_name = find_library_1 (temp_name);
  1252. +     }
  1253. +     free (temp_name);
  1254. + #ifdef DEBUG
  1255. +     fprintf (stderr, "%s: library name is %s\n", progname, lib_name);
  1256. +     fprintf (stderr, "%s: returning %s\n", progname,
  1257. +          (lib_name == temp_name) ? name : lib_name);
  1258. + #endif
  1259. +     return (lib_name == temp_name) ? name : lib_name;
  1260. + }
  1261. + 
  1262. + 
  1263. + char **argbuf;            /* this holds the argument vector for ld */
  1264. + int argbuf_index, argbuf_length;
  1265. + 
  1266. + /* Add one argument to the vector at the end. */
  1267. + 
  1268. + void
  1269. + store_arg (char *arg)
  1270. + {
  1271. +   if (argbuf_index + 1 == argbuf_length)
  1272. +     {
  1273. +       argbuf = (char **) xrealloc (argbuf, (argbuf_length*=2)*sizeof (char *));
  1274. +     }
  1275. + 
  1276. +   argbuf[argbuf_index++] = arg;
  1277. +   argbuf[argbuf_index] = 0;
  1278. + }
  1279. + 
  1280. + /*
  1281. +  * The standard Xenix ld is seriously braindamaged. It does not understand
  1282. +  * -llib options.  So we expand them here and furthermore we process -Lpath
  1283. +  * options as used by the GNU tools.
  1284. +  */
  1285. + 
  1286. + int
  1287. + main (int argc, char **argv)
  1288. + {
  1289. +     int size;
  1290. +     char *lib_name;
  1291. + #ifdef DEBUG
  1292. +     char **argp;
  1293. + #endif
  1294. + 
  1295. +     progname = *argv;
  1296. + 
  1297. +     argbuf_length = 10;
  1298. +     argbuf_index = 0;
  1299. +     argbuf = (char **) xmalloc (argbuf_length * sizeof (char *));
  1300. + 
  1301. +     /* push default library search paths on lib_stack */
  1302. +     lib_path = add_path (standard_startfile_prefix_2, (struct lib_path *)0);
  1303. +     lib_path = add_path (standard_startfile_prefix_1, lib_path);
  1304. +     lib_path = add_path (standard_startfile_prefix, lib_path);
  1305. + 
  1306. +     /*
  1307. +      * Copy argv to argbuf processing -L switches and
  1308. +      * resolving library names. Preserve the order of the arguments.
  1309. +      */
  1310. +     store_arg ("ld"); /* provide argv[0] for ld */
  1311. +     for (++argv; --argc > 0; ++argv) {
  1312. +     if ((*argv)[0] == '-')
  1313. +         switch ((*argv)[1]) {
  1314. +         case 'L':
  1315. +         lib_path = add_path ((*argv)+2, lib_path);
  1316. +         break;
  1317. +         case 'l':
  1318. +         lib_name = find_library ((*argv)+2);
  1319. + #ifdef DEBUG
  1320. +         fprintf (stderr, "%s: found library %s\n", progname, lib_name);
  1321. + #endif
  1322. +         store_arg (lib_name);
  1323. +         break;
  1324. +         default:
  1325. +         store_arg (*argv);
  1326. +         }
  1327. +     else
  1328. +         /* just an input file */
  1329. +         store_arg (*argv);
  1330. +     }
  1331. + #ifdef DEBUG
  1332. +     fprintf (stderr, "%s: linker call: \"", progname);
  1333. +     for (argp=argbuf; *argp; argp++)
  1334. +     fprintf (stderr, "%s ", *argp);
  1335. +     putc ('\n', stderr);
  1336. + #endif
  1337. +     execv ("/bin/ld", argbuf);
  1338. +     /* maybe ld is not ld */
  1339. +     fprintf (stderr, "%s: unable to run /bin/ld", progname);
  1340. +     exit (1);
  1341. + }
  1342.  
  1343.