(FILECREATED "27-Sep-86 16:34:05" ("compiled on " {ERIS}SOURCES>LOADFNS.;8) "24-Sep-86 19:51:31" brecompiled exprs: LOADCOMP in "Xerox Lisp 24-Sep-86 ..." dated "24-Sep-86 20:08:23") (FILECREATED "27-Sep-86 16:33:08" {ERIS}SOURCES>LOADFNS.;8 48626 changes to: (FNS LOADCOMP LOADCOMP? LOADFNS LOADFNS0 LOADBLOCK GETBLOCKDEC LOADFNS-FINDFILE LOADFNS-MAKELIST SCANDEFINEQ SCANEXP ) (VARS LOADFNSCOMS) previous date: " 8-Sep-86 11:59:34" {ERIS}SOURCES>LOADFNS.;5) LOADFNSCAN D1 (P 0 ADR I 0 DICT) @(5 SCANFILE0) NIL () SCANFILE0 D1 (P 4 FNADRLST P 0 DICT0 F 5 DICT F 6 ADR F 7 VARLST F 10Q BUILDMAPFLG F 11Q FNLST F 12Q FILECREATEDLOC) ÜUAU¨Wžjhc ‡W•U ¿Wµ4W²CUµ=Wµ)Ud²8¿hUc ¿W´ hU ¼h¸i °!gð³ÕhWµj Ž³ÄU™hU ¿hX¿Zg ¨Jg ²3c¿¿Zgð”°Õ»hV ¿JKWgðhð°¼Ygð¢IµU´Uhhlð²¢c¿I °•(330Q \SCANFILEBLOCK/SCANCOMPILEDFN 321Q GETFILEPTR 266Q READ 261Q \SCANFILEBLOCK/SCANEXP 243Q SETFILEPTR 235Q RATOM 230Q \SCANFILEBLOCK/SCANDEFINEQ 217Q RATOM 213Q READC 205Q GETFILEPTR 200Q SYNTAXP 170Q SYNTAXP 161Q SKIPSEPRCODES 152Q SETFILEPTR 135Q SETFILEPTR 114Q \SCANFILEBLOCK/SCANDEFINEQ 105Q LCONC 101Q LAST 67Q SETFILEPTR 27Q SCANFILE1) (272Q STOP 253Q LOADCOMP 223Q DEFINEQ 175Q LEFTBRACKET 165Q LEFTPAREN 121Q FILEMAP) () \SCANFILEBLOCK/SCANCOMPILEDFN D1 (L (0 FNAME) F 1 FNLST F 2 DICT0 F 3 FNADRLST F 4 ADR F 5 DICT F 6 LDFLG F 7 DONELST F 10Q BUILDMAPFLG F 11Q VARLST F 12Q VARS) Ó RµGWŸUh@ch ¿Q¢±«Vgð’±¢Vgð’±™Wgð’±Qið³S@dQ ³L¿Q°AT ³RdTHÙjð¤µñhc£¿hR ¿Rcid@H ¤µòh²8@ ¿@Wc¿S˜Sc¿Qið³)@Q c³ W³U“UT¿g Œ@ ¿S•Si(316Q GETFILEPTR 306Q LCSKIP 301Q RETFROM 255Q DREMOVE 237Q GETFILEPTR 220Q LAPRD 203Q TMPSUBFN 162Q SETFILEPTR 151Q RETRYSCAN 115Q EQP 101Q MEMB 24Q \NCONC2 11Q GETFILEPTR) (276Q SCANFILE0 61Q LOADCOMP 47Q GETDEF 36Q EXPRESSIONS) () \SCANFILEBLOCK/SCANDEFINEQ D1 (L (0 CONTINUEFLG) F 3 DICT0 F 4 FNADRLST F 5 ADR F 6 FNLST F 7 DICT F 10Q NOFIXFNSLST F 11Q BUILDMAPFLG F 12Q DONELST F 13Q LDFLG F 14Q VARLST F 15Q VARS) [0@’±„Sd²dUÙjðYµ hcµ¿S²$hS ¿SciºUJÙjð•JµÙi°ÖI°ÍS²&hW”W‚ ¿W´hS c¿hc°W²hU c ¿WTh ¿dgð›¿T–Tidgð³(dgð¦dgð²¿kÙc ¿¸TdžHUh ƒ¿¿hU ¿Vµ.¿T˜T¿V³ W³œWšWkØh¿g °…ið¦HV ²ÌWgð²HW¦HWc¿°%Wgð¦Wgð•h‡h W c¿Við³ŽHV c°„(525Q DREMOVE 510Q \NCONC2 503Q DEFINE 476Q READ 470Q READ 445Q SKREAD 414Q MEMB 402Q RETFROM 366Q GETFILEPTR 345Q GETFILEPTR 333Q SKREAD 324Q SETFILEPTR 316Q SCANFILEHELP 311Q TCONC 275Q READ 265Q GETFILEPTR 232Q GETFILEPTR 213Q RATOM 207Q \NCONC2 175Q TCONC 170Q TCONC 147Q LCONC 134Q SETFILEPTR 131Q RETRYSCAN 56Q SETFILEPTR 37Q RETRYSCAN) (463Q GETDEF 454Q EXPRESSIONS 423Q LOADCOMP 377Q SCANFILE0 256Q %[ 250Q %( 241Q %] 217Q %)) () \SCANFILEBLOCK/SCANEXP D1 (L (2 EVALFLG 1 EXP2 0 EXP1) F 2 VARLST F 3 ADR F 4 NOFIXVARSLST F 5 LDFLG F 6 FILECREATEDLST F 7 DONELST) B Rgð’±@gð²$H•hS ¿¿¿Rgð•hi ƒB iRdið¥dgð”¿B±Ëdgð²$¿B²R@gð’±¹@gð’±°@dgð²9¿±¤gð²*B’±™@gð®@gð¨@dgð²¿AThð´ATc¿ƒRµ$@gð¢±”VHµXh c¿H ±€ ²$@AlRXd¦S ¿°6«hS ¿X°)i°&R°d¹@Ið³AIð³I›H£¸IH ¤µâh²“H£¸Rgð¬Rgð¦HWc¿Ugð©Ugð£H iH¢i(476Q SKREAD 467Q EVAL 423Q READ 406Q EDIT4E 400Q READ 342Q READ 336Q SETFILEPTR 324Q SETFILEPTR 304Q FNTYP 276Q FILECREATED1 266Q \NCONC2 257Q READ 62Q \SCANFILEBLOCK/SCANDECLARE: 55Q \SCANFILEBLOCK/SCANDECLARE: 41Q RATOM 35Q RATOM 31Q SETFILEPTR) (461Q GETDEF 453Q EXPRESSIONS 436Q LOADCOMP 430Q LOADFROM 243Q FILECREATED 211Q RPAQ? 202Q RPAQ 174Q RPAQQ 160Q LOADCOMP 146Q RPAQ? 134Q RPAQ 123Q RPAQQ 110Q VARS 75Q LOADFROM 46Q DONTCOPY 17Q DECLARE: 6 COMPILING) () \SCANFILEBLOCK/SCANDECLARE: D1 (L (1 DONTCOPIES 0 EVALFLG) P 2 ADR P 0 VARLST F 3 ADR F 4 LDFLG F 5 DONELST F 6 VARLST F 7 FNLST) ŽA‘i€Vc¿Ygð¨Idgð²s¿kÙc¿Ydgð²@¿S@²ËHgð²ÄWið²¾hS ¿¹Tgð¥Tgð—IUc ¿° I ¿°™gð—@A ¿°ŒIhS ¿@¿±ÿ{gð¥Igð‘iA²1Idgð—¿ib¿±ÿ\gð–¿±ÿPIgð¢±ÿG¿ib¿±ÿµGO<_@_>¿µ¸O@B)OH_Rµ9OL_¢±ÿBO&²O$W`g _¿O ¿OO ¿±ÿ _>O<°¹OJ³#ORdlFOJhOR Ÿ_P¿ONµOPh_N_L¿OR°šOP&_N°õ šOhð´OhŒOA.OTµOV_¢±þá`OO_¿±þÒ_\¿Oh_0¿_.µh³O\_Z¿OXµ@OZh_X_V¿OT_T°¼_0¿O\d–d3Ÿ¿O\O0ðO\O0ð„O0 –O0³Õi°¾O.°³OZ&_X¿°ÅK²@Wbgð³8W^gð³0W^gð³(W`Wbdið¥dgð”¿g‹gð“g‚gNO¿Wbdgð“¿OŒgð’W`„O cti(1776Q DREVERSE 1743Q ADDFILE 1616Q EDIT4E 1424Q FNTYP 1363Q FIXSPELL 1327Q LAST 1320Q SCANFILE1 1310Q INPUT 1277Q OPENSTREAM 1102Q SMASHFILECOMS 1071Q \NCONC2 1054Q MEMB 1043Q ROOTFILENAME 737Q UPDATEFILEMAP 723Q PUTFILEMAP 676Q LOADFNSCAN 622Q LOADFNS-MAKELIST 507Q FILECOMS 477Q FILECOMS 377Q \MVLIST 374Q GET-ENVIRONMENT-AND-FILEMAP 364Q ROOTFILENAME 356Q SETFILEPTR 341Q ERROR 325Q RANDACCESSP 314Q FULLNAME 274Q INPUT 243Q OPENSTREAM 225Q LOADFNS-FINDFILE 211Q LOADFNS-MAKELIST 202Q LISPXPUT 141Q ERROR 124Q FIXSPELL 61Q MEMB 23Q FILEPKGCHANGES) (1764Q LOADFROM 1753Q FILEMAP 1735Q loadfns 1731Q LOADCOMP 1724Q LOADCOMP 1720Q LOADFNS 1712Q LOADFROM 1673Q GETDEF 1663Q EXPRESSIONS 1653Q FILEMAP 1466Q NOT-FOUNDTAG 1274Q INPUT 1074Q SYSFILES 1062Q SYSFILES 1051Q SYSFILES 1026Q SYSLOAD 1007Q NOT-FOUNDTAG 773Q NOT-FOUNDTAG 762Q NOT-FOUNDTAG 727Q UPDATEMAPFLG 646Q READER-ENVIRONMENT 610Q DONTCOPY 604Q LOADFROM 576Q LOADFROM 570Q FILEMAP 537Q FILEMAP 520Q LOADCOMP 504Q BLOCKS 474Q COMS 463Q FNS/VARS 455Q VARS 447Q VARS 267Q INPUT 240Q INPUT 233Q CLOSEF? 171Q SIDE 160Q SIDE 120Q LOADOPTIONS 73Q SYSLOAD 56Q LOADOPTIONS 51Q GETDEF 37Q EXPRESSIONS 2 *INTERLISP-PACKAGE*) ( 336Q "not a random access file" 134Q "unrecognized load option") LOADFNS D1 (P 1 RESETY P 0 LISPXHIST I 3 VARS I 2 LDFLG I 1 FILE I 0 FNS F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog ‘h‚gZ J“I(35Q ERROR! 30Q RESETRESTORE 16Q LOADFNSA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (LOADFNSA0001)) LOADFNS-FINDFILE D1 (L (0 FN) P 1 FILEPKGFLG P 0 DWIMFLG) )id@ µg lð˜@hdiµ@oi(46Q ERROR 33Q EDITLOADFNS? 20Q NARGS 10Q EDITLOADFNS?) (15Q WHEREIS) ( 42Q "'s file not found") LOADFNS-MAKELIST D1 (L (1 FNSFLG 0 LST)) \@dið‘i´@@dlð’h¨o@ A³0@°d ¸IµHhZH&¹µíJ@Hµhlð—o ¿HX°ê(124Q LISPXPRIN1 53Q EDITFPAT 34Q ERROR) NIL ( 121Q " isn't a function name -- ignored. " 30Q "illegal arg") RETRYSCAN D1 (F 0 FILE) 4P` ²(P` oi Pi oi g (61Q SCANFILEHELP 55Q RETFROM 52Q LOADFNSCAN 44Q PRIN1 34Q PRINT 27Q PRIN1 17Q REMHASH 6 GETHASH) (47Q LOADFNSCAN 14Q *FILEMAP-HASH* 3 *FILEMAP-HASH*) ( 40Q "rebuilding map..." 23Q "something is wrong with the filemap for ") SCANFILEHELP D1 NIL 0oi i i oi i oi i (55Q HELP 52Q TERPRI 46Q PRIN1 36Q TERPRI 32Q PRIN1 22Q TERPRI 16Q PRIN1 12Q INPUT 7 PRIN1) NIL ( 42Q "Note: for (1) and (2), you may still be able to use this file by setting USEMAPFLG to NIL, and then reexecuting the operation that caused this message." 26Q "Here are some possibilities: (1) you edited the file with a text editor; (2) you printed a DEFINEQ in the file directly, i.e. without using the FNS command; (3) the file got clobbered. If you are convinced it is none of the above, then please inform the 1100Support program." 3 "something is wrong with either the filemap or format of ") (PRETTYCOMPRINT LOADFNSCOMS) (RPAQQ LOADFNSCOMS ((FNS LOADFROM LOADBLOCK GETBLOCKDEC LOADCOMP LOADCOMP? LOADVARS LOADEFS LOADFILEMAP LOADFNS LOADFNS-FINDFILE LOADFNS-MAKELIST) (FNS LOADFNSCAN SCANFILE0 SCANCOMPILEDFN SCANDEFINEQ SCANEXP SCANDECLARE: SCANFILE1 SCANFILE2 TMPSUBFN RETRYSCAN SCANFILEHELP) (VARS ( NOT-FOUNDTAG (QUOTE NOT-FOUND:))) (GLOBALVARS LASTWORD LOADOPTIONS SYSFILES NOT-FOUNDTAG) (LOCALVARS . T) (BLOCKS (SCANFILEBLOCK (ENTRIES LOADFNSCAN TMPSUBFN SCANFILE1) LOADFNSCAN SCANFILE0 SCANCOMPILEDFN SCANDEFINEQ SCANEXP SCANDECLARE: SCANFILE1 SCANFILE2 TMPSUBFN (LOCALFREEVARS FNADRLST DICT DICT0 ADR) (SPECVARS VARLST) (RETFNS SCANFILE0))))) (RPAQQ NOT-FOUNDTAG NOT-FOUND:) (PUTPROPS LOADFNS COPYRIGHT ("Xerox Corporation" 1983 1984 1986)) NIL