(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "17-Oct-2021 12:30:11" ("compiled on " {DSK}kaplan>Local>medley3.5>git-medley>sources>COURIER.;1) "16-Oct-2021 19:25:38" brecompiled explicitly%: \BULK.DATA.STREAM in "FULL 16-Oct-2021 ..." dated "16-Oct-2021 19:25:43") (FILECREATED " 2-Nov-93 13:53:08" |{PELE:MV:ENVOS}SOURCES>COURIER.;5| 75006 changes to%: ( FNS \MAKE.EXPEDITED.STREAM \COURIER.BROADCAST.ON.NET) previous date%: "28-Apr-92 17:35:17" |{PELE:MV:ENVOS}SOURCES>COURIER.;4|) COURIER.VERSION# :D8 NIL lNIL NIL () COURIERPROGRAM :D8 (I 0 X) @g@ (13 PUTDEF) (6 COURIERPROGRAMS) () \COURIER.CHECKDEF :D8 (P 0 TAIL I 1 DEF I 0 NAME) pAA3 Ad3 Xo@ dHdg:dg1dgH gH oH h(102 ERROR 89 \COURIER.CHECK.ERRORS 72 \COURIER.CHECK.PROCEDURES 30 ERROR) (79 ERRORS 61 PROCEDURES 52 INHERITS 43 TYPES) ( 95 "Courier definition not understood" 24 "Bad version specification in Courier def") \COURIER.CHECK.PROCEDURES :D8 (P 9 N P 8 ERRORS P 7 RESULTS P 6 ARGS P 2 INFO P 1 FNDEF I 0 DEFS) @QHhYhw`ilIZ3 :J[K1Jd3@'J\LJd3@J]Mi,@ J*h"IONgOgOh iXbJ_3 JdgJ^JZdgJ_OⰜgJ_O̰oI HX(233 ERROR 131 /RPLACD) (205 ERRORS 183 RESULTS 156 ARGS 117 REPORTS 110 RETURNS 23 COMMENTFLG) ( 227 "Bad Courier Procedure definition") \COURIER.CHECK.ERRORS :D8 (P 2 INFO P 1 ERRDEF I 0 DEFS) l@AHhYhI`?IZd3 [2K.Jg&J\LJ3 IJJh ioI HX(100 ERROR 86 /RPLACD) (50 ARGS 23 COMMENTFLG) ( 94 "Bad Courier Error definition") \COURIER.DELDEF :D8 (L (1 TYPE 0 NAME)) Ag@h` (20 PUTHASH) (15 \COURIERPROGRAM 5 COURIERPROGRAMS) () \COURIER.GETDEF :D8 (L (2 OPTIONS 1 TYPE 0 NAME)) Ag @` (19 GETHASH) (14 \COURIERPROGRAM 5 COURIERPROGRAMS) () \COURIER.PUTDEF :D8 (P 0 OLDINFO I 2 DEFINITION I 1 TYPE I 0 NAME F 1 DFNFLG) R@b` Xd@Ag @B` @BQio@ @Ag(70 EXEC-FORMAT 49 /PUTHASH 36 MARKASCHANGED 20 GETHASH) (78 CHANGED 44 \COURIERPROGRAM 31 DEFINED 15 \COURIERPROGRAM 8 LITATOM) ( 64 "(Courier program ~S redefined)~%%") \DUMP.COURIERPROGRAMS :D8 (P 3 TAIL P 2 PGMDEF P 1 PROGRAM I 0 NAMES F 4 PRETTYCOMFONT F 5 DEFAULTFONT) @!HhY` Zoh gh kh Th Ih Uh kh Jh J8dl T K U l Kl g ioI HX=(195 CL:FORMAT 182 TERPRI 176 PRIN1 160 PRINTDEF 149 TAB 141 CHANGEFONT 134 PRIN2 126 CHANGEFONT 119 TAB 104 PRIN2 95 SPACES 87 CHANGEFONT 79 PRIN2 71 CHANGEFONT 63 SPACES 55 PRIN2 43 PRIN1 31 TERPRI 21 GETHASH) (171 %) 49 COURIERPROGRAM 16 \COURIERPROGRAM) ( 189 "(no COURIER definition for ~S)~%%" 37 "(") \GET.COURIER.TYPE :D8 (I 1 TYPENAME I 0 PROGRAMNAME) @Ag (11 \GET.COURIER.DEFINITION) (6 TYPES) () \GET.COURIER.DEFINITION :D8 (P 2 OTHERPROGRAM I 3 PGMDEF I 2 TYPE I 1 NAME I 0 PROGRAM) Ad!d3@Ad3@AAhbbbAC@` bB'Oh_` g'_O_[OjKiJ0Od@AO NMh_M&OHk @ @ ؿgg@Ao ggHhYF'@ @ g@ `gACI HlIFIggEdgACI ACI h(435 \COURIER.HANDLE.ERROR 426 COURIER.SIGNAL.ERROR 379 \COURIER.TRACE 359 SPP.CLEAREOM 329 STREAMP 303 COURIER.READ 246 COURIER.READ 183 GETHASH 68 COURIER.READ 52 COURIER.READ) (414 RETURNERRORS 406 USE.COURIER 399 USE.COURIER 371 RETURN 365 COURIERTRACEFLG 351 SPP 344 FDEV 337 STREAM 314 UnknownResponseType 309 ERROR 291 REJECT 286 ERROR 189 ERRORS 178 \COURIERPROGRAM 138 INHERITS 128 ERRORS 121 ERROR) ( 298 (CHOICE (NoSuchService 0) (WrongVersionOfService 1 (RECORD (lowest CARDINAL) (highest CARDINAL))) (NoSuchProcedure 2) (invalidArguments 3) (unspecifiedError 65535))) COURIER.SIGNAL.ERROR :D8 (P 0 ARGS I 2 ERRORFORM I 1 PROCEDURE I 0 PROGRAM) 6BHdgoHo@oA H (51 ERROR 45 CONCAT) (12 REJECT) ( 39 "." 33 "Error in Courier procedure " 22 "Courier rejected call to ") \COURIER.HANDLE.BULKDATAA0001A0002 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 BULKDATAFN F 3 DATASTREAM) 3i@RSkRdgdghiSRRi (48 COURIER.READ.BULKDATA) (28 CL:LAMBDA 20 LAMBDA) () \COURIER.HANDLE.BULKDATAA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 2 ERROR P 1 BULKRESULTS P 0 A6599 I 0 SI::*CLEANUP-FORMS* F 4 DATASTREAM F 5 NOERRORFLG) >g 1HHTIgUi IgIJK(43 \BULK.DATA.CLOSE 14 \MVLIST 9 \COURIER.HANDLE.BULKDATAA0001A0002) (50 :ABORT 31 :ABORT 4 :BULKDATA) () \COURIER.HANDLE.BULKDATAA0003 :D8 (F 0 DATASTREAM) Pi (6 \BULK.DATA.CLOSE) NIL () \COURIER.HANDLE.BULKDATA :D8 (I 2 NOERRORFLG I 1 BULKDATAFN I 0 DATASTREAM) g @i $(21 \BULK.DATA.CLOSE 14 \MVLIST 9 \COURIER.HANDLE.BULKDATAA0001) (4 \COURIER.HANDLE.BULKDATAA0003) () \COURIER.HANDLE.ERROR :D8 (I 2 ERRORARGS I 1 PROCEDURE I 0 PROGRAM) c`\jd` o` @` o` A` o` B` (96 PRIN1 85 PRIN1 70 PRIN1 59 PRIN1 44 PRIN1 33 PRIN1 18 TAB) (91 PROMPTWINDOW 80 PROMPTWINDOW 65 PROMPTWINDOW 54 PROMPTWINDOW 39 PROMPTWINDOW 28 PROMPTWINDOW 13 PROMPTWINDOW 4 NSWIZARDFLG) ( 75 ": " 49 ", procedure " 23 "Error in Courier program ") \BULK.DATA.STREAM :D8 (P 2 NEXTPKT P 1 SUBSTREAM P 0 CON I 7 INTERNALFLG I 6 NOERRORFLG I 5 PROCDEF I 4 PGMDEF I 3 PROCEDURE I 2 PROGRAM I 1 MODE I 0 STREAM) @ o@ gW@AAg*Hhi Zd41k)J1 jH h@"Y,@h"IjIjIj l d` dn5`dK4dh2d`.dg*dg&dg$`dLdjdjdk dk dk0djdldhdjYHIBCDEFGhIA HI8Hg.`gBC Ik Io@  (401 ERROR 374 SPP.DSTYPE 366 \COURIER.TRACE 326 \SETACCESS 94 \GETSPP 64 \GETSPP 5 STREAMP) (394 FDEV 387 STREAM 359 BEGIN.BULK.DATA 353 COURIERTRACEFLG 346 \COURIER.ATTENTIONFN 341 SPPCON 332 SPPCON 303 STREAM 293 STREAM 230 FILELINELENGTH 222 \STREAM.NOT.OPEN 213 \STREAM.NOT.OPEN 204 \EOSERROR 195 \NOIMAGEOPS 178 \STREAM.DEFAULT.MAXBUFFERS 163 \SPP.BULKDATA.DEVICE 148 STREAM 138 STREAM 128 STREAM 118 STREAM 110 STREAM 102 STREAM 53 INPUT 42 STREAM 31 SPP 24 FDEV 17 STREAM) ( 381 "Courier bulk data not supported on stream of type") \COURIER.ATTENTIONFN :D8 (P 1 A6600 P 0 CON I 2 DSTYPE I 1 BYTE I 0 STREAM) AkDBk?@XH8b'`jd` o` ilj+@lj@ <@kIHgHk0(69 PRIN1 53 TAB) (147 SPPCON 138 \COURIER.OUTPUT.ABORTED 133 SPPCON 115 FDEV 108 STREAM 92 STREAM 76 STREAM 64 PROMPTWINDOW 48 PROMPTWINDOW 39 NSWIZARDFLG 28 SPPCON 18 STREAM) ( 59 "[Remote host aborted data transfer]") \COURIER.OUTPUT.ABORTED :D8 (P 2 RESULT P 1 CONTINUATION P 0 FILENAME I 0 STREAM) 0@Ygg @g Z@XJgHl @ljoooJoJ H@ (137 ERROR 128 CONCAT 78 \LISPERROR 48 \BULK.DATA.CLOSE 28 SI::INTERNAL-THROW) (85 STREAM 68 SPACE.ERROR 55 STREAM 43 RETURNERRORS 23 :ABORT 18 :BULKDATA 8 STREAM) ( 118 " -- " 110 " aborted: " 105 "Input" 99 "Output") \BULK.DATA.CLOSEA0001A0002A0003 :D8 (I 1 ABORTFLG I 0 STRM F 0 RESETSTATE) A@g*P @i (25 SPP.CLOSE) (12 \COURIER.EOF 7 STREAM) () \BULK.DATA.CLOSEA0001A0002 :D8 (NAME SI::*UNWIND-PROTECT* P 0 COURIERSTREAM I 0 SI::*CLEANUP-FORMS* F 1 CONTINUATION F 2 ABORTFLG F 3 CON F 4 SI::*RESETFORMS* F 5 STREAM) jS6gHRhhdTcRHg*Sh8HQQQQRQ UHU"(84 \COURIER.RESULTS) (99 STREAM 90 STREAM 51 SPPCON 42 ERROR! 37 STREAM 15 \BULK.DATA.CLOSEA0001A0002A0003 5 SPPCON) () \BULK.DATA.CLOSEA0001 :D8 (P 4 RESETSTATE P 3 SI::*RESETFORMS* P 2 LISPXHIST P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 5 LISPXHIST F 6 SI::NLSETQ-VALUE) -i@U!g $hc g(28 SI::RESETUNWIND 23 \MVLIST 18 \BULK.DATA.CLOSEA0001A0002) (42 :NORMAL 13 SI::RESETUNWIND) () \BULK.DATA.CLOSE :D8 (P 6 SI::*NLSETQFLAG* P 5 *PROCEED-CASES* P 4 SI::NLSETQ-VALUE P 3 A6602 P 2 A6601 P 1 CONTINUATION P 0 CON I 1 ABORTFLG I 0 STREAM F 7 *PROCEED-CASES*) @@Hh.H8h`gII @lj+@lj.@ <@kJA@k .@ &@ <@kKAib@ @hHh0@h@j`WM gL(229 \BULK.DATA.CLOSEA0001 172 \ABORT.BULK.DATA 134 SPP.SENDEOM 126 SPP.SENDATTENTION 59 \COURIER.TRACE) (235 :NORMAL 217 SI::NLSETQ-PROCEED-CASE 206 STREAM 197 STREAM 188 SPPCON 179 STREAM 149 FDEV 142 STREAM 105 FDEV 98 STREAM 82 STREAM 66 STREAM 49 END.BULK.DATA 43 COURIERTRACEFLG 33 SPPCON 24 SPPCON 13 STREAM 5 STREAM) () \ABORT.BULK.DATA :D8 (P 0 EPKT I 0 STREAM) Y@@@j @ djh#dlgdlgkg@k h(85 SPP.SENDATTENTION 26 \SPP.PREPARE.INPUT) (77 EOM 68 ATTENTION 55 END 34 STREAM 14 STREAM 8 STREAM) () COURIER.EXPEDITED.CALL :D8 (P 14 I P 10 ARGTYPES P 9 PROCDEF P 8 PGMDEF P 7 NOERRORFLG P 6 ARGLIST P 5 %#ARGS P 4 PROCEDURE P 3 PROGRAM P 2 SOCKET# P 1 ADDRESS P 0 ARGS) ekalalala K` oK _KLgO _d_ ]Oh__hoKL HMdl"P_dggOiOl Mla_gOgOioKL Mll2OdOO^IJKOLONOO a_"O O"h_ _Ok_O"&_ (228 COURIER.EXECUTE.EXPEDITED.CALL 186 ERROR 96 ERROR 69 LENGTH 57 \GET.COURIER.DEFINITION 41 ERROR 28 GETHASH) (165 RETURNERRORS 155 NOERROR 124 BULK.DATA.SOURCE 117 BULK.DATA.SINK 50 PROCEDURES 23 \COURIERPROGRAM) ( 178 "Wrong number of arguments to Courier procedure" 88 "Can't transfer bulk data with expedited call" 35 "No such Courier program") COURIER.EXECUTE.EXPEDITED.CALLA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 3 RESULT P 2 STREAM P 1 XIP P 0 NSOC I 0 SI::*CLEANUP-FORMS* F 4 SI::*RESETFORMS* F 5 NOERRORFLG F 6 PROGRAM F 7 PGMDEF F 8 PROCDEF F 9 ADDRESS F 10 PROCEDURE F 11 ARGLIST F 12 ARGTYPES F 13 SOCKET#)  1gHhhdTcHWWl YVWWWW 8WhUg ZBgJhhdTcJVWWWWWU IHVWWWU [gKUgo(125 \SEND.EXPEDITED.XIP 108 COURIER.EXECUTE.CALL 69 COURIER.OPEN 53 \BUILD.EXPEDITED.XIP 37 CREATE.PACKET.EXCHANGE.XIP 4 OPENNSOCKET) (142 RETURNERRORS 131 USE.COURIER 77 \SPP.RESETCLOSE 64 COURIER 12 CLOSENSOCKET) ( 150 (ERROR CONNECTION.PROBLEM NoResponse)) COURIER.EXECUTE.EXPEDITED.CALL :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 8 NOERRORFLG I 7 ARGTYPES I 6 ARGLIST I 5 PROCDEF I 4 PROCEDURE I 3 PGMDEF I 2 PROGRAM I 1 SOCKET# I 0 ADDRESS F 3 LISPXHIST) 2 `gBDF S!g $(43 SI::RESETUNWIND 38 \MVLIST 33 COURIER.EXECUTE.EXPEDITED.CALLA0001 18 \COURIER.TRACE) (28 SI::RESETUNWIND 10 CALL 4 COURIERTRACEFLG) () \BUILD.EXPEDITED.XIP :D8 (P 0 STREAM I 4 ARGLIST I 3 PROCDEF I 2 PGMDEF I 1 PROGRAM I 0 XIP) j @dl4YI4@j6@j7@l4lB @B:@C;@D$dg XADC hHlll#@(79 \COURIER.EXPEDITED.ARGS 68 \MAKE.EXPEDITED.STREAM 41 \PUTBASEFIXP 12 COURIER.VERSION#) (88 STREAM 63 OUTPUT) () \SEND.EXPEDITED.XIP :D8 (P 5 IXIP P 3 ID P 2 EVENT P 1 TIMER I 7 %#TRIES I 6 NOERRORFLG I 5 PROCDEF I 4 PROCEDURE I 3 PGMDEF I 2 PROGRAM I 1 NSOC I 0 XIP) &G`l jA @l1j 4k\HA@ IIl `I JIi A ]$dlEMdl1j Kjb4WM5KM6dldkdlih3i:l+M1l#@l'^NNnM gM ahdgg!Mg BCDEFi M LkԱ(284 RELEASE.XIP 278 \COURIER.RESULTS 266 \MAKE.EXPEDITED.STREAM 235 RELEASE.XIP 222 RELEASE.XIP 152 COURIER.VERSION# 141 COURIER.VERSION# 128 \GETBASEFIXP 102 GETXIP 95 AWAIT.EVENT 83 TIMEREXPIRED? 70 \CLOCK0 52 SENDXIP 34 \GETBASEFIXP 24 NSOCKETEVENT 16 \CLOCK0) (261 INPUT 252 USE.COURIER 245 USE.COURIER 228 USE.COURIER 75 \ETHERTIMEOUT 59 FIXP 8 \MAXETHERTRIES) () \COURIER.EXPEDITED.ARGS :D8 (P 3 TYPE P 2 VALUE I 3 ARGTYPES I 2 ARGLIST I 1 PROGRAM I 0 STREAM) 'CB"IHi@JAK IH(28 COURIER.WRITE) NIL () \MAKE.EXPEDITED.STREAM :D8 (P 1 END P 0 STREAM I 2 OSTREAM I 1 ACCESS I 0 XIP) Bl H` HA H@l"HllAg@#ln"lعlHHIIAgHg*HgH(28 \SETACCESS) (130 \COURIER.EXPEDITED.OVERFLOW 125 STREAM 116 \COURIER.EOF 111 STREAM 103 INPUT 90 STREAM 84 STREAM 57 INPUT 46 STREAM 34 STREAM 19 \BASEBYTESDEVICE 14 STREAM) () \COURIER.EOF :D8 (I 0 STREAM) o (9 ERROR) NIL ( 4 "Unexpected end of stream while reading Courier response") \COURIER.EXPEDITED.OVERFLOW :D8 (I 0 STREAM) /`` o` gh (44 RETFROM 32 PRIN1 16 TERPRI) (38 \COURIER.EXPEDITED.ARGS 27 PROMPTWINDOW 11 PROMPTWINDOW 4 NSWIZARDFLG) ( 22 "[Expedited call did not fit in one packet]") COURIER.BROADCAST.CALLA0001A0002 :D8 (L (0 RT) F 2 NEARBYNETS) )@HlRYddHH@hIhNIL NIL () COURIER.BROADCAST.CALLA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 10 PAIR P 8 NET P 6 NEARBYNETS P 5 RESULT P 4 ROUTINGTABLE P 3 EPKT P 2 SKT P 1 PROCDEF P 0 PGMDEF I 0 SI::*CLEANUP-FORMS* F 11 PROGRAM F 12 PROCEDURE F 13 MESSAGE F 14 RESULTFN F 15 SI::*RESETFORMS* F 16 NETHINT F 17 DESTSOCKET# F 18 ARGS)  W` oW aWWgH YgZhhdWcJ`W"l [dWHIW$ oWW W@JKHlLHkk@ KHmKNMJNlN iNk^hI I(135 DECODE-NS-STRING 50 %%ARRAY-OFFSET 30 %%ARRAY-BASE 14 ALLOCSTRING) (70 FDEV 63 STREAM) () COURIER.WRITE :D8 (P 34 A6632 P 33 WHICH P 32 NAMEANDVALUE P 31 NAMEANDTYPE P 28 VALUE P 27 NAMEANDTYPE P 24 BASETYPE P 23 SIZE P 22 X P 21 KEY P 19 A6631 P 0 X I 3 TYPE I 2 PROGRAM I 1 ITEM I 0 STREAM) #@Cd3@oCdg!@AkjYJ IJl QgCdg@A @Al )g @An[L KLl CgCdgC@A ]N MNl @An__O OOl g@A CdgW@Ao__O __O OOl OOn__O OOl ?g XBC X!@ABH @ABClO&C BC hd3@Cdge@ACCA O(0h Ag _ _O OO l _,O*O, O,iO(_(dg=CCO.A jAC Ad@O,BO0 Hdg@ABCC *dgO:_@O>O@AC @O@BO> O<_B@ @  Oh_OOjOM@AO O_Bd3@BBbbrBg X AB  @ABlO(422 \COURIER.UNKNOWN.TYPE 412 GETPROP 372 COURIER.SKIP 305 COURIER.SKIP 267 COURIER.SKIP.SEQUENCE 236 COURIER.SKIP 183 \COURIER.UNKNOWN.TYPE 153 \COURIER.UNKNOWN.TYPE 143 \GET.COURIER.TYPE 133 GETPROP) (407 COURIERDEF 317 CHOICE 282 NAMEDRECORD 274 RECORD 248 SEQUENCE 208 ARRAY 199 ENUMERATION 128 COURIERDEF 92 STRING 75 TIME 66 LONGINTEGER 57 LONGCARDINAL 44 INTEGER 35 UNSPECIFIED 26 CARDINAL 17 BOOLEAN) () COURIER.SKIP.SEQUENCE :D8 (I 2 BASETYPE I 1 PROGRAM I 0 STREAM) @ @ kYHh@AB Ik԰(23 COURIER.SKIP) NIL () \COURIER.TYPE.ERROR :D8 (I 1 TYPE I 0 ITEM) oA @ (16 ERROR 10 CONCAT) NIL ( 4 "Arg not of Courier type ") DECODE-NS-STRING :D8 (P 11 I P 10 CH P 9 CSET P 8 FATBASE P 7 FATSTR P 6 BYTEINC P 5 I P 4 FATLENGTH P 3 LASTOFFSET P 2 OFFSET P 1 BASE P 0 LENGTH I 0 STR) % @ @j@ @@j@ @JHjJkKM)IMlMk]KIMllkLkԼMNԽHLLhdi OjO OOjO O! J j_KOiIO_l*Ok_dKKIO_dlOk_i_-OOdiOOk_KIOƒjOOk_Ok_O@(160 %%ARRAY-OFFSET 140 %%ARRAY-BASE 122 ALLOCSTRING 41 %%ARRAY-OFFSET 21 %%ARRAY-BASE 5 NCHARS) NIL () COURIER.READ.BULKDATA :D8 (P 1 LASTSEGMENT? I 3 DONTCLOSE I 2 TYPE I 1 PROGRAM I 0 STREAM) 7@. H@ @ jh@AB IHC@ @(49 CLOSEF 35 \NCONC2 30 COURIER.READ.SEQUENCE) (5 STREAM) () BULKDATA.GENERATOR :D8 (L (2 TYPE 1 PROGRAM 0 STREAM)) j@ABhNIL NIL () BULKDATA.GENERATE.NEXT :D8 (P 1 CNT P 0 STREAM I 0 GENSTATE) D@@Ij@IkH@@ @hH H j@iH H Y(34 COURIER.READ) NIL () COURIER.WRITE.BULKDATA :D8 (P 2 SEGMENTLENGTH P 1 TAIL P 0 LEN I 3 TYPE I 2 PROGRAM I 1 ITEMLIST I 0 STREAM) gA AR@Hdldldjk[L KLl @J @Jl Jk^M@IIBC Nk԰HJٸIh(86 COURIER.WRITE 64 \BOUT 53 \BOUT 44 \BOUT 33 \BOUT 5 LENGTH) NIL () COURIER.ABORT.BULKDATA :D8 (I 0 ERROR) %@gg@ gg (34 SI::INTERNAL-THROW 18 SI::INTERNAL-THROW) (29 :ABORT 24 :BULKDATA 12 :ABORT 7 :BULKDATA) () COURIER.READ.REP :D8 (I 2 TEMPLATE I 1 PROGRAM I 0 LIST.OF.WORDS) @ AB (12 COURIER.READ 5 \MAKE.COURIER.REP.STREAM) NIL () COURIER.WRITE.REP :D8 (P 0 STREAM I 2 TYPE I 1 PROGRAM I 0 VALUE) ,H@AB HHj H(32 \BOUT 16 COURIER.WRITE 4 \MAKE.COURIER.REP.STREAM) (39 STREAM 22 STREAM) () COURIER.WRITE.SEQUENCE.UNSPECIFIED :D8 (P 19 A6663 P 18 LENGTH P 1 FN P 0 X I 3 TYPE I 2 PROGRAM I 1 ITEM I 0 STREAM) O0Cd3@Cdg1@j @k @AkjZK JKl gCdg)@j @k @A @Al g0@j @k @An\M LMl }CgCdgX@j @l @A _^O NOl @An__O OOl gbA A bdj lD@Ai @A kk__O OOl @A Cdgh@j @l @Ao_"_ O" __O OOl O O"n__O OOl `g@` HlHg$Hg&Hg*H@HNIL (123 STREAM 115 \COURIER.EOF 110 STREAM 102 \COURIER.REP.BOUT 97 STREAM 89 \COURIER.REP.BIN 84 STREAM 73 STREAM 65 \COURIER.REP.DEVICE 57 \NONPAGEDBOUTS 52 FDEV 47 \COURIER.REP.DEVICE 39 \NONPAGEDBINS 34 FDEV 29 \COURIER.REP.DEVICE 23 |FDEVTYPE#| 16 \COURIER.REP.DEVICE 11 STREAM) () \COURIER.REP.BIN :D8 (P 0 X I 0 STREAM) J@H@hH@Y@I o X@HlH(56 ERROR) (63 STREAM 39 STREAM 29 STREAM 18 STREAM 5 STREAM) ( 51 "Courier stream prematurely terminated") \COURIER.REP.BOUT :D8 (P 1 TAIL P 0 X I 1 BYTE I 0 STREAM) P@!H @AhAظ@@Y@HhZJ@hdH&NIL (68 STREAM 51 STREAM 40 STREAM 34 STREAM 19 STREAM 5 STREAM) () COURIER.READ.NSADDRESS :D8 (P 1 A6673 P 0 ADDR I 0 STREAM) %`@ >@Hjl lIHNIL (21 FDEV 14 STREAM 4 |NSADDRESSTYPE#|) () COURIER.WRITE.NSADDRESS :D8 (I 1 ADDR I 0 STREAM) %@AH @HIjl lJNIL (22 FDEV 15 STREAM 6 NSADDRESS) () COURIERTRACEA0001 :D8 (I 0 WINDOW) ,`lHj HH @g h(39 \CHANGE.ETHER.TRACING 26 \FZEROP) (34 COURIERTRACEFLG 4 LASTMOUSEBUTTONS) () COURIERTRACEA0003 :D8 (L (0 WINDOW)) @`hiNIL (20 COURIERTRACEFILE 14 COURIERTRACEFLG 5 COURIERTRACEFILE) () COURIERTRACEA0004 :D8 (I 0 WINDOW) !@`@g` h(24 PUTWINDOWPROP) (30 COURIERTRACEFLG 19 COURIERTRACEFLG 14 COURIERTRACEFLG 5 COURIERTRACEFILE) () COURIERTRACEA0005 :D8 (I 0 WINDOW) @`@gh (20 PUTWINDOWPROP) (25 COURIERTRACEFLG 14 COURIERTRACEFLG 5 COURIERTRACEFILE) () COURIERTRACE :D8 (I 1 REGION I 0 FLG) @%` ` ih` Ao `gg `gg `gg `gg gl ` @i` ` i(195 TOTOPW 185 DSPSCROLL 168 DSPFONT 158 FONTCREATE 146 PUTWINDOWPROP 126 PUTWINDOWPROP 106 PUTWINDOWPROP 86 PUTWINDOWPROP 60 CREATEW 47 ACTIVEWP 23 CLOSEW 12 ACTIVEWP) (190 COURIERTRACEFILE 180 COURIERTRACEFILE 174 COURIERTRACEFLG 163 COURIERTRACEFILE 151 GACHA 141 COURIERTRACEA0005 136 EXPANDFN 131 COURIERTRACEFILE 121 COURIERTRACEA0004 116 SHRINKFN 111 COURIERTRACEFILE 101 COURIERTRACEA0003 96 CLOSEFN 91 COURIERTRACEFILE 81 COURIERTRACEA0001 76 BUTTONEVENTFN 71 COURIERTRACEFILE 65 COURIERTRACEFILE 42 COURIERTRACEFILE 36 COURIERTRACEFLG 30 COURIERTRACEFILE 18 COURIERTRACEFILE 7 COURIERTRACEFILE) ( 55 "Courier Trace Window") \COURIER.TRACE :D8 (P 2 X P 1 FIRSTTIME I 3 ARGUMENTS I 2 PROCEDURE I 1 PROGRAM I 0 EVENT) ]@dgjd` A` o` B` o` C*`gg` CiHg` IhYk` J``` HXgPo` `gCgo` C``` @dg%`ggo` gg` (346 SHOULDNT 340 PRIN1 317 PRIN1 272 LVLPRINT 248 PRIN1 210 PRIN1 181 LVLPRIN2 157 SPACES 138 PRIN1 111 PRIN1 80 PRIN1 64 PRIN1 52 PRIN1 36 PRIN1 24 TAB) (335 COURIERTRACEFILE 330 } 323 END.BULK.DATA 312 COURIERTRACEFILE 301 { 294 PEEK 289 COURIERTRACEFLG 280 BEGIN.BULK.DATA 266 COURIERPRINTLEVEL 260 COURIERPRINTLEVEL 255 COURIERTRACEFILE 243 COURIERTRACEFILE 232 -- 220 PEEK 215 COURIERTRACEFLG 205 COURIERTRACEFILE 192 RETURN 175 COURIERPRINTLEVEL 169 COURIERPRINTLEVEL 164 COURIERTRACEFILE 152 COURIERTRACEFILE 133 COURIERTRACEFILE 128 %] 106 COURIERTRACEFILE 101 -- 93 PEEK 88 COURIERTRACEFLG 75 COURIERTRACEFILE 59 COURIERTRACEFILE 47 COURIERTRACEFILE 31 COURIERTRACEFILE 19 COURIERTRACEFILE 6 CALL) ( 307 "{bulk data" 238 "&" 200 " => " 70 "[" 42 ".") (PRETTYCOMPRINT COURIERCOMS) (RPAQQ COURIERCOMS ((COMS (* ; "COURIER Protocol") (DECLARE%: EVAL@COMPILE DONTCOPY (COMS * COURIERDECLS)) (COMS (* ; "COURIERPROGRAMS type") (INITVARS (\COURIERPROGRAM (HARRAY 20))) (GLOBALVARS \COURIERPROGRAM) (FILEPKGCOMS COURIERPROGRAMS) (FNS COURIER.VERSION# COURIERPROGRAM \COURIER.CHECKDEF \COURIER.CHECK.PROCEDURES \COURIER.CHECK.ERRORS \COURIER.DELDEF \COURIER.GETDEF \COURIER.PUTDEF \DUMP.COURIERPROGRAMS) (FNS \GET.COURIER.TYPE \GET.COURIER.DEFINITION)) (COMS (* ; "COURIER record access") (MACROS COURIER.FETCH COURIER.CREATE) (PROP INFO COURIER.FETCH COURIER.CREATE ) (FNS \COURIER.RECORDTRAN)) (COMS (* ; "COURIER calls and returns") (FUNCTIONS STREAMTYPECASE) (FNS COURIER.OPEN \COURIER.WHENCLOSED COURIER.CALL COURIER.EXECUTE.CALL \COURIER.RESULTS COURIER.SIGNAL.ERROR \COURIER.HANDLE.BULKDATA \COURIER.HANDLE.ERROR \BULK.DATA.STREAM \COURIER.ATTENTIONFN \COURIER.OUTPUT.ABORTED \BULK.DATA.CLOSE \ABORT.BULK.DATA)) (FNS COURIER.EXPEDITED.CALL COURIER.EXECUTE.EXPEDITED.CALL \BUILD.EXPEDITED.XIP \SEND.EXPEDITED.XIP \COURIER.EXPEDITED.ARGS \MAKE.EXPEDITED.STREAM \COURIER.EOF \COURIER.EXPEDITED.OVERFLOW) (FNS COURIER.BROADCAST.CALL \COURIER.BROADCAST.ON.NET) (FNS COURIER.READ \COURIER.UNKNOWN.TYPE COURIER.READ.SEQUENCE COURIER.READ.STRING COURIER.WRITE COURIER.WRITE.SEQUENCE COURIER.WRITE.STRING COURIER.WRITE.FAT.STRING COURIER.SKIP COURIER.SKIP.SEQUENCE \COURIER.TYPE.ERROR DECODE-NS-STRING) (FNS COURIER.READ.BULKDATA BULKDATA.GENERATOR BULKDATA.GENERATE.NEXT COURIER.WRITE.BULKDATA COURIER.ABORT.BULKDATA) (COMS (* ; "Reading/writing sequence unspecified in an interesting way") (FNS COURIER.READ.REP COURIER.WRITE.REP COURIER.WRITE.SEQUENCE.UNSPECIFIED \CWSU.DEFAULT COURIER.REP.LENGTH \MAKE.COURIER.REP.STREAM \COURIER.REP.BIN \COURIER.REP.BOUT) (INITVARS \COURIER.REP.DEVICE)) (COMS ( FNS COURIER.READ.NSADDRESS COURIER.WRITE.NSADDRESS) (PROP COURIERDEF NSADDRESS))) (COMS (* ; "Debugging") (INITVARS (COURIERTRACEFILE) (COURIERTRACEFLG) (COURIERPRINTLEVEL (QUOTE (2 . 4))) ( NSWIZARDFLG)) (GLOBALVARS COURIERTRACEFLG COURIERTRACEFILE COURIERPRINTLEVEL NSWIZARDFLG) (FNS COURIERTRACE \COURIER.TRACE)) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS ( NLAMA \DUMP.COURIERPROGRAMS COURIERPROGRAM) (NLAML) (LAMA COURIER.EXPEDITED.CALL COURIER.CALL))))) (RPAQ? \COURIERPROGRAM (HARRAY 20)) (PUTDEF (QUOTE COURIERPROGRAMS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (E (\DUMP.COURIERPROGRAMS . X))) CONTENTS NILL) (TYPE DESCRIPTION "Courier programs" GETDEF \COURIER.GETDEF DELDEF \COURIER.DELDEF PUTDEF \COURIER.PUTDEF)))) (PUTPROPS COURIER.FETCH MACRO (ARGS (\COURIER.RECORDTRAN ARGS (QUOTE FETCH)))) (PUTPROPS COURIER.CREATE MACRO (ARGS (\COURIER.RECORDTRAN ARGS (QUOTE CREATE)))) (PUTPROPS COURIER.FETCH INFO NOEVAL) (PUTPROPS COURIER.CREATE INFO NOEVAL) (DEFMACRO STREAMTYPECASE (STREAM &BODY FORMS) (BQUOTE (AND (STREAMP (\, STREAM)) (SELECTQ (fetch (FDEV DEVICENAME) of (fetch (STREAM DEVICE) of (\, STREAM))) (\,@ FORMS))))) (RPAQ? \COURIER.REP.DEVICE NIL) (PUTPROPS NSADDRESS COURIERDEF (COURIER.READ.NSADDRESS COURIER.WRITE.NSADDRESS 6)) (RPAQ? COURIERTRACEFILE) (RPAQ? COURIERTRACEFLG) (RPAQ? COURIERPRINTLEVEL (QUOTE (2 . 4))) (RPAQ? NSWIZARDFLG) (PUTPROPS COURIER COPYRIGHT ("Venue & Xerox Corporation" 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993)) NIL