(FILECREATED "28-Jun-85 18:08:48" ("compiled on " {ERIS}SOURCES>IOCHAR.;10) "22-Jun-85 19:27:36" brecompiled exprs: \UNPACKDATE in "INTERLISP-D 22-Jun-85 ..." dated "22-Jun-85 19:41:49") (FILECREATED "28-Jun-85 18:07:58" {ERIS}SOURCES>IOCHAR.;10 68291 changes to: (FNS \UNPACKDATE IDATE \OUTDATE \PACKDATE PACK PACK* \PACK.ITEM CHCON UNPACK) (VARS IOCHARCOMS) previous date: "11-Apr-85 17:40:25" {ERIS}SOURCES>IOCHAR.;7) SKREAD D1 (L (2 RDTBL 0 FILE) P 1 RRPTR I 1 REREADSTRING F 4 \LINEBUF.OFD) C@g Ak"HTo@ B` bIHB ZdltHB lugJdlrLk[IHB dltHB dludlrKk԰dlsKk[jhlqIHB lqlsgJdl`lpoJdlqIHB lqhj4IHB jIJH EHd22n2l.H (%JHHBAlJb"IIHB jhHd !Hd22n2lHd HB h(477Q READ 470Q \BACKFILEPTR 432Q \BACKFILEPTR 417Q \SKREAD/SKREADC 354Q \BACKFILEPTR 317Q \BACKFILEPTR 304Q \SKREAD/SKREADC 263Q \SKREAD/SKREADC 213Q \SKREAD/SKREADC 135Q \SKREAD/SKBRACKET 122Q \SKREAD/SKREADC 70Q \SKREAD/SKBRACKET 54Q \SKREAD/SKREADC 43Q \GTREADTABLE 31Q ERROR 6 \GETSTREAM) (231Q %) 100Q %] 40Q FILERDTBL 3 INPUT) ( 25Q "SKREAD NOT LEGAL FROM TTY") \SKREAD/SKBRACKET D1 (L (1 RDTBL 0 STRM) F 1 RRPTR) 9kQ@A dltHkԸdluHkXjhlqQ@A lq(60Q \SKREAD/SKREADC 11Q \SKREAD/SKREADC) NIL () \SKREAD/SKREADC D1 (L (2 RDTBL 1 STRM 0 USERRPTRFLG) F 13Q RRPTR F 14Q REREADSTRING) d  @WWdkc)Y9hcA ]lA ]lAd joA Al2A A BIljJIXdlFBjWWdkc)hcA [l4A [l Ad joA Al2A A (AK2KA A2nKA Kd A2KAdl Ldj𒿰lAi l A l LkjljIBYlGIgHAM2MA A2nMA Md A2MA_^dl *Odjl .lAi l A l l l l Okl l NYB_IljOIXddlFBjA _l7A _l Ad joA Al2A A -AO2OA A2nOA Od A2OA_dl Odj𒿰lAi l A l OkjljIBYlIgH(1064Q \PEEKBIN 730Q ERROR 556Q \PEEKBIN 362Q \PEEKBIN 236Q ERROR 72Q ERROR) (1136Q SKREAD 437Q SKREAD) ( 724Q "24-bit extended NS encoding not supported" 232Q "24-bit extended NS encoding not supported" 66Q "24-bit extended NS encoding not supported") CHCONA0001 D1 (L (0 CODE) F 0 \CHCONLSTAIL F 1 \CHCONLST) P @hccd@&cNIL NIL () CHCON D1 (L (2 RDTBL 1 FLG 0 X) P 4 \CHCONLSTAIL P 3 \CHCONLST) `A@dl @k@ jh@lX@@Cjhi@@IJkI2 ON/MHOHO_OOh__Ok_O&_Og@AB K(221Q \MAPCHARS) (213Q CHCONA0001) () UNPACKA0002 D1 (L (0 CODE) F 0 \CHCONLSTAIL F 1 \CHCONLST) ;@dl l9`@l ٍl0@@l0ل`@bP dhccd@&c(10Q CHARACTER) (43Q \OneCharAtomBase 21Q \OneCharAtomBase) () UNPACK D1 (L (2 RDTBL 1 FLG 0 X) P 4 \CHCONLSTAIL P 3 \CHCONLST) pA@dl @k@ jh@l@@@Cjhi@IJkI2 OOUMHOHO^dl l9`Nl ٍl0NNl0ل`N_OOh__Ok_O&_Og@AB K(272Q \MAPCHARS 161Q CHARACTER) (264Q UNPACKA0002 214Q \OneCharAtomBase 172Q \OneCharAtomBase) () DCHCONA0001 D1 (L (0 CODE) F 0 !SCRATCHTAIL) P Pdhhc@NIL NIL () DCHCON D1 (L (3 RDTBL 2 FLG 1 SCRATCHLIST 0 X) P 1 !SCRATCHTAIL P 0 !SCRATCHLIST) AhhAHY@Bl@dl!@k@ jh_@l@@@@_NOkNKJ.I IdhhYOMKMKKk[g@BC IHhHHIIhH LL(233Q FLAST 204Q \MAPCHARS) (176Q DCHCONA0001) () DUNPACKA0002 D1 (L (0 CODE) F 0 !SCRATCHTAIL) 8P Pdhhc@dl l9`@l ٍl0@@l0ل`@(27Q CHARACTER) (62Q \OneCharAtomBase 40Q \OneCharAtomBase) () DUNPACK D1 (L (3 RDTBL 2 FLG 1 SCRATCHLIST 0 X) P 1 !SCRATCHTAIL P 0 !SCRATCHLIST) AhhQHY@ B@dl$@k_@ jh_@!lw@@_@Cjhi_@_OOkOLKTI IdhhYONLNLZdl l9`Jl ٍl0JJl0ل`JLk\g@BC IHhHHIIhH MM(327Q FLAST 300Q \MAPCHARS 222Q CHARACTER) (272Q DUNPACKA0002 255Q \OneCharAtomBase 233Q \OneCharAtomBase) () UALPHORDER D1 (L (1 B 0 ARG1)) @A` (7 ALPHORDER) (4 UPPERCASEARRAY) () ALPHORDER D1 (L (2 CASEARRAY 1 B 0 A)) Q @dlk@@ jh?@@@@CjhiAdlHk_AA jhF@3A3h@AhA3AlAhiFAA_AACjhi_B`bXjBCkB JOJNpgA3hNOHOOLIOKIOKO"dOOO"_HOOOMOOMOOO*dO&O$O*_OOgOk_}NIL (504Q LESSP 326Q EQUAL 267Q ARRAYP 264Q \TRANSPARENT) () PACKC D1 (L (0 X)) P`'lhdi @jHIKjJi HhJlhl KJLJkԺIY(75Q \LISPERROR 42Q \MKATOM 14Q ALLOCSTRING) (55Q \\PNAMESTRING.GLOBALRESOURCE 47Q \\PNAMESTRING.GLOBALRESOURCE 2 \\PNAMESTRING.GLOBALRESOURCE) () CONCAT D1 (L (0 N)) eHjk3IjPIa]dN8MCj.h,lN%M jhIM ] NMCjhiJM غIkYJhdN IHIkعLKIa KIa ػL(173Q NCHARS 164Q RPLSTRING 143Q ALLOCSTRING 124Q NCHARS 101Q \SETARG0 75Q MKSTRING) NIL () PACK D1 (L (0 X) P 1 N P 0 \PNAMESTRING) k@@@ `#lhdi !k@HjIki HhZJdlHIdJ Ynhl J @b(141Q \PACK.ITEM 135Q RPLSTRING 130Q \LISPERROR 113Q NCHARS 51Q \MKATOM 26Q ALLOCSTRING 10Q \ILLEGAL.ARG) (63Q \\PNAMESTRING.GLOBALRESOURCE 55Q \\PNAMESTRING.GLOBALRESOURCE 14Q \\PNAMESTRING.GLOBALRESOURCE) () PACK* D1 (L (0 U) P 2 N P 1 \PNAMESTRING) le`+lhdi kdKdHIjJki Iha\LdlIJdL Znhl L Kk[(143Q \PACK.ITEM 137Q RPLSTRING 132Q \LISPERROR 115Q NCHARS 52Q \MKATOM 20Q ALLOCSTRING) (65Q \\PNAMESTRING.GLOBALRESOURCE 57Q \\PNAMESTRING.GLOBALRESOURCE 6 \\PNAMESTRING.GLOBALRESOURCE) () \PACK.ITEMA0001 D1 (L (0 CODE) F 0 N F 1 \PNAMESTRING) Plhl QPk@Pkc(12Q \LISPERROR) NIL () \PACK.ITEM D1 (L (0 ITEM)) g@ (6 \MAPCHARS) (2 \PACK.ITEMA0001) () STRPOS D1 (L (7 BACKWARDSFLG 6 CASEARRAY 5 TAIL 4 ANCHOR 3 SKIP 2 START 1 STRING 0 PAT)) :& @dlk@@ jh"@ b@@@@Cjhi_AdlkAA jh"A bAAAACjhi_KHk^j-BGNkbHjBjBBKkbkBhBNhCC bF `b FCjFCkF Mm]JmZFFFCkFMBGkmMDBGkNJlJHOjoF OOOOIJkIJkO,dO(O&O,_GOm_O Ok_O JOC,OOOOOLOLOO4dO0O.O4O$O"OkO8O6iCOOOOIO8IO8!OBdO>O