(FILECREATED "29-May-85 12:39:48" ("compiled on " {ERIS}SOURCES>BSP.;9) "24-May-85 21:11:59" recompiled exprs: \BSP.HANDLE.ACK in "INTERLISP-D 28-May-85 ..." dated "28-May-85 14:14:57") (FILECREATED "29-May-85 12:38:14" {ERIS}SOURCES>BSP.;9 110835 changes to: (VARS BSPCOMS) ( FNS \BSP.HANDLE.ACK) previous date: "28-Apr-85 14:41:42" {ERIS}SOURCES>BSP.;8) OPENRTPSOCKETA0001 D1 (NAME ERRORSET P 2 SOCKET# P 1 INITSTATE P 0 SOCKET F 12Q MODE F 13Q FRNPORT F 14Q PUPSOC F 15Q FAILURESTRING F 16Q RESETVARSLST F 17Q TIMEOUT F 20Q CONNID F 21Q \LOCALPUPNETHOST F 22Q RESETY)   W Wc!i cdWZ cW `djW jn@ dK dgdgdW dW"dJdWJldL:ldM8`dN0`_dO$l_dOl_dOX H`WHWHWWgcHFhi oHhWcWgWd6gW+Wo Hj WgW^gWVHWgWd0gW%Hk:Hk WgW$gWHpWgHl H_W HWiHl W`HHIHFH HlHlHHj W Hho hc$i(730Q \RTP.SHOW.FAILURE 712Q CLOSERTPSOCKET 660Q MONITOR.AWAIT.EVENT 625Q \CLOCK0 602Q \ILLEGAL.ARG 571Q \RTP.ACTION 524Q \RTP.ACTION 432Q \RTP.ACTION 424Q ERROR 345Q OBTAIN.MONITORLOCK 271Q \INIT.RTPPROCESS 111Q RAND 63Q PUPSOCKETNUMBER 47Q OPENPUPSOCKET 25Q ETHERPORT 15Q OPENPUPSOCKET) (634Q \RTP.DEFAULTTIMEOUT 561Q RETURN 544Q RETURN 532Q RETURN 504Q SERVER 470Q SERVER 452Q RETURN 440Q RETURN 405Q USER 371Q USER 332Q USER 302Q \BSPSOCKETS 276Q \BSPSOCKETS 223Q SYSQUEUETYPE# 211Q SYSQUEUETYPE# 132Q RELEASE.PUP 123Q \RTP.HANDLE.INPUT 67Q BSPSOCTYPE# 60Q PUPSOCKET) ( 725Q "No Response" 421Q "No foreign port specified" 352Q (AND RESETSTATE (CLOSERTPSOCKET OLDVALUE 0))) OPENRTPSOCKET D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 5 FAILURESTRING I 4 TIMEOUT I 3 CONNID I 2 PUPSOC I 1 MODE I 0 FRNPORT F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q OPENRTPSOCKETA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (OPENRTPSOCKETA0001)) CLOSERTPSOCKETA0001 D1 (NAME ERRORSET F 0 SOCKET F 1 TIMEOUT F 2 SUCCESS F 3 RESETY) ZPFhi QjCPl Q`HPl PjcPlPl hPFP` Pl ci(124Q \RTP.ACTION 114Q MONITOR.AWAIT.EVENT 74Q \RTP.ACTION 44Q \RTP.ACTION 24Q \CLOCK0 7 OBTAIN.MONITORLOCK) (111Q \RTP.DEFAULTTIMEOUT 32Q \RTP.DEFAULTTIMEOUT) () CLOSERTPSOCKET D1 (P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 SUCCESS I 2 DONTSEND I 1 TIMEOUT I 0 SOCKET F 4 LISPXHIST F 5 RESETVARSLST) 2T!Uog hg[ K@@h H(56Q DEL.PROCESS 41Q ERROR! 33Q RESETRESTORE 21Q CLOSERTPSOCKETA0001) (27Q ERROR 16Q INTERNAL) ( 13Q (CLOSERTPSOCKETA0001)) \INIT.RTPPROCESS D1 (P 1 NAME P 0 PROC I 0 SOCKET) Ng@ddidd g@hhgggg @H@H Y @I Fh(110Q CREATE.MONITORLOCK 101Q CREATE.EVENT 75Q PROCESS.NAME 61Q ADD.PROCESS) (55Q NO 52Q RESTARTABLE 47Q RTP 44Q NAME 32Q QUOTE 2 \RTP.SOCKET.PROCESS) () \RTP.SOCKET.PROCESS D1 (I 0 BSPSOCKET F 1 RESETVARSLST) 4@Fhi g@hhhQc`gg @@kH(44Q PROCESSPROP 7 OBTAIN.MONITORLOCK) (41Q \RTP.INFO.HOOK 36Q INFOHOOK 33Q \RUNNING.PROCESS 13Q \RTP.CLEANUP) () \RTP.HANDLE.INPUT D1 (P 2 TIMER P 1 PUP P 0 PUPSOC I 0 BSPSOCKET) B@ !H Y@FH @j@@ hZdi Jdg @l (77Q \RTP.ACTION 67Q TIMEREXPIRED? 56Q MONITOR.AWAIT.EVENT 44Q BLOCK 41Q \RTP.HANDLE.PUP 23Q PUPSOCKETEVENT 11Q GETPUP) (64Q MILLISECONDS) () \RTP.HANDLE.PUP D1 (I 1 BSPSOCKET I 0 PUP) @dlA@ hbdl A@id Al@ dl A@id Al@ wdl (A@id hAl@ A@o@l Kl%@2l?A@i 7Al@ A@o #Ag@ A@AlHhb@@ (311Q RELEASE.PUP 254Q RELEASE.PUP 236Q \RTP.SHOW.FAILURE 224Q \RTP.ACTION 213Q \RTP.FILTER 166Q \RTP.SHOW.FAILURE 163Q CONCAT 160Q GETPUPSTRING 143Q \RTP.ACTION 132Q \RTP.FILTER 112Q \RTP.ACTION 77Q \RTP.FILTER 56Q \RTP.ACTION 43Q \RTP.FILTER 16Q \RTP.HANDLE.RFC) (246Q RELEASE.PUP) ( 233Q "No Such Socket" 152Q "[Abort] ") \RTP.HANDLE.RFC D1 (P 0 DATA I 1 PUP I 0 BSPSOCKET) Al(HjHA%@dlA"jhAdk@Aid 3dldl&@Ahi 'H@H@H@h@lA A AlHjAo Al Ag@ A (231Q SENDPUP 207Q PUTPUPSTRING 166Q SWAPPUPPORTS 161Q \RTP.ACTION 113Q \RTP.FILTER 66Q \RTP.FILTER) (220Q FREE) ( 204Q "RFC refused") \RTP.CLEANUP D1 (P 0 FN I 0 SOCKET) :@` @l @ i @BH@@kH@ @h<@hh(56Q \BSP.FLUSH.SOCKET.QUEUES 26Q CLOSEPUPSOCKET 17Q \RTP.ACTION 6 DREMOVE) (11Q \BSPSOCKETS 3 \BSPSOCKETS) () \RTP.ACTION D1 (P 3 STREAM P 2 TIMEOUT P 1 NEWSTATE P 0 STATE I 2 PUP I 1 EVENT I 0 SOCKET) 6@AAdjHj@A @ kYkHj@A lYAdlHj@A lYl/Hdk@ ll@ lHdl@ lY_Adl!HkHlHlHl@ lY9lMHdk@Bl(lĿlYlHlHl @:j@B HllY@AB AdlHjHl@AB lYlTHlHdl-@[KK@&Kkjl@ lYlHl@ lY{@AB qAdl#Hdl@ jY[ljYS@AB Il dg*dg,dg2dg:h` (403Q \DEFINEDEVICE) (400Q \BSPFDEV 374Q \BSPFDEV 366Q \GENERIC.RENAMEFILE 357Q \IS.NOT.RANDACCESSP 350Q \ILLEGAL.DEVICEOP 341Q BSPFORCEOUTPUT 332Q \BSP.GETNEXTBUFFER 323Q \BSPWRITEBLOCK 314Q \BUFFERED.BINS 305Q \BSPBACKFILEPTR 276Q \BSP.SETFILEPTR 267Q \BSP.GETFILEPTR 260Q \BUFFERED.PEEKBIN 251Q BSPEOFP 242Q BSPREADP 233Q \BUFFERED.BOUT 224Q \BUFFERED.BIN 215Q NILL 206Q NILL 177Q \BSPEVENTFN 170Q NILL 161Q NILL 152Q \IS.NOT.RANDACCESSP 143Q NILL 134Q \GENERATENOFILES 125Q NILL 116Q \IS.NOT.RANDACCESSP 107Q NILL 100Q NILL 71Q NILL 62Q CLOSEBSPSTREAM 7 BSP 2 FDEVTYPE#) () \BSPEVENTFN D1 (I 1 EVENT I 0 DEV) .AdggAgAgAg @ (53Q \REMOVEDEVICE.NAMES 47Q \BSP.CLOSE.OPEN.SOCKETS 12Q \BSP.CLOSE.OPEN.SOCKETS) (41Q AFTERSAVEVM 33Q AFTERLOGOUT 25Q AFTERMAKESYS 16Q AFTERSYSOUT 4 BEFORELOGOUT) () \BSP.CLOSE.OPEN.SOCKETS D1 (P 5 SOC) X`AHIF\djdldlhiLJ KhZHXK&dM Mj h(117Q BLOCK 113Q CLOSERTPSOCKET 105Q WAKE.PROCESS) (2 \BSPSOCKETS) () OPENBSPSTREAM D1 (P 2 SOCKETPROC P 1 OUTSTREAM P 0 INSTREAM I 6 FAILURESTRING I 5 WHENCLOSEDFN I 4 IOTIMEOUTFN I 3 IOTIMEOUT I 2 ERRORHANDLER I 1 OTHERPUPHANDLER I 0 SOCKET F 11Q \BSPFDEV)  @d`ghddF b@dldlihh@ddddd [,K\*L](M^"N @`7@`4@ @`dWdg.dg,d`&dg"dg djd`djd`dhdldjRdk@dk0dhdg XHg.HlRH`dWdg.dg,d`&dg"dg djd`djd`dhdldjRdk@dk0dhdg YHI@ @ @dddddddj6j5j3j/j2j.j'j&@gJ@_lOl k@k@L@`L@:_lOl @L@g@Ag@Bg@Cd@D@@EB@dZ o DJ H(1012Q WAKE.PROCESS 1006Q BLOCK 1001Q CREATE.EVENT 776Q CONCAT 767Q PROCESS.NAME 701Q \CLOCK0 635Q \CLOCK0 520Q \SETACCESS 316Q \SETACCESS 135Q \BSP.FLUSH.SOCKET.QUEUES 25Q OPENRTPSOCKET) (733Q \BSP.DEFAULT.ERROR.HANDLER 722Q RELEASE.PUP 711Q \BSP.HANDLE.INPUT 653Q \BSP.INACTIVITY.TIMEOUT 610Q RETURN 515Q OUTPUT 443Q \STREAM.DEFAULT.MAXBUFFERS 427Q FILELINELENGTH 412Q \FILEOUTCHARFN 403Q \EOSERROR 374Q \NOIMAGEOPS 365Q \STREAM.NOT.OPEN 356Q \STREAM.NOT.OPEN 343Q STREAMTYPE# 326Q \BSP.OTHERBOUT 313Q INPUT 241Q \STREAM.DEFAULT.MAXBUFFERS 225Q FILELINELENGTH 210Q \FILEOUTCHARFN 201Q \EOSERROR 172Q \NOIMAGEOPS 163Q \STREAM.NOT.OPEN 154Q \STREAM.NOT.OPEN 141Q STREAMTYPE# 127Q \BSP.INITIAL.MAXPUPALLOC 121Q \BSP.INITIAL.ADATATIMEOUT 15Q USER 10Q BSPSOCTYPE#) ( 773Q "#INPUT") \SMASHBSPSTREAM D1 (P 2 \INTERRUPTABLE P 1 OUTSTREAM P 0 SOCKET I 1 OLDSTREAM I 0 OPENSTREAM) WAb@b @AIA@A@A@A@A@A@ AIH H HAh(102Q \SETACCESS 77Q \GETACCESS) (11Q STREAM 3 STREAM) () BSPOUTPUTSTREAM D1 (L (0 BSPSTREAM)) @NIL (3 STREAM) () BSPINPUTSTREAM D1 (L (0 STREAM)) @ dNIL (3 STREAM) () BSPFRNADDRESS D1 (L (0 STREAM)) @ HdHNIL NIL () CLOSEBSPSTREAMA0001 D1 (NAME ERRORSET P 1 TIMER P 0 INPUTSTREAM F 2 SOCKET F 3 TIMEOUT F 4 RESETY) RFhi RRdldlihTH l SYR'jR:j5H RdldlihIg RFRDIi jcRS jchci(172Q CLOSERTPSOCKET 157Q MONITOR.AWAIT.EVENT 143Q TIMEREXPIRED? 106Q \BSP.FLUSHINPUT 60Q \CLOCK0 51Q BSPFORCEOUTPUT 7 OBTAIN.MONITORLOCK) (140Q MILLISECONDS) () CLOSEBSPSTREAM D1 (P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 SOCKET I 1 TIMEOUT I 0 STREAM F 4 LISPXHIST F 5 RESETVARSLST) B@ Ad`bT!Uog hg[ KAjh(72Q BLOCK 65Q ERROR! 57Q RESETRESTORE 45Q CLOSEBSPSTREAMA0001) (53Q ERROR 42Q INTERNAL 23Q \RTP.DEFAULTTIMEOUT 5 BSPSOC) ( 37Q (CLOSEBSPSTREAMA0001)) \BSP.FLUSHINPUT D1 (I 0 STREAM) @j h@ (13Q \BSP.CLEANUP.INPUT 4 \BSP.PREPARE.INPUT) NIL () BSPOPENP D1 (L (1 TYPE 0 STREAM)) Q@ HdDdli dlAh-AglAhAgAgH&j @@NIL (74Q INPUT 65Q INPUT 47Q OUTPUT 3 STREAM) () GETBSPUSERINFO D1 (L (0 STREAM)) @ <NIL (10Q BSPSOC 3 STREAM) () SETBSPUSERINFO D1 (L (1 VALUE 0 STREAM)) @ Aj9B @ AjHjH oo H o h h(76Q TERPRI 71Q PRIN1 61Q PRIN1 54Q PRIN1 36Q PRIN1 17Q CLOCKDIFFERENCE 13Q PRIN1) NIL ( 66Q " msecs ago." 51Q " expired " 43Q " msecs left") PRINTPUPQUEUE D1 (P 2 GAP P 1 LASTPUP P 0 PUP I 2 VERBOSE I 1 HEADER I 0 QUEUE) @AA HbBl HYB HXMBAl Hl[KIl\LIlZjo J g o @Io I h(202Q TERPRI 176Q PRIN1 171Q PRIN1 152Q PRIN1 140Q PRIN1 131Q PRIN1 124Q PRIN1 51Q TAB 32Q BSPPRINTPUP 23Q TAB 11Q PRIN1) (135Q >) ( 166Q " Oops! Tail of queue = " 147Q ", " 121Q "