home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / mint / lib / mlib35d.zoo / diffc next >
Encoding:
Text File  |  1993-09-15  |  107.5 KB  |  4,570 lines
  1. diff -cr ../mntlib34/Bugs ./Bugs
  2. *** ../mntlib34/Bugs    Tue Jul  6 09:45:30 1993
  3. --- ./Bugs    Tue Jul 13 12:09:40 1993
  4. ***************
  5. *** 31,45 ****
  6.     For you to decide upon the correct action!
  7.   
  8.     [I just read this for the 90th time and I finally understand what's being
  9. !   said (I can be pretty dense sometimes. <grin>) I guess making symbolic
  10. !   links for the sys/ files is the best solution but I'm reluctant to
  11. !   distribute the library that way as I'm not sure how ZOO would unpack the
  12. !   links on a TOS filesystem.  -entropy]
  13.   
  14.   abort.c: ++entropy
  15. !   Should fclose() all streams in the same way of exit().  Also, if my
  16. !   understanding is correct, it should unmask SIGABRT, and also set SIGABRT's
  17. !   signal handler to SIG_DFL if it was SIG_IGN, before raising the signal.
  18.   
  19.   access.c: ++entropy
  20.     I think my "superuser can access anything" assumption is wrong, especially
  21. --- 31,49 ----
  22.     For you to decide upon the correct action!
  23.   
  24.     [I just read this for the 90th time and I finally understand what's being
  25. !   said (I can be pretty dense sometimes. <grin>) I've hopefully made it
  26. !   impossible for this to go into an infinite loop by changing the include
  27. !   protection in some of the sys/*.h files.  Now it should just unwind the
  28. !   second time it hits the sys/wait.h file (or other sys/ file) and
  29. !   eventually your compile will bomb because it never got the correct
  30. !   definitions from the include file.  That should be easier to track down
  31. !   than a hung compiler, at least. -entropy]
  32.   
  33.   abort.c: ++entropy
  34. !   If my understanding is correct, abort() should unmask SIGABRT, and also
  35. !   set SIGABRT's signal handler to SIG_DFL if it was SIG_IGN, before raising
  36. !   the signal.  Would someone with a copy of the POSIX spec please look into
  37. !   this?
  38.   
  39.   access.c: ++entropy
  40.     I think my "superuser can access anything" assumption is wrong, especially
  41. ***************
  42. *** 146,152 ****
  43.   scanf.c: ++jrb
  44.     Evidently loses big time.  Run Gcctests and find out what's what.
  45.   
  46. ! sigaction.c: ++nox@jelal.north.de, ++entropy
  47.     sigblock() could be declared int at least #ifndef __MSHORT__.  The
  48.     functions sigpending(), sigprocmask(), and sigsuspend() have not been
  49.     tested.  The other new POSIX sig*() functions have been tested but not
  50. --- 150,156 ----
  51.   scanf.c: ++jrb
  52.     Evidently loses big time.  Run Gcctests and find out what's what.
  53.   
  54. ! sigactio.c: ++nox@jelal.north.de, ++entropy
  55.     sigblock() could be declared int at least #ifndef __MSHORT__.  The
  56.     functions sigpending(), sigprocmask(), and sigsuspend() have not been
  57.     tested.  The other new POSIX sig*() functions have been tested but not
  58. ***************
  59. *** 200,221 ****
  60.     file!  (which can be annoying on things like lock files...)
  61.     [I don't think this can be fixed in the library.  MiNT acts this
  62.     way on purpose.  -entropy]
  63. - 
  64. - utime.c: ++boender
  65. -   stime(): My System V.3 manual state that `The stime() call will
  66. -   fail if the effective user ID of the calling process is not
  67. -   super-user.'. Now, I know the underlying system calls Tsetdate()
  68. -   and Tsettime() are not privileged, and possibly the clock itself
  69. -   can also be set on hardware level. What do we do here? Perhaps
  70. -   MiNT should be fixed to check the effective user ID in Tsetdate()
  71. -   and Tsettime() (a trivial fix in MiNT source file dos.c), or
  72. -   perhaps we should do a check in stime(). I personally would prefer
  73. -   MiNT to be fixed. Could you raise this subject with Eric Smith?
  74. -   [I did, and I believe someone mentioned that it is now a privileged
  75. -   call in MiNT 1.05, but I'm still running 1.04 so I cannot verify this.
  76. -   As to the hardware clock, I'd hope that would be in protected memory
  77. -   on newer machines, but I don't know.  Anyone want to give me a TT
  78. -   so I can try it? <grin> -entropy]
  79.   
  80.   utmp.c: ++boender
  81.     The utmp structure as defined differs from the System V structure.
  82. --- 204,209 ----
  83. diff -cr ../mntlib34/Changelog ./Changelog
  84. *** ../mntlib34/Changelog    Thu Jul  8 07:50:18 1993
  85. --- ./Changelog    Mon Sep 13 07:21:28 1993
  86. ***************
  87. *** 4,9 ****
  88. --- 4,137 ----
  89.   Changes are listed in *reverse* order, most recent changes being
  90.   first.
  91.   
  92. + PATCHLEVEL35::
  93. + 
  94. + unx2dos.c: ++schwab
  95. +     _unx2dos("/dev/.") -> ".:" -> file not found.  This patch isn't
  96. +     optimal, because it only works for the first 26 drives, but better
  97. +     than before. (Who has more than 26 drives anyway? :-)
  98. + wait.c, waitpid.c, wait.h: ++Robert.Wilhelm@Physik.TU-Muenchen.DE
  99. +     Accept both POSIX and BSD style parameters.  [I'm not certain these
  100. +     patches really leave us with a POSIX-compliant wait*() suite, but
  101. +     I'll leave it be for now -entropy]
  102. + Makefile: ++Bjarne_Pohlers
  103. +     Fix 020 targets to use 'make install020', and fix all targets to
  104. +     do 'make clean' only when necessary.
  105. + doprnt.c, scanf.c: ++Bjarne_Pohlers@ms2.maus.de
  106. +     Add support for printing/scanning long longs.
  107. + div.c: ++pvt1-117
  108. +     Add div functions for compilers other than GCC.
  109. + bsearch.c: ++dsb
  110. +     Fix bug reported by Thorsten Roskowetz: the order arguments to
  111. +     bsearch()'s comparison function was reversed.
  112. + sozobon/makefile, sozobon/readme: ++dsb
  113. +     Updated to reflect recent changes in the library.
  114. + thread.c: ++dsb
  115. +     Fix a strange declaration (extern static?!?).
  116. + sozobon/linea.s, sozobon/makefile: ++dsb@cs.duke.edu
  117. +     Fix some HSC linker problems by punting alglobal.o.
  118. + ioctl.h: ++Jan-Hinrich_Fessel@un.maus.ruhr.de (Jan-Hinrich Fessel)
  119. +     Make it possible to include both ioctl.h and filesys.h.
  120. + pgrp.c: ++schwab
  121. +     Correctly check the MiNT version in _bsd_getpgrp().
  122. + clock.c, doprnt.c, main.c, thread.c, uname.c: ++pvt1-117
  123. +     Changes to keep Lattice C from generating annoying warnings, and
  124. +     other miscellaneous cleanups. [Once again I've modified these
  125. +     patches in various ways, so if something's broken it's my fault
  126. +     -entropy].
  127. + math.h, process.h, support.h, unistd.h, exec.c, execp.c, findfile.c, 
  128. + scanf.c, spawn.c, spawnve.c, spawnvp.c, statfs.c, textio.c: ++schwab
  129. +     Add 'const' to declarations where appropriate.
  130. + malloc.c:  ++schwab
  131. +     Make malloc() round all memory requests to the page size to be able
  132. +     to use all the available memory.
  133. + setjmp.cpp, setjmp.h: ++schwab
  134. +     Some cleanup; one element of jmp_buf[] can be saved by using the
  135. +     fact that signal 0 cannot be masked; why was the type char*[] insead
  136. +     of long[]?
  137. + osbind.cpp: ++schwab
  138. +     Add some missing functions added; code cleanup.
  139. + select.c: ++schwab@ls5.informatik.uni-dortmund.de
  140. +     Fix select() to deal with timeouts of more than 65.535 seconds. This
  141. +     is needed for emacs 19.
  142. + statfs.c: ++schwab
  143. +     In statfs(): before passing to Dcntl, the path must be passed
  144. +     through _unx2dos, and it should be declared const.
  145. + sysconf.c: ++schwab
  146. +     Update the value returned for _PC_LAST.
  147. + fopen.c: ++schwab
  148. +     Make fopen() use 0666 as the default file mask (use umask() if you
  149. +     want something else); make mkdir() respect the umask setting.
  150. + mktemp.c: ++schwab
  151. +     mktemp() can generate a name more than once; the length of the
  152. +     pattern should not be changed (emacs depends on it).
  153. + lattice/crt0.s: ++pvt1-117
  154. +     Add some conditional stuff depending on program type.
  155. + utime.c: ++shenson@nyx.cs.du.edu
  156. +     Pass through a NULL tset argument unchanged to the filesystem
  157. +     so that it can determine permissions correctly.
  158. + falcon.h: ++hyc@hanauma.Jpl.Nasa.Gov, ++Markus_Kilbinger@ac.maus.de
  159. +     Change several erroneous macros to correctly cast return to short.
  160. + lattice/*: ++pvt1-117
  161. +     Strip all carriage returns from Lattice C files.
  162. + spawn.c: ++Ole_Arndt
  163. +     Add script interpretation (#!).
  164. + sync.c, support.h: ++Ole_Arndt
  165. +     NEW file, sync() and fsync() (for Minixfs only).  Proto in support.h.
  166. + sigactio.c: ++Ole_Arndt
  167. +     Use __NSIG instead of NSIG, may as well be POSIX-clean.
  168. + errno.h: ++Ole_Arndt
  169. +     Add errors ENOTDIR and ELOOP.
  170. + signal.h: ++Ole_Arndt@f.maus.de (Ole Arndt)
  171. +     Fix definition of _SIGSET_MAX_INDEX to correct several bugs
  172. +     in the POSIX signal mask functios.
  173. + stdio.h:
  174. +     Add vsscanf() and _getbuf() protos (yech).
  175. + dirent.h:
  176. +     Add alphasort() proto (excluded by _POSIX_SOURCE).
  177. + utmp.c, wtmp.c, utmp.h:
  178. +     Rename write_utmp() to _write_utmp().  Rename write_wtmp() to
  179. +     _write_wtmp().  Add protos (and other cleanups) to utmp.h.
  180. + atof.c, fdopen.c, fputs.c:
  181. +     Move 'register' to beginning of declarations (shuts up gcc -Wall).
  182. + fwrite.c: ++michal
  183. +         With unbuffered IO fwrite miscounts number of characters written.
  184. + findfile.c: ++michal
  185. +     Try to accomodate tos style paths PATH=e:\bin,c:\bin,...
  186. + unistd.h: ++jrb
  187. +     Take out setlinebuf, doesn't really belong here.
  188. + ffs.c: ++NTOMCZAK@vm.ucs.UAlberta.CA (Michal Jaegermann)
  189. +     An even faster algorithm.  Yow!  Are we optimized yet?
  190. + support.h:
  191. +     Added _exit() and gethostname() protos. Removed write_utmp() and
  192. +     write_wtmp() protos.
  193. + lib.h, crtinit.c:
  194. +     Moved prototypes from crtinit.c to lib.h, and added more to lib.h.
  195. + abort.c, main.c, lib.h:
  196. +     Make abort() close file handles in exactly the same manner
  197. +     as exit().
  198. + sigactio.c, signal.h: ++nox@jelal.north.de, ++Oskar, ++entropy
  199. +     Fix type of sa_mask in struct sigaction (sigset_t, not long).
  200. +     Clean up dirty tricks in sigaction() (UNTESTED).
  201. + falcon.h: ++Markus_Kilbinger@ac.maus.de, ++entropy
  202. +     Add missing traps.
  203. + unistd.h, support.h:
  204. +     Cleaned unistd.h for easier reading.  Moved back the link(),
  205. +     symlink(), and readlink() protos from support.h (sorry if I seem
  206. +     really indecisive on where some of these protos belong).
  207. + doprnt.c, getdtabl.c, gethostn.c, mknod.c, nice.c, open.c, putenv.c,
  208. + symlink.c, utime.c:
  209. +     Include appropriate headers for protos (and fixed mknod() proto).
  210. + sys/statfs.h:
  211. +     Add statfs() proto.
  212. + sys/errno.h, sys/ioctl.h, sys/resource.h, sys/signal.h, sys/wait.h:
  213. +     Fix multiple-include protection to hopefully prevent possible
  214. +     infinite include loops (see Bugs file).
  215. + getpw.c, pwd.h: ++Jan-Hinrich_Fessel@un.maus.de (Oskar)
  216. +     Use uid_t (_UID_T) for getpwuid() instead of int (POSIX).
  217. + lattice/inc.i: ++pvt1-117@nada.kth.se
  218. +     Fix a typo.
  219. + 
  220.   PATCHLEVEL34::
  221.   
  222.   ffs.c: ++frog
  223. ***************
  224. *** 14,20 ****
  225.   doprnt.c: ++schwab@ls5.informatik.uni-dortmund.de (Andreas Schwab)
  226.       The decimal precision in a printf format does not include the sign or
  227.       hex prefix, e.g. printf ("%-2.5d", -18) should print "-00018".
  228. ! select.c, time.h: ++Frank_Baumgart@pb.maus,de, ++entropy
  229.       Get struct timeval from time.h, eliminate local definition.
  230.       Add prototype of select() to time.h (is there a better place?)
  231.   ctype.h, grp.h, dirent.h, stddef.h, string.h:
  232. --- 142,148 ----
  233.   doprnt.c: ++schwab@ls5.informatik.uni-dortmund.de (Andreas Schwab)
  234.       The decimal precision in a printf format does not include the sign or
  235.       hex prefix, e.g. printf ("%-2.5d", -18) should print "-00018".
  236. ! select.c, time.h: ++Frank_Baumgart@pb.maus.de, ++entropy
  237.       Get struct timeval from time.h, eliminate local definition.
  238.       Add prototype of select() to time.h (is there a better place?)
  239.   ctype.h, grp.h, dirent.h, stddef.h, string.h:
  240. diff -cr ../mntlib34/Files ./Files
  241. *** ../mntlib34/Files    Thu Jul  8 08:37:26 1993
  242. --- ./Files    Sun Jul 18 09:03:42 1993
  243. ***************
  244. *** 41,53 ****
  245.   
  246.   MiNT library:
  247.   
  248. ! Bugs
  249. ! Changelog
  250. ! Copyright    execp.c        isatty.c            spawnvp.c
  251. ! Files        fcntl.c        kill.c        pause.c        sscanf.c
  252. ! GMakefile.16    fopenp.c                    stat.c
  253. ! GMakefile.32    fork.c        killpg.c    pipe.c        statfs.c
  254. ! GNUGPL2        fscanf.c            popen.c        symlink.c
  255.   Makefile    getcwd.c            read.c        sysconf.c
  256.   OChangelog                    rename.c    thread.c
  257.   PatchLev.h    getdtabl.c    link.c        rmdir.c        times.c
  258. --- 41,53 ----
  259.   
  260.   MiNT library:
  261.   
  262. ! Bugs                                spawnvp.c
  263. ! Changelog                            sscanf.c
  264. ! Copyright    execp.c        isatty.c            stat.c
  265. ! Files        fcntl.c        kill.c        pause.c        statfs.c
  266. ! GMakefile.16    fopenp.c                    symlink.c
  267. ! GMakefile.32    fork.c        killpg.c    pipe.c        sync.c
  268. ! GNUGPL2        fscanf.c            popen.c
  269.   Makefile    getcwd.c            read.c        sysconf.c
  270.   OChangelog                    rename.c    thread.c
  271.   PatchLev.h    getdtabl.c    link.c        rmdir.c        times.c
  272. diff -cr ../mntlib34/Makefile ./Makefile
  273. *** ../mntlib34/Makefile    Thu Jul  8 06:06:56 1993
  274. --- ./Makefile    Mon Sep 13 11:22:00 1993
  275. ***************
  276. *** 55,63 ****
  277.   INCLUDE_DIR := ../minclude
  278.   endif
  279.   XPFLAGS :=  -nostdinc -I$(INCLUDE_DIR)
  280. ! XFLAGS := $(XPFLAGS) -Wall
  281.   endif
  282.   
  283.   # Additional options for compiling C code
  284.   
  285.   #XFLAGS := -I../co
  286. --- 55,66 ----
  287.   INCLUDE_DIR := ../minclude
  288.   endif
  289.   XPFLAGS :=  -nostdinc -I$(INCLUDE_DIR)
  290. ! XFLAGS := $(XPFLAGS) -Wall -Wmissing-prototypes -Wstrict-prototypes
  291.   endif
  292.   
  293. + # Flags for extra 'long long' support under newer gcc's
  294. + #LONGLONG=-DPRINTF_LONGLONG
  295. + 
  296.   # Additional options for compiling C code
  297.   
  298.   #XFLAGS := -I../co
  299. ***************
  300. *** 112,118 ****
  301.   CFFLAGS = $(SHORT) $(COPTS)
  302.   
  303.   # normal CFLAGS including int size and omit-frame-pointer
  304. ! CFLAGS= $(CFFLAGS) $(FRAME)
  305.   
  306.   # cflags for stuff that needs to be compiled with 32 bit ints
  307.   CLFLAGS= $(COPTS) $(FRAME) $(DSHORT)
  308. --- 115,121 ----
  309.   CFFLAGS = $(SHORT) $(COPTS)
  310.   
  311.   # normal CFLAGS including int size and omit-frame-pointer
  312. ! CFLAGS= $(CFFLAGS) $(FRAME) $(LONGLONG)
  313.   
  314.   # cflags for stuff that needs to be compiled with 32 bit ints
  315.   CLFLAGS= $(COPTS) $(FRAME) $(DSHORT)
  316. ***************
  317. *** 150,213 ****
  318.   
  319.   #all: lshort llong lgshort lglong
  320.   top: lshort llong lbshort lblong
  321. ! #top: l020short l020long l020bshort l020blong
  322.   
  323. ! lshort:
  324.       $(MAKE) clean
  325.       $(MAKE) install
  326.   
  327. ! llong:
  328. !     $(MAKE) clean
  329.       $(MAKE) install TARGET="long-int"
  330.   
  331. ! lgshort:
  332. !     $(MAKE) clean
  333.       $(MAKE) install TARGET=debug
  334.   
  335. ! lglong:
  336. !     $(MAKE) clean
  337.       $(MAKE) install TARGET="long-int debug"
  338.   
  339. ! l020short:
  340. !     $(MAKE) clean
  341. !     $(MAKE) install TARGET=68020
  342. ! #    $(MAKE) install020 TARGET=68020
  343. ! 
  344. ! l020long:
  345. !     $(MAKE) clean
  346. !     $(MAKE) install TARGET="68020 long-int"
  347. ! #    $(MAKE) install020 TARGET="68020 long-int"
  348.   
  349. ! lbshort:
  350. !     $(MAKE) clean
  351.       $(MAKE) install TARGET="baserel"
  352.   
  353. ! lblong:
  354. !     $(MAKE) clean
  355.       $(MAKE) install TARGET="long-int baserel"
  356.   
  357. ! l020bshort:
  358. !     $(MAKE) clean
  359. !     $(MAKE) install TARGET="68020 baserel"
  360.   
  361. ! l020blong:
  362. !     $(MAKE) clean
  363. !     $(MAKE) install TARGET="68020 long-int baserel"
  364.   
  365. ! lsfpshort:
  366. !     $(MAKE) clean
  367.       $(MAKE) install TARGET="sfp004"
  368.   
  369. ! lsfplong:
  370. !     $(MAKE) clean
  371.       $(MAKE) install TARGET="long-int sfp004"
  372.   
  373. ! lbsfpshort:
  374. !     $(MAKE) clean
  375.       $(MAKE) install TARGET="baserel sfp004"
  376.   
  377. ! lbsfplong:
  378. !     $(MAKE) clean
  379.       $(MAKE) install TARGET="long-int baserel sfp004"
  380.   
  381.   bakclean:
  382. --- 153,207 ----
  383.   
  384.   #all: lshort llong lgshort lglong
  385.   top: lshort llong lbshort lblong
  386. ! top020: l020short l020long l020bshort l020blong
  387.   
  388. ! %.target:
  389.       $(MAKE) clean
  390. +     -rm -f *.target
  391. +     -touch $@
  392. + 
  393. + lshort: lshort.target
  394.       $(MAKE) install
  395.   
  396. ! llong: llong.target
  397.       $(MAKE) install TARGET="long-int"
  398.   
  399. ! lgshort: lgshort.target
  400.       $(MAKE) install TARGET=debug
  401.   
  402. ! lglong: lglong.target
  403.       $(MAKE) install TARGET="long-int debug"
  404.   
  405. ! l020short: l020short.target
  406. !     $(MAKE) install020 TARGET=68020
  407. ! #    $(MAKE) install TARGET=68020
  408. ! 
  409. ! l020long: l020long.target
  410. !     $(MAKE) install020 TARGET="68020 long-int"
  411. ! #    $(MAKE) install TARGET="68020 long-int"
  412.   
  413. ! lbshort: lbshort.target
  414.       $(MAKE) install TARGET="baserel"
  415.   
  416. ! lblong: lblong.target
  417.       $(MAKE) install TARGET="long-int baserel"
  418.   
  419. ! l020bshort: l020bshort.target
  420. !     $(MAKE) install020 TARGET="68020 baserel"
  421.   
  422. ! l020blong: l020blong.target
  423. !     $(MAKE) install020 TARGET="68020 long-int baserel"
  424.   
  425. ! lsfpshort: lsfpshort.target
  426.       $(MAKE) install TARGET="sfp004"
  427.   
  428. ! lsfplong: lsfplong.target
  429.       $(MAKE) install TARGET="long-int sfp004"
  430.   
  431. ! lbsfpshort: lbsfpshort.target
  432.       $(MAKE) install TARGET="baserel sfp004"
  433.   
  434. ! lbsfplong: lbsfplong.target
  435.       $(MAKE) install TARGET="long-int baserel sfp004"
  436.   
  437.   bakclean:
  438. ***************
  439. *** 226,231 ****
  440. --- 220,226 ----
  441.       rm -f foo bar baz
  442.   
  443.   distclean: realclean
  444. +     rm -f diffc diffh
  445.   
  446.   # Get the rules to build everything...
  447.   
  448. diff -cr ../mntlib34/PatchLev.h ./PatchLev.h
  449. *** ../mntlib34/PatchLev.h    Tue Jul  6 07:50:46 1993
  450. --- ./PatchLev.h    Fri Jul  9 06:30:38 1993
  451. ***************
  452. *** 3,6 ****
  453.    *    directory.
  454.    */
  455.   
  456. ! #define PatchLevel "34"
  457. --- 3,6 ----
  458.    *    directory.
  459.    */
  460.   
  461. ! #define PatchLevel "35"
  462. diff -cr ../mntlib34/README ./README
  463. *** ../mntlib34/README    Wed Jun 23 05:53:30 1993
  464. --- ./README    Sun Jul 11 05:47:24 1993
  465. ***************
  466. *** 11,19 ****
  467.   GNU C and common files:  entropy@terminator.rs.itd.umich.edu (Nick Castellano)
  468.   Sozobon C/HSC:  dsb@cs.duke.edu (D. Scott Bigham)
  469.   Pure C:  hohmuth@freia.inf.tu-dresden.de (Michael Hohmuth)
  470. ! Lattice C:  ???
  471.   
  472. ! Be sure to read the "Changes" file so that you know what's new in this
  473.   release of the library.
  474.   
  475.   Also, please read the "Copyright" file for important copyright information
  476. --- 11,19 ----
  477.   GNU C and common files:  entropy@terminator.rs.itd.umich.edu (Nick Castellano)
  478.   Sozobon C/HSC:  dsb@cs.duke.edu (D. Scott Bigham)
  479.   Pure C:  hohmuth@freia.inf.tu-dresden.de (Michael Hohmuth)
  480. ! Lattice C:  pvt1-117@nada.kth.se 
  481.   
  482. ! Be sure to read the "Changelog" file so that you know what's new in this
  483.   release of the library.
  484.   
  485.   Also, please read the "Copyright" file for important copyright information
  486. diff -cr ../mntlib34/abort.c ./abort.c
  487. *** ../mntlib34/abort.c    Fri Feb 26 12:08:46 1993
  488. --- ./abort.c    Tue Jul 13 11:27:42 1993
  489. ***************
  490. *** 3,8 ****
  491. --- 3,9 ----
  492.   #include <signal.h>
  493.   #include <stdlib.h>
  494.   #include <unistd.h>
  495. + #include "lib.h"
  496.   
  497.   #ifndef SIGABRT
  498.   #define SIGABRT SIGIOT
  499. ***************
  500. *** 11,15 ****
  501. --- 12,17 ----
  502.   __EXITING abort()
  503.   {
  504.       raise(SIGABRT);
  505. +     _fclose_all_files();
  506.       _exit(127);
  507.   }
  508. diff -cr ../mntlib34/atof.c ./atof.c
  509. *** ../mntlib34/atof.c    Sun Feb 28 13:07:18 1993
  510. --- ./atof.c    Thu Jul 15 07:56:52 1993
  511. ***************
  512. *** 241,247 ****
  513.   #define CONVF    0x08
  514.   
  515.   double strtod (s, endptr)
  516. ! const register char *s;
  517.   char **endptr;
  518.   {
  519.       double         accum = 0.0;
  520. --- 241,247 ----
  521.   #define CONVF    0x08
  522.   
  523.   double strtod (s, endptr)
  524. ! register const char *s;
  525.   char **endptr;
  526.   {
  527.       double         accum = 0.0;
  528. diff -cr ../mntlib34/bsearch.c ./bsearch.c
  529. *** ../mntlib34/bsearch.c    Fri Feb 26 17:19:36 1993
  530. --- ./bsearch.c    Mon Sep 13 06:25:30 1993
  531. ***************
  532. *** 36,50 ****
  533.       while(a <= b)
  534.           {
  535.           c = (a + b) >> 1;    /* == ((a + b) / 2) */
  536. !         if ((dir = (*cmp)((void *)((char *)base + (c * size)), key)) != 0)
  537.               {
  538. !             if (dir > 0)
  539.               {
  540.                   if (c == 0)
  541.                   return(NULL);
  542.                   b = c - 1;
  543.               }
  544. !             else /* (dir < 0) */
  545.                   a = c + 1;
  546.               }
  547.           else
  548. --- 36,50 ----
  549.       while(a <= b)
  550.           {
  551.           c = (a + b) >> 1;    /* == ((a + b) / 2) */
  552. !         if ((dir = (*cmp)(key, (void *)((char *)base + (c * size)))) != 0)
  553.               {
  554. !             if (dir < 0)
  555.               {
  556.                   if (c == 0)
  557.                   return(NULL);
  558.                   b = c - 1;
  559.               }
  560. !             else /* (dir > 0) */
  561.                   a = c + 1;
  562.               }
  563.           else
  564. diff -cr ../mntlib34/clock.c ./clock.c
  565. *** ../mntlib34/clock.c    Wed Feb 17 13:23:24 1993
  566. --- ./clock.c    Sun Sep 12 20:14:12 1993
  567. ***************
  568. *** 13,19 ****
  569.    * containing the number of 200HZ ticks since the system was booted
  570.    */
  571.   
  572. ! static void getnow() { now = *((unsigned long *) 0x4baL); }
  573.   
  574.   clock_t
  575.   _clock()
  576. --- 13,26 ----
  577.    * containing the number of 200HZ ticks since the system was booted
  578.    */
  579.   
  580. ! static long getnow __PROTO((void));
  581. ! 
  582. ! static long
  583. ! getnow()
  584. ! {
  585. !     now = *((unsigned long *) 0x4baL);
  586. !     return 0;
  587. ! }
  588.   
  589.   clock_t
  590.   _clock()
  591. diff -cr ../mntlib34/crtinit.c ./crtinit.c
  592. *** ../mntlib34/crtinit.c    Sun May 23 11:27:50 1993
  593. --- ./crtinit.c    Wed Sep 15 02:22:16 1993
  594. ***************
  595. *** 82,87 ****
  596. --- 82,88 ----
  597.   
  598.   #include <basepage.h>
  599.   #include <osbind.h>
  600. + #include <support.h>
  601.   #include "lib.h"
  602.   
  603.   #define isspace(c) ((c) == ' '||(c) == '\t')
  604. ***************
  605. *** 132,143 ****
  606.   
  607.   static long parseargs    __PROTO((BASEPAGE *));
  608.   static void setup_handlers    __PROTO((void));
  609. - __EXTERN void _main    __PROTO((long, char **, char **));
  610. - __EXTERN void _init_signal    __PROTO((void));
  611. - __EXTERN void _monstartup __PROTO((void *lowpc, void *highpc));
  612. - __EXTERN void __mcleanup __PROTO((void));
  613. - __EXTERN void _moncontrol __PROTO((long));
  614. - __EXTERN void _setstack __PROTO((char *));
  615.   
  616.   /*
  617.    * accessories start here:
  618. --- 133,138 ----
  619. diff -cr ../mntlib34/div.c ./div.c
  620. *** ../mntlib34/div.c    Mon Jun  1 03:25:18 1992
  621. --- ./div.c    Mon Sep 13 06:30:38 1993
  622. ***************
  623. *** 6,11 ****
  624. --- 6,13 ----
  625.    */
  626.   #include <stdlib.h>
  627.   
  628. + #ifdef __GNUC__
  629. + 
  630.   long __divsi3(long, long);    /* returns: quot in d0.l  remainder in d1.l */
  631.   
  632.   #ifdef __MSHORT__
  633. ***************
  634. *** 44,46 ****
  635. --- 46,76 ----
  636.           ); /* compiler dependency, dont tell gcc about d0,d1 clobb */
  637.       return result;
  638.   }
  639. + 
  640. + #else /* !__GNUC__ */
  641. + 
  642. + div_t
  643. + div(num, denom)
  644. + int num, denom;
  645. + {
  646. +     div_t res;
  647. +     
  648. +     res.quot = num / denom;
  649. +     res.rem = num % denom;
  650. +     
  651. +     return res;
  652. + }
  653. + 
  654. + ldiv_t
  655. + ldiv(num, denom)
  656. + long num, denom;
  657. + {
  658. +     ldiv_t res;
  659. +     
  660. +     res.quot = num / denom;
  661. +     res.rem = num % denom;
  662. +     
  663. +     return res;
  664. + }
  665. + 
  666. + #endif /* !__GNUC__ */
  667. diff -cr ../mntlib34/doprnt.c ./doprnt.c
  668. *** ../mntlib34/doprnt.c    Thu Jul  8 05:52:50 1993
  669. --- ./doprnt.c    Mon Sep 13 11:10:20 1993
  670. ***************
  671. *** 59,65 ****
  672.   #include <ctype.h>
  673.   #include <string.h>
  674.   #include <limits.h>
  675. ! #include    <math.h>    /* mjr++    */
  676.   
  677.   #ifndef __GNUC__    /* gcc lib has these typedefs in sys/types.h */
  678.   #ifndef __MINT__    /* as does the MiNT library */
  679. --- 59,66 ----
  680.   #include <ctype.h>
  681.   #include <string.h>
  682.   #include <limits.h>
  683. ! #include <math.h>    /* mjr++ */
  684. ! #include "lib.h"
  685.   
  686.   #ifndef __GNUC__    /* gcc lib has these typedefs in sys/types.h */
  687.   #ifndef __MINT__    /* as does the MiNT library */
  688. ***************
  689. *** 77,83 ****
  690.   
  691.   #if defined (__M68881__) && !defined (sfp004)
  692.   #  include <math-68881.h>    /* mjr: use the inline functions    */
  693. ! #endif    __M68881__
  694.   
  695.   #define    DEFPREC        6
  696.   
  697. --- 78,84 ----
  698.   
  699.   #if defined (__M68881__) && !defined (sfp004)
  700.   #  include <math-68881.h>    /* mjr: use the inline functions    */
  701. ! #endif    /* __M68881__ */
  702.   
  703.   #define    DEFPREC        6
  704.   
  705. ***************
  706. *** 85,91 ****
  707.   
  708.   #define    PUTC(ch)     if( fputc(ch, fp) == EOF ) return EOF;
  709.   
  710. ! 
  711.   #define ARG(signtag) \
  712.       _ulong = \
  713.           flags&LONGINT ? \
  714. --- 86,107 ----
  715.   
  716.   #define    PUTC(ch)     if( fputc(ch, fp) == EOF ) return EOF;
  717.   
  718. ! #ifdef PRINTF_LONGLONG
  719. ! #define ARG(signtag) (\
  720. !     (flags&LONGLONG ? \
  721. !     (_ulonglong = (unsigned long long)va_arg(argp, signtag long long)) : 0 ) ,\
  722. !     _ulong = \
  723. !         flags&LONGLONG ? \
  724. !             _ulonglong != 0ll : \
  725. !         flags&LONGINT ? \
  726. !             (unsigned long long)va_arg(argp, signtag long) : \
  727. !         (flags&SHORTINT ? \
  728. !             (unsigned long long)(signtag short)va_arg(argp, signtag int) : \
  729. !              (unsigned long long)va_arg(argp, signtag int)) )
  730. !      /* shorts are always promoted to ints; thus, it's `va_arg(... int)'
  731. !       * for `flags&SHORTINT'!
  732. !       */
  733. ! #else
  734.   #define ARG(signtag) \
  735.       _ulong = \
  736.           flags&LONGINT ? \
  737. ***************
  738. *** 96,101 ****
  739. --- 112,118 ----
  740.        /* shorts are always promoted to ints; thus, it's `va_arg(... int)'
  741.         * for `flags&SHORTINT'!
  742.         */
  743. + #endif
  744.   
  745.   #define TEN_MUL(X)    ((((X) << 2) + (X)) << 1)
  746.   
  747. ***************
  748. *** 103,114 ****
  749.   #define    tochar(n)    ((n) + '0')
  750.   
  751.   #define    LONGINT        0x01        /* long integer */
  752. ! #define    LONGDBL        0x02        /* long double; unimplemented */
  753. ! #define    SHORTINT    0x04        /* short integer */
  754. ! #define    ALT        0x08        /* alternate form */
  755. ! #define    LADJUST        0x10        /* left adjustment */
  756. ! #define    ZEROPAD        0x20        /* zero (as opposed to blank) pad */
  757. ! #define    HEXPREFIX    0x40        /* add 0x or 0X prefix */
  758.   
  759.   #ifndef __NO_FLOAT__
  760.   #define __FLOATS__ 1
  761. --- 120,132 ----
  762.   #define    tochar(n)    ((n) + '0')
  763.   
  764.   #define    LONGINT        0x01        /* long integer */
  765. ! #define    LONGLONG    0x02        /* long long integer (8 bytes) */
  766. ! #define    LONGDBL        0x04        /* long double; unimplemented */
  767. ! #define    SHORTINT    0x08        /* short integer */
  768. ! #define    ALT        0x10        /* alternate form */
  769. ! #define    LADJUST        0x20        /* left adjustment */
  770. ! #define    ZEROPAD        0x40        /* zero (as opposed to blank) pad */
  771. ! #define    HEXPREFIX    0x80        /* add 0x or 0X prefix */
  772.   
  773.   #ifndef __NO_FLOAT__
  774.   #define __FLOATS__ 1
  775. ***************
  776. *** 197,202 ****
  777. --- 215,227 ----
  778.   
  779.   #endif /* __GNUC__ */
  780.   
  781. + #ifdef PRINTF_LONGLONG
  782. + #define _ICONVLL(NUMBER, BASE, BUF)                 \
  783. +   do {                                \
  784. +     *--(BUF) = digs[(NUMBER) % (BASE)];                \
  785. +     (NUMBER) /= (BASE);                        \
  786. +   } while (NUMBER);
  787. + #endif
  788.   
  789.   int _doprnt(fp, fmt0, argp)
  790.       register FILE *fp;
  791. ***************
  792. *** 212,219 ****
  793.   /*    double _double;        *//* double precision arguments %[eEfgG] */
  794.       union double_di _dd;    /* _double is #defined to be _dd later on */
  795.       char softsign;        /* temporary negative sign for floats */
  796. ! #endif    __FLOATS__
  797. !     u_long _ulong;        /* integer arguments %[diouxX] */
  798.       short base;        /* base for [diouxX] conversion */
  799.       short dprec;        /* decimal precision in [diouxX] */
  800.       short fieldsz;        /* field size expanded by sign, etc */
  801. --- 237,251 ----
  802.   /*    double _double;        *//* double precision arguments %[eEfgG] */
  803.       union double_di _dd;    /* _double is #defined to be _dd later on */
  804.       char softsign;        /* temporary negative sign for floats */
  805. ! #endif    /* __FLOATS__ */
  806. ! #ifdef PRINTF_LONGLONG
  807. !     typedef unsigned long long _ulonglongtype;
  808. !     typedef long long _ulonglongsignedtype;
  809. !     _ulonglongtype _ulonglong;
  810. ! #endif
  811. !     typedef u_long _ulongtype;
  812. !     typedef long _ulongsignedtype;
  813. !     _ulongtype _ulong;        /* integer arguments %[diouxX] */
  814.       short base;        /* base for [diouxX] conversion */
  815.       short dprec;        /* decimal precision in [diouxX] */
  816.       short fieldsz;        /* field size expanded by sign, etc */
  817. ***************
  818. *** 307,313 ****
  819.               flags |= SHORTINT;
  820.               goto rflag;
  821.           case 'l':
  822. !             flags |= LONGINT;
  823.               goto rflag;
  824.           case 'c':
  825.               *(t = buf) = va_arg(argp, int);
  826. --- 339,350 ----
  827.               flags |= SHORTINT;
  828.               goto rflag;
  829.           case 'l':
  830. ! #ifdef PRINTF_LONGLONG
  831. !             if (flags & (LONGINT|LONGLONG))
  832. !                 flags &= -1-LONGINT, flags |= LONGLONG;
  833. !             else
  834. ! #endif
  835. !                 flags |= LONGINT;
  836.               goto rflag;
  837.           case 'c':
  838.               *(t = buf) = va_arg(argp, int);
  839. ***************
  840. *** 315,329 ****
  841.               sign = '\0';
  842.               goto pforw;
  843.           case 'D':
  844. !             flags |= LONGINT;
  845.               /*FALLTHROUGH*/
  846.           case 'd':
  847.           case 'i':
  848.               ARG(signed);
  849. !             if ((long)_ulong < 0) {
  850. !                 _ulong = -_ulong;
  851. !                 sign = '-';
  852.               }
  853.               base = 10;
  854.               goto number;
  855.   #ifdef __FLOATS__
  856. --- 352,380 ----
  857.               sign = '\0';
  858.               goto pforw;
  859.           case 'D':
  860. ! #ifdef PRINTF_LONGLONG
  861. !             if (flags & (LONGINT|LONGLONG))
  862. !                 flags &= -1-LONGINT, flags |= LONGLONG;
  863. !             else
  864. ! #endif
  865. !                 flags |= LONGINT;
  866.               /*FALLTHROUGH*/
  867.           case 'd':
  868.           case 'i':
  869.               ARG(signed);
  870. ! #ifdef PRINTF_LONGLONG
  871. !             if (flags & LONGLONG) {
  872. !                 if ((_ulonglongsignedtype)_ulonglong < 0ll) {
  873. !                     _ulonglong = -_ulonglong;
  874. !                     sign = '-';
  875. !                 }
  876.               }
  877. +             else
  878. + #endif
  879. +                 if ((_ulongsignedtype)_ulong < 0) {
  880. +                     _ulong = -(long)_ulong;
  881. +                     sign = '-';
  882. +                 }
  883.               base = 10;
  884.               goto number;
  885.   #ifdef __FLOATS__
  886. ***************
  887. *** 411,416 ****
  888. --- 462,472 ----
  889.               goto pforw;
  890.   #endif /* __FLOATS__ */
  891.           case 'n':
  892. + #ifdef PRINTF_LONGLONG
  893. +             if (flags & LONGLONG)
  894. +                 *va_arg(argp, long long *) = cnt;
  895. +             else
  896. + #endif
  897.               if (flags & LONGINT)
  898.                   *va_arg(argp, long *) = cnt;
  899.               else if (flags & SHORTINT)
  900. ***************
  901. *** 419,425 ****
  902.                   *va_arg(argp, int *) = cnt;
  903.               break;
  904.           case 'O':
  905. !             flags |= LONGINT;
  906.               /*FALLTHROUGH*/
  907.           case 'o':
  908.               ARG(unsigned);
  909. --- 475,486 ----
  910.                   *va_arg(argp, int *) = cnt;
  911.               break;
  912.           case 'O':
  913. ! #ifdef PRINTF_LONGLONG
  914. !             if (flags & (LONGINT|LONGLONG))
  915. !                 flags &= -1-LONGINT, flags |= LONGLONG;
  916. !             else
  917. ! #endif
  918. !                 flags |= LONGINT;
  919.               /*FALLTHROUGH*/
  920.           case 'o':
  921.               ARG(unsigned);
  922. ***************
  923. *** 434,440 ****
  924.                *    -- ANSI X3J11
  925.                */
  926.               /* NOSTRICT */
  927. !             _ulong = (u_long)va_arg(argp, void *);
  928.               base = 16;
  929.               goto nosign;
  930.           case 's':
  931. --- 495,504 ----
  932.                *    -- ANSI X3J11
  933.                */
  934.               /* NOSTRICT */
  935. !             _ulong = (_ulongtype)va_arg(argp, void *);
  936. ! #ifdef PRINTF_LONGLONG
  937. !             flags &= -1-LONGLONG;
  938. ! #endif
  939.               base = 16;
  940.               goto nosign;
  941.           case 's':
  942. ***************
  943. *** 454,460 ****
  944.   #endif
  945.   
  946.                   if ((p = (char *)memchr(t, 0, (size_t)prec)) != NULL) {
  947. !                     size = p - t;
  948.                       if (size > prec)
  949.                           size = prec;
  950.                   } else
  951. --- 518,524 ----
  952.   #endif
  953.   
  954.                   if ((p = (char *)memchr(t, 0, (size_t)prec)) != NULL) {
  955. !                     size = (short)(p - t);
  956.                       if (size > prec)
  957.                           size = prec;
  958.                   } else
  959. ***************
  960. *** 464,470 ****
  961.               sign = '\0';
  962.               goto pforw;
  963.           case 'U':
  964. !             flags |= LONGINT;
  965.               /*FALLTHROUGH*/
  966.           case 'u':
  967.               ARG(unsigned);
  968. --- 528,539 ----
  969.               sign = '\0';
  970.               goto pforw;
  971.           case 'U':
  972. ! #ifdef PRINTF_LONGLONG
  973. !             if (flags & (LONGINT|LONGLONG))
  974. !                 flags &= -1-LONGINT, flags |= LONGLONG;
  975. !             else
  976. ! #endif
  977. !                 flags |= LONGINT;
  978.               /*FALLTHROUGH*/
  979.           case 'u':
  980.               ARG(unsigned);
  981. ***************
  982. *** 477,482 ****
  983. --- 546,553 ----
  984.               ARG(unsigned);
  985.               base = 16;
  986.               /* leading 0x/X only if non-zero */
  987. +             /* Note: this does also work with _ulonglong, as we set
  988. +                _ulong = 0 iff _ulonglong==0  --bjarne */
  989.               if (flags & ALT && _ulong != 0)
  990.                   flags |= HEXPREFIX;
  991.   
  992. ***************
  993. *** 496,508 ****
  994.                *    -- ANSI X3J11
  995.                */
  996.               t = buf + BUF;
  997.               if (_ulong != 0 || prec != 0) {
  998. !                 _ICONV(_ulong, base, t);
  999.                   digs = "0123456789abcdef";
  1000.                   if (flags & ALT && base == 8 && *t != '0')
  1001.                       *--t = '0'; /* octal leading 0 */
  1002.               }
  1003. !             size = buf + BUF - t;
  1004.   
  1005.   pforw:
  1006.               /*
  1007. --- 567,591 ----
  1008.                *    -- ANSI X3J11
  1009.                */
  1010.               t = buf + BUF;
  1011. +             /* Note: this does also work with _ulonglong, as we set
  1012. +                _ulong = 0 iff _ulonglong==0  --bjarne */
  1013.               if (_ulong != 0 || prec != 0) {
  1014. ! #ifdef PRINTF_LONGLONG
  1015. !                 if (flags & LONGLONG) {
  1016. !                     _ICONVLL(_ulonglong, base, t);
  1017. !                 }
  1018. !                 /* As _ICONVLL might be a macro, we better put it in braces */
  1019. !                 else
  1020. ! #endif
  1021. !                 {
  1022. !                     _ICONV(_ulong, base, t);
  1023. !                 }
  1024. !                 /* As _ICONV might be a macro, we better put it in braces */
  1025.                   digs = "0123456789abcdef";
  1026.                   if (flags & ALT && base == 8 && *t != '0')
  1027.                       *--t = '0'; /* octal leading 0 */
  1028.               }
  1029. !             size = (short)(buf + BUF - t);
  1030.   
  1031.   pforw:
  1032.               /*
  1033. diff -cr ../mntlib34/exec.c ./exec.c
  1034. *** ../mntlib34/exec.c    Mon Feb 22 09:33:24 1993
  1035. --- ./exec.c    Thu Sep  9 15:59:56 1993
  1036. ***************
  1037. *** 12,20 ****
  1038.   
  1039.   int
  1040.   execve(path, argv, envp)
  1041. !     char    *path;
  1042. !     char    **argv;
  1043. !     char    **envp;
  1044.   {
  1045.       return _spawnve(P_OVERLAY, path, argv, envp);
  1046.   }
  1047. --- 12,20 ----
  1048.   
  1049.   int
  1050.   execve(path, argv, envp)
  1051. !     const char *path;
  1052. !     char *const *argv;
  1053. !     char *const *envp;
  1054.   {
  1055.       return _spawnve(P_OVERLAY, path, argv, envp);
  1056.   }
  1057. ***************
  1058. *** 21,34 ****
  1059.   
  1060.   int
  1061.   execv(path, argv)
  1062. !     char *path;
  1063. !     char **argv;
  1064.   {
  1065.       return _spawnve(P_OVERLAY, path, argv, NULL);
  1066.   }
  1067.   
  1068.   #ifdef __STDC__
  1069. ! int execle(char *path, ...)
  1070.   #else
  1071.   int execle(path)
  1072.       char    *path;
  1073. --- 21,34 ----
  1074.   
  1075.   int
  1076.   execv(path, argv)
  1077. !     const char *path;
  1078. !     char *const *argv;
  1079.   {
  1080.       return _spawnve(P_OVERLAY, path, argv, NULL);
  1081.   }
  1082.   
  1083.   #ifdef __STDC__
  1084. ! int execle(const char *path, ...)
  1085.   #else
  1086.   int execle(path)
  1087.       char    *path;
  1088. ***************
  1089. *** 45,51 ****
  1090.   }
  1091.   
  1092.   #ifdef __STDC__
  1093. ! int execl(char *path, ...)
  1094.   #else
  1095.   int execl(path)
  1096.       char    *path;
  1097. --- 45,51 ----
  1098.   }
  1099.   
  1100.   #ifdef __STDC__
  1101. ! int execl(const char *path, ...)
  1102.   #else
  1103.   int execl(path)
  1104.       char    *path;
  1105. diff -cr ../mntlib34/execp.c ./execp.c
  1106. *** ../mntlib34/execp.c    Tue May 25 11:38:04 1993
  1107. --- ./execp.c    Thu Sep  9 15:59:58 1993
  1108. ***************
  1109. *** 20,34 ****
  1110.      first.
  1111.   */
  1112.   
  1113. ! static char *extensions[] = { "ttp", "prg", "tos", NULL };
  1114.   
  1115.   #ifdef __STDC__
  1116. ! int execvp(char *name, char **argv)
  1117.   #else
  1118.   int execvp(name, argv) char *name; char **argv;
  1119.   #endif
  1120.   {
  1121. !     char *execname;
  1122.       char buffer[PATH_MAX];
  1123.       execname = buffindfile(name, getenv("PATH"), extensions,buffer);
  1124.       if (!execname) {
  1125. --- 20,34 ----
  1126.      first.
  1127.   */
  1128.   
  1129. ! static char *const extensions[] = { "ttp", "prg", "tos", NULL };
  1130.   
  1131.   #ifdef __STDC__
  1132. ! int execvp(const char *name, char *const *argv)
  1133.   #else
  1134.   int execvp(name, argv) char *name; char **argv;
  1135.   #endif
  1136.   {
  1137. !     const char *execname;
  1138.       char buffer[PATH_MAX];
  1139.       execname = buffindfile(name, getenv("PATH"), extensions,buffer);
  1140.       if (!execname) {
  1141. ***************
  1142. *** 39,45 ****
  1143.   }
  1144.   
  1145.   #ifdef __STDC__
  1146. ! int execlp(char *name, ...)
  1147.   #else
  1148.   int execlp(name)
  1149.       char    *name;
  1150. --- 39,45 ----
  1151.   }
  1152.   
  1153.   #ifdef __STDC__
  1154. ! int execlp(const char *name, ...)
  1155.   #else
  1156.   int execlp(name)
  1157.       char    *name;
  1158. diff -cr ../mntlib34/fdopen.c ./fdopen.c
  1159. *** ../mntlib34/fdopen.c    Wed Aug 26 04:54:50 1992
  1160. --- ./fdopen.c    Thu Jul 15 07:56:08 1993
  1161. ***************
  1162. *** 7,13 ****
  1163.   
  1164.   FILE *fdopen(h, mode)
  1165.       register int h;
  1166. !     const register char *mode;
  1167.   {
  1168.       extern int __default_mode__;    /* see defmode.c */
  1169.       register int i, iomode = 0, f = __default_mode__;
  1170. --- 7,13 ----
  1171.   
  1172.   FILE *fdopen(h, mode)
  1173.       register int h;
  1174. !     register const char *mode;
  1175.   {
  1176.       extern int __default_mode__;    /* see defmode.c */
  1177.       register int i, iomode = 0, f = __default_mode__;
  1178. diff -cr ../mntlib34/ffs.c ./ffs.c
  1179. *** ../mntlib34/ffs.c    Thu Jul  8 07:46:18 1993
  1180. --- ./ffs.c    Thu Jul 15 04:14:54 1993
  1181. ***************
  1182. *** 1,8 ****
  1183.   /*
  1184. !   ffs.c - find first set bit
  1185. !   Carmine T. Guida
  1186. !   7 - 7 - 93 Public Domain
  1187. ! */
  1188.   
  1189.   #include <support.h>
  1190.   
  1191. --- 1,10 ----
  1192.   /*
  1193. !  *  ffs.c - find the lowest bit set
  1194. !  *  Returns a 2-exponent of position + 1 and 0 for 0
  1195. !  *  Michal Jaegermann, <ntomczak@vm.ucs.ualberta.ca>
  1196. !  *  10 July 1993
  1197. !  *  This piece of code is in a Public Domain
  1198. !  */
  1199.   
  1200.   #include <support.h>
  1201.   
  1202. ***************
  1203. *** 10,47 ****
  1204.   ffs(bits)
  1205.     int bits;
  1206.   {
  1207. !   register int i;
  1208.   
  1209. !   if (!bits)
  1210. !     return 0;
  1211.   
  1212. !   i = 1;
  1213. ! 
  1214.   #ifndef __MSHORT__
  1215. !   if (!(bits & 0x0000FFFF))    /* Check word */
  1216. !   {
  1217. !     bits >>= 16;
  1218. !     i += 16;
  1219. !   }
  1220. ! #endif
  1221. ! 
  1222. !   if (!(bits & 0x00FF))        /* Check byte */
  1223. !   {
  1224. !     bits >>= 8;
  1225. !     i += 8;
  1226. !   }
  1227. !   if (!(bits & 0x0F))        /* Check nybble */
  1228. !   {
  1229. !     bits >>= 4;
  1230. !     i += 4;
  1231. !   }
  1232. !   if (!(bits & 0x3))        /* Check 2 bits */
  1233. !   {
  1234. !     bits >>= 2;
  1235. !     i += 2;
  1236. !   }
  1237. !   if (!(bits & 0x1))        /* Check bit */
  1238. !     i += 1;
  1239. ! 
  1240. !   return i;
  1241.   }
  1242. --- 12,41 ----
  1243.   ffs(bits)
  1244.     int bits;
  1245.   {
  1246. !     register int count;
  1247.   
  1248. !     if (0 == bits)
  1249. !     return 0;
  1250.   
  1251. !     bits &= -bits;
  1252.   #ifndef __MSHORT__
  1253. !     count = (bits & 0x0000ffff ? 16 : 32);
  1254. !     if (bits & 0x00ff00ff)
  1255. !     count -= 8;
  1256. !     if (bits & 0x0f0f0f0f)
  1257. !     count -= 4;
  1258. !     if (bits & 0x33333333)
  1259. !     count -= 2;
  1260. !     if (bits & 0x55555555)
  1261. !     count -= 1;
  1262. ! #else
  1263. !     count = (bits & 0x00ff ? 8 : 16);
  1264. !     if (bits & 0x0f0f)
  1265. !     count -= 4;
  1266. !     if (bits & 0x3333)
  1267. !     count -= 2;
  1268. !     if (bits & 0x5555)
  1269. !     count -= 1;
  1270. ! #endif /* __MSHORT__ */
  1271. !     return count;
  1272.   }
  1273. diff -cr ../mntlib34/findfile.c ./findfile.c
  1274. *** ../mntlib34/findfile.c    Tue May 25 12:09:40 1993
  1275. --- ./findfile.c    Thu Sep  9 16:00:02 1993
  1276. ***************
  1277. *** 27,39 ****
  1278.   #define DIRSEP1         '\\'    /* native OS directory separator */
  1279.   #define DIRSEP2         '/'     /* for emulating another OS */
  1280.   
  1281. ! static char *nullext[] = { NULL };
  1282.   
  1283. ! static int EXISTS __PROTO((char *));
  1284.   
  1285.   static int
  1286.   EXISTS(name)
  1287. !     char *name;
  1288.   {
  1289.       struct stat dummy;
  1290.   
  1291. --- 27,39 ----
  1292.   #define DIRSEP1         '\\'    /* native OS directory separator */
  1293.   #define DIRSEP2         '/'     /* for emulating another OS */
  1294.   
  1295. ! static char *const nullext[] = { NULL };
  1296.   
  1297. ! static int EXISTS __PROTO((const char *));
  1298.   
  1299.   static int
  1300.   EXISTS(name)
  1301. !     const char *name;
  1302.   {
  1303.       struct stat dummy;
  1304.   
  1305. ***************
  1306. *** 47,53 ****
  1307.   
  1308.   char *
  1309.   findfile(fname, fpath, fext)
  1310. !         char *fname, *fpath, **fext;
  1311.   {
  1312.         /* simply calls buffindfile */
  1313.         static char try[PATH_MAX];
  1314. --- 47,54 ----
  1315.   
  1316.   char *
  1317.   findfile(fname, fpath, fext)
  1318. !         const char *fname, *fpath;
  1319. !     char *const *fext;
  1320.   {
  1321.         /* simply calls buffindfile */
  1322.         static char try[PATH_MAX];
  1323. ***************
  1324. *** 57,65 ****
  1325.   
  1326.   char *
  1327.   buffindfile(fname, fpath, fext, try)
  1328. !       char *fname, *fpath, **fext, *try;
  1329.   {
  1330. !       char *s, *t, *extplace, **nextext, c;
  1331.         int  hasext = 0, haspath = 0;
  1332.   
  1333.       if (!fname || !*fname)
  1334. --- 58,68 ----
  1335.   
  1336.   char *
  1337.   buffindfile(fname, fpath, fext, try)
  1338. !       const char *fname, *fpath;
  1339. !       char *const *fext, *try;
  1340.   {
  1341. !       char *s, *extplace, *const *nextext, c;
  1342. !       const char *t;
  1343.         int  hasext = 0, haspath = 0;
  1344.   
  1345.       if (!fname || !*fname)
  1346. ***************
  1347. *** 108,113 ****
  1348. --- 111,126 ----
  1349.   
  1350.   /* copy in next element of path list */
  1351.                 s = try;
  1352. +         /* an attempt to accomodate within reason TOS specs  -- mj */
  1353. +         if (*(fpath + 1) == ':') {
  1354. +             if ((*(fpath + 2) == DIRSEP1 ||
  1355. +                  *(fpath + 2) == DIRSEP2)   &&
  1356. +                 (*fpath != '.' && *fpath != ':')) {
  1357. +                 *s++ = *fpath++;
  1358. +                 *s++ = *fpath++;
  1359. +                 *s++ = *fpath++;
  1360. +             }
  1361. +         }
  1362.                 while ((c = *fpath) != 0 && c != PATHSEP1 && c != PATHSEP2) {
  1363.                         *s++ = c;
  1364.                         fpath++;
  1365. diff -cr ../mntlib34/fopen.c ./fopen.c
  1366. *** ../mntlib34/fopen.c    Sun Jun  6 08:44:34 1993
  1367. --- ./fopen.c    Wed Sep  8 19:06:20 1993
  1368. ***************
  1369. *** 65,71 ****
  1370.       else
  1371.           iomode |= O_RDWR;
  1372.       iomode |= O_NOCTTY;
  1373. !     h = open(filename, iomode, 0644);
  1374.       if(h < __SMALLEST_VALID_HANDLE)
  1375.           {
  1376.           return(NULL);        /* file open/create error */
  1377. --- 65,71 ----
  1378.       else
  1379.           iomode |= O_RDWR;
  1380.       iomode |= O_NOCTTY;
  1381. !     h = open(filename, iomode, 0666);
  1382.       if(h < __SMALLEST_VALID_HANDLE)
  1383.           {
  1384.           return(NULL);        /* file open/create error */
  1385. diff -cr ../mntlib34/fputs.c ./fputs.c
  1386. *** ../mntlib34/fputs.c    Sat Sep  5 08:31:36 1992
  1387. --- ./fputs.c    Thu Jul 15 07:54:40 1993
  1388. ***************
  1389. *** 5,11 ****
  1390.   #include <assert.h>
  1391.   
  1392.   int fputs(data, fp)
  1393. !     const register char *data;
  1394.       register FILE *fp;
  1395.       {
  1396.       register int n = 0;
  1397. --- 5,11 ----
  1398.   #include <assert.h>
  1399.   
  1400.   int fputs(data, fp)
  1401. !     register const char *data;
  1402.       register FILE *fp;
  1403.       {
  1404.       register int n = 0;
  1405. diff -cr ../mntlib34/fwrite.c ./fwrite.c
  1406. *** ../mntlib34/fwrite.c    Sun Jun  6 06:19:24 1993
  1407. --- ./fwrite.c    Tue Jul 13 17:17:56 1993
  1408. ***************
  1409. *** 94,101 ****
  1410.         line_flush=0;
  1411.         /* this relies on having at least one byte buffer,
  1412.            otherwise we'll hang up when trying to write CRLF */
  1413. !       while(n > 0)
  1414. !       {
  1415.             space = fp->_bsiz - fp->_cnt;
  1416.             restart_buf=data;
  1417.             while( space>0 && n>0 ) {
  1418. --- 94,100 ----
  1419.         line_flush=0;
  1420.         /* this relies on having at least one byte buffer,
  1421.            otherwise we'll hang up when trying to write CRLF */
  1422. !       while(n > 0) {
  1423.             space = fp->_bsiz - fp->_cnt;
  1424.             restart_buf=data;
  1425.             while( space>0 && n>0 ) {
  1426. ***************
  1427. *** 137,151 ****
  1428.               n--;
  1429.               data++;
  1430.             }
  1431. !           if( (m=_write(fp->_file, restart_buf, data-restart_buf ))
  1432. !               != data-restart_buf ) {
  1433.               fp->_flag |= _IOERR;
  1434.               return 0;
  1435.             }
  1436. !           l+=m;
  1437.           }
  1438.             }
  1439. !       }
  1440.         if( line_flush ) {
  1441.            if(fflush(fp))
  1442.            return 0;
  1443. --- 136,151 ----
  1444.               n--;
  1445.               data++;
  1446.             }
  1447. !           if( (m = _write(fp->_file, restart_buf, data - restart_buf))
  1448. !               != data - restart_buf) {
  1449.               fp->_flag |= _IOERR;
  1450.               return 0;
  1451.             }
  1452. !           l += (m - 1); /* we already counted one character, before
  1453. !                  * decrementing 'space' to zero */
  1454.           }
  1455.             }
  1456. !       } /* while */
  1457.         if( line_flush ) {
  1458.            if(fflush(fp))
  1459.            return 0;
  1460. diff -cr ../mntlib34/getdtabl.c ./getdtabl.c
  1461. *** ../mntlib34/getdtabl.c    Sun Jun 20 09:09:16 1993
  1462. --- ./getdtabl.c    Mon Jul 12 04:23:16 1993
  1463. ***************
  1464. *** 1,6 ****
  1465.   #include <stdio.h>
  1466.   #include <mintbind.h>
  1467. ! #include <unistd.h>
  1468.   
  1469.   extern int __mint;
  1470.   
  1471. --- 1,6 ----
  1472.   #include <stdio.h>
  1473.   #include <mintbind.h>
  1474. ! #include <support.h>
  1475.   
  1476.   extern int __mint;
  1477.   
  1478. diff -cr ../mntlib34/gethostn.c ./gethostn.c
  1479. *** ../mntlib34/gethostn.c    Tue Nov  5 02:17:32 1991
  1480. --- ./gethostn.c    Fri Jul 16 05:18:08 1993
  1481. ***************
  1482. *** 6,11 ****
  1483. --- 6,12 ----
  1484.   #include <stdlib.h>
  1485.   #include <fcntl.h>
  1486.   #include <unistd.h>
  1487. + #include <support.h>
  1488.   
  1489.   #define MAXLEN 127
  1490.   
  1491. diff -cr ../mntlib34/getpw.c ./getpw.c
  1492. *** ../mntlib34/getpw.c    Sun Jun  6 06:19:32 1993
  1493. --- ./getpw.c    Fri Jul 23 05:04:22 1993
  1494. ***************
  1495. *** 205,210 ****
  1496. --- 205,211 ----
  1497.   #include <unistd.h>
  1498.   #include <string.h>
  1499.   #include <stdlib.h>
  1500. + #include <types.h>
  1501.   
  1502.   static char *pwdfile = "/etc/passwd"; /* default passwd file */
  1503.   
  1504. ***************
  1505. *** 289,296 ****
  1506.   } /* End of getpwent() */
  1507.   
  1508.   /* Get first passwd entry from file with pw_uid matching uid */
  1509.   struct passwd *getpwuid(uid)
  1510. ! int uid;
  1511.   {
  1512.     setpwent();
  1513.     while (nextent(fp) != 0)
  1514. --- 290,301 ----
  1515.   } /* End of getpwent() */
  1516.   
  1517.   /* Get first passwd entry from file with pw_uid matching uid */
  1518. + #ifdef __STDC__
  1519. + struct passwd *getpwuid(uid_t uid)
  1520. + #else
  1521.   struct passwd *getpwuid(uid)
  1522. ! uid_t uid;
  1523. ! #endif
  1524.   {
  1525.     setpwent();
  1526.     while (nextent(fp) != 0)
  1527. diff -cr ../mntlib34/lattice/crt0.s ./lattice/crt0.s
  1528. *** ../mntlib34/lattice/crt0.s    Sun May 23 09:13:26 1993
  1529. --- ./lattice/crt0.s    Wed Sep  8 15:08:14 1993
  1530. ***************
  1531. *** 1,4 ****
  1532. --- 1,19 ----
  1533.       INCLUDE    inc.i
  1534. + 
  1535. + _PRG    EQU    1    ; Default...
  1536. + _ACC    EQU    0
  1537. + _AUT    EQU    0
  1538. + 
  1539. +     IFD    ACC
  1540. + _ACC    EQU    1
  1541. + _PRG    EQU 0
  1542. +     ELSE
  1543. + 
  1544. +     IFD    AUT
  1545. + _AUT    EQU    1
  1546. + _ACC    EQU 1
  1547. +     ENDC
  1548. +     ENDC    ; !ACC
  1549.       
  1550.   ;
  1551.   ; Initilization code; this is common to both 16 and 32 bit libraries,
  1552. ***************
  1553. *** 34,43 ****
  1554. --- 49,61 ----
  1555.       lea    __LinkerDB,a4
  1556.       ENDC
  1557.       sub.l    a6,a6        ; clear a6 for debuggers
  1558. +     IF    _AUT
  1559.       cmp.w    #0,a0        ; test if acc or program
  1560.       beq.s    __startprg    ; if a program, go elsewhere
  1561.       tst.l    36(a0)        ; also test parent basepage pointer
  1562.       bne.s    __startprg    ; for acc's, it must be 0
  1563. +     ENDC
  1564. +     IF    _ACC
  1565.       move.l    a0,__base    ; acc basepage is in A0
  1566.       move.l    __heapbase,sp    ; stack must be set from heap
  1567.       add.l    __stksize,sp
  1568. ***************
  1569. *** 46,55 ****
  1570. --- 64,75 ----
  1571.       ELSE
  1572.       bra    __acc_main    ; function is in crtinit.c
  1573.       ENDC
  1574. +     ENDC
  1575.   ;
  1576.   ; program startup code: doesn't actually do much, other than push
  1577.   ; the basepage onto the stack and call _start1 in crtinit.c
  1578.   ;
  1579. +     IF    _PRG
  1580.   __startprg:
  1581.       move.l    4(sp),a0    ; get basepage
  1582.       move.l    a0,__base    ; save it
  1583. ***************
  1584. *** 60,65 ****
  1585. --- 80,86 ----
  1586.       bra    @_crtinit
  1587.       ELSE
  1588.       bra    __crtinit    ; in crtinit.c
  1589. +     ENDC
  1590.       ENDC
  1591.   
  1592.   ;
  1593. diff -cr ../mntlib34/lattice/inc.i ./lattice/inc.i
  1594. *** ../mntlib34/lattice/inc.i    Sun May 23 08:27:58 1993
  1595. --- ./lattice/inc.i    Sun Jul 11 05:42:20 1993
  1596. ***************
  1597. *** 22,31 ****
  1598.       
  1599.       IFND    __M020__
  1600.   _ARC32    EQU    0
  1601. ! _SIZ    EQU    2
  1602.       ELSE
  1603.   _ARC32    EQU    1
  1604. ! _SIZ    EQU    4
  1605.       ENDC
  1606.       
  1607.   XFUNC    MACRO
  1608. --- 22,31 ----
  1609.       
  1610.       IFND    __M020__
  1611.   _ARC32    EQU    0
  1612. ! _SIZ    EQU    1
  1613.       ELSE
  1614.   _ARC32    EQU    1
  1615. ! _SIZ    EQU    2
  1616.       ENDC
  1617.       
  1618.   XFUNC    MACRO
  1619. Only in .: lblong.target
  1620. diff -cr ../mntlib34/lib.h ./lib.h
  1621. *** ../mntlib34/lib.h    Sun Jun 20 09:23:26 1993
  1622. --- ./lib.h    Tue Jul 13 14:19:14 1993
  1623. ***************
  1624. *** 55,63 ****
  1625.   __EXTERN long        get_sysvar __PROTO((void *var));
  1626.   __EXTERN void        set_sysvar_to_long __PROTO((void *var, long val));
  1627.   
  1628. ! __EXTERN void        _setstack __PROTO((char *));
  1629. ! __EXTERN __EXITING     __exit __PROTO((long status));
  1630.   
  1631.   /* from the TOS GCC library */
  1632.   /* 5/5/92 sb -- definitions needed in malloc.c and realloc.c */
  1633.   
  1634. --- 55,71 ----
  1635.   __EXTERN long        get_sysvar __PROTO((void *var));
  1636.   __EXTERN void        set_sysvar_to_long __PROTO((void *var, long val));
  1637.   
  1638. ! __EXTERN void    _main        __PROTO((long, char **, char **));
  1639. ! __EXTERN void    _init_signal    __PROTO((void));
  1640. ! __EXTERN void     _monstartup    __PROTO((void *lowpc, void *highpc));
  1641. ! __EXTERN void    __mcleanup    __PROTO((void));
  1642. ! __EXTERN void    _moncontrol    __PROTO((long));
  1643. ! __EXTERN void    _setstack    __PROTO((char *));
  1644. ! __EXTERN void    _crtinit    __PROTO((void));
  1645. ! __EXTERN void    _acc_main    __PROTO((void));
  1646. ! __EXTERN __EXITING    __exit    __PROTO((long status));
  1647.   
  1648. + __EXTERN void    _fclose_all_files __PROTO((void));
  1649.   /* from the TOS GCC library */
  1650.   /* 5/5/92 sb -- definitions needed in malloc.c and realloc.c */
  1651.   
  1652. diff -cr ../mntlib34/link.c ./link.c
  1653. *** ../mntlib34/link.c    Sat Feb 13 04:57:28 1993
  1654. --- ./link.c    Tue Jul 13 13:49:16 1993
  1655. ***************
  1656. *** 3,9 ****
  1657.   #include <errno.h>
  1658.   #include <mintbind.h>
  1659.   #include <param.h>
  1660. ! #include <support.h>
  1661.   #include "lib.h"
  1662.   
  1663.   extern int __mint;
  1664. --- 3,9 ----
  1665.   #include <errno.h>
  1666.   #include <mintbind.h>
  1667.   #include <param.h>
  1668. ! #include <unistd.h>
  1669.   #include "lib.h"
  1670.   
  1671.   extern int __mint;
  1672. diff -cr ../mntlib34/main.c ./main.c
  1673. *** ../mntlib34/main.c    Thu Jul  1 06:36:40 1993
  1674. --- ./main.c    Sun Sep 12 20:16:28 1993
  1675. ***************
  1676. *** 25,35 ****
  1677.   FILE    _iob[_NFILE];    /* stream buffers initialized below */
  1678.   
  1679.   /* functions registered by user for calling at exit */
  1680. ! #ifdef __STDC__
  1681. ! typedef void (*ExitFn)(void);
  1682. ! #else
  1683. ! typedef void (*ExitFn)();
  1684. ! #endif
  1685.   ExitFn *_at_exit;
  1686.   int _num_at_exit;    /* number of functions registered - 1 */
  1687.   
  1688. --- 25,31 ----
  1689.   FILE    _iob[_NFILE];    /* stream buffers initialized below */
  1690.   
  1691.   /* functions registered by user for calling at exit */
  1692. ! typedef void (*ExitFn) __PROTO((void));
  1693.   ExitFn *_at_exit;
  1694.   int _num_at_exit;    /* number of functions registered - 1 */
  1695.   
  1696. ***************
  1697. *** 37,44 ****
  1698.    * get MiNT version number. Since this has to be done in supervisor mode,
  1699.    * we might as well set the start-up time of the system here, too.
  1700.    */
  1701.   
  1702. ! static void
  1703.   getMiNT()
  1704.   {
  1705.       long *cookie;
  1706. --- 33,41 ----
  1707.    * get MiNT version number. Since this has to be done in supervisor mode,
  1708.    * we might as well set the start-up time of the system here, too.
  1709.    */
  1710. + static long getMiNT __PROTO((void));
  1711.   
  1712. ! static long
  1713.   getMiNT()
  1714.   {
  1715.       long *cookie;
  1716. ***************
  1717. *** 54,73 ****
  1718.           while (*cookie) {
  1719.               if (*cookie == 0x4d694e54L) {    /* MiNT */
  1720.                   __mint = (int) cookie[1];
  1721. !                 return;
  1722.               }
  1723.               cookie += 2;
  1724.           }
  1725.       }
  1726.       __mint = 0;
  1727.   }
  1728.   
  1729.   /* supplied by the user */
  1730.   __EXTERN int main __PROTO((int, char **, char **));
  1731.   
  1732. - /* in getbuf.c */
  1733. - __EXTERN void _getbuf __PROTO((FILE *));
  1734. - 
  1735.   #if __GNUC__ > 1
  1736.   /* in libgcc2.c */
  1737.   __EXTERN void __do_global_dtors __PROTO ((void));
  1738. --- 51,68 ----
  1739.           while (*cookie) {
  1740.               if (*cookie == 0x4d694e54L) {    /* MiNT */
  1741.                   __mint = (int) cookie[1];
  1742. !                 return 0;
  1743.               }
  1744.               cookie += 2;
  1745.           }
  1746.       }
  1747.       __mint = 0;
  1748. +     return 0;
  1749.   }
  1750.   
  1751.   /* supplied by the user */
  1752.   __EXTERN int main __PROTO((int, char **, char **));
  1753.   
  1754.   #if __GNUC__ > 1
  1755.   /* in libgcc2.c */
  1756.   __EXTERN void __do_global_dtors __PROTO ((void));
  1757. ***************
  1758. *** 81,86 ****
  1759. --- 76,83 ----
  1760.   long _fpuctrl;
  1761.   #endif
  1762.   
  1763. + void _main __PROTO((long, char **, char **));
  1764. + 
  1765.   void
  1766.   _main(_argc, _argv, _envp)
  1767.       long _argc;
  1768. ***************
  1769. *** 246,263 ****
  1770.       exit(main((int) _argc, _argv, _envp));
  1771.   }
  1772.   
  1773. ! __EXITING exit(status)
  1774. !     int status;
  1775.   {
  1776.       register int i, f;
  1777.   
  1778. -     for(i = _num_at_exit - 1; i >= 0; --i)
  1779. -         (*_at_exit[i])();
  1780. - 
  1781. - #if __GNUC__ > 1
  1782. -     __do_global_dtors ();
  1783. - #endif
  1784. - 
  1785.       for(i=0; i<_NFILE; ++i) {
  1786.           f = _iob[i]._flag;
  1787.           if(f & (_IORW | _IOREAD | _IOWRT))
  1788. --- 243,253 ----
  1789.       exit(main((int) _argc, _argv, _envp));
  1790.   }
  1791.   
  1792. ! void
  1793. ! _fclose_all_files()
  1794.   {
  1795.       register int i, f;
  1796.   
  1797.       for(i=0; i<_NFILE; ++i) {
  1798.           f = _iob[i]._flag;
  1799.           if(f & (_IORW | _IOREAD | _IOWRT))
  1800. ***************
  1801. *** 266,270 ****
  1802. --- 256,275 ----
  1803.               else
  1804.                   fclose(&_iob[i]);
  1805.       }
  1806. + }
  1807. + 
  1808. + __EXITING exit(status)
  1809. +     int status;
  1810. + {
  1811. +     register int i;
  1812. + 
  1813. +     for(i = _num_at_exit - 1; i >= 0; --i)
  1814. +         (*_at_exit[i])();
  1815. + 
  1816. + #if __GNUC__ > 1
  1817. +     __do_global_dtors ();
  1818. + #endif
  1819. + 
  1820. +     _fclose_all_files();
  1821.       _exit(status);
  1822.   }
  1823. diff -cr ../mntlib34/malloc.c ./malloc.c
  1824. *** ../mntlib34/malloc.c    Thu Sep 17 05:36:04 1992
  1825. --- ./malloc.c    Wed Sep  8 22:20:24 1993
  1826. ***************
  1827. *** 70,75 ****
  1828. --- 70,82 ----
  1829.           if (MINHUNK < MAXHUNK)
  1830.               MINHUNK *= 2;
  1831.       }
  1832. +     if (_split_mem || _heapbase == NULL)
  1833. +       {
  1834. +         static int page_size = 0;
  1835. +         if (!page_size)
  1836. +           page_size = getpagesize ();
  1837. +         sz = (sz + page_size - 1) & -page_size;
  1838. +       }
  1839.       q = (struct mem_chunk * )_sbrk(sz);
  1840.   
  1841.       if (((long)q) == -1)         /* can't alloc any more? */
  1842. diff -cr ../mntlib34/mincl ./mincl
  1843. *** ../mntlib34/mincl    Sun Jun 27 06:11:22 1993
  1844. --- ./mincl    Sun Jul 18 08:48:18 1993
  1845. ***************
  1846. *** 43,49 ****
  1847.       ffs.o findfile.o fopenp.o frwbin.o \
  1848.       ftw.o getpw.o gethostn.o \
  1849.       getlogin.o getopt.o getpages.o getpass.o grp.o ident.o mktemp.o \
  1850. !     regexp.o regsup.o scandir.o strlwr.o strupr.o strrev.o \
  1851.       textio.o random.o \
  1852.       obstack.o utmp.o wtmp.o \
  1853.       il.o ic.o iw.o ig.o ip.o
  1854. --- 43,49 ----
  1855.       ffs.o findfile.o fopenp.o frwbin.o \
  1856.       ftw.o getpw.o gethostn.o \
  1857.       getlogin.o getopt.o getpages.o getpass.o grp.o ident.o mktemp.o \
  1858. !     regexp.o regsup.o scandir.o strlwr.o strupr.o strrev.o sync.o \
  1859.       textio.o random.o \
  1860.       obstack.o utmp.o wtmp.o \
  1861.       il.o ic.o iw.o ig.o ip.o
  1862. diff -cr ../mntlib34/mkdir.c ./mkdir.c
  1863. *** ../mntlib34/mkdir.c    Sat Jun 19 12:15:30 1993
  1864. --- ./mkdir.c    Wed Sep  8 19:06:24 1993
  1865. ***************
  1866. *** 40,46 ****
  1867.           return -1;
  1868.       }
  1869.       if (__mint >= 9) {
  1870. !         (void)Fchmod(path, mode);
  1871.       }
  1872.       return 0;
  1873.   }
  1874. --- 40,48 ----
  1875.           return -1;
  1876.       }
  1877.       if (__mint >= 9) {
  1878. !         int umask = Pumask (0);
  1879. !         (void) Pumask (umask);
  1880. !         (void)Fchmod(path, mode & ~umask);
  1881.       }
  1882.       return 0;
  1883.   }
  1884. diff -cr ../mntlib34/mknod.c ./mknod.c
  1885. *** ../mntlib34/mknod.c    Sun Jun 20 08:59:54 1993
  1886. --- ./mknod.c    Mon Jul 12 04:34:50 1993
  1887. ***************
  1888. *** 1,7 ****
  1889.   /* fake mknod -- this always fails */
  1890.   
  1891.   #include <errno.h>
  1892. ! #include <unistd.h>
  1893.   
  1894.   int
  1895.   mknod(path, mode, dev)
  1896. --- 1,7 ----
  1897.   /* fake mknod -- this always fails */
  1898.   
  1899.   #include <errno.h>
  1900. ! #include <support.h>
  1901.   
  1902.   int
  1903.   mknod(path, mode, dev)
  1904. diff -cr ../mntlib34/mktemp.c ./mktemp.c
  1905. *** ../mntlib34/mktemp.c    Thu Sep 17 20:02:50 1992
  1906. --- ./mktemp.c    Wed Sep  8 19:06:28 1993
  1907. ***************
  1908. *** 27,36 ****
  1909.   
  1910.     /* scan back over X's */
  1911.     for(p = pattern; *p; p++) ;
  1912. !   for(q = --p; *q == 'X'; --q) ;
  1913.     if((nx = p - q) == 0)  /* # of X's */
  1914.       return NULL;
  1915. -   q++;
  1916.   
  1917.     /* if MiNT is active and there's room, put in the pid */
  1918.     /* we need 5 X's for this: up to 3 for the pid, and up to 2 for the
  1919. --- 27,35 ----
  1920.   
  1921.     /* scan back over X's */
  1922.     for(p = pattern; *p; p++) ;
  1923. !   for(q = p; q[-1] == 'X'; --q) ;
  1924.     if((nx = p - q) == 0)  /* # of X's */
  1925.       return NULL;
  1926.   
  1927.     /* if MiNT is active and there's room, put in the pid */
  1928.     /* we need 5 X's for this: up to 3 for the pid, and up to 2 for the
  1929. ***************
  1930. *** 38,44 ****
  1931. --- 37,47 ----
  1932.     if (__mint && nx > 4 && startat < 256) {
  1933.       (void) _itoa(getpid(), q, 10);
  1934.       while (*q) q++;
  1935. +     /* be sure to generate each name only once */
  1936. +     if (startat < 16) *q++ = '0';
  1937.       (void) _itoa(startat++, q, 16);
  1938. +     while (*q) q++;
  1939. +     while (q < p) *q++ = '0'; /* fill with zeros */
  1940.       return pattern;
  1941.     }
  1942.   
  1943. diff -cr ../mntlib34/nice.c ./nice.c
  1944. *** ../mntlib34/nice.c    Tue Nov  5 02:21:00 1991
  1945. --- ./nice.c    Mon Jul 12 04:37:00 1993
  1946. ***************
  1947. *** 4,13 ****
  1948.    * ref seems to say "-20 to +19,  or -1 on error". Hmm.
  1949.    */
  1950.   
  1951. - #include <unistd.h>
  1952.   #include <errno.h>
  1953. - #include <stdlib.h>
  1954.   #include <mintbind.h>
  1955.   
  1956.   extern long __mint;
  1957.   
  1958. --- 4,12 ----
  1959.    * ref seems to say "-20 to +19,  or -1 on error". Hmm.
  1960.    */
  1961.   
  1962.   #include <errno.h>
  1963.   #include <mintbind.h>
  1964. + #include <support.h>
  1965.   
  1966.   extern long __mint;
  1967.   
  1968. diff -cr ../mntlib34/open.c ./open.c
  1969. *** ../mntlib34/open.c    Thu Jun 17 06:35:30 1993
  1970. --- ./open.c    Thu Jul 15 08:12:26 1993
  1971. ***************
  1972. *** 10,15 ****
  1973. --- 10,16 ----
  1974.   #include <errno.h>
  1975.   #include <unistd.h>
  1976.   #include <stdarg.h>
  1977. + #include <stat.h>
  1978.   #include "lib.h"
  1979.   
  1980.   /*
  1981. diff -cr ../mntlib34/osbind.cpp ./osbind.cpp
  1982. *** ../mntlib34/osbind.cpp    Thu Oct  1 15:25:10 1992
  1983. --- ./osbind.cpp    Wed Sep  8 22:20:16 1993
  1984. ***************
  1985. *** 58,65 ****
  1986.       .globl    _trap_1_w
  1987.   _trap_1_w:
  1988.       moveml    d2/a2, sp@-
  1989. !     movel    sp@(12), d0
  1990. !     movew    d0, sp@-
  1991.       trap    #1
  1992.       addql    #2, sp
  1993.       moveml    sp@+, d2/a2
  1994. --- 58,64 ----
  1995.       .globl    _trap_1_w
  1996.   _trap_1_w:
  1997.       moveml    d2/a2, sp@-
  1998. !     movew    sp@(14), sp@-
  1999.       trap    #1
  2000.       addql    #2, sp
  2001.       moveml    sp@+, d2/a2
  2002. ***************
  2003. *** 68,77 ****
  2004.       .globl    _trap_1_ww
  2005.   _trap_1_ww:
  2006.       moveml    d2/a2, sp@-
  2007. !     movel    sp@(16), d1
  2008. !     movel    sp@(12), d0
  2009. !     movew    d1, sp@-
  2010. !     movew    d0, sp@-
  2011.       trap    #1
  2012.       addql    #4, sp
  2013.       moveml    sp@+, d2/a2
  2014. --- 67,74 ----
  2015.       .globl    _trap_1_ww
  2016.   _trap_1_ww:
  2017.       moveml    d2/a2, sp@-
  2018. !     movew    sp@(18), sp@-
  2019. !     movew    sp@(14+2), sp@-
  2020.       trap    #1
  2021.       addql    #4, sp
  2022.       moveml    sp@+, d2/a2
  2023. ***************
  2024. *** 80,89 ****
  2025.       .globl    _trap_1_wl
  2026.   _trap_1_wl:
  2027.       moveml    d2/a2, sp@-
  2028. !     movel    sp@(16), d1
  2029. !     movel    sp@(12), d0
  2030. !     movel    d1, sp@-
  2031. !     movew    d0, sp@-
  2032.       trap    #1
  2033.       addql    #6, sp
  2034.       moveml    sp@+, d2/a2
  2035. --- 77,84 ----
  2036.       .globl    _trap_1_wl
  2037.   _trap_1_wl:
  2038.       moveml    d2/a2, sp@-
  2039. !     movel    sp@(16), sp@-
  2040. !     movew    sp@(14+4), sp@-
  2041.       trap    #1
  2042.       addql    #6, sp
  2043.       moveml    sp@+, d2/a2
  2044. ***************
  2045. *** 92,103 ****
  2046.       .globl    _trap_1_wlw
  2047.   _trap_1_wlw:
  2048.       moveml    d2/a2, sp@-
  2049. !     movel    sp@(20), a0
  2050. !     movel    sp@(16), d1
  2051. !     movel    sp@(12), d0
  2052. !     movew    a0, sp@-
  2053. !     movel    d1, sp@-
  2054. !     movew    d0, sp@-
  2055.       trap    #1
  2056.       addql    #8, sp        | addq is valid for 1-8
  2057.       moveml    sp@+, d2/a2
  2058. --- 87,95 ----
  2059.       .globl    _trap_1_wlw
  2060.   _trap_1_wlw:
  2061.       moveml    d2/a2, sp@-
  2062. !     movew    sp@(22), sp@-
  2063. !     movel    sp@(16+2), sp@-
  2064. !     movew    sp@(14+6), sp@-
  2065.       trap    #1
  2066.       addql    #8, sp        | addq is valid for 1-8
  2067.       moveml    sp@+, d2/a2
  2068. ***************
  2069. *** 106,117 ****
  2070.       .globl    _trap_1_wwl
  2071.   _trap_1_wwl:
  2072.       moveml    d2/a2, sp@-
  2073. !     movel    sp@(20), a0
  2074. !     movel    sp@(16), d1
  2075. !     movel    sp@(12), d0
  2076. !     movel    a0, sp@-
  2077. !     movew    d1, sp@-
  2078. !     movew    d0, sp@-
  2079.       trap    #1
  2080.       addql    #8, sp
  2081.       moveml    sp@+, d2/a2
  2082. --- 98,106 ----
  2083.       .globl    _trap_1_wwl
  2084.   _trap_1_wwl:
  2085.       moveml    d2/a2, sp@-
  2086. !     movel    sp@(20), sp@-
  2087. !     movew    sp@(18+4), sp@-
  2088. !     movew    sp@(14+6), sp@-
  2089.       trap    #1
  2090.       addql    #8, sp
  2091.       moveml    sp@+, d2/a2
  2092. ***************
  2093. *** 120,131 ****
  2094.       .globl    _trap_1_www
  2095.   _trap_1_www:
  2096.       moveml    d2/a2, sp@-
  2097. !     movel    sp@(20), a0
  2098. !     movel    sp@(16), d1
  2099. !     movel    sp@(12), d0
  2100. !     movew    a0, sp@-
  2101. !     movew    d1, sp@-
  2102. !     movew    d0, sp@-
  2103.       trap    #1
  2104.       addql    #6, sp
  2105.       moveml    sp@+, d2/a2
  2106. --- 109,117 ----
  2107.       .globl    _trap_1_www
  2108.   _trap_1_www:
  2109.       moveml    d2/a2, sp@-
  2110. !     movew    sp@(22), sp@-
  2111. !     movew    sp@(18+2), sp@-
  2112. !     movew    sp@(14+4), sp@-
  2113.       trap    #1
  2114.       addql    #6, sp
  2115.       moveml    sp@+, d2/a2
  2116. ***************
  2117. *** 134,161 ****
  2118.       .globl    _trap_1_wll
  2119.   _trap_1_wll:
  2120.       moveml    d2/a2, sp@-
  2121. !     movel    sp@(20), a0
  2122. !     movel    sp@(16), d1
  2123. !     movel    sp@(12), d0
  2124. !     movel    a0, sp@-
  2125. !     movel    d1, sp@-
  2126. !     movew    d0, sp@-
  2127.       trap    #1
  2128.       lea    sp@(10), sp
  2129.       moveml    sp@+, d2/a2
  2130.       rts
  2131.   
  2132.       .globl    _trap_1_wwll
  2133.   _trap_1_wwll:
  2134.       moveml    d2/a2, sp@-
  2135. !     movel    sp@(24), a1
  2136. !     movel    sp@(20), a0
  2137. !     movel    sp@(16), d1
  2138. !     movel    sp@(12), d0
  2139. !     movel    a1, sp@-
  2140. !     movel    a0, sp@-
  2141. !     movew    d1, sp@-
  2142. !     movew    d0, sp@-
  2143.       trap    #1
  2144.       lea    sp@(12), sp
  2145.       moveml    sp@+, d2/a2
  2146. --- 120,164 ----
  2147.       .globl    _trap_1_wll
  2148.   _trap_1_wll:
  2149.       moveml    d2/a2, sp@-
  2150. !     movel    sp@(20), sp@-
  2151. !     movel    sp@(16+4), sp@-
  2152. !     movew    sp@(14+8), sp@-
  2153.       trap    #1
  2154.       lea    sp@(10), sp
  2155.       moveml    sp@+, d2/a2
  2156.       rts
  2157.   
  2158. +     .globl    _trap_1_wwww
  2159. + _trap_1_wwww:
  2160. +     moveml    d2/a1, sp@-
  2161. +     movew    sp@(26), sp@-
  2162. +     movew    sp@(22+2), sp@-
  2163. +     movew    sp@(18+4), sp@-
  2164. +     movew    sp@(14+6), sp@-
  2165. +     trap    #1
  2166. +     addql    #8, sp
  2167. +     moveml    sp@+, d2/a2
  2168. +     rts
  2169. + 
  2170. +     .globl    _trap_1_wwwl
  2171. + _trap_1_wwwl:
  2172. +     moveml    d2/a1, sp@-
  2173. +     movel    sp@(24), sp@-
  2174. +     movew    sp@(22+4), sp@-
  2175. +     movew    sp@(18+6), sp@-
  2176. +     movew    sp@(14+8), sp@-
  2177. +     trap    #1
  2178. +     addw    #10, sp
  2179. +     moveml    sp@+, d2/a2
  2180. +     rts
  2181. + 
  2182.       .globl    _trap_1_wwll
  2183.   _trap_1_wwll:
  2184.       moveml    d2/a2, sp@-
  2185. !     movel    sp@(24), sp@-
  2186. !     movel    sp@(20+4), sp@-
  2187. !     movew    sp@(18+8), sp@-
  2188. !     movew    sp@(14+10), sp@-
  2189.       trap    #1
  2190.       lea    sp@(12), sp
  2191.       moveml    sp@+, d2/a2
  2192. ***************
  2193. *** 164,177 ****
  2194.       .globl    _trap_1_wlww
  2195.   _trap_1_wlww:
  2196.       moveml    d2/a2, sp@-
  2197. !     movel    sp@(24), a1
  2198. !     movel    sp@(20), a0
  2199. !     movel    sp@(16), d1
  2200. !     movel    sp@(12), d0
  2201. !     movew    a1, sp@-
  2202. !     movew    a0, sp@-
  2203. !     movel    d1, sp@-
  2204. !     movew    d0, sp@-
  2205.       trap    #1
  2206.       lea    sp@(10), sp
  2207.       moveml    sp@+, d2/a2
  2208. --- 167,176 ----
  2209.       .globl    _trap_1_wlww
  2210.   _trap_1_wlww:
  2211.       moveml    d2/a2, sp@-
  2212. !     movew    sp@(26), sp@-
  2213. !     movew    sp@(22+2), sp@-
  2214. !     movel    sp@(16+4), sp@-
  2215. !     movew    sp@(14+8), sp@-
  2216.       trap    #1
  2217.       lea    sp@(10), sp
  2218.       moveml    sp@+, d2/a2
  2219. ***************
  2220. *** 180,193 ****
  2221.       .globl    _trap_1_wwlw
  2222.   _trap_1_wwlw:
  2223.       moveml    d2/a2, sp@-
  2224. !     movel    sp@(24), a1
  2225. !     movel    sp@(20), a0
  2226. !     movel    sp@(16), d1
  2227. !     movel    sp@(12), d0
  2228. !     movew    a1, sp@-
  2229. !     movel    a0, sp@-
  2230. !     movew    d1, sp@-
  2231. !     movew    d0, sp@-
  2232.       trap    #1
  2233.       lea    sp@(10), sp
  2234.       moveml    sp@+, d2/a2
  2235. --- 179,188 ----
  2236.       .globl    _trap_1_wwlw
  2237.   _trap_1_wwlw:
  2238.       moveml    d2/a2, sp@-
  2239. !     movew    sp@(26), sp@-
  2240. !     movel    sp@(20+2), sp@-
  2241. !     movew    sp@(18+6), sp@-
  2242. !     movew    sp@(14+8), sp@-
  2243.       trap    #1
  2244.       lea    sp@(10), sp
  2245.       moveml    sp@+, d2/a2
  2246. ***************
  2247. *** 196,221 ****
  2248.       .globl    _trap_1_wwlll
  2249.   _trap_1_wwlll:
  2250.       moveml    d2/a2, sp@-
  2251. !     movel    sp@(28), a1
  2252. !     movel    sp@(24), a0
  2253. !     movel    sp@(20), d1
  2254. !     movel    a1, sp@-
  2255. !     movel    a0, sp@-
  2256. !     movel    d1, sp@-
  2257. !     movel    sp@(16+12), d1
  2258. !     movel    sp@(12+12), d0
  2259. !     movew    d1, sp@-
  2260. !     movew    d0, sp@-
  2261.       trap    #1
  2262.       lea    sp@(16), sp
  2263.       moveml    sp@+, d2/a2
  2264.       rts
  2265.   
  2266.       .globl    _trap_13_w
  2267.   _trap_13_w:
  2268.       moveml    d2/a2, sp@-
  2269. !     movel    sp@(12), d0
  2270. !     movew    d0, sp@-
  2271.       trap    #13
  2272.       addql    #2, sp
  2273.       moveml    sp@+, d2/a2
  2274. --- 191,223 ----
  2275.       .globl    _trap_1_wwlll
  2276.   _trap_1_wwlll:
  2277.       moveml    d2/a2, sp@-
  2278. !     movel    sp@(28), sp@-
  2279. !     movel    sp@(24+4), sp@-
  2280. !     movel    sp@(20+8), sp@-
  2281. !     movew    sp@(18+12), sp@-
  2282. !     movew    sp@(14+14), sp@-
  2283.       trap    #1
  2284.       lea    sp@(16), sp
  2285.       moveml    sp@+, d2/a2
  2286.       rts
  2287.   
  2288. +     .globl    _trap_1_wwwll
  2289. + _trap_1_wwwll:
  2290. +     moveml    d2/a2, sp@-
  2291. +     movel    sp@(28), sp@-
  2292. +     movel    sp@(24+4), sp@-
  2293. +     movew    sp@(22+8), sp@-
  2294. +     movew    sp@(18+10), sp@-
  2295. +     movew    sp@(14+12), sp@-
  2296. +     trap    #1
  2297. +     addw    #16, sp
  2298. +     moveml    sp@+, d2/a2
  2299. +     rts
  2300. + 
  2301.       .globl    _trap_13_w
  2302.   _trap_13_w:
  2303.       moveml    d2/a2, sp@-
  2304. !     movew    sp@(14), sp@-
  2305.       trap    #13
  2306.       addql    #2, sp
  2307.       moveml    sp@+, d2/a2
  2308. ***************
  2309. *** 224,233 ****
  2310.       .globl    _trap_13_ww
  2311.   _trap_13_ww:
  2312.       moveml    d2/a2, sp@-
  2313. !     movel    sp@(16), d1
  2314. !     movel    sp@(12), d0
  2315. !     movew    d1, sp@-
  2316. !     movew    d0, sp@-
  2317.       trap    #13
  2318.       addql    #4, sp
  2319.       moveml    sp@+, d2/a2
  2320. --- 226,233 ----
  2321.       .globl    _trap_13_ww
  2322.   _trap_13_ww:
  2323.       moveml    d2/a2, sp@-
  2324. !     movew    sp@(18), sp@-
  2325. !     movew    sp@(14+2), sp@-
  2326.       trap    #13
  2327.       addql    #4, sp
  2328.       moveml    sp@+, d2/a2
  2329. ***************
  2330. *** 236,245 ****
  2331.       .globl    _trap_13_wl
  2332.   _trap_13_wl:
  2333.       moveml    d2/a2, sp@-
  2334. !     movel    sp@(16), d1
  2335. !     movel    sp@(12), d0
  2336. !     movel    d1, sp@-
  2337. !     movew    d0, sp@-
  2338.       trap    #13
  2339.       addql    #6, sp
  2340.       moveml    sp@+, d2/a2
  2341. --- 236,243 ----
  2342.       .globl    _trap_13_wl
  2343.   _trap_13_wl:
  2344.       moveml    d2/a2, sp@-
  2345. !     movel    sp@(16), sp@-
  2346. !     movew    sp@(14+4), sp@-
  2347.       trap    #13
  2348.       addql    #6, sp
  2349.       moveml    sp@+, d2/a2
  2350. ***************
  2351. *** 248,259 ****
  2352.       .globl    _trap_13_www
  2353.   _trap_13_www:
  2354.       moveml    d2/a2, sp@-
  2355. !     movel    sp@(20), a0
  2356. !     movel    sp@(16), d1
  2357. !     movel    sp@(12), d0
  2358. !     movew    a0, sp@-
  2359. !     movew    d1, sp@-
  2360. !     movew    d0, sp@-
  2361.       trap    #13
  2362.       addql    #6, sp
  2363.       moveml    sp@+, d2/a2
  2364. --- 246,254 ----
  2365.       .globl    _trap_13_www
  2366.   _trap_13_www:
  2367.       moveml    d2/a2, sp@-
  2368. !     movew    sp@(22), sp@-
  2369. !     movew    sp@(18+2), sp@-
  2370. !     movew    sp@(14+4), sp@-
  2371.       trap    #13
  2372.       addql    #6, sp
  2373.       moveml    sp@+, d2/a2
  2374. ***************
  2375. *** 262,273 ****
  2376.       .globl    _trap_13_wwl
  2377.   _trap_13_wwl:
  2378.       moveml    d2/a2, sp@-
  2379. !     movel    sp@(20), a0
  2380. !     movel    sp@(16), d1
  2381. !     movel    sp@(12), d0
  2382. !     movel    a0, sp@-
  2383. !     movew    d1, sp@-
  2384. !     movew    d0, sp@-
  2385.       trap    #13
  2386.       addql    #8, sp
  2387.       moveml    sp@+, d2/a2
  2388. --- 257,265 ----
  2389.       .globl    _trap_13_wwl
  2390.   _trap_13_wwl:
  2391.       moveml    d2/a2, sp@-
  2392. !     movel    sp@(20), sp@-
  2393. !     movew    sp@(18+4), sp@-
  2394. !     movew    sp@(14+6), sp@-
  2395.       trap    #13
  2396.       addql    #8, sp
  2397.       moveml    sp@+, d2/a2
  2398. ***************
  2399. *** 276,293 ****
  2400.       .globl    _trap_13_wwlwww
  2401.   _trap_13_wwlwww:
  2402.       moveml    d2/a2, sp@-
  2403. !     movel    sp@(32), a0
  2404. !     movel    sp@(28), d1
  2405. !     movel    sp@(24), d0
  2406. !     movew    a0, sp@-
  2407. !     movew    d1, sp@-
  2408. !     movew    d0, sp@-
  2409. !     movel    sp@(20+6), a0
  2410. !     movel    sp@(16+6), d1
  2411. !     movel    sp@(12+6), d0
  2412. !     movel    a0, sp@-
  2413. !     movew    d1, sp@-
  2414. !     movew    d0, sp@-
  2415.       trap    #13
  2416.       lea    sp@(14), sp
  2417.       moveml    sp@+, d2/a2
  2418. --- 268,279 ----
  2419.       .globl    _trap_13_wwlwww
  2420.   _trap_13_wwlwww:
  2421.       moveml    d2/a2, sp@-
  2422. !     movew    sp@(34), sp@-
  2423. !     movew    sp@(30+2), sp@-
  2424. !     movew    sp@(26+4), sp@-
  2425. !     movel    sp@(20+6), sp@-
  2426. !     movew    sp@(18+10), sp@-
  2427. !     movew    sp@(14+12), sp@-
  2428.       trap    #13
  2429.       lea    sp@(14), sp
  2430.       moveml    sp@+, d2/a2
  2431. ***************
  2432. *** 296,303 ****
  2433.       .globl    _trap_14_w
  2434.   _trap_14_w:
  2435.       moveml    d2/a2, sp@-
  2436. !     movel    sp@(12), d0
  2437. !     movew    d0, sp@-
  2438.       trap    #14
  2439.       addql    #2, sp
  2440.       moveml    sp@+, d2/a2
  2441. --- 282,288 ----
  2442.       .globl    _trap_14_w
  2443.   _trap_14_w:
  2444.       moveml    d2/a2, sp@-
  2445. !     movew    sp@(14), sp@-
  2446.       trap    #14
  2447.       addql    #2, sp
  2448.       moveml    sp@+, d2/a2
  2449. ***************
  2450. *** 306,315 ****
  2451.       .globl    _trap_14_ww
  2452.   _trap_14_ww:
  2453.       moveml    d2/a2, sp@-
  2454. !     movel    sp@(16), d1
  2455. !     movel    sp@(12), d0
  2456. !     movew    d1, sp@-
  2457. !     movew    d0, sp@-
  2458.       trap    #14
  2459.       addql    #4, sp
  2460.       moveml    sp@+, d2/a2
  2461. --- 291,298 ----
  2462.       .globl    _trap_14_ww
  2463.   _trap_14_ww:
  2464.       moveml    d2/a2, sp@-
  2465. !     movew    sp@(18), sp@-
  2466. !     movew    sp@(14+2), sp@-
  2467.       trap    #14
  2468.       addql    #4, sp
  2469.       moveml    sp@+, d2/a2
  2470. ***************
  2471. *** 318,327 ****
  2472.       .globl    _trap_14_wl
  2473.   _trap_14_wl:
  2474.       moveml    d2/a2, sp@-
  2475. !     movel    sp@(16), d1
  2476. !     movel    sp@(12), d0
  2477. !     movel    d1, sp@-
  2478. !     movew    d0, sp@-
  2479.       trap    #14
  2480.       addql    #6, sp
  2481.       moveml    sp@+, d2/a2
  2482. --- 301,308 ----
  2483.       .globl    _trap_14_wl
  2484.   _trap_14_wl:
  2485.       moveml    d2/a2, sp@-
  2486. !     movel    sp@(16), sp@-
  2487. !     movew    sp@(14+4), sp@-
  2488.       trap    #14
  2489.       addql    #6, sp
  2490.       moveml    sp@+, d2/a2
  2491. ***************
  2492. *** 330,341 ****
  2493.       .globl    _trap_14_www
  2494.   _trap_14_www:
  2495.       moveml    d2/a2, sp@-
  2496. !     movel    sp@(20), a0
  2497. !     movel    sp@(16), d1
  2498. !     movel    sp@(12), d0
  2499. !     movew    a0, sp@-
  2500. !     movew    d1, sp@-
  2501. !     movew    d0, sp@-
  2502.       trap    #14
  2503.       addql    #6, sp
  2504.       moveml    sp@+, d2/a2
  2505. --- 311,319 ----
  2506.       .globl    _trap_14_www
  2507.   _trap_14_www:
  2508.       moveml    d2/a2, sp@-
  2509. !     movew    sp@(22), sp@-
  2510. !     movew    sp@(18+2), sp@-
  2511. !     movew    sp@(14+4), sp@-
  2512.       trap    #14
  2513.       addql    #6, sp
  2514.       moveml    sp@+, d2/a2
  2515. ***************
  2516. *** 344,355 ****
  2517.       .globl    _trap_14_wwl
  2518.   _trap_14_wwl:
  2519.       moveml    d2/a2, sp@-
  2520. !     movel    sp@(20), a0
  2521. !     movel    sp@(16), d1
  2522. !     movel    sp@(12), d0
  2523. !     movel    a0, sp@-
  2524. !     movew    d1, sp@-
  2525. !     movew    d0, sp@-
  2526.       trap    #14
  2527.       addql    #8, sp
  2528.       moveml    sp@+, d2/a2
  2529. --- 322,330 ----
  2530.       .globl    _trap_14_wwl
  2531.   _trap_14_wwl:
  2532.       moveml    d2/a2, sp@-
  2533. !     movel    sp@(20), sp@-
  2534. !     movew    sp@(18+4), sp@-
  2535. !     movew    sp@(14+6), sp@-
  2536.       trap    #14
  2537.       addql    #8, sp
  2538.       moveml    sp@+, d2/a2
  2539. ***************
  2540. *** 358,371 ****
  2541.       .globl    _trap_14_wwll
  2542.   _trap_14_wwll:
  2543.       moveml    d2/a2, sp@-
  2544. !     movel    sp@(24), a1
  2545. !     movel    sp@(20), a0
  2546. !     movel    sp@(16), d1
  2547. !     movel    sp@(12), d0
  2548. !     movel    a1, sp@-
  2549. !     movel    a0, sp@-
  2550. !     movew    d1, sp@-
  2551. !     movew    d0, sp@-
  2552.       trap    #14
  2553.       lea    sp@(12), sp
  2554.       moveml    sp@+, d2/a2
  2555. --- 333,342 ----
  2556.       .globl    _trap_14_wwll
  2557.   _trap_14_wwll:
  2558.       moveml    d2/a2, sp@-
  2559. !     movel    sp@(24), sp@-
  2560. !     movel    sp@(20+4), sp@-
  2561. !     movew    sp@(18+8), sp@-
  2562. !     movew    sp@(14+10), sp@-
  2563.       trap    #14
  2564.       lea    sp@(12), sp
  2565.       moveml    sp@+, d2/a2
  2566. ***************
  2567. *** 374,387 ****
  2568.       .globl    _trap_14_wllw
  2569.   _trap_14_wllw:
  2570.       moveml    d2/a2, sp@-
  2571. !     movel    sp@(24), a1
  2572. !     movel    sp@(20), a0
  2573. !     movel    sp@(16), d1
  2574. !     movel    sp@(12), d0
  2575. !     movew    a1, sp@-
  2576. !     movel    a0, sp@-
  2577. !     movel    d1, sp@-
  2578. !     movew    d0, sp@-
  2579.       trap    #14
  2580.       lea    sp@(12), sp
  2581.       moveml    sp@+, d2/a2
  2582. --- 345,354 ----
  2583.       .globl    _trap_14_wllw
  2584.   _trap_14_wllw:
  2585.       moveml    d2/a2, sp@-
  2586. !     movew    sp@(26), sp@-
  2587. !     movel    sp@(20+2), sp@-
  2588. !     movel    sp@(16+6), sp@-
  2589. !     movew    sp@(14+10), sp@-
  2590.       trap    #14
  2591.       lea    sp@(12), sp
  2592.       moveml    sp@+, d2/a2
  2593. ***************
  2594. *** 390,403 ****
  2595.       .globl    _trap_14_wlll
  2596.   _trap_14_wlll:
  2597.       moveml    d2/a2, sp@-
  2598. !     movel    sp@(24), a1
  2599. !     movel    sp@(20), a0
  2600. !     movel    sp@(16), d1
  2601. !     movel    sp@(12), d0
  2602. !     movel    a1, sp@-
  2603. !     movel    a0, sp@-
  2604. !     movel    d1, sp@-
  2605. !     movew    d0, sp@-
  2606.       trap    #14
  2607.       lea    sp@(14), sp
  2608.       moveml    sp@+, d2/a2
  2609. --- 357,366 ----
  2610.       .globl    _trap_14_wlll
  2611.   _trap_14_wlll:
  2612.       moveml    d2/a2, sp@-
  2613. !     movel    sp@(24), sp@-
  2614. !     movel    sp@(20+4), sp@-
  2615. !     movel    sp@(16+8), sp@-
  2616. !     movew    sp@(14+12), sp@-
  2617.       trap    #14
  2618.       lea    sp@(14), sp
  2619.       moveml    sp@+, d2/a2
  2620. ***************
  2621. *** 406,419 ****
  2622.       .globl    _trap_14_wwwl
  2623.   _trap_14_wwwl:
  2624.       moveml    d2/a2, sp@-
  2625. !     movel    sp@(24), a1
  2626. !     movel    sp@(20), a0
  2627. !     movel    sp@(16), d1
  2628. !     movel    sp@(12), d0
  2629. !     movel    a1, sp@-
  2630. !     movew    a0, sp@-
  2631. !     movew    d1, sp@-
  2632. !     movew    d0, sp@-
  2633.       trap    #14
  2634.       lea    sp@(10), sp
  2635.       moveml    sp@+, d2/a2
  2636. --- 369,378 ----
  2637.       .globl    _trap_14_wwwl
  2638.   _trap_14_wwwl:
  2639.       moveml    d2/a2, sp@-
  2640. !     movel    sp@(24), sp@-
  2641. !     movew    sp@(22+4), sp@-
  2642. !     movew    sp@(18+6), sp@-
  2643. !     movew    sp@(14+8), sp@-
  2644.       trap    #14
  2645.       lea    sp@(10), sp
  2646.       moveml    sp@+, d2/a2
  2647. ***************
  2648. *** 422,437 ****
  2649.       .globl    _trap_14_wwwwl
  2650.   _trap_14_wwwwl:
  2651.       moveml    d2/a2, sp@-
  2652. !     movel    sp@(28), d0
  2653. !     movel    d0, sp@-
  2654. !     movel    sp@(24+4), a1
  2655. !     movel    sp@(20+4), a0
  2656. !     movel    sp@(16+4), d1
  2657. !     movel    sp@(12+4), d0
  2658. !     movew    a1, sp@-
  2659. !     movew    a0, sp@-
  2660. !     movew    d1, sp@-
  2661. !     movew    d0, sp@-
  2662.       trap    #14
  2663.       lea    sp@(12), sp
  2664.       moveml    sp@+, d2/a2
  2665. --- 381,391 ----
  2666.       .globl    _trap_14_wwwwl
  2667.   _trap_14_wwwwl:
  2668.       moveml    d2/a2, sp@-
  2669. !     movel    sp@(28), sp@-
  2670. !     movew    sp@(26+4), sp@-
  2671. !     movew    sp@(22+6), sp@-
  2672. !     movew    sp@(18+8), sp@-
  2673. !     movew    sp@(14+10), sp@-
  2674.       trap    #14
  2675.       lea    sp@(12), sp
  2676.       moveml    sp@+, d2/a2
  2677. ***************
  2678. *** 440,455 ****
  2679.       .globl    _trap_14_wllww
  2680.   _trap_14_wllww:
  2681.       moveml    d2/a2, sp@-
  2682. !     movel    sp@(28), d1
  2683. !     movel    sp@(24), d0
  2684. !     movew    d1, sp@-
  2685. !     movew    d0, sp@-
  2686. !     movel    sp@(20+4), a0
  2687. !     movel    sp@(16+4), d1
  2688. !     movel    sp@(12+4), d0
  2689. !     movel    a0, sp@-
  2690. !     movel    d1, sp@-
  2691. !     movew    d0, sp@-
  2692.       trap    #14
  2693.       lea    sp@(14), sp
  2694.       moveml    sp@+, d2/a2
  2695. --- 394,431 ----
  2696.       .globl    _trap_14_wllww
  2697.   _trap_14_wllww:
  2698.       moveml    d2/a2, sp@-
  2699. !     movew    sp@(30), sp@-
  2700. !     movew    sp@(26+2), sp@-
  2701. !     movel    sp@(20+4), sp@-
  2702. !     movel    sp@(16+8), sp@-
  2703. !     movew    sp@(14+12), sp@-
  2704. !     trap    #14
  2705. !     lea    sp@(14), sp
  2706. !     moveml    sp@+, d2/a2
  2707. !     rts
  2708. !     
  2709. !     .globl    _trap_14_wlwlw
  2710. ! _trap_14_wlwlw:
  2711. !     moveml    d2/a2, sp@-
  2712. !     movew    sp@(30), sp@-
  2713. !     movel    sp@(24+2), sp@-
  2714. !     movew    sp@(22+6), sp@-
  2715. !     movel    sp@(16+8), sp@-
  2716. !     movew    sp@(14+12), sp@-
  2717. !     trap    #14
  2718. !     addw    #14, sp
  2719. !     moveml    sp@+, d2/a2
  2720. !     rts
  2721. ! 
  2722. !     .globl    _trap_14_wwwwww
  2723. ! _trap_14_wwwwww:
  2724. !     moveml    d2/a2, sp@-
  2725. !     movew    sp@(34), sp@-
  2726. !     movew    sp@(30+2), sp@-
  2727. !     movew    sp@(26+4), sp@-
  2728. !     movew    sp@(22+6), sp@-
  2729. !     movew    sp@(18+8), sp@-
  2730. !     movew    sp@(14+10), sp@-
  2731.       trap    #14
  2732.       lea    sp@(14), sp
  2733.       moveml    sp@+, d2/a2
  2734. ***************
  2735. *** 458,477 ****
  2736.       .globl    _trap_14_wwwwwww
  2737.   _trap_14_wwwwwww:
  2738.       moveml    d2/a2, sp@-
  2739. !     movel    sp@(36), a1
  2740. !     movel    sp@(32), a0
  2741. !     movel    sp@(28), d1
  2742. !     movel    sp@(24), d0
  2743. !     movew    a1, sp@-
  2744. !     movew    a0, sp@-
  2745. !     movew    d1, sp@-
  2746. !     movew    d0, sp@-
  2747. !     movel    sp@(20+8), a0
  2748. !     movel    sp@(16+8), d1
  2749. !     movel    sp@(12+8), d0
  2750. !     movew    a0, sp@-
  2751. !     movew    d1, sp@-
  2752. !     movew    d0, sp@-
  2753.       trap    #14
  2754.       lea    sp@(14), sp
  2755.       moveml    sp@+, d2/a2
  2756. --- 434,446 ----
  2757.       .globl    _trap_14_wwwwwww
  2758.   _trap_14_wwwwwww:
  2759.       moveml    d2/a2, sp@-
  2760. !     movew    sp@(38), sp@-
  2761. !     movew    sp@(34+2), sp@-
  2762. !     movew    sp@(30+4), sp@-
  2763. !     movew    sp@(26+6), sp@-
  2764. !     movew    sp@(22+8), sp@-
  2765. !     movew    sp@(18+10), sp@-
  2766. !     movew    sp@(14+12), sp@-
  2767.       trap    #14
  2768.       lea    sp@(14), sp
  2769.       moveml    sp@+, d2/a2
  2770. ***************
  2771. *** 480,501 ****
  2772.       .globl    _trap_14_wllwwwww
  2773.   _trap_14_wllwwwww:
  2774.       moveml    d2/a2, sp@-
  2775. !     movel    sp@(40), a1
  2776. !     movel    sp@(36), a0
  2777. !     movel    sp@(32), d1
  2778. !     movel    sp@(28), d0
  2779. !     movew    a1, sp@-
  2780. !     movew    a0, sp@-
  2781. !     movew    d1, sp@-
  2782. !     movew    d0, sp@-
  2783. !     movel    sp@(24+8), a1
  2784. !     movel    sp@(20+8), a0
  2785. !     movel    sp@(16+8), d1
  2786. !     movel    sp@(12+8), d0
  2787. !     movew    a1, sp@-
  2788. !     movel    a0, sp@-
  2789. !     movel    d1, sp@-
  2790. !     movew    d0, sp@-
  2791.       trap    #14
  2792.       lea    sp@(20), sp
  2793.       moveml    sp@+, d2/a2
  2794. --- 449,462 ----
  2795.       .globl    _trap_14_wllwwwww
  2796.   _trap_14_wllwwwww:
  2797.       moveml    d2/a2, sp@-
  2798. !     movew    sp@(42), sp@-
  2799. !     movew    sp@(38+2), sp@-
  2800. !     movew    sp@(34+4), sp@-
  2801. !     movew    sp@(30+6), sp@-
  2802. !     movew    sp@(26+8), sp@-
  2803. !     movel    sp@(20+10), sp@-
  2804. !     movel    sp@(16+14), sp@-
  2805. !     movew    sp@(14+18), sp@-
  2806.       trap    #14
  2807.       lea    sp@(20), sp
  2808.       moveml    sp@+, d2/a2
  2809. ***************
  2810. *** 504,527 ****
  2811.       .globl    _trap_14_wllwwwwlw
  2812.   _trap_14_wllwwwwlw:
  2813.       moveml    d2/a2, sp@-
  2814. !     movel    sp@(44), a1
  2815. !     movel    sp@(40), a0
  2816. !     movel    sp@(36), d1
  2817. !     movel    sp@(32), d0
  2818. !     movew    a1, sp@-
  2819. !     movel    a0, sp@-
  2820. !     movew    d1, sp@-
  2821. !     movew    d0, sp@-
  2822. !     movel    sp@(28+10), a1
  2823. !     movel    sp@(24+10), a0
  2824. !     movel    sp@(20+10), d1
  2825. !     movel    sp@(16+10), d0
  2826. !     movel    sp@(12+10), d2
  2827. !     movew    a1, sp@-
  2828. !     movew    a0, sp@-
  2829. !     movel    d1, sp@-
  2830. !     movel    d0, sp@-
  2831. !     movew    d2, sp@-
  2832.       trap    #14
  2833.       lea    sp@(24), sp
  2834.       moveml    sp@+, d2/a2
  2835. --- 465,479 ----
  2836.       .globl    _trap_14_wllwwwwlw
  2837.   _trap_14_wllwwwwlw:
  2838.       moveml    d2/a2, sp@-
  2839. !     movew    sp@(46), sp@-
  2840. !     movel    sp@(40+2), sp@-
  2841. !     movew    sp@(38+6), sp@-
  2842. !     movew    sp@(34+8), sp@-
  2843. !     movew    sp@(30+10), sp@-
  2844. !     movew    sp@(26+12), sp@-
  2845. !     movel    sp@(20+14), sp@-
  2846. !     movel    sp@(16+18), sp@-
  2847. !     movew    sp@(14+22), sp@-
  2848.       trap    #14
  2849.       lea    sp@(24), sp
  2850.       moveml    sp@+, d2/a2
  2851. ***************
  2852. *** 530,555 ****
  2853.       .globl    _trap_14_wllwwwwwlw
  2854.   _trap_14_wllwwwwwlw:
  2855.       moveml    d2/a2, sp@-
  2856. !     movel    sp@(48), a1
  2857. !     movel    sp@(44), a0
  2858. !     movel    sp@(40), d1
  2859. !     movel    sp@(36), d0
  2860. !     movew    a1, sp@-
  2861. !     movel    a0, sp@-
  2862. !     movew    d1, sp@-
  2863. !     movew    d0, sp@-
  2864. !     movel    sp@(32+10), a1
  2865. !     movel    sp@(28+10), a0
  2866. !     movel    sp@(24+10), d1
  2867. !     movel    sp@(20+10), d0
  2868. !     movel    sp@(8+10), d2
  2869. !     movel    sp@(4+10), a2
  2870. !     movew    a1, sp@-
  2871. !     movew    a0, sp@-
  2872. !     movew    d1, sp@-
  2873. !     movel    d0, sp@-
  2874. !     movel    d2, sp@-
  2875. !     movew    a2, sp@-
  2876.       trap    #14
  2877.       lea    sp@(26), sp
  2878.       moveml    sp@+, d2/a2
  2879. --- 482,497 ----
  2880.       .globl    _trap_14_wllwwwwwlw
  2881.   _trap_14_wllwwwwwlw:
  2882.       moveml    d2/a2, sp@-
  2883. !     movew    sp@(50), sp@-
  2884. !     movel    sp@(44+2), sp@-
  2885. !     movew    sp@(42+6), sp@-
  2886. !     movew    sp@(38+8), sp@-
  2887. !     movew    sp@(34+10), sp@-
  2888. !     movew    sp@(30+12), sp@-
  2889. !     movew    sp@(26+14), sp@-
  2890. !     movel    sp@(20+16), sp@-
  2891. !     movel    sp@(16+20), sp@-
  2892. !     movew    sp@(14+24), sp@-
  2893.       trap    #14
  2894.       lea    sp@(26), sp
  2895.       moveml    sp@+, d2/a2
  2896. diff -cr ../mntlib34/pgrp.c ./pgrp.c
  2897. *** ../mntlib34/pgrp.c    Mon Jun  7 11:11:08 1993
  2898. --- ./pgrp.c    Mon Sep 13 06:08:20 1993
  2899. ***************
  2900. *** 45,51 ****
  2901.   _bsd_getpgrp(pid)
  2902.     int pid;
  2903.   {
  2904. !   if (__mint >= 103) return _bsd_setpgrp(pid, -1);
  2905.     return 0;
  2906.   }
  2907.   
  2908. --- 45,51 ----
  2909.   _bsd_getpgrp(pid)
  2910.     int pid;
  2911.   {
  2912. !   if (__mint >= 0x103) return _bsd_setpgrp(pid, -1);
  2913.     return 0;
  2914.   }
  2915.   
  2916. diff -cr ../mntlib34/putenv.c ./putenv.c
  2917. *** ../mntlib34/putenv.c    Sat Jun 19 12:37:58 1993
  2918. --- ./putenv.c    Mon Jul 12 04:38:56 1993
  2919. ***************
  2920. *** 7,12 ****
  2921. --- 7,13 ----
  2922.   #ifndef _COMPILER_H
  2923.   #include <compiler.h>
  2924.   #endif
  2925. + #include <support.h>
  2926.   
  2927.   extern char ** environ;
  2928.   
  2929. diff -cr ../mntlib34/scanf.c ./scanf.c
  2930. *** ../mntlib34/scanf.c    Tue Sep 22 20:01:52 1992
  2931. --- ./scanf.c    Mon Sep 13 11:11:10 1993
  2932. ***************
  2933. *** 53,59 ****
  2934.   #define FC_SIGN        3
  2935.   
  2936.   /* given transition,state do what action? */
  2937. ! int fp_do[][NSTATE] = {
  2938.   {F_INT,F_INT,F_INT,
  2939.        F_FRAC,F_FRAC,
  2940.        F_EXP,F_EXP,F_EXP},    /* see digit */
  2941. --- 53,59 ----
  2942.   #define FC_SIGN        3
  2943.   
  2944.   /* given transition,state do what action? */
  2945. ! const int fp_do[][NSTATE] = {
  2946.   {F_INT,F_INT,F_INT,
  2947.        F_FRAC,F_FRAC,
  2948.        F_EXP,F_EXP,F_EXP},    /* see digit */
  2949. ***************
  2950. *** 66,72 ****
  2951.        F_ESIGN,F_QUIT,F_QUIT},    /* see sign */
  2952.   };
  2953.   /* given transition,state what is new state? */
  2954. ! int fp_ns[][NSTATE] = {
  2955.   {FS_DIGS,FS_DIGS,FS_DIGS,
  2956.        FS_DD,FS_DD,
  2957.        FS_EDIGS,FS_EDIGS,FS_EDIGS},    /* see digit */
  2958. --- 66,72 ----
  2959.        F_ESIGN,F_QUIT,F_QUIT},    /* see sign */
  2960.   };
  2961.   /* given transition,state what is new state? */
  2962. ! const int fp_ns[][NSTATE] = {
  2963.   {FS_DIGS,FS_DIGS,FS_DIGS,
  2964.        FS_DD,FS_DD,
  2965.        FS_EDIGS,FS_EDIGS,FS_EDIGS},    /* see digit */
  2966. ***************
  2967. *** 79,86 ****
  2968.        FS_ESIGN,0,0},    /* see sign */
  2969.   };
  2970.   /* which states are valid terminators? */
  2971. ! int fp_sval[NSTATE] = {
  2972. !     0,0,1,0,1,0,0,1
  2973.   };
  2974.   #endif
  2975.   
  2976. --- 79,86 ----
  2977.        FS_ESIGN,0,0},    /* see sign */
  2978.   };
  2979.   /* which states are valid terminators? */
  2980. ! const int fp_sval[NSTATE] = {
  2981. !     0,0,1,0,1,1,1,1
  2982.   };
  2983.   #endif
  2984.   
  2985. ***************
  2986. *** 99,104 ****
  2987. --- 99,108 ----
  2988.   {
  2989.       register long n;
  2990.       register int c, width, lval, sval, cnt = 0, charcnt = 1;
  2991. + #ifdef PRINTF_LONGLONG
  2992. +     register int llval=0;
  2993. +     register long long lln;
  2994. + #endif
  2995.       int store, neg, base, wide1, endnull, rngflag, c2;
  2996.       register unsigned char *p = 0;
  2997.       unsigned char delim[128], digits[17], *q;
  2998. ***************
  2999. *** 123,128 ****
  3000. --- 127,136 ----
  3001.           wide1    = 1;
  3002.           base    = 10;
  3003.           lval    = FALSE;
  3004. + #ifdef PRINTF_LONGLONG
  3005. +         llval    = FALSE;
  3006. +         lln     = 0;
  3007. + #endif
  3008.           sval    = FALSE;
  3009.           store    = TRUE;
  3010.           endnull    = TRUE;
  3011. ***************
  3012. *** 153,158 ****
  3013. --- 161,170 ----
  3014.           goto fmtnxt;
  3015.           
  3016.             case 'l':    /* long data */
  3017. + #ifdef PRINTF_LONGLONG
  3018. +         if (lval)
  3019. +             llval = TRUE;
  3020. + #endif
  3021.           lval = TRUE;
  3022.             case 'h':    /* short data (for compatibility) */
  3023.           sval = TRUE;
  3024. ***************
  3025. *** 181,189 ****
  3026.             case 'u':    /* unsigned decimal */
  3027.             numfmt:                    skip();
  3028.           
  3029. !         if (isupper(*fmt))
  3030.               lval = TRUE;
  3031. !         
  3032.           if (!base)
  3033.           {
  3034.               base = 10;
  3035. --- 193,204 ----
  3036.             case 'u':    /* unsigned decimal */
  3037.             numfmt:                    skip();
  3038.           
  3039. !         if (isupper(*fmt)) {
  3040. ! #ifdef PRINTF_LONGLONG
  3041. !             if (lval) llval = TRUE;
  3042. ! #endif
  3043.               lval = TRUE;
  3044. !         }        
  3045.           if (!base)
  3046.           {
  3047.               base = 10;
  3048. ***************
  3049. *** 230,236 ****
  3050.           
  3051.           while (p && width-- && c)
  3052.           {
  3053. !             n = (n * base) + (p - digits);
  3054.               charcnt++;
  3055.               c = (*get)(ip);
  3056.             zeroin:
  3057. --- 245,256 ----
  3058.           
  3059.           while (p && width-- && c)
  3060.           {
  3061. ! #ifdef PRINTF_LONGLONG
  3062. !             if (llval)
  3063. !             lln = (lln * base) + (p - digits);
  3064. !             else
  3065. ! #endif
  3066. !             n = (n * base) + (p - digits);
  3067.               charcnt++;
  3068.               c = (*get)(ip);
  3069.             zeroin:
  3070. ***************
  3071. *** 245,259 ****
  3072.   #else
  3073.               p = ((unsigned char *) *args);
  3074.   #endif
  3075. !             if (neg == TRUE)
  3076. !             n = -n;
  3077. !             if (lval)
  3078. !             *((long*) p) = n;
  3079. !             else if (sval)
  3080. !             *((short *) p) = (short) n;
  3081.               else
  3082. !             *((int *) p) = (int) n;
  3083. !             ++cnt;
  3084.           }
  3085.           break;
  3086.           
  3087. --- 265,290 ----
  3088.   #else
  3089.               p = ((unsigned char *) *args);
  3090.   #endif
  3091. ! #ifdef PRINTF_LONGLONG
  3092. !             if (llval)
  3093. !             {
  3094. !             if (neg == TRUE)
  3095. !                 lln=-lln;
  3096. !             *((long long*) p) = lln;
  3097. !             }
  3098.               else
  3099. ! #endif
  3100. !             {
  3101. !             if (neg == TRUE)
  3102. !                 n = -n;
  3103. !             if (lval)
  3104. !                 *((long*) p) = n;
  3105. !             else if (sval)
  3106. !                 *((short *) p) = (short) n;
  3107. !             else
  3108. !                 *((int *) p) = (int) n;
  3109. !             ++cnt;
  3110. !             }
  3111.           }
  3112.           break;
  3113.           
  3114. diff -cr ../mntlib34/select.c ./select.c
  3115. *** ../mntlib34/select.c    Wed Jul  7 09:22:12 1993
  3116. --- ./select.c    Mon Sep 13 22:53:08 1993
  3117. ***************
  3118. *** 18,26 ****
  3119.      value under MiNT. A non-null pointer to a 0 valued struct means
  3120.      to poll; in MiNT we simulate this with a minimum timeout value.
  3121.    */
  3122. !     unsigned short mtime;
  3123.       int rval;
  3124.   
  3125.       if (timeout) {
  3126.           mtime = timeout->tv_sec * 1000 + timeout->tv_usec/1000;
  3127.           if (mtime == 0) mtime = 1;
  3128. --- 18,31 ----
  3129.      value under MiNT. A non-null pointer to a 0 valued struct means
  3130.      to poll; in MiNT we simulate this with a minimum timeout value.
  3131.    */
  3132. !     unsigned long mtime;
  3133. !     unsigned short stime;
  3134.       int rval;
  3135. +     long save_rfds = 0, save_wfds = 0, save_xfds = 0;
  3136.   
  3137. +     if (rfds) save_rfds = *rfds;
  3138. +     if (wfds) save_wfds = *wfds;
  3139. +     if (xfds) save_xfds = *xfds;
  3140.       if (timeout) {
  3141.           mtime = timeout->tv_sec * 1000 + timeout->tv_usec/1000;
  3142.           if (mtime == 0) mtime = 1;
  3143. ***************
  3144. *** 28,37 ****
  3145.       else
  3146.           mtime = 0;
  3147.   
  3148. !     rval = Fselect(mtime, rfds, wfds, xfds);
  3149. !     if (rval < 0) {
  3150.           errno = -rval;
  3151.           return -1;
  3152. !     }
  3153. !     return rval;
  3154.   }
  3155. --- 33,60 ----
  3156.       else
  3157.           mtime = 0;
  3158.   
  3159. !     /* Unfortunately, Fselect can only handle at most 65535ms timeout.
  3160. !        We have to loop for a bigger timeout. */
  3161. !     for (;;)
  3162. !       {
  3163. !         if (mtime > 65535)
  3164. !           stime = 65535;
  3165. !         else
  3166. !           stime = mtime;
  3167. !         mtime -= stime;
  3168. !         rval = Fselect (stime, rfds, wfds, xfds);
  3169. !         if (rval < 0)
  3170. !           {
  3171.           errno = -rval;
  3172.           return -1;
  3173. !           }
  3174. !         if (rval == 0 && mtime > 0)
  3175. !           {
  3176. !         if (rfds) *rfds = save_rfds;
  3177. !         if (wfds) *wfds = save_wfds;
  3178. !         if (xfds) *xfds = save_xfds;
  3179. !           }
  3180. !         else
  3181. !           return rval;
  3182. !       }
  3183.   }
  3184. diff -cr ../mntlib34/setjmp.cpp ./setjmp.cpp
  3185. *** ../mntlib34/setjmp.cpp    Wed Jun  9 05:10:28 1993
  3186. --- ./setjmp.cpp    Wed Sep  8 22:20:20 1993
  3187. ***************
  3188. *** 18,48 ****
  3189.   _sigsetjmp:
  3190.       movel    sp@(4), a0        | address of sigjmp_buf[]
  3191.   #ifdef __MSHORT__
  3192. !     movew    sp@(8), d0
  3193. !     extl    d0
  3194.   #else
  3195. !     movel    sp@(8), d0
  3196.   #endif
  3197. !     movel    d0, a0@(56)        | save sigmask for siglongjmp?
  3198.       beq    SETJMP            | no -- call common code
  3199. !     movel    Sigmask, a0@(52)    | save tos emulation signal mask
  3200.   #ifdef __MSHORT__
  3201.       tstw    Mint            | see if MiNT is active
  3202.   #else
  3203.       tstl    Mint
  3204.   #endif
  3205. !     beq    SETJMP            | no -- call common code
  3206. !     movel    #0, sp@-        | add no signals to sigmask
  3207.       movew    #0x116, sp@-        | Psigblock() system call
  3208.       trap    #1            |
  3209.       addqw    #6, sp
  3210. !     movel    d0, a0@(52)        | save MiNT signal mask
  3211. !     jmp    SETJMP            | call common code
  3212.   
  3213.       .globl _setjmp
  3214.   _setjmp:
  3215.       movel    sp@(4),a0        | address of jmp_buf[]
  3216. !     movel    #0, a0@(56)        | do not restore sigmask on longjmp
  3217.   SETJMP:
  3218.       movel    sp@,a0@            | save return address
  3219.       moveml    d2-d7/a2-a7,a0@(4)    | save registers d2-d7/a2-a7
  3220. --- 18,49 ----
  3221.   _sigsetjmp:
  3222.       movel    sp@(4), a0        | address of sigjmp_buf[]
  3223.   #ifdef __MSHORT__
  3224. !     movew    sp@(8), a1
  3225.   #else
  3226. !     movel    sp@(8), a1
  3227.   #endif
  3228. !     movel    a1, a0@(52)        | save sigmask for siglongjmp?
  3229.       beq    SETJMP            | no -- call common code
  3230. !     movel    Sigmask, d0        | save tos emulation signal mask
  3231.   #ifdef __MSHORT__
  3232.       tstw    Mint            | see if MiNT is active
  3233.   #else
  3234.       tstl    Mint
  3235.   #endif
  3236. !     beq    nomint            | no -- call common code
  3237. !     clrl    sp@-            | add no signals to sigmask
  3238.       movew    #0x116, sp@-        | Psigblock() system call
  3239.       trap    #1            |
  3240.       addqw    #6, sp
  3241. ! nomint:
  3242. !     orw    #1,d0            | make it != 0 (SIGNULL is unmaskable)
  3243. !     movel    d0, a0@(52)        | save signal mask
  3244. !     bra    SETJMP            | call common code
  3245.   
  3246.       .globl _setjmp
  3247.   _setjmp:
  3248.       movel    sp@(4),a0        | address of jmp_buf[]
  3249. !     clrl    a0@(52)            | do not restore sigmask on longjmp
  3250.   SETJMP:
  3251.       movel    sp@,a0@            | save return address
  3252.       moveml    d2-d7/a2-a7,a0@(4)    | save registers d2-d7/a2-a7
  3253. ***************
  3254. *** 64,72 ****
  3255.       addqw    #2, sp
  3256.   NOMINT:
  3257.       movel    sp@(4),a0        | address of jmp_buf[]
  3258. !     tstl    a0@(56)            | want to restore sigmask?
  3259.       beq    NORESTORE        | no -- skip restore code
  3260. !     movel    a0@(52), Sigmask    | restore tos emulation signal mask
  3261.   #ifdef __MSHORT__
  3262.       tstw    Mint            | see if MiNT is active
  3263.   #else
  3264. --- 65,74 ----
  3265.       addqw    #2, sp
  3266.   NOMINT:
  3267.       movel    sp@(4),a0        | address of jmp_buf[]
  3268. !     movel    a0@(52),d0        | want to restore sigmask?
  3269.       beq    NORESTORE        | no -- skip restore code
  3270. !     andw    #-2,d0
  3271. !     movel    d0, Sigmask        | restore tos emulation signal mask
  3272.   #ifdef __MSHORT__
  3273.       tstw    Mint            | see if MiNT is active
  3274.   #else
  3275. ***************
  3276. *** 73,79 ****
  3277.       tstl    Mint
  3278.   #endif
  3279.       beq    NORESTORE        | no -- do not call sigsetmask
  3280. !     movel    a0@(52), sp@-        | restore signal mask
  3281.       movew    #0x117, sp@-        | Psigsetmask() system call
  3282.       trap    #1            |
  3283.       addqw    #6, sp
  3284. --- 75,81 ----
  3285.       tstl    Mint
  3286.   #endif
  3287.       beq    NORESTORE        | no -- do not call sigsetmask
  3288. !     movel    d0, sp@-        | restore signal mask
  3289.       movew    #0x117, sp@-        | Psigsetmask() system call
  3290.       trap    #1            |
  3291.       addqw    #6, sp
  3292. ***************
  3293. *** 84,90 ****
  3294.       movel    sp@(8),d0        | value to return
  3295.   #endif
  3296.       bne    L1            | may not be 0
  3297. !     movl    #1, d0
  3298.   L1:
  3299.       moveml    a0@(4),d2-d7/a2-a7    | restore saved reggies
  3300.       movl    a0@,sp@            | and the saved return address
  3301. --- 86,92 ----
  3302.       movel    sp@(8),d0        | value to return
  3303.   #endif
  3304.       bne    L1            | may not be 0
  3305. !     movql    #1, d0
  3306.   L1:
  3307.       moveml    a0@(4),d2-d7/a2-a7    | restore saved reggies
  3308.       movl    a0@,sp@            | and the saved return address
  3309. diff -cr ../mntlib34/sigactio.c ./sigactio.c
  3310. *** ../mntlib34/sigactio.c    Tue Jul  6 08:04:36 1993
  3311. --- ./sigactio.c    Sun Jul 18 08:20:38 1993
  3312. ***************
  3313. *** 6,12 ****
  3314.   #include <signal.h>
  3315.   
  3316.   /* vector of signal handlers (for TOS, or for MiNT with -mshort) */
  3317. ! extern __Sigfunc _sig_handler[NSIG];
  3318.   
  3319.   #ifdef __MSHORT__
  3320.   typedef void __CDECL (*__KerSigfunc) __PROTO((long));
  3321. --- 6,12 ----
  3322.   #include <signal.h>
  3323.   
  3324.   /* vector of signal handlers (for TOS, or for MiNT with -mshort) */
  3325. ! extern __Sigfunc _sig_handler[__NSIG];
  3326.   
  3327.   #ifdef __MSHORT__
  3328.   typedef void __CDECL (*__KerSigfunc) __PROTO((long));
  3329. ***************
  3330. *** 29,75 ****
  3331.           struct ksigact {
  3332.               __KerSigfunc    sa_handler;    /* pointer to signal handler */
  3333.               long        sa_mask;    /* additional signals masked during delivery */
  3334. !             union {
  3335. !                 short    kernel;
  3336. !                 int        posix;
  3337. !             } sa_flags;        /* signal specific flags, kernel */
  3338. !         } temp;
  3339. !         
  3340.   #ifdef __MSHORT__
  3341.   /* NOTE: MiNT passes 32 bit numbers for signals, so we want our
  3342.    * own signal dispatcher to switch these to 16 bit ints
  3343.    */
  3344. -         if (sig < 0 || sig >= NSIG) {
  3345. -             errno = ERANGE;
  3346. -             return -1;
  3347. -         }
  3348.           oldfunc = _sig_handler[sig];
  3349.           if (act) {
  3350. !             temp = *(struct ksigact *)act;
  3351. !             _sig_handler[sig] = (__Sigfunc)temp.sa_handler;
  3352.               if (_sig_handler[sig] != SIG_DFL && _sig_handler[sig] != SIG_IGN) {
  3353. !                 temp.sa_handler = _trampoline;
  3354.               }
  3355. !             act = (struct sigaction *)&temp;
  3356.           }
  3357. ! #else
  3358. !         if (act) {
  3359. !             temp = *(struct ksigact *)act;    /* dept. of sleaze */
  3360. !             temp.sa_flags.kernel = temp.sa_flags.posix;
  3361. !             act = (struct sigaction *)&temp;
  3362.           }
  3363. ! #endif
  3364. !         r = Psigaction(sig, act, oact);
  3365.   #ifdef __MSHORT__
  3366. !         if (oact && oact->sa_handler == (__Sigfunc) _trampoline)
  3367. !             oact->sa_handler = oldfunc;
  3368.   #else
  3369. !         if (oact)
  3370. !             oact->sa_flags = ((struct ksigact *)oact)->sa_flags.kernel;
  3371.   #endif
  3372. -         if (r < 0) {
  3373. -             errno = (int) -r;
  3374. -             return -1;
  3375.           }
  3376.       }
  3377.       else {
  3378. --- 29,75 ----
  3379.           struct ksigact {
  3380.               __KerSigfunc    sa_handler;    /* pointer to signal handler */
  3381.               long        sa_mask;    /* additional signals masked during delivery */
  3382. !             short        sa_flags;    /* signal specific flags, kernel */
  3383. !         } kact, koact;
  3384. ! 
  3385. !         if (sig < 0 || sig >= __NSIG) {
  3386. !             errno = ERANGE;
  3387. !             return -1;
  3388. !         }
  3389. ! 
  3390.   #ifdef __MSHORT__
  3391.   /* NOTE: MiNT passes 32 bit numbers for signals, so we want our
  3392.    * own signal dispatcher to switch these to 16 bit ints
  3393.    */
  3394.           oldfunc = _sig_handler[sig];
  3395. + #endif
  3396.           if (act) {
  3397. !             kact.sa_handler = (__KerSigfunc) act->sa_handler;
  3398. !             kact.sa_mask = act->sa_mask.__sigset_data[0];
  3399. !             kact.sa_flags = (short) act->sa_flags;
  3400. ! #ifdef __MSHORT__
  3401. !             _sig_handler[sig] = (__Sigfunc)kact.sa_handler;
  3402.               if (_sig_handler[sig] != SIG_DFL && _sig_handler[sig] != SIG_IGN) {
  3403. !                 kact.sa_handler = _trampoline;
  3404.               }
  3405. ! #endif
  3406.           }
  3407. !         r = Psigaction(sig, (act ? &kact : 0L), (oact ? &koact : 0L));
  3408. !         if (r < 0) {
  3409. !             errno = (int) -r;
  3410. !             return -1;
  3411.           }
  3412. !         if (oact) {
  3413. !             oact->sa_mask.__sigset_data[0] = koact.sa_mask;
  3414. !             oact->sa_flags = (int) koact.sa_flags;
  3415.   #ifdef __MSHORT__
  3416. !             oact->sa_handler =
  3417. !               ((koact.sa_handler == (__KerSigfunc) _trampoline)
  3418. !                ? oldfunc
  3419. !                : (__Sigfunc) koact.sa_handler);
  3420.   #else
  3421. !             oact->sa_handler = (__Sigfunc) koact.sa_handler;
  3422.   #endif
  3423.           }
  3424.       }
  3425.       else {
  3426. ***************
  3427. *** 89,95 ****
  3428.               oact->sa_handler = oldfunc;
  3429.               /* we could do something useful with sa_mask when __mint */
  3430.               oact->sa_flags = 0;
  3431. !             oact->sa_mask = 0;
  3432.           }
  3433.       }
  3434.       return 0;
  3435. --- 89,95 ----
  3436.               oact->sa_handler = oldfunc;
  3437.               /* we could do something useful with sa_mask when __mint */
  3438.               oact->sa_flags = 0;
  3439. !             oact->sa_mask.__sigset_data[0] = 0;
  3440.           }
  3441.       }
  3442.       return 0;
  3443. ***************
  3444. *** 103,109 ****
  3445.     int idx;
  3446.     int pos;
  3447.   
  3448. !   if ((!set) || (signo >= NSIG)) {
  3449.       errno = EINVAL;
  3450.       return -1;
  3451.     }
  3452. --- 103,109 ----
  3453.     int idx;
  3454.     int pos;
  3455.   
  3456. !   if ((!set) || (signo >= __NSIG)) {
  3457.       errno = EINVAL;
  3458.       return -1;
  3459.     }
  3460. ***************
  3461. *** 121,127 ****
  3462.     int idx;
  3463.     int pos;
  3464.   
  3465. !   if ((!set) || (signo >= NSIG)) {
  3466.       errno = EINVAL;
  3467.       return -1;
  3468.     }
  3469. --- 121,127 ----
  3470.     int idx;
  3471.     int pos;
  3472.   
  3473. !   if ((!set) || (signo >= __NSIG)) {
  3474.       errno = EINVAL;
  3475.       return -1;
  3476.     }
  3477. ***************
  3478. *** 171,177 ****
  3479.     int idx;
  3480.     int pos;
  3481.   
  3482. !   if ((!set) || (signo >= NSIG)) {
  3483.       errno = EINVAL;
  3484.       return -1;
  3485.     }
  3486. --- 171,177 ----
  3487.     int idx;
  3488.     int pos;
  3489.   
  3490. !   if ((!set) || (signo >= __NSIG)) {
  3491.       errno = EINVAL;
  3492.       return -1;
  3493.     }
  3494. diff -cr ../mntlib34/sozobon/linea.s ./sozobon/linea.s
  3495. *** ../mntlib34/sozobon/linea.s    Thu Jun 17 04:47:50 1993
  3496. --- ./sozobon/linea.s    Mon Sep 13 06:13:04 1993
  3497. ***************
  3498. *** 3,16 ****
  3499.       .bss
  3500.   
  3501.       .globl ___aline
  3502. ! ;___aline:
  3503. ! ;    .ds.l    1
  3504.       .globl ___fonts
  3505. ! ;___fonts:
  3506. ! ;    .ds.b    1
  3507.       .globl ___funcs
  3508. ! ;___funcs:
  3509. ! ;    .ds.l    1
  3510.   
  3511.       .text
  3512.   
  3513. --- 3,16 ----
  3514.       .bss
  3515.   
  3516.       .globl ___aline
  3517. ! ___aline:
  3518. !     .ds.l    1
  3519.       .globl ___fonts
  3520. ! ___fonts:
  3521. !     .ds.l    1
  3522.       .globl ___funcs
  3523. ! ___funcs:
  3524. !     .ds.l    1
  3525.   
  3526.       .text
  3527.   
  3528. diff -cr ../mntlib34/sozobon/makefile ./sozobon/makefile
  3529. *** ../mntlib34/sozobon/makefile    Mon Jun  7 10:23:18 1993
  3530. --- ./sozobon/makefile    Mon Sep 13 06:18:44 1993
  3531. ***************
  3532. *** 31,42 ****
  3533.   # Unfortunately, there is an optimizer bug in 1.40 that bites here; if
  3534.   # you're using that version, you must use the non-optimizing version.
  3535.   CFLAGS = -O -D__NO_FLOAT__ -DNDEBUG $(SHORTNAMES)
  3536. ! #NOOPT = -D__NO_FLOAT__ -DNDEBUG $(SHORTNAMES)    # without debugging
  3537. ! NOOPT = $(CFLAGS)                # with debugging
  3538.   
  3539.   # If you prefer more "standard" Unix-like names for your library files, use
  3540.   # the alternate definitions of CRT0 and LIBC -- assuming, of course, that
  3541. ! # your cc has been modified to recognize those names!
  3542.   # CRT0 = crt0.o
  3543.   # LIBC = libc.a
  3544.   CRT0 = dstart.o
  3545. --- 31,42 ----
  3546.   # Unfortunately, there is an optimizer bug in 1.40 that bites here; if
  3547.   # you're using that version, you must use the non-optimizing version.
  3548.   CFLAGS = -O -D__NO_FLOAT__ -DNDEBUG $(SHORTNAMES)
  3549. ! #NOOPT = -D__NO_FLOAT__ -DNDEBUG $(SHORTNAMES)    # without optimizing
  3550. ! NOOPT = $(CFLAGS)                # with optimizing
  3551.   
  3552.   # If you prefer more "standard" Unix-like names for your library files, use
  3553.   # the alternate definitions of CRT0 and LIBC -- assuming, of course, that
  3554. ! # you have a cc that recognizes those names!
  3555.   # CRT0 = crt0.o
  3556.   # LIBC = libc.a
  3557.   CRT0 = dstart.o
  3558. ***************
  3559. *** 47,60 ****
  3560.   
  3561.   # These are in alphabetical order to make it easy to find one.
  3562.   OBJECTS = \
  3563. !     abort.o abs.o access.o alarm.o alglobal.o alloca.o alphasor.o \
  3564.       atexit.o atol.o \
  3565.       bcmp.o bcopy.o binmode.o bsearch.o bzero.o \
  3566.       calloc.o chdir.o chmod.o clock.o close.o console.o crtinit.o \
  3567. !     ctermid.o ctime.o ctype.o \
  3568.       defmode.o difftime.o dirent.o doprnt.o dup.o \
  3569.       eprintf.o exec.o execp.o\
  3570. !     fclose.o fcntl.o fdopen.o fflush.o fgetc.o fgets.o filbuf.o \
  3571.       findfile.o fopen.o fopenp.o fork.o fprintf.o fputc.o fputs.o \
  3572.       fread.o frwbin.o fscanf.o fseek.o fsetpos.o ftw.o fungetc.o \
  3573.       fwrite.o \
  3574. --- 47,60 ----
  3575.   
  3576.   # These are in alphabetical order to make it easy to find one.
  3577.   OBJECTS = \
  3578. !     abort.o abs.o access.o alarm.o alloca.o alphasor.o \
  3579.       atexit.o atol.o \
  3580.       bcmp.o bcopy.o binmode.o bsearch.o bzero.o \
  3581.       calloc.o chdir.o chmod.o clock.o close.o console.o crtinit.o \
  3582. !     ctermid.o ctime.o ctype.o cuserid.o\
  3583.       defmode.o difftime.o dirent.o doprnt.o dup.o \
  3584.       eprintf.o exec.o execp.o\
  3585. !     fclose.o fcntl.o fdopen.o fflush.o ffs.o fgetc.o fgets.o filbuf.o \
  3586.       findfile.o fopen.o fopenp.o fork.o fprintf.o fputc.o fputs.o \
  3587.       fread.o frwbin.o fscanf.o fseek.o fsetpos.o ftw.o fungetc.o \
  3588.       fwrite.o \
  3589. diff -cr ../mntlib34/sozobon/readme ./sozobon/readme
  3590. *** ../mntlib34/sozobon/readme    Sun Jun  6 05:57:34 1993
  3591. --- ./sozobon/readme    Mon Sep 13 06:18:46 1993
  3592. ***************
  3593. *** 1,4 ****
  3594. ! MiNT library for Heat-n-Serve/Sozobon C, patchlevel 30
  3595.   
  3596.   This is a port of Eric Smith's MiNT library to Heat-n-Serve C, based on
  3597.   Dave Gymer's original port.  It replaces the files dlibs.a, dstart.o,
  3598. --- 1,4 ----
  3599. ! MiNT library for Heat-n-Serve/Sozobon C, patchlevel 34
  3600.   
  3601.   This is a port of Eric Smith's MiNT library to Heat-n-Serve C, based on
  3602.   Dave Gymer's original port.  It replaces the files dlibs.a, dstart.o,
  3603. ***************
  3604. *** 64,72 ****
  3605.       directory.
  3606.   
  3607.   3)  Edit osbind.h from the MiNT include distribution.  Find the macro
  3608. !     definition for trap_14_wllwwwwwlw(), spanning lines 830-874 (or
  3609. !     thereabouts).  Delete every scrap of white space you can from this
  3610. !     macro.  Otherwise, it overruns HSC's static line buffer.
  3611.   
  3612.   4)  Replace the gemfast.h from the MiNT distribution with the gemfast.h
  3613.       from the Heat-n-Serve distribution (the GEMfast that comes with
  3614. --- 64,73 ----
  3615.       directory.
  3616.   
  3617.   3)  Edit osbind.h from the MiNT include distribution.  Find the macro
  3618. !     definitions for trap_14_wllwwwwwlw(), spanning lines 1309-1349 and
  3619. !     1456-1500 (or thereabouts).  Delete every scrap of white space you
  3620. !     can from these macros.  Otherwise, they overrun HSC's static line
  3621. !     buffer.
  3622.   
  3623.   4)  Replace the gemfast.h from the MiNT distribution with the gemfast.h
  3624.       from the Heat-n-Serve distribution (the GEMfast that comes with
  3625. diff -cr ../mntlib34/spawn.c ./spawn.c
  3626. *** ../mntlib34/spawn.c    Sat Jun 19 12:20:58 1993
  3627. --- ./spawn.c    Mon Sep 13 22:59:12 1993
  3628. ***************
  3629. *** 20,25 ****
  3630. --- 20,34 ----
  3631.      uo, 3.5.93, throw away some static characterarrays (path[] and
  3632.      cmd[]).
  3633.   
  3634. +    10 Jul 1993 ole
  3635. +    added emulation for script execution.
  3636. +    This feature is controlable by the Environment variable "UNIXMODE".
  3637. +    The switch 's' in UNIXMODE says that executable text files with a
  3638. +    hash as their first character are interpretable.
  3639. +    Files which have only '#'  as their first character are interpreted
  3640. +    using /bin/sh
  3641. +    Files which have i.e '#!/usr/bin/awk -f' as their first character
  3642. +    are interpreted with "/usr/bin/awk -f <file>"
  3643.   */
  3644.   
  3645.   #include    <stdarg.h>
  3646. ***************
  3647. *** 32,37 ****
  3648. --- 41,47 ----
  3649.   #include    <time.h>
  3650.   #include    <string.h>
  3651.   #include    <unistd.h>
  3652. + #include    <support.h>
  3653.   #include    "lib.h"
  3654.   
  3655.   #define TOS_ARGS 126
  3656. ***************
  3657. *** 39,64 ****
  3658.   extern char **environ;
  3659.   extern int __mint;
  3660.   
  3661.   
  3662. ! int
  3663. ! _spawnve(mode, _path, argv, envp)
  3664. !     int    mode;
  3665. !     char    *_path;
  3666.       char    **argv;
  3667.       char    **envp;
  3668.   {
  3669.       char        path[MAXPATHLEN];
  3670.       char        cmd[TOS_ARGS + 1];
  3671.       size_t        cmlen;
  3672.       size_t        enlen = 0;
  3673.       size_t        left, min_left;
  3674. !     char        *p;
  3675.       char        *s, *t;
  3676.       char        *env;
  3677.       long        rval;
  3678. !     char *pconv, *pc, *tmp;
  3679.       size_t len, cnt;
  3680.       int i, done;
  3681.   
  3682.       if (mode != P_WAIT && mode != P_OVERLAY && mode != P_NOWAIT) {
  3683.           errno = EINVAL;
  3684. --- 49,227 ----
  3685.   extern char **environ;
  3686.   extern int __mint;
  3687.   
  3688. + /* comment this out, if you don't want script execution */
  3689. + #define HASH_BANG
  3690.   
  3691. ! #ifdef HASH_BANG
  3692. ! 
  3693. ! static char *extensions[] = { "ttp", "prg", "tos", NULL };
  3694. ! 
  3695. ! static int interpret_script __PROTO((int mode, char *path, 
  3696. !                     char **argv, char **envp));
  3697. ! 
  3698. ! static int
  3699. ! interpret_script(mode, path, argv, envp)
  3700. !     int        mode;
  3701. !     char    *path;
  3702.       char    **argv;
  3703.       char    **envp;
  3704.   {
  3705. +     char    shellpath[MAXPATHLEN];
  3706. +     char    tmppath[MAXPATHLEN];
  3707. +     char    args[TOS_ARGS + 1];
  3708. +     char    *shell;
  3709. +     char    *shellargs;
  3710. +     char    **shellargv;
  3711. +     int        nargcount;
  3712. +     int        fd;
  3713. +     int        argcount;
  3714. +     int        i, rv;
  3715. +     char    buf;
  3716. +     
  3717. +     /* path is already converted to dos */
  3718. +     if ((fd = (int)Fopen(path, 0)) < 0)
  3719. +         return -fd;
  3720. + 
  3721. +     if (Fread(fd, 1L, &buf) != 1L) {
  3722. +         Fclose(fd);
  3723. +         return -1;
  3724. +     }
  3725. + 
  3726. +     if (buf == '#') {
  3727. +         if (Fread(fd, 1L, &buf) != 1L) {
  3728. +             Fclose(fd);
  3729. +             return -1;
  3730. +         }
  3731. + 
  3732. +         if (buf == '!') {
  3733. + 
  3734. +             /* skip blanks */
  3735. +             do {
  3736. +                 if (Fread(fd, 1L, &buf) != 1L) {
  3737. +                     Fclose(fd);
  3738. +                     return -1;
  3739. +                 }
  3740. +             } while (buf == ' ' || buf == '\t');
  3741. + 
  3742. +             /* read filename */
  3743. +             for (i = 0; i < MAXPATHLEN; i++) {
  3744. +                 if (buf == ' ' || buf == '\t' ||
  3745. +                         buf == '\r' || buf == '\n')
  3746. +                     break;
  3747. +                 shellpath[i] = buf;
  3748. + 
  3749. +                 if (Fread(fd, 1L, &buf) != 1L) {
  3750. +                     Fclose(fd);
  3751. +                     return -1;
  3752. +                 }
  3753. +             }
  3754. +             shellpath[i] = '\0';
  3755. +             shell = shellpath;
  3756. + 
  3757. +             /* 
  3758. +              * read arguments if any
  3759. +              * maximum is TOS_ARGS (only restricted for my comfort :-)
  3760. +              */
  3761. +             nargcount = 0;
  3762. +             i = 0;
  3763. +             while(i < TOS_ARGS && buf != '\r' && buf != '\n') {
  3764. +                 /* skip blanks */
  3765. +                 do {
  3766. +                     if (Fread(fd, 1L, &buf) != 1L) {
  3767. +                         Fclose(fd);
  3768. +                         return -1;
  3769. +                     }
  3770. +                 } while (buf == ' ' || buf == '\t');
  3771. + 
  3772. +                 if (buf == '\r' || buf == '\n')
  3773. +                     break;
  3774. +                 
  3775. +                 while ( buf != ' '  && buf != '\t' &&
  3776. +                         buf != '\r' && buf != '\n' && i < TOS_ARGS) {
  3777. +                     args[i++] = buf;
  3778. +                     if (Fread(fd, 1L, &buf) != 1L) {
  3779. +                         Fclose(fd);
  3780. +                         return -1;
  3781. +                     }
  3782. +                 }
  3783. +                 args[i++] = '\0';
  3784. +                 nargcount++;
  3785. +             }
  3786. +             args[i] = '\0';
  3787. +             shellargs    = args;
  3788. +         }
  3789. +         else {
  3790. +             shell = "/bin/sh";
  3791. +             nargcount = 0;
  3792. +             args[0] = '\0';
  3793. +             shellargs = args;
  3794. +         }
  3795. + 
  3796. +         Fclose(fd);
  3797. +         
  3798. +         if (*shell) {
  3799. + 
  3800. +             shell = buffindfile(shell, getenv("PATH"), extensions, tmppath);
  3801. +             if (!shell) {
  3802. +                 errno = ENOENT;
  3803. +                 return -1;        /* file not found */
  3804. +             }
  3805. + 
  3806. +             /* count old args */
  3807. +             for (i = 0; argv[i] != 0; i++);
  3808. +             argcount = i;
  3809. +             
  3810. +             shellargv = (char **)Malloc((argcount + nargcount + 2) * sizeof(char *));
  3811. +             if (!shellargv) {
  3812. +                 errno = ENOMEM;
  3813. +                 return -1;
  3814. +             }
  3815. +             
  3816. +             i = 0;
  3817. +             shellargv[i++] = shell;
  3818. +             while(*shellargs != '\0') {
  3819. +                 shellargv[i++] = shellargs;
  3820. +                 while (*shellargs++ != '\0');
  3821. +             }
  3822. +     
  3823. +             while (*argv != NULL)
  3824. +                 shellargv[i++] = *argv++;
  3825. +             shellargv[i] = NULL;
  3826. +             
  3827. +             rv = _spawnve(mode, shell, shellargv, envp);
  3828. +             (void)Mfree(shellargv);
  3829. +             return rv;
  3830. +         }
  3831. +     }
  3832. + 
  3833. +     return -1;
  3834. + }
  3835. + 
  3836. + #endif /* HASH_BANG */
  3837. + 
  3838. + int
  3839. + _spawnve(mode, _path, argv, envp)
  3840. + int    mode;
  3841. + const char    *_path;
  3842. + char    *const *argv;
  3843. + char    *const *envp;
  3844. + {
  3845.       char        path[MAXPATHLEN];
  3846.       char        cmd[TOS_ARGS + 1];
  3847.       size_t        cmlen;
  3848.       size_t        enlen = 0;
  3849.       size_t        left, min_left;
  3850. !     const char    *p;
  3851.       char        *s, *t;
  3852.       char        *env;
  3853.       long        rval;
  3854. !     const char *pconv, *pc, *tmp;
  3855.       size_t len, cnt;
  3856.       int i, done;
  3857. + #ifdef HASH_BANG
  3858. +     char        **_envp;
  3859. +     char        **_argv;
  3860. + #endif
  3861.   
  3862.       if (mode != P_WAIT && mode != P_OVERLAY && mode != P_NOWAIT) {
  3863.           errno = EINVAL;
  3864. ***************
  3865. *** 68,73 ****
  3866. --- 231,241 ----
  3867.       if (!envp)
  3868.           envp = environ;
  3869.   
  3870. + #ifdef HASH_BANG
  3871. +         _envp = envp;
  3872. +         _argv = argv;
  3873. + #endif
  3874. + 
  3875.   /* try to find PCONVERT environment variable */
  3876.       for (i = 0; (pconv = envp[i]) != 0; i++) {
  3877.           if (! strncmp(pconv, "PCONVERT=", 9)) {
  3878. ***************
  3879. *** 203,209 ****
  3880.           unsigned long null_params = 0;
  3881.           int digits, i;
  3882.           unsigned long idx, val;
  3883. !         char **ap;
  3884.           
  3885.           /* communicate empty arguments thru ARGV= value
  3886.            */
  3887. --- 371,377 ----
  3888.           unsigned long null_params = 0;
  3889.           int digits, i;
  3890.           unsigned long idx, val;
  3891. !         char *const *ap;
  3892.           
  3893.           /* communicate empty arguments thru ARGV= value
  3894.            */
  3895. ***************
  3896. *** 242,250 ****
  3897.                   }
  3898.                   
  3899.                   left -= digits + 2; /* 2 = sizeof( ',' in NULL:
  3900. !                              * list + ' ' we put in place
  3901. !                              * of empty params
  3902. !                              */
  3903.                   if (left < min_left)
  3904.                       goto need_more_core;
  3905.               }
  3906. --- 410,418 ----
  3907.                   }
  3908.                   
  3909.                   left -= digits + 2; /* 2 = sizeof( ',' in NULL:
  3910. !                                       * list + ' ' we put in place
  3911. !                                      * of empty params
  3912. !                                      */
  3913.                   if (left < min_left)
  3914.                       goto need_more_core;
  3915.               }
  3916. ***************
  3917. *** 262,268 ****
  3918.               *s++ = ' ';    /* replace by space */
  3919.           } else {
  3920.                do {
  3921. !             *s++ = *p++;
  3922.                } while (*p);
  3923.           }
  3924.           *s++ = '\0';
  3925. --- 430,436 ----
  3926.               *s++ = ' ';    /* replace by space */
  3927.           } else {
  3928.                do {
  3929. !                 *s++ = *p++;
  3930.                } while (*p);
  3931.           }
  3932.           *s++ = '\0';
  3933. ***************
  3934. *** 273,279 ****
  3935.   /* s points at the environment's copy of the args */
  3936.   /* t points at the command line copy to be put in the basepage */
  3937.   
  3938. !         cmlen = 0;
  3939.       if (argv && *argv) {
  3940.           t++;
  3941.           while (*++argv) {
  3942. --- 441,447 ----
  3943.   /* s points at the environment's copy of the args */
  3944.   /* t points at the command line copy to be put in the basepage */
  3945.   
  3946. !     cmlen = 0;
  3947.       if (argv && *argv) {
  3948.           t++;
  3949.           while (*++argv) {
  3950. ***************
  3951. *** 290,304 ****
  3952.                    }
  3953.               } else {
  3954.                    do {
  3955. !                               if (cmlen < TOS_ARGS) {
  3956. !                                       *t++ = *p; cmlen++;
  3957. !                               }
  3958. !                 *s++ = *p++;
  3959.                    } while (*p);
  3960.               }
  3961. !                         if (cmlen < TOS_ARGS && *(argv+1)) {
  3962. !                                 *t++ = ' '; cmlen++;
  3963. !                         }
  3964.               *s++ = '\0';
  3965.           }
  3966.   /*                *cmd = (char) cmlen;  NOT ANY MORE */
  3967. --- 458,472 ----
  3968.                    }
  3969.               } else {
  3970.                    do {
  3971. !                     if (cmlen < TOS_ARGS) {
  3972. !                         *t++ = *p; cmlen++;
  3973. !                     }
  3974. !                     *s++ = *p++;
  3975.                    } while (*p);
  3976.               }
  3977. !             if (cmlen < TOS_ARGS && *(argv+1)) {
  3978. !                 *t++ = ' '; cmlen++;
  3979. !             }
  3980.               *s++ = '\0';
  3981.           }
  3982.   /*                *cmd = (char) cmlen;  NOT ANY MORE */
  3983. ***************
  3984. *** 324,329 ****
  3985. --- 492,509 ----
  3986.       {
  3987.           errno = (int) -rval;
  3988.           rval = -1;
  3989. + #ifdef HASH_BANG
  3990. +         if (errno == ENOEXEC) {
  3991. +             char    *umode;
  3992. + 
  3993. +              /* try to find UNIXMODE in environment */
  3994. +             if ((umode = getenv("UNIXMODE")) != NULL &&
  3995. +                     strchr(umode, 's') != NULL ) {
  3996. +                 (void)Mfree(env);
  3997. +                 return interpret_script(mode, path, _argv, _envp);
  3998. +             }
  3999. +         }
  4000. + #endif
  4001.       }
  4002.       else if (mode == P_OVERLAY)
  4003.       /* note that we get here only if MiNT is not active! */
  4004. ***************
  4005. *** 331,333 ****
  4006. --- 511,528 ----
  4007.       (void)Mfree(env);
  4008.       return (int) rval;
  4009.   }
  4010. + 
  4011. + #ifdef TEST
  4012. + int
  4013. + main (int argc, char **argv, char **envp)
  4014. + {
  4015. +     if (argc == 2) {
  4016. +         if (spawnve(P_WAIT, argv[1], &argv[1], envp) < 0) {
  4017. +             perror("spawn failed");
  4018. +             return errno;
  4019. +         }
  4020. +         return 0;
  4021. +     }
  4022. +     return 1;
  4023. + }
  4024. + #endif
  4025. diff -cr ../mntlib34/spawnve.c ./spawnve.c
  4026. *** ../mntlib34/spawnve.c    Tue Apr 16 07:51:18 1991
  4027. --- ./spawnve.c    Thu Sep  9 16:00:20 1993
  4028. ***************
  4029. *** 11,19 ****
  4030.   int
  4031.   spawnve(mode, path, argv, envp)
  4032.       int    mode;
  4033. !     char    *path;
  4034. !     char    **argv;
  4035. !     char    **envp;
  4036.   {
  4037.       return _spawnve(mode, path, argv, envp);
  4038.   }
  4039. --- 11,19 ----
  4040.   int
  4041.   spawnve(mode, path, argv, envp)
  4042.       int    mode;
  4043. !     const char *path;
  4044. !     char    *const *argv;
  4045. !     char    *const *envp;
  4046.   {
  4047.       return _spawnve(mode, path, argv, envp);
  4048.   }
  4049. ***************
  4050. *** 21,34 ****
  4051.   int
  4052.   spawnv(mode, path, argv)
  4053.       int mode;
  4054. !     char *path;
  4055. !     char **argv;
  4056.   {
  4057.       return _spawnve(mode, path, argv, environ);
  4058.   }
  4059.   
  4060.   #ifdef __STDC__
  4061. ! int spawnle(int mode, char *path, ...)
  4062.   #else
  4063.   int spawnle(mode, path)
  4064.       int    mode;
  4065. --- 21,34 ----
  4066.   int
  4067.   spawnv(mode, path, argv)
  4068.       int mode;
  4069. !     const char *path;
  4070. !     char *const *argv;
  4071.   {
  4072.       return _spawnve(mode, path, argv, environ);
  4073.   }
  4074.   
  4075.   #ifdef __STDC__
  4076. ! int spawnle(int mode, const char *path, ...)
  4077.   #else
  4078.   int spawnle(mode, path)
  4079.       int    mode;
  4080. ***************
  4081. *** 49,55 ****
  4082.   }
  4083.   
  4084.   #ifdef __STDC__
  4085. ! int spawnl(int mode, char *path, ...)
  4086.   #else
  4087.   int spawnl(mode, path)
  4088.       int    mode;
  4089. --- 49,55 ----
  4090.   }
  4091.   
  4092.   #ifdef __STDC__
  4093. ! int spawnl(int mode, const char *path, ...)
  4094.   #else
  4095.   int spawnl(mode, path)
  4096.       int    mode;
  4097. diff -cr ../mntlib34/spawnvp.c ./spawnvp.c
  4098. *** ../mntlib34/spawnvp.c    Tue May 25 11:43:18 1993
  4099. --- ./spawnvp.c    Thu Sep  9 16:00:24 1993
  4100. ***************
  4101. *** 15,29 ****
  4102.   #include <support.h>
  4103.   #include <limits.h>
  4104.   
  4105. ! static char *extensions[] = { "ttp", "prg", "tos", NULL };
  4106.   
  4107.   #ifdef __STDC__
  4108. ! int spawnvp(int mode, char *name, char **argv)
  4109.   #else
  4110.   int spawnvp(mode, name, argv) int mode; char *name; char **argv;
  4111.   #endif
  4112.   {
  4113. !     char *execname;
  4114.         char buffer[PATH_MAX];
  4115.         execname = buffindfile(name, getenv("PATH"), extensions,buffer);
  4116.       if (!execname) {
  4117. --- 15,29 ----
  4118.   #include <support.h>
  4119.   #include <limits.h>
  4120.   
  4121. ! static char *const extensions[] = { "ttp", "prg", "tos", NULL };
  4122.   
  4123.   #ifdef __STDC__
  4124. ! int spawnvp(int mode, const char *name, char *const *argv)
  4125.   #else
  4126.   int spawnvp(mode, name, argv) int mode; char *name; char **argv;
  4127.   #endif
  4128.   {
  4129. !     const char *execname;
  4130.         char buffer[PATH_MAX];
  4131.         execname = buffindfile(name, getenv("PATH"), extensions,buffer);
  4132.       if (!execname) {
  4133. ***************
  4134. *** 34,40 ****
  4135.   }
  4136.   
  4137.   #ifdef __STDC__
  4138. ! int spawnlp(int mode, char *name, ...)
  4139.   #else
  4140.   int spawnlp(mode, name) int mode; char *name;
  4141.   #endif
  4142. --- 34,40 ----
  4143.   }
  4144.   
  4145.   #ifdef __STDC__
  4146. ! int spawnlp(int mode, const char *name, ...)
  4147.   #else
  4148.   int spawnlp(mode, name) int mode; char *name;
  4149.   #endif
  4150. diff -cr ../mntlib34/statfs.c ./statfs.c
  4151. *** ../mntlib34/statfs.c    Fri Jun 11 02:00:12 1993
  4152. --- ./statfs.c    Mon Sep 13 23:05:20 1993
  4153. ***************
  4154. *** 11,16 ****
  4155. --- 11,17 ----
  4156.   #include <mintbind.h>
  4157.   #include <unistd.h> /* for chdir, getcwd */
  4158.   #include <limits.h> /* for PATH_MAX */
  4159. + #include <support.h>
  4160.   #ifdef __TURBOC__
  4161.   #include <sys\statfs.h>
  4162.   #else
  4163. ***************
  4164. *** 20,26 ****
  4165.   extern int __mint;
  4166.   
  4167.   int statfs(path, buf)
  4168. !   char *path;
  4169.     struct statfs *buf;
  4170.   {
  4171.     int r;
  4172. --- 21,27 ----
  4173.   extern int __mint;
  4174.   
  4175.   int statfs(path, buf)
  4176. !   const char *path;
  4177.     struct statfs *buf;
  4178.   {
  4179.     int r;
  4180. ***************
  4181. *** 33,38 ****
  4182. --- 34,40 ----
  4183.       short increment;
  4184.       long res1, res2, res3, res4;
  4185.     } mfsinfo;
  4186. +   char _path[PATH_MAX];
  4187.   
  4188.     if (!buf || !path)
  4189.     {
  4190. ***************
  4191. *** 52,58 ****
  4192.    * Also f_type is 1 for V1 filesystems and 2 for V2 (it
  4193.    * is zero for TOS).
  4194.    */
  4195. !   if(Dcntl(0x104,path, (long) &mfsinfo)==0)
  4196.     {
  4197.       buf->f_type = 1+mfsinfo.version;
  4198.       buf->f_bsize = 1024;
  4199. --- 54,61 ----
  4200.    * Also f_type is 1 for V1 filesystems and 2 for V2 (it
  4201.    * is zero for TOS).
  4202.    */
  4203. !   _unx2dos (path, _path);
  4204. !   if(Dcntl(0x104,_path, (long) &mfsinfo)==0)
  4205.     {
  4206.       buf->f_type = 1+mfsinfo.version;
  4207.       buf->f_bsize = 1024;
  4208. diff -cr ../mntlib34/symlink.c ./symlink.c
  4209. *** ../mntlib34/symlink.c    Sun May 23 09:03:10 1993
  4210. --- ./symlink.c    Thu Jul 15 08:01:36 1993
  4211. ***************
  4212. *** 4,9 ****
  4213. --- 4,10 ----
  4214.   #include <errno.h>
  4215.   #include <string.h>
  4216.   #include <limits.h>
  4217. + #include <unistd.h>
  4218.   #include "lib.h"
  4219.   
  4220.   extern int __mint;
  4221. Only in .: sync.c
  4222. diff -cr ../mntlib34/sysconf.c ./sysconf.c
  4223. *** ../mntlib34/sysconf.c    Sun Feb 28 13:08:04 1993
  4224. --- ./sysconf.c    Wed Sep  8 19:06:10 1993
  4225. ***************
  4226. *** 62,68 ****
  4227.       }
  4228.       switch(var) {
  4229.       case _PC_LAST:
  4230. !         return 3;
  4231.       case _PC_IOPEN_MAX:
  4232.           return 45; /* -ish, maybe... */
  4233.       case _PC_LINK_MAX:
  4234. --- 62,68 ----
  4235.       }
  4236.       switch(var) {
  4237.       case _PC_LAST:
  4238. !         return 4;
  4239.       case _PC_IOPEN_MAX:
  4240.           return 45; /* -ish, maybe... */
  4241.       case _PC_LINK_MAX:
  4242. diff -cr ../mntlib34/thread.c ./thread.c
  4243. *** ../mntlib34/thread.c    Sat Jun 19 12:12:04 1993
  4244. --- ./thread.c    Mon Sep 13 06:19:18 1993
  4245. ***************
  4246. *** 38,44 ****
  4247.   /* and this is used to retrieve the child's time */
  4248.   long __waittime = 0;
  4249.   
  4250. ! __EXTERN static void __CDECL startup __PROTO((BASEPAGE *));
  4251.   
  4252.   static void __CDECL
  4253.   startup(b)
  4254. --- 38,44 ----
  4255.   /* and this is used to retrieve the child's time */
  4256.   long __waittime = 0;
  4257.   
  4258. ! static void __CDECL startup __PROTO((BASEPAGE *));
  4259.   
  4260.   static void __CDECL
  4261.   startup(b)
  4262. ***************
  4263. *** 46,52 ****
  4264.   {
  4265.       register int (*func) __PROTO((long));
  4266.       register long arg;
  4267. -     extern void _setstack();    /* in crt0.s */
  4268.   
  4269.   #ifdef __TURBOC__
  4270.       extern void *_StkLim;    /* avoid stack checking */
  4271. --- 46,51 ----
  4272. diff -cr ../mntlib34/uname.c ./uname.c
  4273. *** ../mntlib34/uname.c    Sat Sep  5 22:12:10 1992
  4274. --- ./uname.c    Sun Sep 12 20:13:24 1993
  4275. ***************
  4276. *** 29,35 ****
  4277.    * get operating system information; must execute in supervisor mode
  4278.    */
  4279.   
  4280. ! static void
  4281.   getinfo()
  4282.   {
  4283.       long *cookie, *sysbase;
  4284. --- 29,37 ----
  4285.    * get operating system information; must execute in supervisor mode
  4286.    */
  4287.   
  4288. ! static long getinfo __PROTO((void));
  4289. ! 
  4290. ! static long
  4291.   getinfo()
  4292.   {
  4293.       long *cookie, *sysbase;
  4294. ***************
  4295. *** 49,54 ****
  4296. --- 51,57 ----
  4297.   /* get TOS version number */
  4298.       sysbase = *((long **)(0x4f2L));
  4299.       tosvers = (int)(sysbase[0] & 0x0000ffff);
  4300. +     return 0;
  4301.   }
  4302.   
  4303.   #define HILO(x) (int) ((x >> 8) & 255), (int) (x & 255)
  4304. diff -cr ../mntlib34/unx2dos.c ./unx2dos.c
  4305. *** ../mntlib34/unx2dos.c    Sun Jun 20 09:20:34 1993
  4306. --- ./unx2dos.c    Mon Sep 13 07:20:00 1993
  4307. ***************
  4308. *** 30,36 ****
  4309.           u += 5;
  4310.       /* make /dev/A/foo the same as A:/foo */
  4311.   
  4312. !         if (*u && (u[1] == 0 || (u[1] == '/' || u[1] == '\\'))) {
  4313.               d[0] = *u++;
  4314.               d[1] = ':';
  4315.               d += 2;
  4316. --- 30,37 ----
  4317.           u += 5;
  4318.       /* make /dev/A/foo the same as A:/foo */
  4319.   
  4320. !         if (*u && isalpha (*u)
  4321. !             && (u[1] == 0 || (u[1] == '/' || u[1] == '\\'))) {
  4322.               d[0] = *u++;
  4323.               d[1] = ':';
  4324.               d += 2;
  4325. diff -cr ../mntlib34/utime.c ./utime.c
  4326. *** ../mntlib34/utime.c    Tue Jun  1 06:40:12 1993
  4327. --- ./utime.c    Wed Sep  8 14:57:32 1993
  4328. ***************
  4329. *** 19,24 ****
  4330. --- 19,25 ----
  4331.   #include <mintbind.h>
  4332.   #include <ioctl.h>
  4333.   #include <assert.h>
  4334. + #include <unistd.h>
  4335.   #ifdef __TURBOC__
  4336.   #include <sys\types.h>
  4337.   #else
  4338. ***************
  4339. *** 87,95 ****
  4340.       }
  4341.   
  4342.       res = -EINVAL;
  4343. !     if (__mint > 90)
  4344. !         res = Fcntl(fh, (long)&settime, FUTIME);
  4345. ! 
  4346.       if (res == -EINVAL)
  4347.           (void)Fdatime((_DOSTIME *) &dtime, fh, 1);
  4348.   
  4349. --- 88,99 ----
  4350.       }
  4351.   
  4352.       res = -EINVAL;
  4353. !     if (__mint > 90) {
  4354. !         if (tset)
  4355. !             res = Fcntl(fh, (long)&settime, FUTIME);
  4356. !         else
  4357. !             res = Fcntl(fh, (long)0, FUTIME);
  4358. !     }
  4359.       if (res == -EINVAL)
  4360.           (void)Fdatime((_DOSTIME *) &dtime, fh, 1);
  4361.   
  4362. diff -cr ../mntlib34/utmp.c ./utmp.c
  4363. *** ../mntlib34/utmp.c    Sat Jun 19 12:48:48 1993
  4364. --- ./utmp.c    Thu Jul 15 08:19:20 1993
  4365. ***************
  4366. *** 10,16 ****
  4367.   
  4368.   #define UTMP_FILE    "/etc/utmp"
  4369.   
  4370. ! void write_utmp(line, name, host, time)
  4371.   const char *line, *name, *host;
  4372.   unsigned long time;
  4373.   {
  4374. --- 10,16 ----
  4375.   
  4376.   #define UTMP_FILE    "/etc/utmp"
  4377.   
  4378. ! void _write_utmp(line, name, host, time)
  4379.   const char *line, *name, *host;
  4380.   unsigned long time;
  4381.   {
  4382. ***************
  4383. *** 23,29 ****
  4384.   
  4385.       if ((fd = open(UTMP_FILE, O_RDWR)) == -1)
  4386.       {
  4387. !         perror("write_utmp");
  4388.           return;
  4389.       }
  4390.   
  4391. --- 23,29 ----
  4392.   
  4393.       if ((fd = open(UTMP_FILE, O_RDWR)) == -1)
  4394.       {
  4395. !         perror("_write_utmp");
  4396.           return;
  4397.       }
  4398.   
  4399. ***************
  4400. *** 40,46 ****
  4401.   
  4402.       if (lseek(fd, (long)(counter * sizeof(struct utmp)), 0) == -1)
  4403.       {
  4404. !         perror("write_utmp: lseek");
  4405.           close(fd);
  4406.           return;
  4407.       }
  4408. --- 40,46 ----
  4409.   
  4410.       if (lseek(fd, (long)(counter * sizeof(struct utmp)), 0) == -1)
  4411.       {
  4412. !         perror("_write_utmp: lseek");
  4413.           close(fd);
  4414.           return;
  4415.       }
  4416. ***************
  4417. *** 59,70 ****
  4418.       entry.ut_time = time;
  4419.   
  4420.       if ((returned_val = write(fd, &entry, (unsigned) sizeof(struct utmp))) == -1)
  4421. !         perror("write_utmp: write");
  4422.       else
  4423.           if (returned_val != sizeof(struct utmp))
  4424. !             fprintf(stderr, "write_utmp: write: wrote too few bytes!\n");
  4425.   #ifdef DEBUG
  4426. !     printf("write_utmp: wrote %d bytes\n", returned_val);
  4427.   #endif
  4428.       close(fd);
  4429.   }
  4430. --- 59,70 ----
  4431.       entry.ut_time = time;
  4432.   
  4433.       if ((returned_val = write(fd, &entry, (unsigned) sizeof(struct utmp))) == -1)
  4434. !         perror("_write_utmp: write");
  4435.       else
  4436.           if (returned_val != sizeof(struct utmp))
  4437. !             fprintf(stderr, "_write_utmp: write: wrote too few bytes!\n");
  4438.   #ifdef DEBUG
  4439. !     printf("_write_utmp: wrote %d bytes\n", returned_val);
  4440.   #endif
  4441.       close(fd);
  4442.   }
  4443. diff -cr ../mntlib34/wait.c ./wait.c
  4444. *** ../mntlib34/wait.c    Sun May 16 06:40:46 1993
  4445. --- ./wait.c    Mon Sep 13 06:59:22 1993
  4446. ***************
  4447. *** 12,23 ****
  4448.   /* under TOS, vfork() puts its result in __waitval */
  4449.   extern long __waitval;    /* in thread.c */
  4450.   
  4451. ! pid_t wait(status)
  4452. !     int *status;
  4453.   {
  4454.       long r;
  4455.       int exit_status, sig_term, pid;
  4456.       extern int __mint;
  4457.   
  4458.       if (__mint == 0) {    /* wait is faked by vfork() */
  4459.           r = __waitval;
  4460. --- 12,28 ----
  4461.   /* under TOS, vfork() puts its result in __waitval */
  4462.   extern long __waitval;    /* in thread.c */
  4463.   
  4464. ! pid_t wait(_status)
  4465. !     __WP _status;
  4466.   {
  4467.       long r;
  4468.       int exit_status, sig_term, pid;
  4469.       extern int __mint;
  4470. + #ifdef __GNUC__    
  4471. +     int *status = _status.__wi;
  4472. + #else    
  4473. +     int *status = _status;
  4474. + #endif
  4475.   
  4476.       if (__mint == 0) {    /* wait is faked by vfork() */
  4477.           r = __waitval;
  4478. ***************
  4479. *** 40,42 ****
  4480. --- 45,59 ----
  4481.       }
  4482.       return pid;
  4483.   }
  4484. + 
  4485. + #ifdef TEST
  4486. + /* small test for parameter of wait */
  4487. + void a()
  4488. + {
  4489. +     union wait u;
  4490. +     int i;
  4491. +     
  4492. +     wait(&u);
  4493. +     wait(&i);
  4494. + }
  4495. + #endif
  4496. diff -cr ../mntlib34/waitpid.c ./waitpid.c
  4497. *** ../mntlib34/waitpid.c    Sun May 16 06:47:18 1993
  4498. --- ./waitpid.c    Mon Sep 13 06:58:12 1993
  4499. ***************
  4500. *** 14,28 ****
  4501.   extern long __waitval;        /* in thread.c */
  4502.   
  4503.   pid_t
  4504. ! waitpid(pid, status, options)
  4505.       pid_t pid;
  4506. !     int *status;
  4507.       int options;
  4508.   {
  4509.       long r;
  4510.       int exit_status, sig_term;
  4511.       union wait *statwait;
  4512. ! 
  4513.       statwait = (union wait *) status;
  4514.       if (__mint == 0) {
  4515.           r = __waitval;
  4516. --- 14,29 ----
  4517.   extern long __waitval;        /* in thread.c */
  4518.   
  4519.   pid_t
  4520. ! waitpid(pid, _status, options)
  4521.       pid_t pid;
  4522. !     __WP _status;
  4523.       int options;
  4524.   {
  4525.       long r;
  4526.       int exit_status, sig_term;
  4527.       union wait *statwait;
  4528. !     int *status = _status.__wi;
  4529. !     
  4530.       statwait = (union wait *) status;
  4531.       if (__mint == 0) {
  4532.           r = __waitval;
  4533. diff -cr ../mntlib34/wtmp.c ./wtmp.c
  4534. *** ../mntlib34/wtmp.c    Sat Jun 19 12:49:00 1993
  4535. --- ./wtmp.c    Thu Jul 15 08:18:58 1993
  4536. ***************
  4537. *** 10,16 ****
  4538.   
  4539.   #define WTMP_FILE    "/var/adm/wtmp"
  4540.   
  4541. ! void write_wtmp(line, name, host, time)
  4542.   const char *line, *name, *host;
  4543.   unsigned long time;
  4544.   {
  4545. --- 10,16 ----
  4546.   
  4547.   #define WTMP_FILE    "/var/adm/wtmp"
  4548.   
  4549. ! void _write_wtmp(line, name, host, time)
  4550.   const char *line, *name, *host;
  4551.   unsigned long time;
  4552.   {
  4553. ***************
  4554. *** 20,26 ****
  4555.       if ((fd = open(WTMP_FILE, O_WRONLY | O_APPEND)) < 0)
  4556.       {
  4557.   #ifdef DEBUG
  4558. !         perror("write_wtmp");
  4559.   #endif
  4560.           return;
  4561.       }
  4562. --- 20,26 ----
  4563.       if ((fd = open(WTMP_FILE, O_WRONLY | O_APPEND)) < 0)
  4564.       {
  4565.   #ifdef DEBUG
  4566. !         perror("_write_wtmp");
  4567.   #endif
  4568.           return;
  4569.       }
  4570.