github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-03-03 10:05:22 +00:00
Code Issues Projects Releases Wiki Activity

Remove fp.h (#21)

Browse Source 
This was replaced by medleyfp.h. Perhaps this happened because
some systems have an fp.h in their system includes and the naming
collision was an issue. But nothing uses fp.h and medleyfp.h is
an updated version of the contents.

This also updates a bunch of manually managed dependency lists
to reflect the usage of medleyfp.h rather than fp.h.

Nick Briggs: Note that on OSF1 medleyfp.h includes the system fp.h (probably the origin of the renaming)
This commit is contained in:
Bruce Mitchener
2020-12-11 00:52:08 +07:00
committed by GitHub
parent d6d2a3371a
commit dbd5bd6679
10 changed files with 40 additions and 154 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
bin/dosmkfil
View File

@@ -20,7 +20,7 @@ SRCFILES = conspage.c gcoflow.c shift.c dbgtool.c gcr.c gcrcell.c llstk.
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj hacks.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj keylib.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(KEY) $(COLORFILES) $(ARCHFILES) $(LPFILES)
HFILES = address.h adr68k.h arith.h cell.h dbprint.h display.h dspif.h ifpage.h iopage.h lispemul.h lispmap.h lsptypes.h miscstat.h lspglob.h array.h bb.h bitblt.h debug.h devconf.h dspdata.h ether.h fast_dsp.h fp.h gcdata.h hdw_conf.h initatms.h inlinec.h keyboard.h lispver1.h lispver2.h lldsp.h locfile.h mouseif.h my.h opcodes.h osmsg.h pilotbbt.h print.h profile.h return.h stack.h stream.h subrs.h sysatms.h timeout.h tos1defs.h tosfns.h tosret.h vmemsave.h xdefs.h xbitmaps.h xkeymap.h
HFILES = address.h adr68k.h arith.h cell.h dbprint.h display.h dspif.h ifpage.h iopage.h lispemul.h lispmap.h lsptypes.h miscstat.h lspglob.h array.h bb.h bitblt.h debug.h devconf.h dspdata.h ether.h fast_dsp.h gcdata.h hdw_conf.h initatms.h inlinec.h keyboard.h lispver1.h lispver2.h lldsp.h locfile.h medleyfp.h mouseif.h my.h opcodes.h osmsg.h pilotbbt.h print.h profile.h return.h stack.h stream.h subrs.h sysatms.h timeout.h tos1defs.h tosfns.h tosret.h vmemsave.h xdefs.h xbitmaps.h xkeymap.h

2
bin/makefile-dos
View File

@@ -20,7 +20,7 @@ SRCFILES = conspage.c gcoflow.c shift.c dbgtool.c gcr.c gcrcell.c llstk.
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj hacks.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj keylib.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(KEY) $(COLORFILES) $(ARCHFILES) $(LPFILES)
HFILES = address.h adr68k.h arith.h cell.h dbprint.h display.h dspif.h ifpage.h iopage.h lispemul.h lispmap.h lsptypes.h miscstat.h lspglob.h array.h bb.h bitblt.h debug.h devconf.h dspdata.h ether.h fast_dsp.h fp.h gcdata.h hdw_conf.h initatms.h inlinec.h keyboard.h lispver1.h lispver2.h lldsp.h locfile.h mouseif.h my.h opcodes.h osmsg.h pilotbbt.h print.h profile.h return.h stack.h stream.h subrs.h sysatms.h timeout.h tos1defs.h tosfns.h tosret.h vmemsave.h xdefs.h xbitmaps.h xkeymap.h
HFILES = address.h adr68k.h arith.h cell.h dbprint.h display.h dspif.h ifpage.h iopage.h lispemul.h lispmap.h lsptypes.h miscstat.h lspglob.h array.h bb.h bitblt.h debug.h devconf.h dspdata.h ether.h fast_dsp.h gcdata.h hdw_conf.h initatms.h inlinec.h keyboard.h lispver1.h lispver2.h lldsp.h locfile.h medleyfp.h mouseif.h my.h opcodes.h osmsg.h pilotbbt.h print.h profile.h return.h stack.h stream.h subrs.h sysatms.h timeout.h tos1defs.h tosfns.h tosret.h vmemsave.h xdefs.h xbitmaps.h xkeymap.h

30
bin/makefile-tail
View File

@@ -265,37 +265,37 @@ $(OBJECTDIR)allocmds.o : $(SRCDIR)allocmds.c $(REQUIRED-INCS) $(INCDIR)lispemu
$(OBJECTDIR)arith2.o : $(SRCDIR)arith2.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
$(INCDIR)lspglob.h $(INCDIR)emlglob.h \
$(INCDIR)adr68k.h $(INCDIR)lispmap.h $(INCDIR)lsptypes.h \
$(INCDIR)arith.h $(INCDIR)fp.h $(INLINE)
$(INCDIR)arith.h $(INCDIR)medleyfp.h $(INLINE)
$(CC) $(DISPRFLAGS) $(SRCDIR)arith2.c $(INLINE) -o $(OBJECTDIR)arith2$(OEXT)
$(OBJECTDIR)arith3.o : $(SRCDIR)arith3.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
$(INCDIR)lispmap.h $(INCDIR)emlglob.h $(INLINE) \
$(INCDIR)lspglob.h $(INCDIR)lsptypes.h $(INCDIR)address.h \
$(INCDIR)adr68k.h $(INCDIR)cell.h $(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)adr68k.h $(INCDIR)cell.h $(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)arith3.c $(INLINE) -o $(OBJECTDIR)arith3$(OEXT)
$(OBJECTDIR)arith4.o : $(SRCDIR)arith4.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
$(INCDIR)lispmap.h $(INCDIR)emlglob.h $(INLINE) \
$(INCDIR)lspglob.h $(INCDIR)lsptypes.h $(INCDIR)address.h \
$(INCDIR)adr68k.h $(INCDIR)cell.h $(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)adr68k.h $(INCDIR)cell.h $(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(DISPRFLAGS) $(SRCDIR)arith4.c $(INLINE) -o $(OBJECTDIR)arith4$(OEXT)
$(OBJECTDIR)array.o : $(SRCDIR)array.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
$(INCDIR)lspglob.h $(INCDIR)adr68k.h \
$(INCDIR)lispmap.h $(INCDIR)lsptypes.h $(INCDIR)emlglob.h \
$(INCDIR)arith.h $(INCDIR)fp.h $(INCDIR)my.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)array.c $(INLINE) -o $(OBJECTDIR)array$(OEXT)
$(OBJECTDIR)array3.o : $(SRCDIR)array3.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
$(INCDIR)lspglob.h $(INCDIR)adr68k.h \
$(INCDIR)lispmap.h $(INCDIR)lsptypes.h $(INCDIR)emlglob.h \
$(INCDIR)arith.h $(INCDIR)fp.h $(INCDIR)my.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)array3.c $(INLINE) -o $(OBJECTDIR)array3$(OEXT)
$(OBJECTDIR)array5.o : $(SRCDIR)array5.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
$(INCDIR)lspglob.h $(INCDIR)adr68k.h \
$(INCDIR)lispmap.h $(INCDIR)lsptypes.h $(INCDIR)emlglob.h \
$(INCDIR)arith.h $(INCDIR)fp.h $(INCDIR)my.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)array5.c $(INLINE) -o $(OBJECTDIR)array5$(OEXT)
$(OBJECTDIR)bin.o : $(SRCDIR)bin.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
@@ -335,7 +335,7 @@ $(OBJECTDIR)bbtsub.o : $(SRCDIR)bbtsub.c $(INCDIR)bbtsub.h $(REQUIRED-INCS) $(I
$(INCDIR)emlglob.h $(INCDIR)adr68k.h $(INCDIR)address.h \
$(INCDIR)pilotbbt.h $(INCDIR)display.h $(INCDIR)dspdata.h \
$(INCDIR)bitblt.h $(INCDIR)bb.h $(INCDIR)dbprint.h \
$(INCDIR)stack.h $(INCDIR)cell.h $(INCDIR)gcdata.h $(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)stack.h $(INCDIR)cell.h $(INCDIR)gcdata.h $(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)bbtsub.c $(INLINE) -o $(OBJECTDIR)bbtsub$(OEXT)
$(OBJECTDIR)blt.o : $(SRCDIR)blt.c $(REQUIRED-INCS) $(INCDIR)lispemul.h $(INCDIR)address.h \
@@ -410,7 +410,7 @@ $(OBJECTDIR)z2.o : $(SRCDIR)z2.c $(REQUIRED-INCS) \
$(INCDIR)gcdata.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)z2.c $(INLINE) -o $(OBJECTDIR)z2$(OEXT)
$(OBJECTDIR)eqf.o : $(SRCDIR)eqf.c $(REQUIRED-INCS) $(INCDIR)fp.h \
$(OBJECTDIR)eqf.o : $(SRCDIR)eqf.c $(REQUIRED-INCS) $(INCDIR)medleyfp.h \
$(INCDIR)lispemul.h $(INCDIR)lspglob.h $(INCDIR)adr68k.h \
$(INCDIR)lispmap.h $(INCDIR)lsptypes.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)eqf.c $(INLINE) -o $(OBJECTDIR)eqf$(OEXT)
@@ -418,7 +418,7 @@ $(OBJECTDIR)eqf.o : $(SRCDIR)eqf.c $(REQUIRED-INCS) $(INCDIR)fp.h \
$(OBJECTDIR)fp.o : $(SRCDIR)fp.c $(REQUIRED-INCS) \
$(INCDIR)lispemul.h $(INCDIR)lspglob.h $(INCDIR)adr68k.h \
$(INCDIR)lispmap.h $(INCDIR)lsptypes.h $(INCDIR)emlglob.h \
$(INCDIR)my.h $(INCDIR)fp.h
$(INCDIR)my.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)fp.c $(INLINE) -o $(OBJECTDIR)fp$(OEXT)
$(OBJECTDIR)intcall.o : $(SRCDIR)intcall.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
@@ -428,18 +428,18 @@ $(OBJECTDIR)intcall.o : $(SRCDIR)intcall.c $(REQUIRED-INCS) $(INCDIR)lispemul.
$(INCDIR)cell.h
$(CC) $(RFLAGS) $(SRCDIR)intcall.c $(INLINE) -o $(OBJECTDIR)intcall$(OEXT)
$(OBJECTDIR)ubf1.o : $(SRCDIR)ubf1.c $(REQUIRED-INCS) $(INCDIR)fp.h \
$(OBJECTDIR)ubf1.o : $(SRCDIR)ubf1.c $(REQUIRED-INCS) $(INCDIR)medleyfp.h \
$(INCDIR)lispemul.h $(INCDIR)adr68k.h $(INCDIR)lspglob.h \
$(INCDIR)lsptypes.h $(INCDIR)lispmap.h $(INCDIR)arith.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)ubf1.c $(INLINE) -o $(OBJECTDIR)ubf1$(OEXT)
$(OBJECTDIR)ubf2.o : $(SRCDIR)ubf2.c $(REQUIRED-INCS) \
$(INCDIR)lispemul.h $(INCDIR)fp.h
$(INCDIR)lispemul.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)ubf2.c $(INLINE) -o $(OBJECTDIR)ubf2$(OEXT)
$(OBJECTDIR)ubf3.o : $(SRCDIR)ubf3.c $(REQUIRED-INCS) \
$(INCDIR)lispemul.h $(INCDIR)lspglob.h $(INCDIR)adr68k.h \
$(INCDIR)lispmap.h $(INCDIR)fp.h
$(INCDIR)lispmap.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)ubf3.c $(INLINE) -o $(OBJECTDIR)ubf3$(OEXT)
$(OBJECTDIR)uutils.o : $(SRCDIR)uutils.c $(REQUIRED-INCS) \
@@ -448,7 +448,7 @@ $(OBJECTDIR)uutils.o : $(SRCDIR)uutils.c $(REQUIRED-INCS) \
$(OBJECTDIR)dspsubrs.o : $(SRCDIR)dspsubrs.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
$(INCDIR)lispmap.h $(INCDIR)display.h $(INCDIR)lsptypes.h \
$(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)dspsubrs.c $(INLINE) -o $(OBJECTDIR)dspsubrs$(OEXT)
$(OBJECTDIR)dspif.o : $(SRCDIR)dspif.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
@@ -475,7 +475,7 @@ $(OBJECTDIR)findkey.o : $(SRCDIR)findkey.c $(REQUIRED-INCS) $(INCDIR)lispemul.
$(OBJECTDIR)dsk.o : $(SRCDIR)dsk.c $(REQUIRED-INCS) $(INCDIR)lispemul.h $(INCDIR)lispmap.h \
$(INCDIR)adr68k.h $(INCDIR)lsptypes.h $(INCDIR)lspglob.h \
$(INCDIR)fp.h $(INCDIR)arith.h $(INCDIR)stream.h $(INCDIR)timeout.h \
$(INCDIR)medleyfp.h $(INCDIR)arith.h $(INCDIR)stream.h $(INCDIR)timeout.h \
$(INCDIR)locfile.h $(INCDIR)osmsg.h $(INCDIR)dbprint.h
$(CC) $(RFLAGS) $(SRCDIR)dsk.c $(INLINE) -o $(OBJECTDIR)dsk$(OEXT)
@@ -697,7 +697,7 @@ $(OBJECTDIR)rs232c.o : $(SRCDIR)rs232c.c $(REQUIRED-INCS) $(INCDIR)rs232c.h
$(OBJECTDIR)shift.o : $(SRCDIR)shift.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
$(INCDIR)lspglob.h $(INCDIR)emlglob.h \
$(INCDIR)adr68k.h $(INCDIR)lispmap.h $(INCDIR)lsptypes.h \
$(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)shift.c $(INLINE) -o $(OBJECTDIR)shift$(OEXT)
$(OBJECTDIR)storage.o : $(SRCDIR)storage.c $(REQUIRED-INCS) $(INCDIR)hdw_conf.h \

2
bin/makefile.dos
View File

@@ -20,7 +20,7 @@ SRCFILES = conspage.c gcoflow.c shift.c dbgtool.c gcr.c gcrcell.c llstk.
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj hacks.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj keylib.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(KEY) $(COLORFILES) $(ARCHFILES) $(LPFILES)
HFILES = address.h adr68k.h arith.h cell.h dbprint.h display.h dspif.h ifpage.h iopage.h lispemul.h lispmap.h lsptypes.h miscstat.h lspglob.h array.h bb.h bitblt.h debug.h devconf.h dspdata.h ether.h fast_dsp.h fp.h gcdata.h hdw_conf.h initatms.h inlinec.h keyboard.h lispver1.h lispver2.h lldsp.h locfile.h mouseif.h my.h opcodes.h osmsg.h pilotbbt.h print.h profile.h return.h stack.h stream.h subrs.h sysatms.h timeout.h tos1defs.h tosfns.h tosret.h vmemsave.h xdefs.h xbitmaps.h xkeymap.h
HFILES = address.h adr68k.h arith.h cell.h dbprint.h display.h dspif.h ifpage.h iopage.h lispemul.h lispmap.h lsptypes.h miscstat.h lspglob.h array.h bb.h bitblt.h debug.h devconf.h dspdata.h ether.h fast_dsp.h gcdata.h hdw_conf.h initatms.h inlinec.h keyboard.h lispver1.h lispver2.h lldsp.h locfile.h medleyfp.h mouseif.h my.h opcodes.h osmsg.h pilotbbt.h print.h profile.h return.h stack.h stream.h subrs.h sysatms.h timeout.h tos1defs.h tosfns.h tosret.h vmemsave.h xdefs.h xbitmaps.h xkeymap.h

30
bin/makeisc
View File

@@ -342,37 +342,37 @@ $(OBJECTDIR)allocmds.o : $(SRCDIR)allocmds.c $(INCDIR)lispemul.h \
$(OBJECTDIR)arith2.o : $(SRCDIR)arith2.c $(INCDIR)lispemul.h \
$(INCDIR)lispglobal.h $(INCDIR)emulglobal.h \
$(INCDIR)address68k.h $(INCDIR)lispmap.h $(INCDIR)lisptypes.h \
$(INCDIR)arith.h $(INCDIR)fp.h $(INLINE)
$(INCDIR)arith.h $(INCDIR)medleyfp.h $(INLINE)
$(CC) $(DISPRFLAGS) $(SRCDIR)arith2.c $(INLINE) -o $(OBJECTDIR)arith2$(OEXT)
$(OBJECTDIR)arith3.o : $(SRCDIR)arith3.c $(INCDIR)lispemul.h \
$(INCDIR)lispmap.h $(INCDIR)emulglobal.h $(INLINE) \
$(INCDIR)lispglobal.h $(INCDIR)lisptypes.h $(INCDIR)address.h \
$(INCDIR)address68k.h $(INCDIR)cell.h $(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)address68k.h $(INCDIR)cell.h $(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)arith3.c $(INLINE) -o $(OBJECTDIR)arith3$(OEXT)
$(OBJECTDIR)arith4.o : $(SRCDIR)arith4.c $(INCDIR)lispemul.h \
$(INCDIR)lispmap.h $(INCDIR)emulglobal.h $(INLINE) \
$(INCDIR)lispglobal.h $(INCDIR)lisptypes.h $(INCDIR)address.h \
$(INCDIR)address68k.h $(INCDIR)cell.h $(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)address68k.h $(INCDIR)cell.h $(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(DISPRFLAGS) $(SRCDIR)arith4.c $(INLINE) -o $(OBJECTDIR)arith4$(OEXT)
$(OBJECTDIR)array.o : $(SRCDIR)array.c $(INCDIR)lispemul.h \
$(INCDIR)lispglobal.h $(INCDIR)address68k.h \
$(INCDIR)lispmap.h $(INCDIR)lisptypes.h $(INCDIR)emulglobal.h \
$(INCDIR)arith.h $(INCDIR)fp.h $(INCDIR)my.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)array.c $(INLINE) -o $(OBJECTDIR)array$(OEXT)
$(OBJECTDIR)array3.o : $(SRCDIR)array3.c $(INCDIR)lispemul.h \
$(INCDIR)lispglobal.h $(INCDIR)address68k.h \
$(INCDIR)lispmap.h $(INCDIR)lisptypes.h $(INCDIR)emulglobal.h \
$(INCDIR)arith.h $(INCDIR)fp.h $(INCDIR)my.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)array3.c $(INLINE) -o $(OBJECTDIR)array3$(OEXT)
$(OBJECTDIR)array5.o : $(SRCDIR)array5.c $(INCDIR)lispemul.h \
$(INCDIR)lispglobal.h $(INCDIR)address68k.h \
$(INCDIR)lispmap.h $(INCDIR)lisptypes.h $(INCDIR)emulglobal.h \
$(INCDIR)arith.h $(INCDIR)fp.h $(INCDIR)my.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)array5.c $(INLINE) -o $(OBJECTDIR)array5$(OEXT)
$(OBJECTDIR)atom.o : $(SRCDIR)atom.c $(INCDIR)lispemul.h \
@@ -416,7 +416,7 @@ $(OBJECTDIR)bitbltsub.o : $(SRCDIR)bitbltsub.c $(INCDIR)lispemul.h \
$(INCDIR)emulglobal.h $(INCDIR)address68k.h $(INCDIR)address.h \
$(INCDIR)pilotbbt.h $(INCDIR)display.h $(INCDIR)displaydata.h \
$(INCDIR)bitblt.h $(INCDIR)bb.h $(INCDIR)dbprint.h \
$(INCDIR)stack.h $(INCDIR)cell.h $(INCDIR)gcdata.h $(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)stack.h $(INCDIR)cell.h $(INCDIR)gcdata.h $(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)bitbltsub.c $(INLINE) -o $(OBJECTDIR)bitbltsub$(OEXT)
$(OBJECTDIR)blt.o : $(SRCDIR)blt.c $(INCDIR)lispemul.h $(INCDIR)address.h \
@@ -488,7 +488,7 @@ $(OBJECTDIR)z2.o : $(SRCDIR)z2.c \
$(INCDIR)gcdata.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)z2.c $(INLINE) -o $(OBJECTDIR)z2$(OEXT)
$(OBJECTDIR)eqf.o : $(SRCDIR)eqf.c $(INCDIR)fp.h \
$(OBJECTDIR)eqf.o : $(SRCDIR)eqf.c $(INCDIR)medleyfp.h \
$(INCDIR)lispemul.h $(INCDIR)lispglobal.h $(INCDIR)address68k.h \
$(INCDIR)lispmap.h $(INCDIR)lisptypes.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)eqf.c $(INLINE) -o $(OBJECTDIR)eqf$(OEXT)
@@ -496,7 +496,7 @@ $(OBJECTDIR)eqf.o : $(SRCDIR)eqf.c $(INCDIR)fp.h \
$(OBJECTDIR)fp.o : $(SRCDIR)fp.c \
$(INCDIR)lispemul.h $(INCDIR)lispglobal.h $(INCDIR)address68k.h \
$(INCDIR)lispmap.h $(INCDIR)lisptypes.h $(INCDIR)emulglobal.h \
$(INCDIR)my.h $(INCDIR)fp.h
$(INCDIR)my.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)fp.c $(INLINE) -o $(OBJECTDIR)fp$(OEXT)
$(OBJECTDIR)intcall.o : $(SRCDIR)intcall.c $(INCDIR)lispemul.h \
@@ -506,18 +506,18 @@ $(OBJECTDIR)intcall.o : $(SRCDIR)intcall.c $(INCDIR)lispemul.h \
$(INCDIR)cell.h
$(CC) $(RFLAGS) $(SRCDIR)intcall.c $(INLINE) -o $(OBJECTDIR)intcall$(OEXT)
$(OBJECTDIR)ubf1.o : $(SRCDIR)ubf1.c $(INCDIR)fp.h \
$(OBJECTDIR)ubf1.o : $(SRCDIR)ubf1.c $(INCDIR)medleyfp.h \
$(INCDIR)lispemul.h $(INCDIR)address68k.h $(INCDIR)lispglobal.h \
$(INCDIR)lisptypes.h $(INCDIR)lispmap.h $(INCDIR)arith.h $(INCDIR)my.h
$(CC) $(RFLAGS) $(SRCDIR)ubf1.c $(INLINE) -o $(OBJECTDIR)ubf1$(OEXT)
$(OBJECTDIR)ubf2.o : $(SRCDIR)ubf2.c \
$(INCDIR)lispemul.h $(INCDIR)fp.h
$(INCDIR)lispemul.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)ubf2.c $(INLINE) -o $(OBJECTDIR)ubf2$(OEXT)
$(OBJECTDIR)ubf3.o : $(SRCDIR)ubf3.c \
$(INCDIR)lispemul.h $(INCDIR)lispglobal.h $(INCDIR)address68k.h \
$(INCDIR)lispmap.h $(INCDIR)fp.h
$(INCDIR)lispmap.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)ubf3.c $(INLINE) -o $(OBJECTDIR)ubf3$(OEXT)
$(OBJECTDIR)unix-utils.o : $(SRCDIR)unix-utils.c \
@@ -526,7 +526,7 @@ $(OBJECTDIR)unix-utils.o : $(SRCDIR)unix-utils.c \
$(OBJECTDIR)dspsubrs.o : $(SRCDIR)dspsubrs.c $(INCDIR)lispemul.h \
$(INCDIR)lispmap.h $(INCDIR)display.h $(INCDIR)lisptypes.h \
$(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)dspsubrs.c $(INLINE) -o $(OBJECTDIR)dspsubrs$(OEXT)
$(OBJECTDIR)ether.o : $(SRCDIR)ether.c $(INCDIR)lispemul.h \
@@ -541,7 +541,7 @@ $(OBJECTDIR)findkey.o : $(SRCDIR)findkey.c $(INCDIR)lispemul.h \
$(OBJECTDIR)dsk.o : $(SRCDIR)dsk.c $(INCDIR)lispemul.h $(INCDIR)lispmap.h \
$(INCDIR)address68k.h $(INCDIR)lisptypes.h $(INCDIR)lispglobal.h \
$(INCDIR)fp.h $(INCDIR)arith.h $(INCDIR)stream.h $(INCDIR)timeout.h \
$(INCDIR)medleyfp.h $(INCDIR)arith.h $(INCDIR)stream.h $(INCDIR)timeout.h \
$(INCDIR)localfile.h $(INCDIR)osmessage.h $(INCDIR)dbprint.h
$(CC) $(RFLAGS) $(SRCDIR)dsk.c $(INLINE) -o $(OBJECTDIR)dsk$(OEXT)
@@ -762,7 +762,7 @@ $(OBJECTDIR)rs232c.o : $(SRCDIR)rs232c.c $(INCDIR)rs232c.h
$(OBJECTDIR)shift.o : $(SRCDIR)shift.c $(INCDIR)lispemul.h \
$(INCDIR)lispglobal.h $(INCDIR)emulglobal.h \
$(INCDIR)address68k.h $(INCDIR)lispmap.h $(INCDIR)lisptypes.h \
$(INCDIR)arith.h $(INCDIR)fp.h
$(INCDIR)arith.h $(INCDIR)medleyfp.h
$(CC) $(RFLAGS) $(SRCDIR)shift.c $(INLINE) -o $(OBJECTDIR)shift$(OEXT)
$(OBJECTDIR)storage.o : $(SRCDIR)storage.c $(INCDIR)hdw_config.h \

4
bin/mkdos
View File

@@ -111,8 +111,8 @@ HFILES = $(INCDIR)address.h $(INCDIR)adr68k.h $(INCDIR)arith.h $(INCDIR)cell.h $
$(INCDIR)dspif.h $(INCDIR)ifpage.h $(INCDIR)iopage.h $(INCDIR)lispemul.h $(INCDIR)lispmap.h \
$(INCDIR)lsptypes.h $(INCDIR)miscstat.h $(INCDIR)lspglob.h $(INCDIR)array.h $(INCDIR)bb.h \
$(INCDIR)bitblt.h $(INCDIR)debug.h $(INCDIR)devconf.h $(INCDIR)dspdata.h $(INCDIR)ether.h \
$(INCDIR)fast_dsp.h $(INCDIR)fp.h $(INCDIR)gcdata.h $(INCDIR)hdw_conf.h $(INCDIR)initatms.h $(INCDIR)inlinec.h $(INCDIR)keyboard.h \
$(INCDIR)lispver1.h $(INCDIR)lispver2.h $(INCDIR)lldsp.h $(INCDIR)locfile.h $(INCDIR)mouseif.h $(INCDIR)my.h \
$(INCDIR)fast_dsp.h $(INCDIR)gcdata.h $(INCDIR)hdw_conf.h $(INCDIR)initatms.h $(INCDIR)inlinec.h $(INCDIR)keyboard.h \
$(INCDIR)lispver1.h $(INCDIR)lispver2.h $(INCDIR)lldsp.h $(INCDIR)locfile.h $(INCIDR)medleyfp.h $(INCDIR)mouseif.h $(INCDIR)my.h \
$(INCDIR)opcodes.h $(INCDIR)osmsg.h $(INCDIR)pilotbbt.h $(INCDIR)print.h $(INCDIR)profile.h \
$(INCDIR)return.h $(INCDIR)stack.h $(INCDIR)stream.h $(INCDIR)subrs.h $(INCDIR)sysatms.h $(INCDIR)timeout.h \
$(INCDIR)tos1defs.h $(INCDIR)tosfns.h $(INCDIR)tosret.h $(INCDIR)vmemsave.h \

4
bin/mkfile
View File

@@ -116,8 +116,8 @@ HFILES = INCDIR/address.h INCDIR/adr68k.h INCDIR/arith.h INCDIR/cell.h INCDIR/db
INCDIR/dspif.h INCDIR/ifpage.h INCDIR/iopage.h INCDIR/lispemul.h INCDIR/lispmap.h \
INCDIR/lsptypes.h INCDIR/miscstat.h INCDIR/lspglob.h INCDIR/array.h INCDIR/bb.h \
INCDIR/bitblt.h INCDIR/debug.h INCDIR/devconf.h INCDIR/dspdata.h INCDIR/ether.h \
INCDIR/fast_dsp.h INCDIR/fp.h INCDIR/gcdata.h INCDIR/hdw_conf.h INCDIR/initatms.h INCDIR/inlinec.h INCDIR/keyboard.h \
INCDIR/lispver1.h INCDIR/lispver2.h INCDIR/lldsp.h INCDIR/locfile.h INCDIR/mouseif.h INCDIR/my.h \
INCDIR/fast_dsp.h INCDIR/gcdata.h INCDIR/hdw_conf.h INCDIR/initatms.h INCDIR/inlinec.h INCDIR/keyboard.h \
INCDIR/lispver1.h INCDIR/lispver2.h INCDIR/lldsp.h INCDIR/locfile.h INCDIR/medleyfp.h INCDIR/mouseif.h INCDIR/my.h \
INCDIR/opcodes.h INCDIR/osmsg.h INCDIR/pilotbbt.h INCDIR/print.h INCDIR/profile.h \
INCDIR/return.h INCDIR/stack.h INCDIR/stream.h INCDIR/subrs.h INCDIR/sysatms.h INCDIR/timeout.h \
INCDIR/tos1defs.h INCDIR/tosfns.h INCDIR/tosret.h INCDIR/vmemsave.h \

4
bin/mkfile.c
View File

@@ -116,8 +116,8 @@ HFILES = INCDIR/address.h INCDIR/adr68k.h INCDIR/arith.h INCDIR/cell.h INCDIR/db
INCDIR/dspif.h INCDIR/ifpage.h INCDIR/iopage.h INCDIR/lispemul.h INCDIR/lispmap.h \
INCDIR/lsptypes.h INCDIR/miscstat.h INCDIR/lspglob.h INCDIR/array.h INCDIR/bb.h \
INCDIR/bitblt.h INCDIR/debug.h INCDIR/devconf.h INCDIR/dspdata.h INCDIR/ether.h \
INCDIR/fast_dsp.h INCDIR/fp.h INCDIR/gcdata.h INCDIR/hdw_conf.h INCDIR/initatms.h INCDIR/inlinec.h INCDIR/keyboard.h \
INCDIR/lispver1.h INCDIR/lispver2.h INCDIR/lldsp.h INCDIR/locfile.h INCDIR/mouseif.h INCDIR/my.h \
INCDIR/fast_dsp.h INCDIR/gcdata.h INCDIR/hdw_conf.h INCDIR/initatms.h INCDIR/inlinec.h INCDIR/keyboard.h \
INCDIR/lispver1.h INCDIR/lispver2.h INCDIR/lldsp.h INCDIR/locfile.h INCDIR/medleyfp.h INCDIR/mouseif.h INCDIR/my.h \
INCDIR/opcodes.h INCDIR/osmsg.h INCDIR/pilotbbt.h INCDIR/print.h INCDIR/profile.h \
INCDIR/return.h INCDIR/stack.h INCDIR/stream.h INCDIR/subrs.h INCDIR/sysatms.h INCDIR/timeout.h \
INCDIR/tos1defs.h INCDIR/tosfns.h INCDIR/tosret.h INCDIR/vmemsave.h \

2
bin/mkfile.i
View File

@@ -33,7 +33,7 @@ SRCFILES = ./conspage.c ./gcoflow.c ./shift.c ./dbgtool.c ./gcr.c ./llcolor.c ./
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj llcolor.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj hacks.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj keylib.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(KEY) $(COLORFILES) $(ARCHFILES)
HFILES = ../inc/address.h ../inc/adr68k.h ../inc/arith.h ../inc/cell.h ../inc/dbprint.h ../inc/display.h ../inc/dspif.h ../inc/ifpage.h ../inc/iopage.h ../inc/lispemul.h ../inc/lispmap.h ../inc/lsptypes.h ../inc/miscstat.h ../inc/lspglob.h ../inc/array.h ../inc/bb.h ../inc/bitblt.h ../inc/debug.h ../inc/devconf.h ../inc/dspdata.h ../inc/ether.h ../inc/fast_dsp.h ../inc/fp.h ../inc/gcdata.h ../inc/hdw_conf.h ../inc/initatms.h ../inc/inlinec.h ../inc/keyboard.h ../inc/lispver1.h ../inc/lispver2.h ../inc/lldsp.h ../inc/locfile.h ../inc/mouseif.h ../inc/my.h ../inc/opcodes.h ../inc/osmsg.h ../inc/pilotbbt.h ../inc/print.h ../inc/profile.h ../inc/return.h ../inc/stack.h ../inc/stream.h ../inc/subrs.h ../inc/sysatms.h ../inc/timeout.h ../inc/tos1defs.h ../inc/tosfns.h ../inc/tosret.h ../inc/vmemsave.h ../inc/xdefs.h ../inc/xbitmaps.h ../inc/xkeymap.h
HFILES = ../inc/address.h ../inc/adr68k.h ../inc/arith.h ../inc/cell.h ../inc/dbprint.h ../inc/display.h ../inc/dspif.h ../inc/ifpage.h ../inc/iopage.h ../inc/lispemul.h ../inc/lispmap.h ../inc/lsptypes.h ../inc/miscstat.h ../inc/lspglob.h ../inc/array.h ../inc/bb.h ../inc/bitblt.h ../inc/debug.h ../inc/devconf.h ../inc/dspdata.h ../inc/ether.h ../inc/fast_dsp.h ../inc/gcdata.h ../inc/hdw_conf.h ../inc/initatms.h ../inc/inlinec.h ../inc/keyboard.h ../inc/lispver1.h ../inc/lispver2.h ../inc/lldsp.h ../inc/locfile.h ../inc/medleyfp.h ../inc/mouseif.h ../inc/my.h ../inc/opcodes.h ../inc/osmsg.h ../inc/pilotbbt.h ../inc/print.h ../inc/profile.h ../inc/return.h ../inc/stack.h ../inc/stream.h ../inc/subrs.h ../inc/sysatms.h ../inc/timeout.h ../inc/tos1defs.h ../inc/tosfns.h ../inc/tosret.h ../inc/vmemsave.h ../inc/xdefs.h ../inc/xbitmaps.h ../inc/xkeymap.h

114
inc/fp.h
View File

@@ -1,114 +0,0 @@
/* $Id: fp.h,v 1.2 1999/01/03 02:06:00 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved */
/************************************************************************/
/* */
/* (C) Copyright 1989-94 Venue. All Rights Reserved. */
/* Manufactured in the United States of America. */
/* */
/************************************************************************/
/************************************************************************/
/* */
/* */
/* */
/* */
/* */
/************************************************************************/
#ifdef DOS
#include <i32.h>
#endif /* DOS */
#ifdef ULTRIX
#include <ieeefp.h>
#endif /* ULTRIX */
#ifdef RISCOS
/*#include <ieeefp.h> */
/*#define isnan isnand */
#define isnan(x) 0
#endif /* RISCOS */
/* --------------------------------------------------
FPCLEAR - clear status as necessary
FPTEST(result) - check result or status
Sun 4 compiler w. -O2 moves too much code around
to use FLTINT.
-------------------------------------------------- */
#ifdef FLTINT
extern int FP_error;
/* Note that a compiler may very likely move code around the arithmetic
operation, causing this test (set by an interrupt handler) to be
incorrect. For example, the Sun SPARC compiler with -O2 makes
this test incorrect.
*/
#define FPCLEAR FP_error = 0;
#define FPTEST(result) FP_error
#else
/* fpstatus_ is a FORTRAN library routine (in libc) which
can be called to determine floating point status results.
Documented in the Sun manual, "Floating Point Programmer's Guide",
(Rev. A 19-Sep-86), pg. 34, it does *not* exist in libc for the
SPARC.
For sparc, should also check for isnan? Don't know what isnormal
& issubnormal do (these are sunos4.0 only)
*/
#ifdef OS5
#define FPCLEAR
#define FPTEST(result) (!finite(result))
#elif (defined(sparc) || defined(I386) || defined(HPUX))
#define FPCLEAR
#define FPTEST(result) (isinf(result) || isnan(result))
#elif APOLLO
/**********************************************************/
/* Need values.h & nan.h, so we all parts of IsNANorINF */
/* are defined. IsNANorINF uses structure aliasing to */
/* get at pieces of the float to test it, so the item */
/* being tested can't be a register variable. Sigh. */
/**********************************************************/
#include </sys5/usr/include/values.h>
#include </sys5/usr/include/nan.h>
#define FPCLEAR
#define FPTEST(result) (IsNANorINF(result))
#undef REGISTER
#define REGISTER
#elif INDIGO
#include <nan.h>
#define FPCLEAR
#define FPTEST(result) (IsNANorINF(result))
#else
#ifdef AIX
#define FPCLEAR
#define FPTEST(result) ((!finite(result)) || isnan(result))
#elif DOS
#define FPCLEAR
#define FPTEST(result) (_getrealerror() & ( I87_ZERO_DIVIDE | I87_OVERFLOW | I87_UNDERFLOW))
#else
static int constant0 = 0;
unsigned int fpstatus_();
#define FPCLEAR fpstatus_(&constant0);
#define FPTEST(result) (fpstatus_(&constant0) & 0xF0)
#endif /* AIX */
#endif /* sparc | I386 */
#endif /* FLTINT */