(FILECREATED "13-Mar-85 17:56:40" ("compiled on " {ERIS}SOURCES>NSFILING.;26) "12-Mar-85 12:49:34" recompiled exprs: \NSFILING.ERRORHANDLER \NSFILING.CLOSEFILE in "INTERLISP-D 12-Mar-85 ..." dated "12-Mar-85 13:20:46") (FILECREATED "13-Mar-85 17:53:57" {ERIS}SOURCES>NSFILING.;26 82725 changes to: (VARS NSFILINGCOMS) (FNS \NSFILING.ERRORHANDLER \NSFILING.CLOSEFILE) previous date: "10-Mar-85 17:06:35" {ERIS}SOURCES>NSFILING.;25) \GET.FILING.ATTRIBUTE D1 (P 3 VALUE P 2 X P 1 ATTR I 1 PROGRAM I 0 STREAM) B`@hg "HI@hg hZdIHX@ @ @AJ h(74Q COURIER.READ 32Q COURIER.READ.SEQUENCE 12Q COURIER.READ) (27Q UNSPECIFIED 7 LONGCARDINAL 2 \NSFILING.ATTRIBUTES) () \PUT.FILING.ATTRIBUTE D1 (P 4 X P 2 VALUETYPE P 1 VALUE P 0 ATTR I 2 PROGRAM I 1 ITEM I 0 STREAM) \AAHd`K oH @Hhg J"@IBJ "\dHK[LZ@IBg h(130Q COURIER.WRITE.SEQUENCE 66Q COURIER.WRITE.SEQUENCE.UNSPECIFIED 54Q COURIER.WRITE 42Q ERROR) (125Q UNSPECIFIED 51Q LONGCARDINAL 23Q \NSFILING.ATTRIBUTES) ( 36Q "Unknown Filing attribute") \GETFILINGCONNECTIONA0001 D1 (NAME ERRORSET P 1 CONNECTION P 0 TAIL F 2 DEVINFO F 3 RESETY) SRhi RHR YRIRIciHYjI RIR (115Q DREMOVE 76Q \VALID.FILING.CONNECTIONP 30Q \NSFILING.LOGIN 10Q OBTAIN.MONITORLOCK) NIL () \GETFILINGCONNECTION D1 (P 4 RESETZ P 3 RESETY P 2 LISPXHIST P 1 CONNECTION P 0 DEVINFO I 1 DORESETSAVE I 0 DEVICE F 5 RESETVARSLST F 6 LISPXHIST) H@(V!Uog hg\ LKYAIdigIhhhUc (44Q ERROR! 36Q RESETRESTORE 24Q \GETFILINGCONNECTIONA0001) (67Q \NSFILING.RESETCLOSE 32Q ERROR 21Q INTERNAL) ( 16Q (\GETFILINGCONNECTIONA0001)) \NSFILING.FINDSERVER D1 (I 0 SERVERNAME) @gi (7 LOOKUP.NS.SERVER) (3 FILESERVER) () \OPENFILINGCONNECTION D1 (P 0 STREAM I 0 CONNECTION) L@i @dgi@o ho XH@ @kkjh(74Q \NSFILING.SET.CONTINUANCE 62Q COURIER.OPEN 51Q PACK* 14Q SPP.CLOSE) (40Q NSNAME 33Q FILINGSESSION 26Q FILESERVER 21Q FILINGSESSION 6 FILINGSESSION) ( 56Q (ERRORHANDLER \NSFILING.ERRORHANDLER) 46Q " Filing") \NSFILING.LOGIN D1 (P 11Q NEEDLOGIN P 10Q CREDENTIALS P 7 CONNECTION P 6 SESSION P 5 STREAM P 4 SERVERNSNAME P 3 SERVERNAME P 2 ADDRESS P 1 PROGRAM P 0 FILESERVER I 0 DEVINFO) 2 @` H\i [HZKOhOohg _Jhi@ho ]O _IgMIgLOOg MggOOg ^"M NNdgIg/gY%gN.dg𑿍gNgi_OoK N h9`dJdLdKdMdNd` dkdI_d O` L` o` (454Q PRIN1 441Q PRIN1 431Q TERPRI 420Q \NSFILING.SET.CONTINUANCE 327Q ERROR 322Q CONCAT 207Q SPP.CLOSE 200Q COURIER.CALL 152Q COURIER.CALL 115Q NS.MAKE.SIMPLE.CREDENTIALS 103Q COURIER.OPEN 52Q \INTERNAL/GETPASSWORD 21Q MKATOM 16Q NSNAME.TO.STRING) (451Q PROMPTWINDOW 436Q PROMPTWINDOW 426Q PROMPTWINDOW 374Q \NSFILING.NULL.HANDLE 336Q FILINGSESSIONTYPE# 301Q CannotAuthenticate 270Q SERVICE.ERROR 261Q AUTHENTICATION.ERROR 247Q ERROR 240Q OLDFILING 232Q FILING 222Q REJECT 174Q RETURNERRORS 163Q LOGON 160Q OLDFILING 146Q RETURNERRORS 134Q LOGON 124Q FILING 46Q NS 4 \NSFILING.PROGRAM.NAME) ( 446Q " not responding to connection attempt" 316Q "Error while logging on to " 77Q (ERRORHANDLER \NSFILING.ERRORHANDLER) 42Q "Login incorrect.") \NSFILING.SET.CONTINUANCE D1 (I 0 CONNECTION) -@l @@g@g di(42Q COURIER.CALL 6 \DAYTIME0) (36Q NOERROR 31Q FILINGSESSION 25Q CONTINUE 20Q FILINGSESSION 12Q FILINGSESSION) () \CLOSEFILINGCONNECTION D1 (P 0 STREAM I 1 ABORT? I 0 CONNECTION) @@hHA @jjdhh(16Q SPP.CLOSE) NIL () \NSFILING.LOGOUTA0001 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 CONNECTION F 1 RESETVARSLST F 2 ABORT?) IRCPg 5P 0gPhhhQcPPgPg hh(102Q COURIER.CALL 24Q \OPENFILINGCONNECTION 16Q TIMEREXPIRED?) (76Q NOERROR 71Q FILINGSESSION 65Q LOGOFF 60Q FILINGSESSION 52Q FILINGSESSION 31Q \NSFILING.RESETCLOSE 13Q SECONDS 6 FILINGSESSION) () \NSFILING.LOGOUT D1 (I 1 ABORT? I 0 CONNECTION) o (6 \NSFILING.LOGOUTA0001) NIL ( 3 (DUMMY.FOR.ERRORSET)) \NSFILING.RESETCLOSE D1 (I 0 X F 0 RESETSTATE) @P (4 \CLOSEFILINGCONNECTION) NIL () \NSFILING.CLOSE.IF.ERROR D1 (I 0 CONNECTION F 0 RESETSTATE) P@ (6 \CLOSEFILINGCONNECTION) NIL () \VALID.FILING.CONNECTIONP D1 (I 0 CONNECTION) /@g h@@  j@ h@ i(51Q \OPENFILINGCONNECTION 43Q \NSFILING.LOGOUT 33Q HASH.PASSWORD 27Q \INTERNAL/GETPASSWORD 10Q TIMEREXPIRED?) (5 SECONDS) () \NSFILING.CLOSE.CONNECTIONSA0001 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 1 DEVINFO F 2 RESETY F 3 ABORT?) 0Qhi QdhciHQHS (54Q \NSFILING.LOGOUT 10Q OBTAIN.MONITORLOCK) NIL () \NSFILING.CLOSE.CONNECTIONS D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 1 ABORT? I 0 DEVINFO F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q \NSFILING.CLOSE.CONNECTIONSA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (DUMMY.FOR.ERRORSET)) BREAK.NSFILING.CONNECTION D1 (P 0 DEV I 0 HOST) @ id Hd( i(23Q \NSFILING.CLOSE.CONNECTIONS 10Q \GETDEVICEFROMNAME 3 \CANONICAL.NSHOSTNAME) NIL () \NSFILING.CONNECT D1 (P 20Q TAIL P 16Q OLD.DIR P 14Q \INTERRUPTABLE P 7 NSPATHNAME P 6 ADDITIONAL.DIRLIST P 5 NEW.HANDLE P 4 NEW.DIR P 3 OLD.HANDLE P 2 SESSIONHANDLE P 1 OLD.DIRLIST P 0 NEW.DIRLIST I 3 CREATE? I 2 REALREQUIRED I 1 PATHNAME I 0 CONNECTION) Ad @ @@ THIHBK`Hd@g0 Hd_gOh_O;O__O _@@ggOhh`hJg ]d _OgMg7CHd @ ]) @ @M @H K`@@gKJ iH-H^)IO iNXa_NN hO_K`"@@gK @`[ @h J B H@d@gh`hJg [ HO_ }@@ggO \hhKhJg ]dYgO MgCHL@i ]h @M @d Lh  K`@@gKJ MO (730Q COURIER.CALL 700Q \APPEND2 652Q \NSFILING.MAYBE.CREATE 604Q COURIER.CALL 524Q COURIER.CALL 466Q COURIER.CALL 405Q STREQUAL 337Q COURIER.CALL 266Q \NSFILING.MAYBE.CREATE 261Q LAST 224Q LAST 214Q COURIER.CALL 152Q CONCATLIST 6 \PATHNAME.TO.DIRECTORY.LIST) (722Q CLOSE 707Q \NSFILING.NULL.HANDLE 636Q FileNotFound 617Q ERROR 600Q RETURNERRORS 561Q NAME 556Q OPEN 520Q NOERROR 513Q \NSFILING.NULL.HANDLE 507Q OPEN 450Q \NSFILING.NULL.HANDLE 440Q CLOSE 424Q \NSFILING.NULL.HANDLE 331Q CLOSE 316Q \NSFILING.NULL.HANDLE 250Q FileNotFound 236Q ERROR 210Q RETURNERRORS 203Q \NSFILING.NULL.HANDLE 171Q PATHNAME 166Q OPEN 113Q / 70Q FILING 45Q \NSFILING.NULL.HANDLE) () \NSFILING.MAYBE.CREATE D1 (I 4 CONNECTED I 3 CONNECTION I 2 NEW.DIR I 1 DIRLST I 0 CREATE? F 5 DWIMWAIT) @dgNUgoCo0AdghXIHZYJ o  g YHhiLDCAAH\Ld 24Q FILINGSESSION 14Q Y 4 ASK) ( 224Q ((IS.DIRECTORY T) (FILE.TYPE 1)) 77Q "? " 32Q "}<" 20Q "Create subdirectory {") \PATHNAME.TO.DIRECTORY.LIST D1 (P 4 VAL P 3 VERS P 2 CH P 1 START P 0 I I 0 PATHNAME) @d? l{@g b-kd2@H)Z#L@IKdHl @Kk)Kk h l!H[2Jdl'HkX%l/Jl>L@IKHk h hHkعHkԸHl@Kk)l1K(161Q \NCONC2 154Q SUBSTRING 100Q \NCONC2 73Q SUBSTRING 21Q FILENAMEFIELD 6 CHCON1) (16Q DIRECTORY) () \NSFILING.LISTVERSIONS D1 (P 0 SCOPE I 3 DESIREDVERSION I 2 DESIREDPROPS I 1 FILENAME I 0 CONNECTION) oggA hghhCd gHggChghhhh@@g@ BgHhho@ (154Q COURIER.CALL 11Q \NSFILING.REMOVEQUOTES) (146Q FILINGSESSION 130Q FILTER 122Q FILINGSESSION 116Q LIST 111Q FILINGSESSION 103Q FILINGSESSION 62Q CARDINAL 53Q VERSION 50Q = 44Q AND 17Q STRING 5 NAME 2 =) ( 142Q (FILING . ATTRIBUTE.SEQUENCE)) \NSFILING.REMOVEQUOTES D1 (I 0 X) /@ 1HI l'HXHHJ KhZK&(16Q CONCATCODES 3 CHCON) NIL () \FILING.ATTRIBUTE.TYPE.SEQUENCE D1 (I 0 ATTRIBUTETYPES) 0@d IHhZH&J(12Q \FILING.ATTRIBUTE.TYPE) NIL NIL \FILING.ATTRIBUTE.TYPE D1 (P 1 X I 1 NOERRORFLG I 0 ATTR) &`HAo@ hY@IHX(23Q ERROR) (2 \NSFILING.ATTRIBUTES) ( 17Q "Unknown Filing attribute") \LISP.TO.NSFILING.ATTRIBUTE D1 (P 0 X I 1 VALUE I 0 ATTRIBUTE) @dggbA WAl OggbA =Al 5@dggbA Al ggbAd% jb@Ah@` X @` h(206Q ASSOC 174Q ASSOC 151Q \FILETYPE.FROM.TYPE 124Q \LISPERROR 114Q IDATE 67Q \LISPERROR 57Q IDATE 35Q \LISPERROR 25Q IDATE) (203Q \NSFILING.ATTRIBUTES 171Q \LISP.TO.NSFILING.ATTRIBUTES 137Q FILE.TYPE 131Q TYPE 105Q CREATED.ON 76Q CREATIONDATE 50Q READ.ON 42Q READDATE 16Q MODIFIED.ON 7 WRITEDATE) () \NSFILING.OPENFILE D1 (I 4 DEVICE I 3 PARAMETERS I 2 RECOG I 1 ACCESS I 0 FILENAME) D@ABihC (12Q \NSFILING.GETFILE) NIL () \NSFILING.GETFILEA0001 D1 (NAME ERRORSET F 0 DEVICE F 1 FILENAME F 2 ACCESS F 3 PARAMETERS F 4 RECOG F 5 DIROK F 6 NOERROR F 7 OPTION F 10Q RESETY)  PQRTVWSU ci(14Q \NSFILING.GETFILE1) NIL () \NSFILING.GETFILE D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 7 DIROK I 6 PARAMETERS I 5 OPTION I 4 NOERROR I 3 RECOG I 2 ACCESS I 1 FILENAME I 0 DEVICE F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q \NSFILING.GETFILEA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (\NSFILING.GETFILEA0001)) \NSFILING.GETFILE1 D1 (P 20Q PAIR P 16Q TAIL P 15Q FULLNAME P 14Q FILESTREAM P 13Q HANDLE P 12Q SESSIONHANDLE P 11Q FILE.ID P 10Q DESIRED.INFO P 7 CACHE P 6 CONNECTION P 5 VERSION P 4 HOST P 3 DIRECTORY P 2 NAME P 1 RESETSAVER P 0 DEVINFO I 7 DIROK I 6 PARAMETERS I 5 OPTION I 4 NOERROR I 3 RECOG I 2 ACCESS I 1 FILENAME I 0 DEVICE) A@(Eggo A!H_ A AEdg(Ag@I ^5A_EEgigOEgO_@I ^)hdOdgOYdgOKdg#O=Oo2JoO #gO ]dJoM hJ jvEgoG_@I ^dK NNgN _g `Ng _pNONO@lFDAl* @I dHEgNKhg NKhCgBggh jO*MONJMhi OO NJC`M _O)Mkh_EdgkCg`NJMhi _ dgO _?g9CgCgCdgO gMh__O kؽC O_OhN_ORNNggOhh`hOg _vONNgO`O _iNBgICCgCg:NNgN gJhgMhF hdOg _EN DhAl OgO_gNOJMhi _hO_OHOE(Bdg[NNgOhOg jdgO'gOEgNONO@lFONO g#O%NNgOhdOg Bl _d4` O` o` O` Al OOONOOOOO@O(2033Q \LISPERROR 2024Q PRIN1 2011Q PRIN1 1776Q PRIN1 1763Q TERPRI 1746Q \LISPERROR 1737Q COURIER.CALL 1667Q \NSFILING.CLOSE.HANDLE 1656Q SHOULDNT 1574Q COURIER.CALL 1500Q \NSFILING.FULLNAME 1434Q \LISPERROR 1414Q \CLOSEFILINGCONNECTION 1402Q COURIER.CALL 1365Q \NSFILING.OPENFILE.OPTIONS 1262Q COURIER.CALL 1216Q COURIER.CALL 1112Q \ILLEGAL.ARG 771Q \NSFILING.FULLNAME 711Q \NSFILING.FIND.VERSION 663Q \NSFILING.FULLNAME 633Q \NSFILING.CONNECT 603Q \NSFILING.CONNECT 556Q \GETFILINGCONNECTION 550Q \LISPERROR 503Q COURIER.CALL 462Q \FILING.ATTRIBUTE.TYPE 417Q \NSFILING.CONNECT 405Q \GETFILINGCONNECTION 361Q NCHARS 344Q CONCAT 323Q MKATOM 303Q CONCAT 164Q \GETFILINGCONNECTION 104Q \GETFILINGCONNECTION 44Q UNPACKFILENAME.STRING) (2021Q PROMPTWINDOW 2006Q PROMPTWINDOW 1773Q PROMPTWINDOW 1760Q PROMPTWINDOW 1733Q RETURNERRORS 1722Q REPLACE 1715Q FILINGSESSION 1707Q FILINGSESSION 1674Q OUTPUT 1640Q FILINGSESSION 1626Q HANDLE 1614Q ATTRIBUTES 1602Q NAME 1570Q RETURNERRORS 1560Q RETRIEVE 1553Q FILINGSESSION 1545Q FILINGSESSION 1535Q INPUT 1463Q FULLNAME 1444Q FULLNAME 1376Q RETURNERRORS 1355Q VERSION 1346Q NAME 1341Q FILINGSESSION 1335Q STORE 1330Q FILINGSESSION 1322Q FILINGSESSION 1313Q OLD/NEW 1305Q NEW 1274Q OUTPUT 1254Q \NSFILING.USEFUL.ATTRIBUTE.TYPES 1247Q GET.ATTRIBUTES 1242Q FILINGSESSION 1234Q FILINGSESSION 1212Q NOERROR 1204Q \NSFILING.NULL.HANDLE 1172Q FILE.ID 1167Q OPEN 1162Q FILINGSESSION 1154Q FILINGSESSION 1137Q FILINGSESSION 1061Q NEW 1045Q OLD/NEW 1036Q OLDEST 1030Q OLD 1021Q VERSION 1002Q FILE.ID 753Q NEW 741Q NAME 704Q \NSFILING.USEFUL.ATTRIBUTE.TYPES 626Q CREATE 621Q INPUT 613Q OLD 600Q ASK 570Q DIRECTORY 522Q FILINGSESSION 477Q NOERROR 472Q FILINGSESSION 465Q \NSFILING.USEFUL.ATTRIBUTE.TYPES 457Q NUMBER.OF.CHILDREN 450Q FILINGSESSION 444Q GET.ATTRIBUTES 437Q FILINGSESSION 431Q FILINGSESSION 371Q DIRECTORY 311Q VERSION 242Q EXTENSION 224Q NAME 206Q DIRECTORY 150Q DIRECTORY 137Q ATTRIBUTES 123Q HANDLE 74Q FILE.ID 63Q NAME 16Q \NSFILING.CLOSE.IF.ERROR 12Q \NSFILING.RESETCLOSE 3 FDEV) ( 2003Q ": " 340Q "." 274Q "." 264Q "" 22Q "") \NSFILING.ERRORHANDLERA0001 D1 (NAME ERRORSET F 0 NEWSTREAM F 1 OLDPTR) PQ i(4 SETFILEPTR) NIL () \NSFILING.ERRORHANDLER D1 (P 7 \INTERRUPTABLE P 6 POS P 5 CON P 4 OLDPTR P 3 FULLNAME P 2 NEWSTREAM P 1 FAILCNT P 0 PRINTFLG I 1 ERRCODE I 0 STREAM) `jRAg@[9g g ^H` o` Nd N i @ gdH;` o` K` o` @ \` k` @@gg@Kggi ZHo` J ]gFo IkYlHo` MgF@J  @J@J@J@J@J@JM@8@J@J@JHo` iHo` @A (701Q \SPP.DEFAULT.ERRORHANDLER 673Q PRIN1 655Q PRIN1 410Q PRIN1 356Q \NSFILING.ERRORHANDLERA0001 326Q PRIN1 305Q \NSFILING.GETFILE 226Q SPACES 216Q PRIN1 207Q GETFILEPTR 202Q PRIN1 167Q PRIN1 157Q PRIN1 144Q TERPRI 123Q \GETACCESS 115Q RETAPPLY 111Q STKARGS 105Q STKNAME 77Q PRIN1 64Q TERPRI 46Q STKPOS 36Q STKPOS) (670Q PROMPTWINDOW 652Q PROMPTWINDOW 634Q STREAM 630Q STREAM 617Q STREAM 613Q STREAM 602Q STREAM 576Q STREAM 566Q SPPCON 555Q STREAM 551Q STREAM 540Q STREAM 534Q STREAM 523Q STREAM 517Q STREAM 506Q STREAM 502Q STREAM 471Q STREAM 465Q STREAM 454Q STREAM 450Q STREAM 437Q STREAM 433Q STREAM 421Q \NSFILING.ERRORHANDLER 416Q SPPCON 405Q PROMPTWINDOW 344Q ERROR! 341Q SPPCON 333Q STREAM 323Q PROMPTWINDOW 300Q OLD 275Q INPUT 264Q STREAM 260Q FILE.ID 253Q FILING 246Q FILINGSESSION 241Q STREAM 233Q STREAM 223Q PROMPTWINDOW 213Q PROMPTWINDOW 177Q PROMPTWINDOW 164Q PROMPTWINDOW 154Q PROMPTWINDOW 141Q PROMPTWINDOW 126Q INPUT 74Q PROMPTWINDOW 61Q PROMPTWINDOW 43Q \NSFILING.GENERATEFILES1 33Q \NSFILING.GETFILE1 23Q STREAM 12Q STREAM.LOST 2 NSFILING.SHOW.STATUS) ( 665Q "...failed.]" 647Q "done.]" 402Q "failed, retrying " 353Q (\NSFILING.ERRORHANDLERA0001) 320Q "..." 174Q " at byte " 151Q "[Reestablishing connection to " 71Q "[Lost connection, restarting]") \NSFILING.MANIPULATE.HANDLEA0001 D1 (NAME ERRORSET P 0 STREAM F 1 CONNECTION F 2 RESETVARSLST F 3 RESETY F 4 HANDLE F 5 USERFN) /QhiQ HgHhhhRcQTHlUci(12Q COURIER.OPEN) (23Q SPP.CLOSE) () \NSFILING.MANIPULATE.HANDLE D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 2 USERFN I 1 HANDLE I 0 CONNECTION F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q \NSFILING.MANIPULATE.HANDLEA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (\NSFILING.MANIPULATE.HANDLEA0001)) \NSFILING.FIND.VERSION D1 (P 7 DUPLICATE P 6 INFO P 5 DATE P 4 V P 3 ALST P 2 NEWESTDATE P 1 EXTREMAL.VERSION I 4 DESIREDVERSION I 3 DESIREDPROPS I 2 RECOG I 1 NAME I 0 CONNECTION) @ACD D BgnjjSH;O` o` @AI ` o` BgmhgK \WDLDhBgLIILAN:LdI5DBdghgi_hii_gK ]MJMLKHX^o` N(310Q PRIN1 251Q ASSOC 136Q ASSOC 113Q PRIN1 100Q PRIN1 72Q \NSFILING.FULLNAME 63Q PRIN1 50Q TERPRI 6 \NSFILING.LISTVERSIONS) (305Q PROMPTWINDOW 245Q CREATED.ON 223Q OLDEST 213Q NEW 157Q OLDEST 132Q VERSION 120Q OLDEST 110Q PROMPTWINDOW 75Q PROMPTWINDOW 60Q PROMPTWINDOW 45Q PROMPTWINDOW 15Q OLDEST) ( 302Q "; using most recent" 105Q " exist" 55Q "Multiple instances of file ") \NSFILING.OPENFILE.OPTIONS D1 (L (0 ALIST)) .@AHI\LL J KhZHXK&(26Q \LISP.TO.NSFILING.ATTRIBUTE) NIL () \NSFILING.CLOSEFILEA0001A0003 D1 (NAME ERRORSET F 0 CONNECTION F 1 FILESTREAM F 2 NEWHANDLE F 3 INFO F 4 HANDLE) SRBPPgR`Pg cQ(gQhSPT Qhi(107Q \NSFILING.CLOSE.HANDLE 42Q COURIER.CALL) (114Q STREAM 71Q STREAM 65Q FULLNAME 57Q FDEV 52Q STREAM 36Q NOERROR 31Q FILINGSESSION 25Q \NSFILING.USEFUL.ATTRIBUTE.TYPES 21Q GET.ATTRIBUTES 14Q FILINGSESSION 6 FILINGSESSION) () \NSFILING.CLOSEFILEA0001 D1 (NAME ERRORSET P 5 INFO P 4 CONNECTION P 3 HANDLE P 2 NEWHANDLE P 1 ABORTFLG P 0 CON F 7 FILESTREAM F 10Q OPTIONS F 11Q RESETVARSLST F 12Q RESETY) W WgW gWiRHHgFWI ZWW\gJgLhhhWcJgUWRlj%WRljMW4WkN:I6oJoJ W KL o hci(324Q \NSFILING.CLOSEFILEA0001A0003 313Q SPP.OPENP 275Q ERROR 263Q CONCAT 62Q \BULK.DATA.CLOSE) (306Q FILINGSESSION 270Q STREAM 224Q FDEV 217Q STREAM 200Q STREAM 161Q STREAM 151Q ERROR 126Q \NSFILING.RESETCLOSE 115Q ERROR 102Q STREAM 72Q STREAM 51Q ERROR! 46Q SPPCON 26Q ABORT 13Q ABORT 4 STREAM) ( 321Q (\NSFILING.CLOSEFILEA0001A0003) 254Q " -- " 245Q "CLOSEF: File not written ") \NSFILING.CLOSEFILE D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 1 OPTIONS I 0 FILESTREAM F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q \NSFILING.CLOSEFILEA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (\NSFILING.CLOSEFILEA0001)) \NSFILING.CLOSE.HANDLE D1 (I 1 HANDLE I 0 CONNECTION) @@gA@g (23Q COURIER.CALL) (17Q NOERROR 10Q CLOSE) () \NSFILING.FULLNAME D1 (P 10Q VERS P 7 CH P 6 START P 5 I P 3 PATHNAME P 2 FULLNAME P 1 DIRLST P 0 FILENAME I 4 ATOMFLG I 3 DIRECTORYFLG I 2 VERSION I 1 NAMEORINFO I 0 CONNECTION) g PAdB 362Q { 74Q PATHNAME 57Q NAME 40Q VERSION 21Q IS.DIRECTORY) ( 513Q "" 504Q ".;" 465Q ";" 454Q "." 450Q "" 371Q "}<") \NSFILING.EVENTFN D1 (I 1 EVENT I 0 DEVICE) 2Adg@(i gAgAgAg@ (57Q \REMOVEDEVICE 21Q \NSFILING.CLOSE.CONNECTIONS) (50Q AFTERSYSOUT 42Q AFTERMAKESYS 34Q AFTERSAVEVM 25Q AFTERLOGOUT 13Q FDEV 4 BEFORELOGOUT) () \NSFILING.DELETEFILEA0001 D1 (P 0 DIRP I 4 DEVICE I 3 ATTRS I 2 STREAM I 1 HANDLE I 0 CONNECTION) qgC HgC jh@@gA@g CD(D(hHgC C b@Chdi HA@ @` @h (131Q \NSFILING.FULLNAME 115Q DREMOVE 111Q ASSOC 57Q COURIER.CALL 24Q ASSOC 6 ASSOC) (146Q \NSFILING.NULL.HANDLE 105Q NAME 53Q RETURNERRORS 44Q DELETE 20Q NUMBER.OF.CHILDREN 2 IS.DIRECTORY) () \NSFILING.DELETEFILE D1 (I 1 DEVICE I 0 FILENAME) A@ggiggi (23Q \NSFILING.GETFILE) (16Q \NSFILING.DELETEFILEA0001 13Q HANDLE 7 OLDEST 4 NONE) () \NSFILING.HOSTNAMEP D1 (P 2 FULLHOSTNAME P 1 FILINGNAME P 0 SERVER I 1 DEVICE I 0 HOST) o@ @ AHdi Zid Ho YJ`` dJdgdgdgdg dgdg2dgdgdgdgdg dgHhI IhdK(`*dL*b A(276Q \DEFINEDEVICE 242Q CREATE.MONITORLOCK 103Q NCREATE2 70Q PACK* 47Q \GETDEVICEFROMNAME 41Q MKATOM 36Q U-CASE 33Q NSNAME.TO.STRING 15Q \NSFILING.FINDSERVER 7 STRPOS) (261Q \SPP.BULKDATA.DEVICE 231Q \NSFILING.EVENTFN 222Q \NSFILING.GENERATEFILES 213Q \NSFILING.DIRECTORYNAMEP 204Q \NSFILING.GETFILENAME 175Q NILL 166Q \NSFILING.DELETEFILE 157Q \NSFILING.GETEOFPTR 150Q \NSFILING.SETFILEINFO 141Q \NSFILING.GETFILEINFO 132Q \NSFILING.CLOSEFILE 123Q NILL 114Q \NSFILING.OPENFILE 100Q \SPP.BULKDATA.DEVICE 75Q FDEVTYPE#) ( 65Q " Filing" 3 ":") \NSFILING.DIRECTORYNAMEP D1 (I 1 DEVICE I 0 HOST/DIR) A@ghig (15Q \NSFILING.GETFILE) (11Q DIRECTORY 4 NONE) () \NSFILING.GETFILENAME D1 (I 2 DEVICE I 1 RECOG I 0 NAME) B@gAig (15Q \NSFILING.GETFILE) (11Q NAME 4 NONE) () \NSFILING.GETFILEINFO D1 (P 1 INFO P 0 DESIREDPROPS I 2 DEVICE I 1 ATTRIBUTE I 0 STREAM) 0AdgoXB@g ` Ai XdU` HhB@g :@d`B@ggig @B@ggig ZJYdA (176Q \NSFILING.GETFILEINFO.FROM.PLIST 163Q \NSFILING.GETFILE 132Q \NSFILING.GETFILE 76Q \NSFILING.GET/SETINFO 61Q MEMB 47Q \FILING.ATTRIBUTE.TYPE 36Q ASSOC 27Q \NSFILING.GET/SETINFO) (157Q ATTRIBUTES 153Q OLD 150Q NONE 126Q ATTRIBUTES 122Q OLD 117Q NONE 106Q STREAMTYPE# 73Q \NSFILING.GET.ATTRIBUTES 56Q \NSFILING.USEFUL.ATTRIBUTE.TYPES 33Q \LISP.TO.NSFILING.ATTRIBUTES 24Q \NSFILING.GET.ATTRIBUTES 7 ALL) ( 16Q (-1)) \NSFILING.GET.ATTRIBUTES D1 (I 2 STREAM I 1 HANDLE I 0 CONNECTION F 0 DESIREDPROPS) B@@gAP@ (24Q COURIER.CALL) (13Q GET.ATTRIBUTES) () \NSFILING.GETFILEINFO.FROM.PLIST D1 (P 0 CHNAME I 1 ATTRIBUTE I 0 PLIST) @Adgg@  gg@  Adgg@  gg@ donAdgg@ HdO gg@ d:Adgg@  gg@ A` A@ (277Q ASSOC 266Q ASSOC 254Q ASSOC 237Q \TYPE.FROM.FILETYPE 232Q ASSOC 204Q ASSOC 167Q NSNAME.TO.STRING 153Q ASSOC 117Q ASSOC 101Q \NSFILING.GDATE 74Q ASSOC 54Q \NSFILING.GDATE 47Q ASSOC 32Q \NSFILING.GDATE 25Q ASSOC) (263Q \LISP.TO.NSFILING.ATTRIBUTES 250Q FILE.TYPE 243Q FILETYPE 226Q FILE.TYPE 220Q TYPE 200Q ACCESS.LIST 173Q PROTECTION 147Q CREATED.BY 140Q AUTHOR 113Q SIZE.IN.BYTES 105Q SIZE 70Q CREATED.ON 62Q CREATIONDATE 43Q READ.ON 36Q READDATE 21Q MODIFIED.ON 13Q WRITEDATE) () \NSFILING.GDATE D1 (I 0 DATE) @doj@ h(16Q GDATE) NIL ( 6 -20000000000Q) \NSFILING.SETFILEINFOA0001 D1 (I 4 DEVICE I 3 INFO I 2 COURIERSTREAM I 1 HANDLE I 0 CONNECTION F 0 NAME.OR.STREAM F 1 ATTR/VAL) ;B@@gAQh@g P`PhDCD(D(hi(31Q COURIER.CALL) (40Q STREAMTYPE# 25Q RETURNERRORS 13Q CHANGE.ATTRIBUTES) () \NSFILING.SETFILEINFO D1 (P 1 RESULT P 0 ATTR/VAL I 3 DEVICE I 2 VALUE I 1 ATTRIBUTE I 0 NAME.OR.STREAM) JAB H?C@g Ydd1` @d`` o` I` h(106Q PRIN1 73Q PRIN1 60Q PRIN1 37Q TERPRI 22Q \NSFILING.GET/SETINFO 4 \LISP.TO.NSFILING.ATTRIBUTE) (103Q PROMPTWINDOW 70Q PROMPTWINDOW 55Q PROMPTWINDOW 46Q STREAMTYPE# 34Q PROMPTWINDOW 17Q \NSFILING.SETFILEINFOA0001) ( 65Q " -- ") \NSFILING.GET/SETINFO D1 (P 1 HANDLE P 0 FILENAME I 2 INFOFN I 1 STREAM I 0 DEVICE) 2AA`AAYAIB @HggigBi (57Q \NSFILING.GETFILE 34Q \NSFILING.MANIPULATE.HANDLE) (51Q HANDLE 45Q OLD 42Q NONE 10Q STREAMTYPE#) () \NSFILING.GENERATEFILESA0001 D1 (NAME ERRORSET F 0 DEVICE F 1 PATTERN F 2 RESETY F 3 DESIREDPROPS F 4 OPTIONS) PQST ci(6 \NSFILING.GENERATEFILES1) NIL () \NSFILING.GENERATEFILESA0002 D1 (I 1 STREAM I 0 CONNECTION F 0 RESETSTATE) A @P (10Q \CLOSEFILINGCONNECTION 3 CLOSEF) NIL () \NSFILING.GENERATEFILES D1 (P 5 RESETZ P 4 RESETY P 3 LISPXHIST P 2 RESULT P 1 BULKSTREAM P 0 CONNECTION I 3 OPTIONS I 2 DESIREDPROPS I 1 PATTERN I 0 DEVICE F 6 RESETVARSLST F 7 LISPXHIST) \0W!Vog hg] MLZH,CgCgCgHIhhhVc IH J(131Q \NULLFILEGENERATOR 122Q \CLOSEFILINGCONNECTION 42Q ERROR! 34Q RESETRESTORE 22Q \NSFILING.GENERATEFILESA0001) (75Q \NSFILING.GENERATEFILESA0002 66Q RESETLST 55Q RESETLST 30Q ERROR 17Q INTERNAL) ( 14Q (\NSFILING.GENERATEFILESA0001)) \NSFILING.GENERATEFILES1 D1 (P 22Q PROP P 15Q X P 14Q BROKET P 13Q TAIL P 10Q N P 7 INFINITE.DEPTH P 6 SCOPELIST P 5 FILTERLIST P 4 DIRECTORY P 3 VERSION P 2 NAME P 1 HOST P 0 STAR I 3 OPTIONS I 2 DESIREDPROPS I 1 PATTERN I 0 DEVICE F 23Q CONNECTION F 24Q RESETVARSLST F 25Q BULKSTREAM) Oo A yd OdgOY`dgO\RdgOZDdg0Od5H JoO ZJm)l*JH ZgO [gL _?j gLOk _OOO_LOkO Ojh LkOk \@ dxc&gW&hhhW(c(W&Li XBAO#ObW&gFlDd b_$` O$i _$_"O O"h_ _O_O"&_ l oB bgJ JH ggJggJhghhMKdggKhghhM]MgMdgMhhN`)L&W&gg` i_nhNW&W&gW& BNhW& c*gghW*gg _A _W&OOOh(1071Q DIRECTORY.MATCH.SETUP 1062Q BULKDATA.GENERATOR 1036Q COURIER.CALL 562Q STREQUAL 554Q STRPOS 542Q \APPEND2 464Q \FILING.ATTRIBUTE.TYPE 452Q ASSOC 434Q INTERSECTION 361Q \NSFILING.CONNECT 322Q \GETFILINGCONNECTION 314Q SUBSTRING 272Q SUBSTRING 240Q STRPOS 215Q STRPOS 176Q MKATOM 160Q CONCAT 137Q CONCAT 122Q STREQUAL 12Q UNPACKFILENAME.STRING) (1057Q ATTRIBUTE.SEQUENCE 1054Q FILING 1046Q \NSFILING.FILEINFOFN 1043Q \NSFILING.NEXTFILE 1030Q FILINGSESSION 1016Q FILINGSESSION 1011Q LIST 1004Q FILINGSESSION 775Q FILINGSESSION 747Q FILING.ENUMERATION.DEPTH 744Q DEPTH 736Q FILING 731Q FILINGSESSION 717Q FILING.ENUMERATION.DEPTH 700Q AND 670Q FILTER 650Q CARDINAL 641Q VERSION 636Q = 611Q STRING 602Q NAME 577Q = 572Q NAME 567Q MATCHES 550Q * 447Q \LISP.TO.NSFILING.ATTRIBUTES 421Q FILING 414Q FILINGSESSION 334Q \NSFILING.CLOSE.IF.ERROR 230Q > 211Q * 165Q VERSION 101Q EXTENSION 63Q NAME 45Q DIRECTORY 27Q HOST) ( 536Q (22Q 5) 130Q "." 3 "*") \NSFILING.NEXTFILE D1 (P 5 NAME P 4 INFO P 3 IGNOREDIRS P 2 FILTER P 1 CONNECTION P 0 GENERATOR I 2 SCRATCHLIST I 1 NAMEONLY I 0 GENFILESTATE) H@@@@$H \hKgL IL JJM @LAMi M(103Q NAMEFIELD 66Q DIRECTORY.MATCH 56Q \NSFILING.FULLNAME 45Q ASSOC 30Q BULKDATA.GENERATE.NEXT) (41Q IS.DIRECTORY) () \NSFILING.FILEINFOFN D1 (I 1 ATTRIBUTE I 0 GENFILESTATE) @A (5 \NSFILING.GETFILEINFO.FROM.PLIST) NIL () \NSFILING.GETEOFPTR D1 (I 0 STREAM) @Rlj@ @g (25Q \NSFILING.GETFILEINFO 15Q GETFILEPTR) (22Q LENGTH) () \NSFILING.INIT D1 NIL eh`dgdgdgdg:dg8dg6dg4dg2dg0dg.dg*dg$dg (142Q \DEFINEDEVICE) (134Q NILL 125Q \GENERIC.READP 116Q NILL 107Q \IS.NOT.RANDACCESSP 100Q \ILLEGAL.DEVICEOP 71Q \IS.NOT.RANDACCESSP 62Q \ILLEGAL.DEVICEOP 53Q \GENERIC.BINS 44Q \GENERIC.BOUTS 35Q \GENERIC.RENAMEFILE 26Q NILL 17Q \NSFILING.HOSTNAMEP 10Q NSFILING 3 FDEVTYPE#) () (PRETTYCOMPRINT NSFILINGCOMS) (RPAQQ NSFILINGCOMS ((* Filing Protocol) (COURIERPROGRAMS FILING OLDFILING) (DECLARE: DONTCOPY ( CONSTANTS * NSFILINGCONSTANTS) (RECORDS NSFILINGSTREAM FILINGSESSION NSFILESERVER NSFILINGDEVICEINFO \NSFILING.GENFILESTATE) (MACROS FILING.CALL) (GLOBALVARS \NSFILING.CONNECTIONS \NSFILING.DEVICE \NSFILING.NULL.HANDLE \NSFILING.ATTRIBUTES \LISP.TO.NSFILING.ATTRIBUTES \NSFILING.USEFUL.ATTRIBUTE.TYPES \NSFILING.PROGRAM.NAME FILING.ENUMERATION.DEPTH NSFILING.SHOW.STATUS) ) (INITRECORDS FILINGSESSION) (COMS (FNS \GET.FILING.ATTRIBUTE \PUT.FILING.ATTRIBUTE) (PROP COURIERDEF FILING.ATTRIBUTE) (DECLARE: EVAL@COMPILE DOCOPY (VARS \NSFILING.NULL.HANDLE \NSFILING.ATTRIBUTES \LISP.TO.NSFILING.ATTRIBUTES (\NSFILING.USEFUL.ATTRIBUTE.TYPES (\FILING.ATTRIBUTE.TYPE.SEQUENCE (QUOTE (CREATED.ON FILE.ID IS.DIRECTORY MODIFIED.ON PATHNAME NAME READ.ON SIZE.IN.BYTES FILE.TYPE VERSION))) )))) (INITVARS (NSFILING.SHOW.STATUS T) (FILING.ENUMERATION.DEPTH T) (\NSFILING.LOCK ( CREATE.MONITORLOCK (QUOTE NSFILING))) (\NSFILING.CONNECTIONS NIL) (\NSFILING.PROGRAM.NAME (QUOTE FILING))) (FNS \GETFILINGCONNECTION \NSFILING.FINDSERVER \OPENFILINGCONNECTION \NSFILING.LOGIN \NSFILING.SET.CONTINUANCE \CLOSEFILINGCONNECTION \NSFILING.LOGOUT \NSFILING.RESETCLOSE \NSFILING.CLOSE.IF.ERROR \VALID.FILING.CONNECTIONP \NSFILING.CLOSE.CONNECTIONS BREAK.NSFILING.CONNECTION) (FNS \NSFILING.CONNECT \NSFILING.MAYBE.CREATE \PATHNAME.TO.DIRECTORY.LIST \NSFILING.LISTVERSIONS \NSFILING.REMOVEQUOTES \FILING.ATTRIBUTE.TYPE.SEQUENCE \FILING.ATTRIBUTE.TYPE \LISP.TO.NSFILING.ATTRIBUTE) (FNS \NSFILING.OPENFILE \NSFILING.GETFILE \NSFILING.GETFILE1 \NSFILING.ERRORHANDLER \NSFILING.MANIPULATE.HANDLE \NSFILING.FIND.VERSION \NSFILING.OPENFILE.OPTIONS \NSFILING.CLOSEFILE \NSFILING.CLOSE.HANDLE \NSFILING.FULLNAME \NSFILING.EVENTFN \NSFILING.DELETEFILE \NSFILING.HOSTNAMEP \NSFILING.DIRECTORYNAMEP \NSFILING.GETFILENAME \NSFILING.GETFILEINFO \NSFILING.GET.ATTRIBUTES \NSFILING.GETFILEINFO.FROM.PLIST \NSFILING.GDATE \NSFILING.SETFILEINFO \NSFILING.GET/SETINFO \NSFILING.GENERATEFILES \NSFILING.GENERATEFILES1 \NSFILING.NEXTFILE \NSFILING.FILEINFOFN \NSFILING.GETEOFPTR) (COMS (FNS \NSFILING.INIT) (DECLARE: DONTEVAL@LOAD DOCOPY (P (\NSFILING.INIT)))))) (COURIERPROGRAM FILING (10 4) TYPES ((ATTRIBUTE.TYPE LONGCARDINAL) (ATTRIBUTE.TYPE.SEQUENCE (SEQUENCE ATTRIBUTE.TYPE)) (ATTRIBUTE FILING.ATTRIBUTE) (ATTRIBUTE.SEQUENCE (SEQUENCE FILING.ATTRIBUTE)) ( CONTROL.TYPE (ENUMERATION (LOCK 0) (TIMEOUT 1))) (CONTROL.TYPE.SEQUENCE (SEQUENCE CONTROL.TYPE)) ( CONTROL (CHOICE (LOCK 0 LOCK) (TIMEOUT 1 TIMEOUT))) (CONTROL.SEQUENCE (SEQUENCE CONTROL)) (LOCK ( ENUMERATION (NONE 0) (SHARE 1) (EXCLUSIVE 2))) (TIMEOUT CARDINAL) (SCOPE.TYPE (ENUMERATION (COUNT 0) ( DIRECTION 1) (FILTER 2) (DEPTH 3))) (SCOPE (CHOICE (COUNT 0 CARDINAL) (DIRECTION 1 DIRECTION) (FILTER 2 FILTER) (DEPTH 4 CARDINAL))) (SCOPE.SEQUENCE (SEQUENCE SCOPE)) (DIRECTION (ENUMERATION (FORWARD 0) ( BACKWARD 1))) (FILTER (CHOICE (LT 0 FILTER.ATTRIBUTE) (LE 1 FILTER.ATTRIBUTE) (= 2 FILTER.ATTRIBUTE) ( ~= 3 FILTER.ATTRIBUTE) (GE 4 FILTER.ATTRIBUTE) (GT 5 FILTER.ATTRIBUTE) (AND 6 (SEQUENCE FILTER)) (OR 7 (SEQUENCE FILTER)) (NOT 8 FILTER) (NONE 9 NIL) (ALL 10 NIL) (MATCHES 11 ATTRIBUTE))) ( FILTER.ATTRIBUTE (RECORD (ATTRIBUTE FILING.ATTRIBUTE) (INTERPRETATION INTERPRETATION))) ( INTERPRETATION (ENUMERATION (NONE 0) (BOOLEAN 1) (CARDINAL 2) (LONGCARDINAL 3) (TIME 4) (INTEGER 5) ( LONGINTEGER 6) (STRING 7))) (CREDENTIALS (AUTHENTICATION . CREDENTIALS)) (HANDLE (ARRAY 2 UNSPECIFIED) ) (SESSION (RECORD (TOKEN (ARRAY 2 UNSPECIFIED)) (VERIFIER VERIFIER))) (VERIFIER (AUTHENTICATION . VERIFIER)) (SIMPLE.VERIFIER (AUTHENTICATION . SIMPLE.VERIFIER)) (FILE.ID (ARRAY 5 UNSPECIFIED)) (USER (CLEARINGHOUSE . NAME)) (ORDERING (RECORD (KEY ATTRIBUTE.TYPE) (ASCENDING BOOLEAN) (INTERPRETATION INTERPRETATION))) (ACCESS.LIST (RECORD (ENTRIES (SEQUENCE ACCESS.ENTRY)) (DEFAULTED BOOLEAN))) ( ACCESS.ENTRY (RECORD (KEY (CLEARINGHOUSE . NAME)) (TYPE (ENUMERATION (INDIVIDUAL 0) (ALIAS 1) (GROUP 2 ) (OTHER 3))) (ACCESS UNSPECIFIED))) (ARGUMENT.PROBLEM (ENUMERATION (Illegal 0) (Disallowed 1) ( Unreasonable 2) (Unimplemented 3) (Duplicated 4) (Missing 5))) (ACCESS.PROBLEM (ENUMERATION ( AccessRightsInsufficient 0) (AccessRightsIndeterminate 1) (FileChanged 2) (FileDamaged 3) (FileInUse 4 ) (FileNotFound 5) (FileOpen 6))) (CONNECTION.PROBLEM (ENUMERATION (NoRoute 0) (NoResponse 1) ( TransmissionHardware 2) (TransportTimeout 3) (TooManyLocalConnections 4) (TooManyRemoteConnections 5) (MissingCourier 6) (MissingProgram 7) (MissingProcedure 8) (ProtocolMismatch 9) ( ParameterInconsistency 10) (InvalidMessage 11) (ReturnTimedOut 12) (Other 65535))) (HANDLE.PROBLEM ( ENUMERATION (Invalid 0) (NullDisallowed 1) (DirectoryRequired 2))) (INSERTION.PROBLEM (ENUMERATION ( PositionUnavailable 0) (FileNotUnique 1) (LoopInHierarchy 2))) (SERVICE.PROBLEM (ENUMERATION ( CannotAuthenticate 0) (ServiceFull 1) (ServiceUnavailable 2) (SessionInUse 3) (UnknownService 4))) ( SESSION.PROBLEM (ENUMERATION (TokenInvalid 0))) (SPACE.PROBLEM (ENUMERATION (AllocationExceeded 0) ( AttributeAreaFull 1) (MediumFull 2))) (TRANSFER.PROBLEM (ENUMERATION (Aborted 0) (ChecksumIncorrect 1) (FormatIncorrect 2) (NoRendezvous 3) (WrongDirection 4)))) PROCEDURES ((LOGON 0 ((CLEARINGHOUSE . NAME) CREDENTIALS VERIFIER) RETURNS (SESSION) REPORTS (AUTHENTICATION.ERROR SERVICE.ERROR SESSION.ERROR UNDEFINED.ERROR)) (LOGOFF 1 (SESSION) RETURNS NIL REPORTS (AUTHENTICATION.ERROR SERVICE.ERROR SESSION.ERROR UNDEFINED.ERROR)) (CONTINUE 19 (SESSION) RETURNS (CARDINAL) REPORTS ( AUTHENTICATION.ERROR SESSION.ERROR UNDEFINED.ERROR)) (OPEN 2 (ATTRIBUTE.SEQUENCE HANDLE CONTROL.SEQUENCE SESSION) RETURNS (HANDLE) REPORTS (ACCESS.ERROR ATTRIBUTE.TYPE.ERROR ATTRIBUTE.VALUE.ERROR AUTHENTICATION.ERROR CONTROL.TYPE.ERROR CONTROL.VALUE.ERROR HANDLE.ERROR SESSION.ERROR UNDEFINED.ERROR)) (CLOSE 3 (HANDLE SESSION) RETURNS NIL REPORTS (AUTHENTICATION.ERROR HANDLE.ERROR SESSION.ERROR UNDEFINED.ERROR)) (CREATE 4 (HANDLE ATTRIBUTE.SEQUENCE CONTROL.SEQUENCE SESSION) RETURNS (HANDLE) REPORTS (ACCESS.ERROR ATTRIBUTE.TYPE.ERROR ATTRIBUTE.VALUE.ERROR AUTHENTICATION.ERROR CONTROL.TYPE.ERROR CONTROL.VALUE.ERROR HANDLE.ERROR INSERTION.ERROR SESSION.ERROR SPACE.ERROR UNDEFINED.ERROR)) (DELETE 5 (HANDLE SESSION) RETURNS NIL REPORTS (ACCESS.ERROR AUTHENTICATION.ERROR HANDLE.ERROR SESSION.ERROR UNDEFINED.ERROR)) (GET.ATTRIBUTES 8 (HANDLE ATTRIBUTE.TYPE.SEQUENCE SESSION) RETURNS (ATTRIBUTE.SEQUENCE) REPORTS (ACCESS.ERROR ATTRIBUTE.TYPE.ERROR AUTHENTICATION.ERROR HANDLE.ERROR SESSION.ERROR UNDEFINED.ERROR)) ( CHANGE.ATTRIBUTES 9 (HANDLE ATTRIBUTE.SEQUENCE SESSION) RETURNS NIL REPORTS (ACCESS.ERROR ATTRIBUTE.TYPE.ERROR ATTRIBUTE.VALUE.ERROR AUTHENTICATION.ERROR HANDLE.ERROR INSERTION.ERROR SESSION.ERROR SPACE.ERROR UNDEFINED.ERROR)) (COPY 10 (HANDLE HANDLE ATTRIBUTE.SEQUENCE CONTROL.SEQUENCE SESSION) RETURNS (HANDLE) REPORTS (ACCESS.ERROR ATTRIBUTE.TYPE.ERROR ATTRIBUTE.VALUE.ERROR AUTHENTICATION.ERROR CONTROL.TYPE.ERROR CONTROL.VALUE.ERROR HANDLE.ERROR INSERTION.ERROR SESSION.ERROR SPACE.ERROR UNDEFINED.ERROR)) (MOVE 11 (HANDLE HANDLE ATTRIBUTE.SEQUENCE SESSION) RETURNS NIL REPORTS (ACCESS.ERROR ATTRIBUTE.TYPE.ERROR ATTRIBUTE.VALUE.ERROR AUTHENTICATION.ERROR HANDLE.ERROR INSERTION.ERROR SESSION.ERROR SPACE.ERROR UNDEFINED.ERROR)) (STORE 12 (HANDLE ATTRIBUTE.SEQUENCE CONTROL.SEQUENCE BULK.DATA.SOURCE SESSION) RETURNS (HANDLE) REPORTS ( ACCESS.ERROR ATTRIBUTE.TYPE.ERROR ATTRIBUTE.VALUE.ERROR AUTHENTICATION.ERROR CONNECTION.ERROR CONTROL.TYPE.ERROR CONTROL.VALUE.ERROR HANDLE.ERROR INSERTION.ERROR SESSION.ERROR SPACE.ERROR TRANSFER.ERROR UNDEFINED.ERROR)) (RETRIEVE 13 (HANDLE BULK.DATA.SINK SESSION) RETURNS NIL REPORTS ( ACCESS.ERROR AUTHENTICATION.ERROR CONNECTION.ERROR HANDLE.ERROR SESSION.ERROR TRANSFER.ERROR UNDEFINED.ERROR)) (REPLACE 14 (HANDLE ATTRIBUTE.SEQUENCE BULK.DATA.SOURCE SESSION) RETURNS NIL REPORTS (ACCESS.ERROR ATTRIBUTE.TYPE.ERROR ATTRIBUTE.VALUE.ERROR AUTHENTICATION.ERROR CONNECTION.ERROR HANDLE.ERROR SESSION.ERROR SPACE.ERROR TRANSFER.ERROR UNDEFINED.ERROR)) (FIND 17 (HANDLE SCOPE.SEQUENCE CONTROL.SEQUENCE SESSION) RETURNS (HANDLE) REPORTS (ACCESS.ERROR AUTHENTICATION.ERROR CONTROL.TYPE.ERROR CONTROL.VALUE.ERROR HANDLE.ERROR SCOPE.TYPE.ERROR SCOPE.VALUE.ERROR SESSION.ERROR UNDEFINED.ERROR)) (LIST 18 (HANDLE ATTRIBUTE.TYPE.SEQUENCE SCOPE.SEQUENCE BULK.DATA.SINK SESSION) RETURNS NIL REPORTS (ACCESS.ERROR ATTRIBUTE.TYPE.ERROR ATTRIBUTE.VALUE.ERROR AUTHENTICATION.ERROR CONNECTION.ERROR HANDLE.ERROR SCOPE.TYPE.ERROR SCOPE.VALUE.ERROR SESSION.ERROR TRANSFER.ERROR UNDEFINED.ERROR))) ERRORS ((ATTRIBUTE.TYPE.ERROR 0 (ARGUMENT.PROBLEM ATTRIBUTE.TYPE)) ( ATTRIBUTE.VALUE.ERROR 1 (ARGUMENT.PROBLEM ATTRIBUTE.TYPE)) (CONTROL.TYPE.ERROR 2 (ARGUMENT.PROBLEM CONTROL.TYPE)) (CONTROL.VALUE.ERROR 3 (ARGUMENT.PROBLEM CONTROL.TYPE)) (SCOPE.TYPE.ERROR 4 ( ARGUMENT.PROBLEM SCOPE.TYPE)) (SCOPE.VALUE.ERROR 5 (ARGUMENT.PROBLEM SCOPE.TYPE)) (ACCESS.ERROR 6 ( ACCESS.PROBLEM)) (AUTHENTICATION.ERROR 7 ((AUTHENTICATION . PROBLEM))) (CONNECTION.ERROR 8 ( CONNECTION.PROBLEM)) (HANDLE.ERROR 9 (HANDLE.PROBLEM)) (INSERTION.ERROR 10 (INSERTION.PROBLEM)) ( SERVICE.ERROR 11 (SERVICE.PROBLEM)) (SESSION.ERROR 12 (SESSION.PROBLEM)) (SPACE.ERROR 13 ( SPACE.PROBLEM)) (TRANSFER.ERROR 14 (TRANSFER.PROBLEM)) (UNDEFINED.ERROR 15 (CARDINAL)))) (COURIERPROGRAM OLDFILING (10 2) INHERITS (FILING) PROCEDURES ((LOGON 0 (CREDENTIALS VERIFIER) RETURNS (SESSION) REPORTS (AUTHENTICATION.ERROR SERVICE.ERROR SESSION.ERROR UNDEFINED.ERROR)))) (/DECLAREDATATYPE (QUOTE FILINGSESSION) (QUOTE (FLAG (BITS 7) POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER WORD WORD POINTER POINTER POINTER))) (PUTPROPS FILING.ATTRIBUTE COURIERDEF (\GET.FILING.ATTRIBUTE \PUT.FILING.ATTRIBUTE)) (RPAQQ \NSFILING.NULL.HANDLE (0 0)) (RPAQQ \NSFILING.ATTRIBUTES ((CHECKSUM 0 CARDINAL) (CHILDREN.UNIQUELY.NAMED 1 BOOLEAN) (CREATED.BY 2 USER) (CREATED.ON 3 TIME) (FILE.ID 4 FILE.ID) (IS.DIRECTORY 5 BOOLEAN) (IS.TEMPORARY 6 BOOLEAN) ( MODIFIED.BY 7 USER) (MODIFIED.ON 8 TIME) (NAME 9 STRING) (NUMBER.OF.CHILDREN 10 CARDINAL) (ORDERING 11 ORDERING) (PARENT.ID 12 FILE.ID) (POSITION 13 (SEQUENCE UNSPECIFIED)) (READ.BY 14 USER) (READ.ON 15 TIME) (SIZE.IN.BYTES 16 LONGCARDINAL) (FILE.TYPE 17 LONGCARDINAL) (VERSION 18 CARDINAL) (ACCESS.LIST 19 ACCESS.LIST) (DEFAULT.ACCESS.LIST 20 ACCESS.LIST) (PATHNAME 21 STRING))) (RPAQQ \LISP.TO.NSFILING.ATTRIBUTES ((IWRITEDATE MODIFIED.ON) (IREADDATE READ.ON) (ICREATIONDATE CREATED.ON) (CREATIONDATE CREATED.ON) (READDATE READ.ON) (WRITEDATE MODIFIED.ON) (LENGTH SIZE.IN.BYTES ) (AUTHOR CREATED.BY) (PROTECTION ACCESS.LIST) (SIZE SIZE.IN.BYTES) (TYPE FILE.TYPE) (FILETYPE FILE.TYPE))) (RPAQ \NSFILING.USEFUL.ATTRIBUTE.TYPES (\FILING.ATTRIBUTE.TYPE.SEQUENCE (QUOTE (CREATED.ON FILE.ID IS.DIRECTORY MODIFIED.ON PATHNAME NAME READ.ON SIZE.IN.BYTES FILE.TYPE VERSION)))) (RPAQ? NSFILING.SHOW.STATUS T) (RPAQ? FILING.ENUMERATION.DEPTH T) (RPAQ? \NSFILING.LOCK (CREATE.MONITORLOCK (QUOTE NSFILING))) (RPAQ? \NSFILING.CONNECTIONS NIL) (RPAQ? \NSFILING.PROGRAM.NAME (QUOTE FILING)) (\NSFILING.INIT) (PUTPROPS NSFILING COPYRIGHT ("Xerox Corporation" 1983 1984 1985)) NIL