(FILECREATED " 1-NOV-83 18:17:14" ("compiled on " {PHYLUM}SOURCES>PROC.;121) "31-OCT-83 22:45:21" recompiled exprs: \UNIQUE.PROCESS.NAME in WORK dated " 1-NOV-83 10:03:55") (FILECREATED " 1-NOV-83 18:14:26" {PHYLUM}SOURCES>PROC.;121 324257Q changes to: (FNS \UNIQUE.PROCESS.NAME PROCESS.PREPARE.FOR.INPUT ADD.PROCESS) previous date: "26-OCT-83 12:58:56" {PHYLUM}SOURCES>PROC.;119) PROCESSWORLDA0775A0776 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 RESULT F 1 MACROY) h o k Phll ci(32Q LVLPRINT 20Q SPACES 13Q PRIN1 3 TERPRI) NIL (10Q "??? Process mech. confused - strange RESULT in SCHEDULE") PROCESSWORLDA0775 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) P 4 RESETSTATE P 3 MACROY P 1 OLDVALUE P 0 RESULT F 5 RESETVARSLST) \``X`g i 1gIhhUc og gJc gJ Li(130Q ERROR! 122Q APPLY 76Q PROCESSWORLDA0775A0776 43Q OUTPUT 36Q RETFROM 22Q \START.PROCESSES) (113Q OUTPUT 102Q ERROR 73Q INTERNAL 51Q OUTPUT 33Q PROCESSWORLD 26Q PSTAT.QUIT 13Q \PROCESSES 10Q PROCESS 5 #SCHEDULER#) (70Q (DUMMY.FOR.ERRORSET)) PROCESSWORLD D1 (L (0 FLG) F 11Q #INHIBIT.SCHEDULING#) B @g\`d h`` `g h`d+ #``` h`i h`Wo```'`ji dIldJ `g ```[d0`qKhhKd\dg LX3i/Ld i# Ld8L`Lk L hdONh_N&_Od]M M g ogggggi `#g ogggggi g ogggggi `h H/ogggggi X``"`H`HH H h`````g` oi (1076Q PROCESSWORLDA0775 1065Q PUTWINDOWPROP 1014Q \RUN.PROCESS 1007Q \MAKE.PROCESS0 743Q ADD.PROCESS 667Q ADD.PROCESS 635Q FIND.PROCESS 626Q ADD.PROCESS 574Q FIND.PROCESS 560Q ADD.PROCESS 526Q FIND.PROCESS 513Q \RUN.PROCESS 506Q \MAKE.PROCESS0 434Q \RELEASE.PROCESS 371Q \RELEASE.PROCESS 346Q \RELEASE.PROCESS 244Q CREATE.EVENT 202Q STKNTH 135Q RETTO 115Q DREMOVE 73Q RELSTKP 53Q PUTWINDOWPROP 17Q \RELEASE.PROCESS) (1062Q \TTY.PROCESS 1057Q PROCESS 1054Q \TopLevelTtyWindow 1046Q \TopLevelTtyWindow 1043Q PROCESS 1040Q \TTY.PROCESS 1032Q WINDOWTYPE# 1026Q \TopLevelTtyWindow 1022Q \OLD.TTY.PROCESS 777Q \PROCESSES 773Q \PROCESSES 765Q \TTY.PROCESS 761Q \TTY.PROCESS 753Q \PROCESSES 750Q \TTY.PROCESS 736Q SCHEDULE 733Q ALWAYS 730Q RESTARTABLE 725Q EXEC 722Q NAME 704Q PROCESS 701Q PROCESS 676Q \TIMERQHEAD 672Q \TIMERQHEAD 662Q SCHEDULE 657Q SYSTEM 654Q RESTARTABLE 651Q TIMER 646Q NAME 632Q TIMER 621Q SCHEDULE 616Q SYSTEM 613Q RESTARTABLE 610Q MOUSE 605Q NAME 571Q MOUSE 564Q TOPW 553Q SCHEDULE 550Q SYSTEM 545Q RESTARTABLE 542Q BACKGROUND 537Q NAME 523Q BACKGROUND 474Q \PROCESSES 423Q PROCESS 416Q \PROCUNWINDTHESE 412Q \PROCUNWINDTHESE 341Q EXEC 313Q PROCESSQUEUE 307Q PROCESSQUEUE 302Q \PROCESSES 273Q \PROCUNWINDTHESE 265Q \HIGHEST.PRIORITY.QUEUE 257Q PROCESSQUEUETYPE# 253Q \HIGHEST.PRIORITY.QUEUE 247Q \TTY.PROCESS.EVENT 241Q TTY 235Q NOCLEARSTKLST 231Q NOCLEARSTKLST 224Q #SCHEDULER# 174Q PROCESSTYPE# 166Q PROCESSTYPE# 162Q #SCHEDULER# 143Q \RUNNING.PROCESS 131Q PSTAT.QUIT 125Q #SCHEDULER# 120Q NOCLEARSTKLST 112Q NOCLEARSTKLST 105Q #SCHEDULER# 100Q #SCHEDULER# 63Q #SCHEDULER# 60Q \RUNNING.PROCESS 50Q PROCESS 45Q \TopLevelTtyWindow 37Q WINDOWTYPE# 33Q \TopLevelTtyWindow 30Q \TTY.PROCESS 11Q \PROCESSES 3 OFF) (1072Q (DUMMY.FOR.ERRORSET) 717Q (\PROC.REPEATEDLYEVALQT) 643Q (\TIMER.PROCESS) 602Q (\MOUSE.PROCESS) 534Q (\BACKGROUND.PROCESS) 153Q (Processes are already on)) ADD.PROCESS D1 (P 25Q \INTERRUPTABLE) e@`` HdlA_IKd2gKdgh"iKgKdgiggK JdgdgIK"dgIK,gIK.JdgIK4gIK6JgIK(K)LdJIL(JNdN^LIJKh(JK (703Q LISTPUT 432Q \ILLEGAL.ARG 330Q \UNIQUE.PROCESS.NAME 276Q PROCESS.WINDOW 246Q LISTGET 25Q FIND.PROCESS) (665Q PROCESS 623Q PROCESS 577Q PROCESS 571Q USERDATA 560Q PROCESS 552Q TTYEXITFN 542Q PROCESS 533Q TTYENTRYFN 521Q PROCESS 513Q BEFOREEXIT 503Q PROCESS 474Q AFTEREXIT 463Q PROCESS 454Q INFOHOOK 443Q FORM 425Q HARDRESET 420Q HARDRESET 410Q ALWAYS 401Q YES 364Q NEVER 355Q NO 346Q PROCESS 337Q RESTARTABLE 324Q PROCESS 315Q NAME 303Q PRIORITY 266Q WINDOW 230Q USERDATA 215Q TTYEXITFN 202Q TTYENTRYFN 166Q BEFOREEXIT 153Q AFTEREXIT 137Q INFOHOOK 124Q FORM 110Q RESTARTABLE 75Q NAME 60Q PRIORITY 45Q WINDOW 11Q PROCESSTYPE#) NIL PROCESS.NAME D1 (L (1 NAME 0 PROC)) )@d`d j HdAHA (43Q \UNIQUE.PROCESS.NAME 21Q FIND.PROCESS) (37Q PROCESS 5 PROCESSTYPE#) NIL PROCESS.WINDOW D1 (L (1 WINDOW 0 PROC)) 6@d`d j HdAHA bAgH (62Q PUTWINDOWPROP 45Q \INSUREWINDOW 21Q FIND.PROCESS) (56Q PROCESS 41Q PROCESS 5 PROCESSTYPE#) NIL KILL.ME D1 NIL (2 PROCESS.RETURN) NIL NIL EVAL.AS.PROCESS D1 (L (0 FORM)) `@gg @,(15Q ADD.PROCESS) (12Q NO 7 RESTARTABLE 2 \RUNNING.PROCESS) NIL EVAL.IN.TTY.PROCESS D1 (L (1 WAITFORRESULT 0 FORM)) ```@,`@A (26Q PROCESS.EVAL) (21Q \TTY.PROCESS 11Q \TTY.PROCESS 6 \RUNNING.PROCESS 2 \RUNNING.PROCESS) NIL PROCESS.READA0817 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 WINDOW F 1 PROMPT F 2 OLDW F 3 CLEAR?) -` PQ id hi cSP (50Q CLEARW 36Q TTYDISPLAYSTREAM 30Q PRIN1 21Q READ 5 TTY.PROCESS) (2 \RUNNING.PROCESS) NIL PROCESS.READ D1 (P 1 OLDW I 2 CLEAR? I 1 PROMPT I 0 WINDOW) `o H II (27Q TTYDISPLAYSTREAM 20Q TTY.PROCESS 14Q PROCESS.READA0817) (2 \TTY.PROCESS) (11Q (DUMMY.FOR.ERRORSET)) PROCESS.EVALV D1 (L (1 VAR 0 PROC)) <@d`d ji AdAiAH`hH A/(64Q \SMASHLINK 22Q FIND.PROCESS) (57Q STACKP 46Q \RUNNING.PROCESS 32Q LITATOM 5 PROCESSTYPE#) NIL PROCESS.EVAL D1 (L (2 WAITFORRESULT 1 FORM 0 PROC) F 2 PSTAT.NORESULT) V@d`d ji `HIA,BIR2HgAIBhi BId2R2IR2(106Q \PROCESS.GO.TO.SLEEP 70Q \PROCESS.MAKEFRAME 22Q FIND.PROCESS) (117Q PROCESS 55Q \PROCESS.EVAL1 45Q PROCESS 25Q \RUNNING.PROCESS 5 PROCESSTYPE#) NIL \PROCESS.EVAL1 D1 (L (2 WAITFORRESULT 1 PROC 0 FORM)) &A@,2BA`2`AkA h(41Q \RUN.PROCESS) (25Q \PSTAT.NORESULT 20Q \PSTAT.NORESULT 15Q PROCESS 3 PROCESS) NIL PROCESS.APPLY D1 (L (3 WAITFORRESULT 2 ARGS 1 FN 0 PROC) F 2 PSTAT.NORESULT) [@d`d ji `HIAB CIR2HgABIChi CId2R2IR2(113Q \PROCESS.GO.TO.SLEEP 75Q \PROCESS.MAKEFRAME 41Q APPLY 22Q FIND.PROCESS) (124Q PROCESS 60Q \PROCESS.APPLY1 50Q PROCESS 25Q \RUNNING.PROCESS 5 PROCESSTYPE#) NIL \PROCESS.APPLY1 D1 (L (3 WAITFORRESULT 2 PROC 1 ARGS 0 FN)) )B@A 2CB`2`BkB h(44Q \RUN.PROCESS 10Q APPLY) (30Q \PSTAT.NORESULT 23Q \PSTAT.NORESULT 20Q PROCESS 3 PROCESS) NIL CREATE.EVENT D1 (L (0 NAME)) `d@NIL (2 EVENTTYPE#) NIL NOTIFY.EVENT D1 (L (1 ONCEONLY 0 EVENT) P 3 \INTERRUPTABLE) Y@b@h@ZI>@k3*XJ@hZJH**HHhh*H@ iYJAh(113Q \RUN.PROCESS) (76Q PROCESS 72Q PROCESS 60Q PROCESS 47Q EVENT 27Q EVENT 3 EVENT) NIL AWAIT.EVENT D1 (L (2 TIMERP 1 TIMEOUT 0 EVENT)) @AB (10Q \PROCESS.GO.TO.SLEEP) (3 EVENT) NIL \UNQUEUE.EVENT D1 (L (1 EVENT 0 PROC)) NAHo@ ,I@H*Y@HAhH@**@dAA@*@h@h*h(17Q RAID) (107Q PROCESS 100Q PROCESS 47Q PROCESS) (13Q "Process not on its EVENT/MONITOR queue") OBTAIN.MONITORLOCK D1 (L (2 UNWINDSAVE 1 DONTWAIT 0 LOCK) P 3 \INTERRUPTABLE P 2 \INTERRUPTABLE F 4 RESETVARSLST F 5 \INTERRUPTABLE) d@b`U@d+Bo@hTc@H@H0H@0@H@jio@ AI@ h(135Q \PROCESS.GO.TO.SLEEP 122Q ERROR) (66Q PROCESS 55Q MONITORLOCK 46Q MONITORLOCK 10Q \RUNNING.PROCESS 3 MONITORLOCK) (116Q "Trying to acquire lock exclusively owned already by this process" 31Q (RELEASE.MONITORLOCK OLDVALUE)) CREATE.MONITORLOCK D1 (L (1 EXCLUSIVE 0 NAME)) `AhHdIkjd@NIL (2 MONITORLOCKTYPE#) NIL RELEASE.MONITORLOCK D1 (L (1 EVENIFNOTMINE 0 LOCK) P 0 \INTERRUPTABLE F 6 OLDVALUE) @dgVb@`2IdJAh@hI0\d@3I@0Ld@ @@h@[d*]K@h\o@ KM**Mdhh*M@ (203Q \RUN.PROCESS 153Q RAID) (26Q \RUNNING.PROCESS 13Q MONITORLOCK 4 OLDVALUE) (147Q "Lock not found among owner's owned locks") MONITOR.AWAIT.EVENT D1 (L (3 TIMERP 2 TIMEOUT 1 EVENT 0 RELEASELOCK)) @ ABC @ (20Q OBTAIN.MONITORLOCK 14Q \PROCESS.GO.TO.SLEEP 3 RELEASE.MONITORLOCK) (7 EVENT) NIL \MAKE.PROCESS0A0832 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 #FORM#) P,hNIL NIL NIL \MAKE.PROCESS0 D1 (L (1 HANDLE 0 FORM) P 22Q \INTERRUPTABLE P 16Q \PRIMIN.OFD P 15Q \PRIMOUT.OFD P 14Q \TTYWINDOW P 13Q \TERM.OFD P 12Q TtyDisplayStream P 11Q \PRIMTERMSA P 10Q \PRIMTERMTABLE P 7 \PRIMREADTABLE P 6 \LINEBUF.OFD P 5 \#DISPLAYLINES P 4 \CURRENTDISPLAYLINE P 3 HELPFLAG P 2 #FORM# P 1 #MYHANDLE# P 0 \INTERRUPTABLE F 23Q RESETVARSLST F 24Q \DRIBBLE.OFD F 25Q HELPFLAG F 26Q \LINEBUF.OFD F 27Q \PRIMREADTABLE F 30Q \PRIMTERMTABLE F 31Q \PRIMTERMSA) EiA@W*gjl(`W,W.W0W2`{`g0`h2`h4l~`6Og __N_gIl gIl8 IIji _ O mg i _"hO"d I`I W&W(I0g oi _dIOIg;g l`IiI` o` ` IgW&W(I0Og`g ` h(501Q \FLUSH.PROCESS 472Q \PROCESS.UNWINDALL 420Q TERPRI 411Q PRIN1 376Q PRIN1 345Q \GETOFD 305Q \MAKE.PROCESS0A0832 274Q \PROCESS.UNWINDALL 253Q RESUME 233Q \SMASHLINK 221Q \STACKARGPTR 215Q STKNTH 176Q STKNTH 157Q \SETFVARSLOT 144Q \SETFVARSLOT 121Q GETTOPVAL) (476Q \RUNNING.PROCESS 467Q RESET 461Q \PROC.RESETME 455Q ERROR 430Q ERROR 425Q PROCESS 415Q PROMPTWINDOW 406Q PROMPTWINDOW 373Q PROMPTWINDOW 353Q \PROC.RESTARTME 342Q OUTPUT 335Q NORMAL 332Q PROCESS 320Q PROCESS 271Q HARDRESET 246Q NOCLEARSTKLST 242Q NOCLEARSTKLST 212Q \MAKE.PROCESS0 171Q PROCESS 150Q \DRIBBLE.OFD 135Q RESETVARSLST 116Q \TERM.OFD 100Q \InterfacePage 65Q \InterfacePage 56Q \InterfacePage 50Q \PROCMOVEFRAME 45Q \InterfacePage 34Q \DEFAULTTTYDISPLAYSTREAM 17Q \DEFAULTLINEBUF 11Q BREAK!) (403Q " aborted." 301Q (DUMMY.FOR.ERRORSET)) \PROCMOVEFRAME D1 NIL  `d n ` Hl_lHH_lO`jlOjh]lOlOl\[`^H lJNYlNlI^NKm_JdOLljOl_JO JOغNOپlJlHLKĿMlJk`lO`jlJLlJJLغlJJOYlJkj)lJJllJlJ lJlJklJMlHkjHlHJllJ`jlJllJdJHINK MHKlكHLK `J`d n J(564Q \MAKEFREEBLOCK 544Q \MAKEFREEBLOCK 230Q \MAKEFREEBLOCK 131Q \FREESTACKBLOCK) (577Q \EM.CURSORBITMAP 570Q \InterfacePage 123Q PROC.FREESPACESIZE 16Q \InterfacePage 2 \EM.CURSORBITMAP) NIL \RELEASE.PROCESS D1 (L (1 KILLIT 0 PROC)) @@ H@H @j@i AP@` @` @k @l@h@Y'@hIg @j@jj@hh(157Q PUTWINDOWPROP 76Q \INVALIDATE.PROCESS.WINDOW 67Q DREMOVE 54Q DREMOVE 37Q \UNQUEUE.TIMER 22Q \UNQUEUE.EVENT 13Q RELSTK) (211Q PROCESS 176Q PROCESS 165Q PROCESS 154Q PROCESS 144Q PROCESS 126Q PROCESS 114Q PROCESS 103Q PROCESS 72Q \PROCESSES 64Q \PROCESSES 57Q NOCLEARSTKLST 51Q NOCLEARSTKLST) NIL \PROCESS.BLOCK D1 (NAME BLOCK L (1 TIMER 0 MSECSWAIT) P 10Q \INTERRUPTABLE) `qH`@AHYHdIoH HiIHIHHh`K\ K[OdJEL]jLl LJd"^jN JfLjM Md LoJ hA@dAhh @d`` hd_jOh(344Q \NONPROCDISMISS 334Q WINDOW.MOUSE.HANDLER 306Q \PROCESS.GO.TO.SLEEP 261Q RAID 244Q \SMASHLINK 236Q \RESUME 213Q \DECUSECOUNT 165Q \LISPERROR 60Q RAID) (340Q BACKGROUNDFNS 330Q TOPW 312Q FIXP 172Q \RUNNING.PROCESS 117Q \HIGHEST.PRIORITY.QUEUE 105Q PROCESSQUEUE 74Q PROCESSQUEUE 65Q PROCESS 12Q PROCESSTYPE# 2 \RUNNING.PROCESS) (255Q "No runnable process!!" 54Q "Current process is not its queue's NEXT") \MAYBEBLOCK D1 (F 0 \INTERRUPTABLE) P(5 BLOCK) NIL NIL \PROC.ERRORA0839 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 MESS1 F 1 MESS2) hPQ h(11Q HELP) (3 \RUNNING.PROCESS) NIL \PROC.ERROR D1 (L (2 REST) P 1 #MYHANDLE# P 0 #INHIBIT.SCHEDULING# I 1 MESS2 I 0 MESS1 F 4 RESETVARSLST) T@ABAB Di1g`TcZ[og JKdTJcT TkK J(120Q ERROR! 107Q NLEFT 100Q TAILP 52Q \PROC.ERRORA0839 15Q RAID) (60Q \RUNNING.PROCESS 47Q INTERNAL 31Q \RUNNING.PROCESS 26Q \RUNNING.PROCESS) (44Q (DUMMY.FOR.ERRORSET)) \BACKGROUND.PROCESS D1 NIL `djH(23Q BLOCK) (2 BACKGROUNDFNS) NIL \MOUSE.PROCESS D1 (P 0 \OLDTTY) E``d`H h`gg `g(100Q BLOCK 60Q PROCESS.RETURN 54Q FIND.PROCESS 30Q TTY.PROCESS 5 WINDOW.MOUSE.HANDLER) (72Q MOUSE 67Q PROCESS 64Q \RUNNING.PROCESS 51Q MOUSE 43Q MOUSE 36Q \RUNNING.PROCESS 21Q \TTY.PROCESS 15Q \RUNNING.PROCESS 11Q \RUNNING.PROCESS) NIL \TIMER.PROCESS D1 (P 1 \INTERRUPTABLE) '`!H Zg J` (42Q \RUN.PROCESS 31Q TIMEREXPIRED? 16Q BLOCK) (37Q PSTAT.TIMEDOUT 26Q MILLISECONDS 2 \TIMERQHEAD) NIL \PROC.RESETRESTOREA0019 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U)) hg i(6 RESETRESTORE) (3 RESET) NIL \PROC.RESETRESTORE D1 (L (0 PROC) F 0 RESETVARSLST F 1 \DRIBBLE.OFD) 9g@l oi @d08g@l8 PQ0i (64Q RELEASE.MONITORLOCK 50Q DRIBBLE 44Q \SETFVARSLOT 21Q \PROC.RESETRESTOREA0019 11Q \SETFVARSLOT) (35Q \DRIBBLE.OFD 2 RESETVARSLST) (15Q (DUMMY.FOR.ERRORSET)) \PROC.AFTER.HARDRESETA0841 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U)) `6``lHiNIL (15Q \TTY.PROCESS 12Q \OLD.TTY.PROCESS 2 \OLD.TTY.PROCESS) NIL \PROC.AFTER.HARDRESET D1 (P 12Q \DRIBBLE.OFD P 11Q \TERM.OFD P 10Q \PRIMOUT.OFD P 7 \PRIMIN.OFD P 6 TtyDisplayStream P 5 \PRIMTERMSA P 4 \PRIMTERMTABLE P 3 \PRIMREADTABLE P 2 \LINEBUF.OFD P 1 \#DISPLAYLINES P 0 \CURRENTDISPLAYLINE F 13Q \PRIMREADTABLE F 14Q \PRIMTERMTABLE F 15Q \PRIMTERMSA) I jl(`WWW``8 Ng __``d6o ` (104Q \PROC.RESETRESTORE 65Q \PROC.AFTER.HARDRESETA0841 33Q \GETOFD) (100Q \PROCUNWINDTHESE 74Q \PROCUNWINDTHESE 47Q \PROCUNWINDTHESE 42Q \OLD.TTY.PROCESS 30Q OUTPUT 21Q \DEFAULTLINEBUF 16Q \DEFAULTTTYDISPLAYSTREAM 5 \DEFAULTLINEBUF) (62Q (DUMMY.FOR.ERRORSET)) \PROCESS.UNWINDALLA0844 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 STATE) hP i(4 RESETRESTORE) NIL NIL \PROCESS.UNWINDALL D1 (I 0 STATE F 1 \DRIBBLE.OFD) 1`Hd o H0H0 Q @gh(55Q DRIBBLE 36Q RELEASE.MONITORLOCK 22Q \PROCESS.UNWINDALLA0844) (50Q HARDRESET 2 \RUNNING.PROCESS) (17Q (DUMMY.FOR.ERRORSET)) \UNIQUE.PROCESS.NAME D1 (L (0 NAME)) C@l@ b@@dio@ b l@IgH d Hkظ@(67Q FIND.PROCESS 63Q PACK* 43Q FIND.PROCESS 34Q ERROR 11Q MKATOM) (57Q #) ( 30Q "Illegal Process Name") \START.PROCESSES D1 (P 0 \INTERRUPTABLE) p``Y`J[ JZOdIEK\jKl KId"]jM IfKjL Ld KoI (154Q RAID 137Q \SMASHLINK 131Q \RESUME 106Q \DECUSECOUNT 60Q \LISPERROR) (65Q \RUNNING.PROCESS 12Q \HIGHEST.PRIORITY.QUEUE 5 #SCHEDULER#) (150Q "No runnable process!!") \PROCESS.GO.TO.SLEEP D1 (L (3 DELETEFLG 2 TIMERP 1 TIMEOUT 0 EVLOCK) P 0 \INTERRUPTABLE)  `1 O@`@j@j@OjO_d_OO%OOOOhh)o "OOO oO YIOh@O@O@_