(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED " 2-Jul-2022 14:01:06" ("compiled on " {DSK}kaplan>local>medley3.5>working-medley>sources>SPP.;2) " 2-Jul-2022 11:43:22" brecompiled explicitly%: \CREATE.SPP.DEVICE in "FULL 2-Jul-2022 ..." dated " 2-Jul-2022 11:43:27") (FILECREATED "19-Jan-93 11:20:29" {DSK}lde>lispcore>sources>SPP.;3 107246 previous date%: " 5-Jan-93 02:24:51" {DSK}lde>lispcore>sources>SPP.;2) \SPPCONNECTION :D8 (P 0 CON I 2 NAME I 1 SKT# I 0 HOST) \@dA @ bhA @Hl@lĿHkHB@oH g H(88 \SPP.CREATE.WATCHER 77 CONCAT 72 SPP.DESTADDRESS 28 \SPP.CREATE.CON 16 \ILLEGAL.ARG 8 \COERCE.TO.NSADDRESS) (83 SPPSERVER 49 SPPCON) ( 66 "SPP#") \SPP.CREATE.CON :D8 (P 8 CON P 0 NSOC I 0 SKT#) @ q`ll ԹdIdlnndJdHH dK dldgFo dL@A @n*@g@ddi3 g@hhgAgggg HI:I(105 ADD.PROCESS 25 CREATE.MONITORLOCK 11 CREATE.EVENT) (99 DELETE 94 AFTEREXIT 89 HARDRESET 84 RESTARTABLE 78 NAME 66 QUOTE 49 \SPPWATCHER 44 SPPCON 33 SPPCON 19 SPPCON 5 SPPCON) () \SPP.SENDPKT :D8 (P 3 SEQNO P 2 BASE P 1 ALLOC# P 0 ACK# I 2 RETRANSMITP I 1 EPKT I 0 CON) -@@Al1SBo JHJI@nHIkkj\0LjhJj}J@$nK@$k0@K$@@&]Ml j&@@(^Nl @*(@jjdh@A @@"_Ol @@*@*"h(267 \CLOCK0 234 SENDXIP 191 \CLOCK0 155 \CLOCK0 34 HELP) (291 SPPCON 282 SPPCON 273 SPPCON 255 FIXP 246 SPPCON 240 SPPCON 226 SPPCON 210 SPPCON 197 SPPCON 180 FIXP 172 SPPCON 166 SPPCON 144 FIXP 136 SPPCON 130 SPPCON 120 SPPCON 105 SPPCON 91 SPPCON 49 SPPCON 13 SPPCON 5 SPPCON) ( 29 "RETRANSMITP on") \FILLINSPP :D8 (P 1 BASE P 0 EPKT I 2 DSTYPE I 1 CCONTROL I 0 CON) 2HnHl#@lHl1YAdABIBH(4 \ALLOCATE.ETHERPACKET) (13 ETHERPACKET) () \SPP.SYSPKT :D8 (P 1 BASE P 0 XIP I 1 CCBITS I 0 CON) R@4H1@ @H4Hl1YdAjlI@HHj(77 BLOCK 19 \FILLINSPP) (65 ETHERPACKET 53 SPPCON 26 SPPCON 5 SPPCON) () \GETSPPA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 2 \INTERRUPTABLE P 1 EPKT P 0 TIMER I 0 SI::*CLEANUP-FORMS* F 3 CON F 4 TIMEOUT F 5 PEEKFLG) Shg l T`SYsnSI4k^UYS SSkS0j'nSSkSd ITH S jhSS>Hi N(215 MONITOR.AWAIT.EVENT 177 TIMEREXPIRED? 167 \SPP.SENDPKT 162 \SPP.SYSPKT 96 \DEQUEUE 26 \CLOCK0 18 OBTAIN.MONITORLOCK) (206 SPPCON 198 SPPCON 184 SPPCON 147 SPPCON 139 SPPCON 123 SPPCON 109 SPPCON 103 SPPCON 89 SPPCON 65 SPPCON 51 SYSQUEUE 44 SPPCON 34 SPP.USER.TIMEOUT 13 WITH.MONITOR 5 SPPCON) () \GETSPP :D8 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 2 PEEKFLG I 1 TIMEOUT I 0 CON)  g $(22 SI::MONITOR-UNWIND 17 \MVLIST 12 \GETSPPA0001) (7 SI::MONITOR-UNWIND) () \SENDSPPA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 1 \INTERRUPTABLE P 0 SEQNO I 0 SI::*CLEANUP-FORMS* F 2 CON F 3 EPKT F 4 IGNOREALLOC) Rhg R jhnTR lӇR!R_Sl2RllĿRRXkRHlS HR!S1lSl1kRS iRR< X(188 MONITOR.AWAIT.EVENT 165 \SPP.SENDPKT 128 SETA 18 OBTAIN.MONITORLOCK) (181 SPPCON 173 SPPCON 136 SPPCON 116 SPPCON 101 SPPCON 95 SPPCON 67 SPPCON 59 SPPCON 46 SPPCON 27 SPPCON 13 WITH.MONITOR 5 SPPCON) () \SENDSPP :D8 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 2 IGNOREALLOC I 1 EPKT I 0 CON)  g $(22 SI::MONITOR-UNWIND 17 \MVLIST 12 \SENDSPPA0001) (7 SI::MONITOR-UNWIND) () \SPP.SEND.ENDREPLY :D8 (I 1 NOACK I 0 CON) @dAjl@ll i (23 \SENDSPP 17 \FILLINSPP) NIL () \TERMINATESPPA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 0 TIMER I 0 SI::*CLEANUP-FORMS* F 1 CON F 2 TIMEOUT) Qhg QDdldldjdkQk QlDhlQdlPl i QlDRjHl RnQQ>Hi QDdl𑿋lH QlDQ:Qh: h(217 DEL.PROCESS 181 TIMEREXPIRED? 155 MONITOR.AWAIT.EVENT 122 \CLOCK0 97 \SENDSPP 91 \FILLINSPP 18 OBTAIN.MONITORLOCK) (208 SPPCON 200 SPPCON 190 SPPCON 162 SPPCON 146 SPPCON 138 SPPCON 104 SPPCON 69 SPPCON 58 SPPCON 24 SPPCON 13 WITH.MONITOR 5 SPPCON) () \TERMINATESPP :D8 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 1 TIMEOUT I 0 CON)  g $(22 SI::MONITOR-UNWIND 17 \MVLIST 12 \TERMINATESPPA0001) (7 SI::MONITOR-UNWIND) () \SPP.CLEANUPA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 2 F P 1 FN P 0 INSTREAM I 0 SI::*CLEANUP-FORMS* F 3 CON) Shg S6Sk kjhS> S< `H` SBYBSSSh8h6h@SShi Sh:hdIdghdHSlJ(165 CLOSENSOCKET 99 DREMOVE 71 NOTIFY.EVENT 58 NOTIFY.EVENT 18 OBTAIN.MONITORLOCK) (189 LAMBDA 171 SPPCON 155 SPPCON 147 SPPCON 130 SPPCON 124 SPPCON 118 SPPCON 107 SPPCON 92 FDEV 87 \SPPDEVICE 81 FDEV 76 \SPPDEVICE 64 SPPCON 51 SPPCON 35 SPPCON 24 SPPCON 13 WITH.MONITOR 5 SPPCON) () \SPP.CLEANUP :D8 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 0 CON F 2 RESETSTATE) 'Rgh g $(32 SI::MONITOR-UNWIND 27 \MVLIST 22 \SPP.CLEANUPA0001) (17 SI::MONITOR-UNWIND 5 HARDRESET) () \SPPWATCHERA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 3 TIMER P 2 ACTIVITY P 1 ACKINTERVAL P 0 SOCEVENT I 0 SI::*CLEANUP-FORMS* F 6 SPPCON) Vhg V `llBV jhV Z+VhLV,\Ll jJ-Vj VjVH V"VV Vj.Vdd&I l@ VjJV$V([ V nVV knVV!kK SV JV,` V /KKl `V, սjMMjV jVHKi i(451 MONITOR.AWAIT.EVENT 407 CLOCKDIFFERENCE 389 \CLOCK0 370 \SPP.PROBE 363 \CLOCKGREATERP 343 \SPP.PROBE 335 TIMEREXPIRED? 275 \SPP.NOT.RESPONDING 265 TIMEREXPIRED? 222 \SPP.SENDPKT 217 \SPP.SYSPKT 208 \CLOCKGREATERP 176 \SPP.RETRANSMIT.NEXT 149 MONITOR.AWAIT.EVENT 103 \CLOCK0 65 \SPP.HANDLE.INPUT 31 NSOCKETEVENT 18 OBTAIN.MONITORLOCK) (441 SPPCON 424 SPPCON 400 SPPCON 394 SPP.USER.TIMEOUT 378 FIXP 358 SPP.USER.TIMEOUT 351 SPPCON 321 SPPCON 313 SPPCON 295 SPPCON 287 SPPCON 257 SPPCON 247 SPPCON 229 SPPCON 200 SPPCON 185 SPPCON 167 SPPCON 158 SPPCON 141 SPPCON 128 SPPCON 115 SPPCON 92 FIXP 84 SPPCON 74 SPPCON 51 SPPCON 36 SPP.USER.TIMEOUT 24 SPPCON 13 WITH.MONITOR 5 SPPCON) () \SPPWATCHER :D8 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 0 SPPCON F 2 SI::*RESETFORMS*) _g@hhdRc`gg @,@l j, g $(88 SI::MONITOR-UNWIND 83 \MVLIST 78 \SPPWATCHERA0001 60 \CLOCK0 36 PROCESSPROP) (73 SI::MONITOR-UNWIND 52 SPPCON 42 SPPCON 31 \SPP.INFO.HOOK 26 INFOHOOK 21 \RUNNING.PROCESS 4 \SPP.CLEANUP) () \SPP.HANDLE.INPUT :D8 (P 10 MAXALLOCNO P 9 NEWALLOCNO P 8 ADDRESSEDID P 7 ALLOCINCREASED P 6 ACKRECEIVED P 5 ACKED P 4 ATTN P 3 ACTIVE? P 2 PKTSEQNO P 1 SPPBASE P 0 XIP I 0 CON)   @ j@ X>N9O5n@@ k@@@ K$dlBHl1й@jI@I_@YOjS@HolH1l@k H i@Jg_H@lOIn@Jn knJ@lk@HoT@j@H @ jiI j8Ij@HoH#ll k@Ho H {inI]@ k@M nI_@!kLn@ l_OnO_@!k@O!i_@< Ij@kIjH @H @$gM@$M@P@l@*`@& d``_dOO*@h$iL_@H T(685 \SPP.HANDLE.ATTN 630 CLOCKDIFFERENCE 561 \SPP.HANDLE.DATA 553 RELEASE.XIP 521 NOTIFY.EVENT 424 \SPP.RELEASE.ACKED.PACKETS 390 RELEASE.XIP 383 \SPPSENDERROR 316 \SPP.ESTABLISH 198 \RELEASE.ETHERPACKET 30 GETXIP) (667 SPPCON 644 SPP.USER.TIMEOUT 636 SPP.USER.TIMEOUT 623 SPPCON 617 SPP.MIN.TIMEOUT 609 SPPCON 601 SPPCON 590 SPPCON 579 SPPCON 568 SPPCON 535 SPPCON 514 SPPCON 499 SPPCON 484 SPPCON 457 SPPCON 439 SPPCON 409 SPPCON 323 SPPCON 302 SPPCON 275 SPPCON 250 SPPCON 225 SPPCON 215 RELEASE.XIP 206 SPPCON 187 SPPCON 145 SPPCON 129 SPPCON 114 SPPCON 87 SPPCON 81 SPPCON 72 SPPCON 57 SPPCON 49 SPPCON 23 SPPCON 8 SPPCON) ( 378 "More than 1 byte of data in Attention packet?" 356 "Both System and Attention control bits?" 294 "Packet out of allocation sequence." 163 "Wrong connection ID.") \SPP.HANDLE.DATA :D8 (P 6 OUTSTREAM P 5 PKTNO P 4 NEXT P 3 CURRENT P 2 XIPNO P 1 INQ P 0 ACKNO I 1 XIP I 0 CON) e@@A43nHJkA hI[nJI4kIA JnK4]Jk0AKIA+K\4nMJkALKALJMA A1dlB@lD@@Nh Ng&@ @lDElA@Ddll@i @Ao @lD@k kJHAb @Jk@> 4]JkM(337 NOTIFY.EVENT 270 \SPPSENDERROR 257 \SPP.SEND.ENDREPLY 214 \SPP.SEND.ENDREPLY 193 \SETACCESS 152 RELEASE.XIP 78 \ENQUEUE 38 RELEASE.XIP) (330 SPPCON 317 SPPCON 288 SPPCON 277 SPPCON 238 SPPCON 221 SPPCON 205 \SPP.STREAM.LOST 200 STREAM 181 SPPCON 170 SPPCON 106 SYSQUEUE 61 SYSQUEUE 46 SYSQUEUE 13 SPPCON 5 SPPCON) ( 265 "unexpected ENDREPLY") \SPP.HANDLE.ATTN :D8 (P 5 FN P 3 STREAM P 2 DSTYPE P 1 BYTE P 0 ATTENTIONFN I 1 XIP I 0 CON F 6 LAMBDASPLST) @.A7A1HHd dV hLGhA`;jd` o` I` o` h@6IJlMMiL\(111 PRIN1 95 PRIN1 83 PRIN1 67 TAB 34 MEMB) (121 SPPCON 106 PROMPTWINDOW 90 PROMPTWINDOW 78 PROMPTWINDOW 62 PROMPTWINDOW 53 NSWIZARDFLG 5 SPPCON) ( 101 ")]" 73 "[Attention packet (") \SPP.RELEASE.ACKED.PACKETS :D8 (P 4 \INTERRUPTABLE P 3 XIP P 2 MAXACKNO P 1 OLDACKNO P 0 POOL I 1 ACKNO I 0 CON) |@@ @nAIkhIJ` oA HIl HIlh K @IkY @h(95 RELEASE.XIP 88 SETA 73 ELT 62 HELP) (116 SPPCON 102 SPPCON 49 XIPTRACEFLG 21 SPPCON 13 SPPCON 5 SPPCON) ( 56 "SPP Partner acked a packet I haven't sent yet") \SPP.NOT.RESPONDING :D8 (I 0 CON) @@LjkHILI`4@j@,` @k kjh@`@*lHdII*@ @jx@L`lf@,` 5` `g ` o` @@LmHILIh(232 PRIN1 217 PRIN1 207 PROCESSPROP 192 TERPRI 180 \CLOCKGREATERP 128 \SPP.PROBE 68 \CLOCKGREATERP) (245 SPPCON 239 SPPCON 227 PROMPTWINDOW 212 PROMPTWINDOW 202 NAME 197 \RUNNING.PROCESS 187 PROMPTWINDOW 173 SPP.INACTIVITY.TIMEOUT 166 SPPCON 154 SPP.MAX.FAILED.PROBES 147 SPPCON 134 SPPCON 104 SPPCON 98 SPP.USER.TIMEOUT 93 SPPCON 76 SPPCON 63 SPP.INACTIVITY.TIMEOUT 56 SPPCON 43 SPPCON 33 SPP.MAX.FAILED.PROBES 11 SPPCON 5 SPPCON) ( 222 " not responding. ") \SPP.PROBE :D8 (I 0 CON) @dl@ (13 \SPP.SENDPKT 8 \SPP.SYSPKT) NIL () \SPP.RETRANSMIT.NEXT :D8 (P 1 XIP P 0 SEQNO I 0 CON) O@@Hl Ydl1kkjh@HkX@hH@I h(75 \SPP.SENDPKT 27 ELT) (59 SPPCON 48 SPPCON 16 SPPCON 5 SPPCON) () \SPP.DUPLICATE.REQUEST :D8 (P 3 CONNECTION P 2 INSTREAM P 1 SOURCEID I 0 XIP) 9`@2"HhZ[IKJiHXNIL (41 SPPCON 30 STREAM 9 FDEV 4 \SPPDEVICE) () \SPP.ESTABLISHA0005 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 CON) Phg P (24 \SPP.PROBE 18 OBTAIN.MONITORLOCK) (13 WITH.MONITOR 5 SPPCON) () \SPP.ESTABLISH :D8 (P 4 SI::*RESETFORMS* P 3 SI::*LOCKED-MONITOR* P 2 NAME P 1 INSTREAM P 0 CON I 1 XIP I 0 INITCON) 40@ j@XlAl+lİyA  XlAl+lĿ@:g gH H@..H@BBH@FFHA2Hh4HkkjhHlDHkkjhJPH HJ  g $@HId hgg H> h(304 NOTIFY.EVENT 290 ADD.PROCESS 271 SPPOUTPUTSTREAM 251 SI::MONITOR-UNWIND 246 \MVLIST 241 \SPP.ESTABLISHA0005 227 \SPP.CREATE.WATCHER 219 \SPP.CREATE.STREAMS 96 CONCAT 91 OCTALSTRING 73 PROCESSPROP 43 \SPP.CREATE.CON 34 \SPP.DUPLICATE.REQUEST) (297 SPPCON 285 DELETE 280 AFTEREXIT 262 SPPCON 236 SI::MONITOR-UNWIND 200 SPPCON 190 SPPCON 174 SPPCON 165 SPPCON 154 SPPCON 143 SPPCON 137 SPPCON 126 SPPCON 120 SPPCON 109 SPPCON 103 SPPCON 84 SPPCON 78 + 68 NAME 61 SPPCON 8 SPPCON) () \SPPGETERROR :D8 (I 2 MOREMSG I 1 TRIALPKT I 0 CON) U`No` ` Ah` Bjd` B` ` (82 TERPRI 71 PRIN1 59 TAB 44 PRINTPACKET 32 TERPRI 21 PRIN1) (77 XIPTRACEFILE 66 XIPTRACEFILE 54 XIPTRACEFILE 39 XIPTRACEFILE 27 XIPTRACEFILE 16 XIPTRACEFILE 4 XIPTRACEFLG) ( 11 "Error packet received on Sequenced Packet Protocol connection.") \SPPSENDERROR :D8 (I 2 MSG I 1 EPKT I 0 CON) ;``.B` ` Ah` ` (56 TERPRI 46 PRINTPACKET 34 TERPRI 23 PRIN1) (51 XIPTRACEFILE 41 XIPTRACEFILE 29 XIPTRACEFILE 18 XIPTRACEFILE 10 NSWIZARDFLG 4 XIPTRACEFLG) () \INITSPP :D8 NIL Ghgg  `g hgg  (68 \DEFINEDEVICE 58 \CREATE.SPP.DEVICE 25 \DEFINEDEVICE 15 \CREATE.SPP.DEVICE) (63 \SPP.BULKDATA.DEVICE 53 \BULK.DATA.CLOSE 48 COURIER.BULK.DATA 40 \SPP.EVENTFN 35 FDEV 30 \SPPDEVICE 20 \SPPDEVICE 10 SPP.CLOSE 5 SPP) () \SPP.EVENTFN :D8 (P 0 STREAM I 1 EVENT I 0 DEVICE) ,Ag#@h dHi h(35 SPP.CLOSE 22 \APPEND2) (14 FDEV 5 BEFORELOGOUT) () \CREATE.SPP.DEVICE :D8 (I 1 CLOSEFN I 0 NAME) `d@dk@dkpdg dgbdAdg,dg.dgdg@dgZdgNdgRd`hdgPdgHdg*dg dgdgdgdg dgNIL (240 NILL 231 NILL 222 \GENERIC.RENAMEFILE 213 NILL 204 NILL 195 NILL 186 NILL 177 \GENERIC.CHARSET 168 \IS.NOT.RANDACCESSP 159 *DEFAULT-EXTERNALFORMAT* 150 \SPP.SETFILEPTR 141 \SPP.GETFILEPTR 132 \SPP.GETNEXTBUFFER 123 \SPP.BOUTS 114 \BUFFERED.BINS 105 SPP.FORCEOUTPUT 96 SPP.BACKFILEPTR 87 \BUFFERED.PEEKBIN 78 SPP.READP 69 SPP.EOFP 60 \BUFFERED.BOUT 51 \BUFFERED.BIN 37 NILL 28 NILL 4 |FDEVTYPE#|) () SPP.OPENA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 3 TAIL P 2 TIMER P 1 SERVERFN P 0 CON I 0 SI::*CLEANUP-FORMS* F 4 HOST F 5 SI::*RESETFORMS* F 6 PROPS F 7 SOCKET F 8 NAME F 9 PROBEP) TWW Hhi oHhUc TNVg'I/Hk HIH%HH> HjiHjWiH l n Hlj ld``HjiEJ 0Hk H H: H jhVHH>Ji dKdgHKBfdgHK.PdgHKF:dgHKkjgK HKJxH (465 \SPP.CREATE.STREAMS 436 FNTYP 317 MONITOR.AWAIT.EVENT 268 BLOCK 262 WAKE.PROCESS 248 RELEASE.MONITORLOCK 222 TIMEREXPIRED? 178 NSNET.DISTANCE 173 \GETBASEFIXP 160 \CLOCK0 151 \SPP.PROBE 107 MONITOR.AWAIT.EVENT 27 OBTAIN.MONITORLOCK 9 \SPPCONNECTION) (443 SPPCON 425 OTHERXIPHANDLER 408 SPPCON 398 EOM.ON.FORCEOUT 385 SPPCON 376 ERRORHANDLER 363 SPPCON 354 ATTENTIONFN 341 SPPCON 332 CLOSEFN 308 SPPCON 300 SPPCON 276 SPPCON 255 SPPCON 241 SPPCON 230 SPPCON 207 SPPCON 197 SPP.USER.TIMEOUT 189 SPP.USER.TIMEOUT 132 SPPCON 114 SPPCON 100 SPPCON 92 SPPCON 80 SPPCON 69 SPPCON 56 SERVER.FUNCTION 38 SPPCON 18 SPPCON) ( 32 (AND RESETSTATE (CLOSENSOCKET OLDVALUE T))) SPP.OPEN :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 4 PROPS I 3 NAME I 2 PROBEP I 1 SOCKET I 0 HOST F 3 LISPXHIST) S!g $(23 SI::RESETUNWIND 18 \MVLIST 13 SPP.OPENA0001) (8 SI::RESETUNWIND) () \SPP.CREATE.STREAM :D8 (I 0 ACCESS) l d` dn5`HdI4dh2d`.dg*dg&dg$`HdIdjdjdk dk dk0djdldhdjd@ (147 \SETACCESS) (79 FILELINELENGTH 71 \STREAM.NOT.OPEN 62 \STREAM.NOT.OPEN 53 \EOSERROR 44 \NOIMAGEOPS 23 \STREAM.DEFAULT.MAXBUFFERS 8 \SPPDEVICE) () SPP.DESTADDRESS :D8 (P 1 ADDRESS P 0 CON I 0 STREAM) %@@@`IHllINIL (21 |NSADDRESSTYPE#| 14 STREAM 5 SPPCON) () SPPOUTPUTSTREAM :D8 (P 0 CON I 0 SPPINPUTSTREAM) @HH@@ (28 \SPP.STREAM.LOST) (18 SPPCON 5 STREAM) () SPP.OPENP :D8 (P 0 CON I 0 STREAM) )@d" @Xd jhh(11 SPPSTREAMP) (29 SPPCON 19 STREAM) () \STREAM.FROM.PACKET :D8 (I 0 EPKT) @l4j@#l$g (20 \MAKEBASEBYTESTREAM) (15 INPUT) () SPP.FORCEOUTPUT :D8 (P 6 \INTERRUPTABLE P 1 EPKT P 0 CON I 0 STREAM) @QH2Y@H6H@bIl"d@@d[KLZJLKKkHh2@j@j@hHjIl1k0H0jHj0H@kMHI @ h(240 \SPP.STREAM.LOST 233 \SENDSPP) (216 SPPCON 205 SPPCON 192 SPPCON 171 SPPCON 161 STREAM 151 STREAM 141 STREAM 131 SPPCON 118 STREAM 112 STREAM 91 STREAM 85 STREAM 76 STREAM 63 STREAM 42 SPPCON 32 SPPCON 16 SPPCON 5 STREAM) () SPP.FLUSH.TO.EOF :D8 (I 0 INSTREAM) R@ @@@ dk@j gdl@ @ lg(66 SPP.CLEARATTENTION 5 \SPP.PREPARE.INPUT) (79 EOF 53 EOM 45 STREAM 32 STREAM 19 STREAM 13 STREAM) () SPP.SENDEOM :D8 (P 2 A0233 P 1 EPKT P 0 CON I 0 STREAM) @@lj=@lj@ <@kJH@b@ H2@H @ l1k0kjh@ h(129 SPP.FORCEOUTPUT 110 \SPP.STREAM.LOST 102 \SPP.PREPARE.OUTPUT 84 \SPP.STREAM.LOST) (91 SPPCON 73 SPPCON 55 FDEV 48 STREAM 32 STREAM 16 STREAM 5 STREAM) () SPP.CLEAREOM :D8 (P 1 FLG P 0 CON I 1 NOERRORFLG I 0 STREAM) :@@ @ k@j iAo@ h(53 ERROR 16 \SPP.PREPARE.INPUT) (35 STREAM 24 STREAM 5 STREAM) ( 47 "SPP.CLEAREOM - not at end of message") SPP.SENDATTENTION :D8 (P 1 EPKT P 0 CON I 2 CC I 1 ATTENTIONBYTE I 0 STREAM) 4@HBjl YdA7Il"dkHIi (49 \SENDSPP 23 \FILLINSPP) (5 STREAM) () SPP.CLEARATTENTION :D8 (P 2 \INTERRUPTABLE P 1 FLG P 0 CON I 1 NOERRORFLG I 0 STREAM) I@@ '@ l@j @kiAo@ h(68 ERROR 16 \SPP.PREPARE.INPUT) (50 STREAM 40 STREAM 24 STREAM 5 STREAM) ( 62 "SPP.CLEARATTENTION - not at attention packet") SPP.CLOSE :D8 (P 1 SUBSTREAM P 0 CON I 1 ABORT? I 0 STREAM) R @dXd jhH8YA@ H jIib (77 \BULK.DATA.CLOSE 55 \TERMINATESPP 48 SPP.FORCEOUTPUT) (61 STREAM 35 SPPCON 21 SPPCON 11 STREAM) () \SPP.CLOSE.IF.ERROR :D8 (I 0 STREAM F 0 RESETSTATE) P @i (9 SPP.CLOSE) NIL () \SPP.RESETCLOSE :D8 (I 0 STREAM F 0 RESETSTATE) @P (6 SPP.CLOSE) NIL () SPP.BACKFILEPTR :D8 (I 0 STREAM) )@j@@mHIIhNIL (23 STREAM 17 STREAM 5 STREAM) () \SPP.GETFILEPTR :D8 (I 0 STREAM) @@@NIL (22 STREAM 13 STREAM 5 STREAM) () \SPP.SETFILEPTR :D8 (P 1 SKIPBYTES P 0 CON I 1 INDX I 0 STREAM) 4@@kjA@ Y@I @ (49 \IS.NOT.RANDACCESSP 42 \SPP.SKIPBYTES 31 \SPP.GETFILEPTR) (16 STREAM 5 STREAM) () \SPP.SKIPBYTES :D8 (P 2 A0234 P 1 CONDITION P 0 BYTESLEFT I 1 NBYTES I 0 STREAM) o @ Y!@F@IlJYiIA@@XAHb@@@@Ah(8 \SPP.PREPARE.INPUT) (101 STREAM 95 STREAM 82 STREAM 76 STREAM 57 STREAM 49 STREAM 24 SPPCON 17 STREAM) () \SPP.BOUTS :D8 (P 0 CON I 3 NBYTES I 2 OFF I 1 BASE I 0 STREAM) 8@Hh@H6H@@ @ ABC (53 \BUFFERED.BOUTS 44 \SPP.STREAM.LOST) (32 SPPCON 22 SPPCON 5 STREAM) () \SPP.OTHER.BOUT :D8 (I 1 BYTE I 0 STREAM) @ @ A (19 \BOUT 13 \SPP.STREAM.LOST 5 SPPOUTPUTSTREAM) NIL () \SPP.GETNEXTBUFFER :D8 (P 2 A0235 P 1 ERRCODE P 0 CON I 2 NOERRORFLG I 1 WHATFOR I 0 STREAM)  Adg3@ YigB@F@IlJhgJ@X@H6H@@H g g @ hi (146 SHOULDNT 140 RETFROM 132 \SPP.STREAM.LOST 124 STKPOS 112 STKPOS 100 \SPP.PREPARE.OUTPUT 19 \SPP.PREPARE.INPUT) (119 \BUFFERED.BOUTS 107 \BUFFERED.BOUT 85 SPPCON 75 STREAM 66 WRITE 47 SPPCON 40 STREAM 29 EOM 9 READ) () \SPP.STREAM.LOST :D8 (P 0 A0236 I 0 STREAM) @F@glHNIL (23 STREAM.LOST 12 SPPCON 5 STREAM) () \SPP.DEFAULT.ERRORHANDLER :D8 (P 0 CON I 1 CONDITION I 0 STREAM) YAdgo@@ g*@H @ Nk@ @ (86 \EOF.ACTION 79 \COURIER.OUTPUT.ABORTED 60 \EOF.ACTION 31 ERROR) (66 SPPCON 46 STREAM 37 ATTENTION 21 STREAM 6 STREAM.LOST) ( 15 "Connection lost") \SPP.PREPARE.INPUT :D8 (P 9 \INTERRUPTABLE P 5 SPPDSTYPECHANGEFN P 4 NEW.DSTYPE P 3 OLD.DSTYPE P 2 CONDITION P 1 EPKT P 0 CON I 1 TIMEOUT I 0 STREAM)  @H0YI@@h@ lg @d__OO^NOOOk@@jjHh0@hI1!j@k I @ djh$dlgdlgkgZHA YAgg1\lLdl@l gk@ @Il7@j@I1 j@l jI#l*HI0HNHLNKLvHP]i@KLlM^(256 \GETSPP 195 RELEASE.XIP) (423 SPPCON 405 SPPCON 395 SPPCON 385 SPPCON 363 STREAM 350 STREAM 340 STREAM 327 STREAM 314 STREAM 304 END 295 STREAM 272 STREAM.LOST 266 BIN.TIMEOUT 246 EOM 236 ATTENTION 223 END 202 STREAM 184 STREAM 167 STREAM 157 SPPCON 143 STREAM 137 STREAM 124 STREAM 117 STREAM 93 STREAM 86 STREAM 74 STREAM 63 ATTENTION 52 STREAM 39 STREAM 31 STREAM 16 SPPCON 5 STREAM) () \SPP.PREPARE.OUTPUT :D8 (P 0 EPKT I 1 CON I 0 STREAM) H@ A j5A AH2@Hl7@j@nH(24 \FILLINSPP 5 SPP.FORCEOUTPUT) (63 STREAM 54 STREAM 42 STREAM 33 SPPCON 11 SPPCON) () SPP.DSTYPE :D8 (P 3 A0237 P 2 CONDITION P 1 EPKT P 0 CON I 2 NOBLOCK I 1 DSTYPE I 0 STREAM) @!AH2YIA1HAA@kjHBHNH02@ Z!@F@JlKZiJH01(93 \SPP.PREPARE.INPUT) (133 SPPCON 109 SPPCON 102 STREAM 83 SPPCON 73 SPPCON 61 SPPCON 47 STREAM 35 SPPCON 19 SPPCON 5 STREAM) () SPP.READP :D8 (I 0 STREAM) <@kj@ l @@i@j h(55 \SPP.PREPARE.INPUT 26 \LISPERROR 19 FULLNAME) (41 STREAM 33 STREAM 5 STREAM) () SPP.EOFP :D8 (I 0 STREAM) E@kji@@ @ HdgHdgh(41 \SPP.PREPARE.INPUT) (63 STREAM.LOST 53 END 29 STREAM 21 STREAM 5 STREAM) () SPPSTREAMP :D8 (I 0 STREAM) @NIL (12 SPPCON 5 STREAM) () PPSPPA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 1 NEXT P 0 I I 0 SI::*CLEANUP-FORMS* F 2 CON) Poh R RnIHkh RHl HkӸ(70 PRINTSPP 65 ELT 47 TERPRI 10 PRIN1) (54 SPPCON 24 SPPCON 16 SPPCON) ( 4 " Awaiting ack: ") PPSPP :D8 (P 3 SI::*RESETFORMS* P 2 ADDRESS P 1 N P 0 STR I 2 DETAILS I 1 FILE I 0 CON)  Ag boA `J@llĿJA oA @A A oA `J@llĿJA oA @A A @jo5oA @djoko@A @ joA @$@A oA o@& oA oA A oA o@*oA oA A oA o@, oA oA A A oA A oA @A A oA @@kA A @6A @0kj@ YjoA IA A A oA A oA @A @@ ooA @ A A oA @!@kA A @@A B0gA hhhg $@8X=A oA H A oA A HA h(922 PPSPPSTREAM 914 TERPRI 907 PRIN1 895 PRIN1 889 \GETACCESS 882 PRIN1 870 TERPRI 848 SI::RESETUNWIND 843 \MVLIST 838 PPSPPA0001 818 OUTPUT 804 PPSPPSTREAM 790 TERPRI 783 PRIN1 756 PRIN1 744 TERPRI 737 PRIN1 722 PRIN1 686 PRIN1 671 PRIN1 659 TERPRI 652 PRIN1 640 TERPRI 633 TERPRI 626 PRIN1 618 PRIN1 601 \QUEUELENGTH 576 PPSPPSTREAM 562 TERPRI 555 PRIN1 528 PRIN1 516 TERPRI 509 PRIN1 494 PRIN1 482 TERPRI 475 PRIN1 463 TERPRI 457 TERPRI 450 PRIN1 438 PRINTNUM 426 CLOCKDIFFERENCE 407 PRIN1 395 TERPRI 389 PRIN1 377 PRINTNUM 351 PRIN1 339 TERPRI 332 PRIN1 320 PRINTNUM 308 CLOCKDIFFERENCE 289 PRIN1 277 TERPRI 260 PRIN1 236 PRIN1 190 PRIN1 160 TERPRI 153 PRIN1 138 PRIN1 126 PRIN1 99 PRIN1 87 TERPRI 80 PRIN1 65 PRIN1 53 PRIN1 26 PRIN1 13 \GETSTREAM) (859 SPPCON 833 SI::RESETUNWIND 812 OUTPUT 796 SPPCON 771 SPPCON 763 SPPCON 729 SPPCON 700 SPPCON 692 SPPCON 678 SPPCON 594 SPPCON 582 SPPCON 568 SPPCON 543 SPPCON 535 SPPCON 501 SPPCON 419 SPPCON 363 SPPCON 301 SPPCON 267 SPPCON 243 SPPCON 227 SPPCON 197 SPPCON 166 SPPCON 145 SPPCON 105 |NSADDRESSTYPE#| 72 SPPCON 32 |NSADDRESSTYPE#| 8 OUTPUT) ( 901 "):" 876 "Bulk data stream (" 750 " Allocation: " 716 ", acked# " 709 ", all acked" 665 " Seq# " 646 "Output:" 612 " Packets in queue: " 522 " Allocation: " 488 " Seq# " 469 "Input:" 444 " secs ago" 431 1000.0 413 (FLOAT 4 1) 401 "Last input activity: " 383 " secs" 370 1000.0 357 (FLOAT 4 1) 345 "Round trip: " 326 " secs ago" 313 1000.0 295 (FLOAT 3 1) 283 "Ack requested: " 254 " [terminated]" 220 "bulkdata" 210 "courier" 184 "DS Type = " 177 " [not established]" 132 ", id = " 93 "Remote: " 59 ", id = " 20 "Local: ") \SPP.INFO.HOOK :D8 (P 0 WINDOW I 1 BUTTON I 0 PROC F 1 SPPCON) eAgQ @g H7nl o gl H @gH QH h(97 PPSPP 89 CLEARW 83 PROCESSPROP 70 DSPFONT 64 FONTCREATE 51 CREATEW 41 GETBOXREGION 25 PROCESSPROP 13 INSPECT) (77 WINDOW 57 GACHA 20 WINDOW 5 MIDDLE) ( 46 "SPP Connection Status") PPSPPSTREAM :D8 (I 1 FILE I 0 STREAM) b@_oA @ A @ djh$dlgdlgkgoA A (95 TERPRI 88 PRIN1 26 PRIN1 20 \SPP.GETFILEPTR 13 PRIN1) (76 EOM 66 ATTENTION 53 END 32 STREAM) ( 82 " [eof]" 7 " File pointer: ") \SPP.CHECK.INPUT.QUEUE :D8 (P 5 NEXT P 4 CURRENT P 3 N2 P 2 N1 P 1 INQ P 0 ACKNO I 0 CON) g@@BI\L4ZHo hL]i4JKo hnJKko hM(96 SHOULDNT 73 SHOULDNT 46 SHOULDNT) (24 SYSQUEUE 13 SPPCON 5 SPPCON) ( 91 "The input queue is out of order." 68 "The input queue has duplicates." 41 "The input queue contains a packet that should have been acknowledged already.") PRINTSPP :D8 (P 5 COMMA P 4 SEPR P 3 LENGTH P 2 DS P 1 SYSTEMP P 0 BASE I 1 FILE I 0 EPKT) @l11HA oA HA HjooHjLA oA MiHjLA oA MH jLA oA MH0jLA oA M\LMLA oA oA kA HZdjo$koJdloloJA oA HA oA HA oA HA @#l*[jOoA KA oA `(A oA HljoKA A A h(451 TERPRI 444 TERPRI 437 PRINTPACKETDATA 418 PRIN1 406 TERPRI 392 PRIN1 380 PRIN1 372 PRIN1 350 PRIN1 340 PRIN1 328 PRIN1 318 PRIN1 306 PRIN1 296 PRIN1 285 PRIN1 227 SPACES 219 PRIN1 207 PRIN1 195 PRIN1 179 PRIN1 167 PRIN1 149 PRIN1 137 PRIN1 119 PRIN1 107 PRIN1 87 PRIN1 75 PRIN1 37 PRIN1 27 PRIN1 15 PRIN1) (398 PRINTSPPDATAFLG) ( 429 (CHARS) 412 "Data: " 386 " bytes" 366 "; " 334 "/" 312 "; ack/alloc = " 290 " seq " 277 "end-reply" 267 "end" 253 "bulkdata" 243 "courier" 213 "]" 201 "??" 173 "eom" 143 "attn" 113 "ack" 81 "sys" 57 ", " 52 " [" 21 "/") (PRETTYCOMPRINT SPPCOMS) (RPAQQ SPPCOMS ((COMS (* ; "Sequenced Packet Protocol.") (DECLARE%: EVAL@COMPILE DONTCOPY (FILES ( SOURCE) SPPDECLS) (MACROS RETRANSMITINDEX SEQ.ADD1 SEQ.GREATERP SEQ.GEQ) (GLOBALVARS SPP.USER.TIMEOUT SPP.MIN.TIMEOUT SPP.INACTIVITY.TIMEOUT SPP.MAX.FAILED.PROBES XIPTRACEFLG XIPTRACEFILE)) (SYSRECORDS SPPCON) (INITRECORDS SPPCON) (INITVARS (SPP.USER.TIMEOUT 15000) (SPP.INACTIVITY.TIMEOUT 120000) ( SPP.MIN.TIMEOUT 50) (SPP.MAX.FAILED.PROBES 5)) (FNS \SPPCONNECTION \SPP.CREATE.CON \SPP.CREATE.STREAMS \SPP.CREATE.WATCHER \SPP.SENDPKT \FILLINSPP \SPP.SYSPKT \GETSPP \SENDSPP \SPP.SEND.ENDREPLY \TERMINATESPP \SPP.CLEANUP) (FNS \SPPWATCHER \SPP.HANDLE.INPUT \SPP.HANDLE.DATA \SPP.HANDLE.ATTN \SPP.RELEASE.ACKED.PACKETS \SPP.NOT.RESPONDING \SPP.PROBE \SPP.RETRANSMIT.NEXT \SPP.DUPLICATE.REQUEST \SPP.ESTABLISH \SPPGETERROR \SPPSENDERROR)) (COMS (* ; "Stream interface to Sequenced Packet Protocol.") (FNS \INITSPP \SPP.EVENTFN \CREATE.SPP.DEVICE SPP.OPEN \SPP.CREATE.STREAM SPP.DESTADDRESS SPPOUTPUTSTREAM SPP.OPENP \STREAM.FROM.PACKET SPP.FORCEOUTPUT SPP.FLUSH.TO.EOF SPP.SENDEOM SPP.CLEAREOM SPP.SENDATTENTION SPP.CLEARATTENTION SPP.CLOSE \SPP.CLOSE.IF.ERROR \SPP.RESETCLOSE SPP.BACKFILEPTR \SPP.GETFILEPTR \SPP.SETFILEPTR \SPP.SKIPBYTES \SPP.BOUTS \SPP.OTHER.BOUT \SPP.GETNEXTBUFFER \SPP.STREAM.LOST \SPP.DEFAULT.ERRORHANDLER \SPP.PREPARE.INPUT \SPP.PREPARE.OUTPUT SPP.DSTYPE SPP.READP SPP.EOFP) (FNS SPPSTREAMP) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\INITSPP)))) (COMS (* ; "Debugging") (ALISTS ( XIPPRINTMACROS 5)) (FNS PPSPP \SPP.INFO.HOOK PPSPPSTREAM \SPP.CHECK.INPUT.QUEUE PRINTSPP) (INITVARS ( PRINTSPPDATAFLG)) (GLOBALVARS PRINTSPPDATAFLG)))) (ADDTOVAR SYSTEMRECLST (DATATYPE SPPCON ((SPPXIPLENGTH WORD) (NIL BYTE) (SPPXIPTYPE BYTE) ( SPPDESTNSADDRESS0 5 WORD) (SPPDESTSKT# WORD) (SPPSOURCENSADDRESS0 5 WORD) (SPPSOURCESKT# WORD) (NIL BYTE) (SPPDSTYPE BYTE) (SPPSOURCEID WORD) (SPPDESTID WORD) (SPPSEQNO WORD) (SPPACKNO WORD) ( SPPACCEPTNO WORD) (SPPESTABLISHEDP FLAG) (SPPDESTINATIONKNOWN FLAG) (SPPTERMINATEDP FLAG) ( SPPOUTPUTABORTEDP FLAG) (SPPOUTPUTABORTEDFN POINTER) (SPPACKPENDING FLAG) (SPPEOMONFORCEOUT FLAG) ( SPPSERVERFLAG FLAG) (SPPINPUTBLOCKED FLAG) (SPPINPUTQ POINTER) (SPPRETRANSMITQ POINTER) ( SPPRETRANSMITTING POINTER) (SPPLOCK POINTER) (SPPMYNSOCKET POINTER) (SPPACKEDSEQNO WORD) ( SPPOUTPUTALLOCNO WORD) (SPPRETRANSMITTIMER POINTER) (SPPACKREQUESTED POINTER) (SPPACKREQTIME POINTER) (SPPACKREQTIMEOUT POINTER) (SPPROUNDTRIPTIME POINTER) (SPPACTIVITYTIMER POINTER) (SPPATTENTIONFN POINTER) (SPPINPKT POINTER) (SPPOUTPKT POINTER) (SPPSYSPKT POINTER) (SPPINPUTSTREAM POINTER) ( SPPSUBSTREAM POINTER) (SPPPROCESS POINTER) (SPPALLOCATIONEVENT POINTER) (SPPINPUTEVENT POINTER) ( SPPOUTPUTSTREAM POINTER) (SPPWHENCLOSEDFN POINTER) (SPPSTATE POINTER) (SPPERRORHANDLER POINTER) ( SPPSERVERFN POINTER) (SPPOTHERXIPHANDLER POINTER) (SPPINACTIVECOUNT POINTER) (SPPINPUTDSTYPE BYTE) ( SPPDSTYPECHANGEFN POINTER)))) (/DECLAREDATATYPE (QUOTE SPPCON) (QUOTE (WORD BYTE BYTE WORD WORD WORD WORD WORD WORD WORD WORD WORD WORD WORD WORD BYTE BYTE WORD WORD WORD WORD WORD FLAG FLAG FLAG FLAG POINTER FLAG FLAG FLAG FLAG POINTER POINTER POINTER POINTER POINTER WORD WORD POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER BYTE POINTER)) (QUOTE ((SPPCON 0 (BITS . 15)) (SPPCON 1 (BITS . 7)) ( SPPCON 1 (BITS . 135)) (SPPCON 2 (BITS . 15)) (SPPCON 3 (BITS . 15)) (SPPCON 4 (BITS . 15)) (SPPCON 5 (BITS . 15)) (SPPCON 6 (BITS . 15)) (SPPCON 7 (BITS . 15)) (SPPCON 8 (BITS . 15)) (SPPCON 9 (BITS . 15 )) (SPPCON 10 (BITS . 15)) (SPPCON 11 (BITS . 15)) (SPPCON 12 (BITS . 15)) (SPPCON 13 (BITS . 15)) ( SPPCON 14 (BITS . 7)) (SPPCON 14 (BITS . 135)) (SPPCON 15 (BITS . 15)) (SPPCON 16 (BITS . 15)) (SPPCON 17 (BITS . 15)) (SPPCON 18 (BITS . 15)) (SPPCON 19 (BITS . 15)) (SPPCON 20 (FLAGBITS . 0)) (SPPCON 20 (FLAGBITS . 16)) (SPPCON 20 (FLAGBITS . 32)) (SPPCON 20 (FLAGBITS . 48)) (SPPCON 20 POINTER) (SPPCON 22 (FLAGBITS . 0)) (SPPCON 22 (FLAGBITS . 16)) (SPPCON 22 (FLAGBITS . 32)) (SPPCON 22 (FLAGBITS . 48)) (SPPCON 22 POINTER) (SPPCON 24 POINTER) (SPPCON 26 POINTER) (SPPCON 28 POINTER) (SPPCON 30 POINTER) ( SPPCON 32 (BITS . 15)) (SPPCON 33 (BITS . 15)) (SPPCON 34 POINTER) (SPPCON 36 POINTER) (SPPCON 38 POINTER) (SPPCON 40 POINTER) (SPPCON 42 POINTER) (SPPCON 44 POINTER) (SPPCON 46 POINTER) (SPPCON 48 POINTER) (SPPCON 50 POINTER) (SPPCON 52 POINTER) (SPPCON 54 POINTER) (SPPCON 56 POINTER) (SPPCON 58 POINTER) (SPPCON 60 POINTER) (SPPCON 62 POINTER) (SPPCON 64 POINTER) (SPPCON 66 POINTER) (SPPCON 68 POINTER) (SPPCON 70 POINTER) (SPPCON 72 POINTER) (SPPCON 74 POINTER) (SPPCON 76 POINTER) (SPPCON 78 ( BITS . 7)) (SPPCON 80 POINTER))) (QUOTE 82)) (RPAQ? SPP.USER.TIMEOUT 15000) (RPAQ? SPP.INACTIVITY.TIMEOUT 120000) (RPAQ? SPP.MIN.TIMEOUT 50) (RPAQ? SPP.MAX.FAILED.PROBES 5) (\INITSPP) (ADDTOVAR XIPPRINTMACROS (5 . PRINTSPP)) (RPAQ? PRINTSPPDATAFLG) (PUTPROPS SPP COPYRIGHT ("Xerox Corporation" 1983 1984 1985 1986 1987 1988 1990 1991 1993)) NIL