(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "26-Apr-2023 12:41:36" ("compiled on " {DSK}larry>il>medley>library>BROWSER.;6) "23-Apr-2023 06:39:45" brecompiled changes%: MSPATHS.DISPATCH NUMSPATHS BROWSER BROWSER.WHENFNSCHANGED BRPATHS1 BROWSER.LEFTFN GET.BROWSE.PP.WINDOW GET.BROWSE.DESCRIBE.WINDOW BROWSEPP PPREPAINTFN PPRESHAPEFN DESCRIBEREPAINTFN BROWSERDESCRIBE BROWSER.MIDDLEFN DEDITPROCESSRUNNINGP REDRAWBROWSEGRAPH STBROWSER in "Welcome to Fuller sysout 23-Apr-2023 ..." dated "23-Apr-2023 06:44:43") (FILECREATED "26-Apr-2023 12:41:36" {DSK}larry>il>medley>library>BROWSER.;6 29801 :EDIT-BY "lmm" :CHANGES-TO (FNS BROWSER.LEFTFN NUMSPATHS STBROWSER MSPATHS.DISPATCH BROWSER BROWSER.WHENFNSCHANGED BRPATHS1 GET.BROWSE.PP.WINDOW GET.BROWSE.DESCRIBE.WINDOW BROWSEPP PPREPAINTFN PPRESHAPEFN DESCRIBEREPAINTFN BROWSERDESCRIBE BROWSER.MIDDLEFN DEDITPROCESSRUNNINGP REDRAWBROWSEGRAPH) (VARS BROWSERCOMS BROWSER.BORDERS) :PREVIOUS-DATE "15-Apr-2023 18:55:36" {DSK}larry>il>medley>library>BROWSER.;1) MSPATHS.DISPATCH :D8 (I 6 MARKING I 5 NOTRACE I 4 SEPARATE I 3 AVOIDING I 2 INVERTED I 1 TO I 0 FROM) 8g i@ABCDEF @ABCDEF (53 OLDMSPATHS 39 NUMSPATHS 23 OUTPUT 16 WINDOWWORLD 9 \DEFINEDP) (4 NUMSPATHS) () NUMSPATHS :D8 (P 8 X P 7 GRAPHNODE.LIST P 6 ROOTS P 5 TEM P 4 NAMED P 3 CALLRELATION P 2 SEEN P 1 UNDONE P 0 BROWSEHASH I 7 DEPTH I 6 MARKING I 5 NOTRACE I 4 SEPARATE I 3 AVOIDING I 2 INVERTED I 1 TO I 0 FROM F 9 BROWSERMAX F 10 BROWSERFORMAT F 11 BROWSERBOXING)  CobBGWb`-l h@i Hg CJ I5hdOEdE mjJ BOhj LbI3ONWW @ABCDEFGh HJ ]MjMIIhdJ IhjJ LG NL\(246 BRPATHS1 236 PUTHASH 220 PUTHASH 191 GETHASH 175 STBROWSER 152 LAYOUTGRAPH 147 \APPEND2 123 UPDATEFN 111 PUTHASH 100 MSMEMBSET 71 CLRHASH 62 PARSERELATION 51 MSLISTSET 39 HARRAY 16 UPDATECHANGED) (182 \BROWSEHASH.GLOBALRESOURCE 81 \BROWSEHASH.GLOBALRESOURCE 57 CALL 30 \BROWSEHASH.GLOBALRESOURCE) ( 6 (NIL (NIL NIL . FNS) APPLY LAMBDA (X) (GETPROP X (QUOTE AVOID)))) BROWSER :D8 (P 0 WC I 0 DISPLAYFLG F 1 BROWSER) tgg gg @c` ` gg gH gggH h(112 FILEPKGTYPE 88 MEMB 74 FILEPKGTYPE 53 FONTCREATE 42 FONTP 29 MOVD 14 MOVD?) (105 BROWSER.WHENFNSCHANGED 100 WHENCHANGED 95 FNS 82 BROWSER.WHENFNSCHANGED 69 WHENCHANGED 64 FNS 58 BROWSERFONT 48 BROWSERFONT 37 BROWSERFONT 24 MSPATHS 19 MSPATHS.DISPATCH 9 OLDMSPATHS 4 MSPATHS) () BROWSER.WHENFNSCHANGED :D8 (P 0 X I 2 REASON I 1 TYPE I 0 FNNAME F 3 PFWINDOW F 4 BROWSER.DESCRIBE.WINDOW) S Sg @@S T Tg @@T `Ed!HY=h3H.hn"gH Hgg HhhZ@JiI(125 PUTWINDOWPROP 105 DSPFILL 58 BROWSERDESCRIBE 48 GETWINDOWUSERPROP 35 ACTIVEWP 28 BROWSEPP 18 GETWINDOWUSERPROP 5 ACTIVEWP) (120 REDRAWBROWSEGRAPH 115 BUTTONEVENTFN 96 PAINT 64 BROWSERWINDOWS 43 FNBROWSED 13 FNBROWSED) () BRPATHS1 :D8 (P 12 X P 7 Y P 2 TOFNS P 1 ENTRY P 0 TEM I 1 DEPTH I 0 FROM F 13 SEEN F 14 GRAPHNODE.LIST F 15 DEFAULT.GRAPH.NODELABELSHADE F 16 DEFAULT.GRAPH.NODEBORDER F 17 CALLRELATION F 18 INVERTED) - 0@ @W Xdm7@hddWhddd`@W hWH @HW HdjW$@W" @W"i @hddWhddd`@W hYWc@IW J#AjIg`IIJAKLA O&OI_ OM Nh]K[N&_Ak __OOh__O_O&_(261 BRPATHS1 228 MSPATHS2 151 PUTHASH 103 GETRELATION 93 GETRELATION 74 PUTHASH 64 PUAH 16 GETHASH 8 MSPATHS2) (182 BROWSER.BORDERS 177 ENDOFLINE 119 BROWSERFONT 39 BROWSERFONT) () BROWSER.LEFTFN :D8 (P 19 FROM P 18 A3295 P 17 TO P 16 A3296 P 15 INVERTED P 14 A3297 P 13 AVOIDING P 12 A3298 P 11 SEPARATE P 10 A3299 P 9 NOTRACE P 8 A3300 P 7 MARKING P 6 DEPTH P 5 A3294 P 4 BW P 1 SELECTION P 0 FN I 1 NWINDOW I 0 NODE) 0@dX`dodg dgjdndhdJ Y`KXoH hM_&M_$_"O$_ _O __O__O__O__OIdh\dAK[gIdg/hogHhOO"O&OOhOON ʴIdggIdg=Hdg g!Hg gHo h hg"Hg MH @IdgH )gH Ho H h(459 HELP 453 INSPECTCODE 446 PROMPTPRINT 434 CCODEP 418 BROWSERDESCRIBE 413 GET.BROWSE.DESCRIBE.WINDOW 395 BROWSEPP 390 GET.BROWSE.PP.WINDOW 381 GETWINDOWUSERPROP 371 GET.BROWSE.PP.WINDOW 355 ED 348 PROMPTPRINT 330 HASDEF 311 HASDEF 257 NUMSPATHS 105 PROMPTPRINT 81 MENU) (425 InspectCode 404 Describe 376 FNBROWSED 362 Show 336 FUNCTIONS 325 FUNCTIONS 317 FNS 306 FNS 295 Edit 283 Avoid 273 Ignore 227 QUOTE 212 CallsTo 203 CallsFrom 87 BROWSERWINDOWS 56 DEFAULTMENUHELDFN 47 CLRPROMPT 31 |MENUTYPE#|) ( 441 "not compiled" 343 "no definition" 222 (NIL NIL . FNS) 99 "No browser window found for" 38 (CallsFrom CallsTo Edit Show InspectCode)) GET.BROWSE.PP.WINDOW :D8 (F 0 PFWINDOW) ^P Uho cdgg Pgg Pgg Pgg P P(90 MODERNWINDOW 84 PUTWINDOWPROP 68 PUTWINDOWPROP 52 PUTWINDOWPROP 36 PUTWINDOWPROP 18 CREATEW 5 WINDOWP) (79 SCROLLBYREPAINTFN 74 SCROLLFN 63 PPRESHAPEFN 58 RESHAPEFN 47 PPREPAINTFN 42 REPAINTFN 31 PPREPAINTFN 26 REPAINTFN) ( 13 "Browser print out window") GET.BROWSE.DESCRIBE.WINDOW :D8 (F 0 BROWSER.DESCRIBE.WINDOW) HP ?ho cdgg Pgg Pgg P(68 PUTWINDOWPROP 52 PUTWINDOWPROP 36 PUTWINDOWPROP 18 CREATEW 5 WINDOWP) (63 SCROLLBYREPAINTFN 58 SCROLLFN 47 DESCRIBEREPAINTFN 42 RESHAPEFN 31 DESCRIBEREPAINTFN 26 REPAINTFN) ( 13 "Browser describe window") BROWSEPP :D8 (P 1 BOTTOM P 0 WIDTH I 1 WINDOW I 0 FN) X Ag@ A A Agh A XAgjhA YHAg Ih h(84 PUTWINDOWPROP 72 GETWINDOWPROP 59 DSPYPOSITION 44 PPREPAINTFN 38 PUTWINDOWPROP 26 MOVETOUPPERLEFT 20 CLEARW 14 PUTWINDOWPROP) (67 HEIGHT 51 EXTENT 32 EXTENT 8 FNBROWSED) () PPREPAINTFNA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 1 WINDOW F 2 SI::*RESETFORMS* F 3 FNTYPE F 4 DEF F 5 LAMBDAFONT F 6 FN) gQ hhRcgi hhRcgd gh RcSg2oQ UQ VQ `Q Q hQ HHmQ TSglg Sg oQ (192 PRIN1 172 PRINTDEF 150 DSPRIGHTMARGIN 130 DSPCLIPPINGREGION 122 TERPRI 115 CHANGEFONT 103 PRIN2 95 CHANGEFONT 87 PRIN1 62 SETTOPVAL 50 GETTOPVAL 30 SETREADTABLE 10 OUTPUT) (178 FNS 167 FNS 157 FNS 109 DEFAULTFONT 73 FNS 56 **COMMENT**FLG 44 **COMMENT**FLG 24 SETREADTABLE 4 OUTPUT) ( 186 ")" 81 "(") PPREPAINTFN :D8 (P 9 RESETSTATE P 8 SI::*RESETFORMS* P 7 LISPXHIST P 6 FPTYPE P 3 FNTYPE P 2 DEF P 1 EXTENT P 0 FN I 2 RESHAPE I 1 REGION I 0 WINDOW F 10 LAMBDAFONT F 11 MSFNTYPES F 12 LISPXHIST) @g @ 2HW@ @I `@ WM/hHW! g $h@ HNhg ZNJM]n@ Hh@ lgh@ \Lm@ `j(184 DSPRIGHTMARGIN 168 DSPCLIPPINGREGION 152 GETSTREAM 144 DSPRIGHTMARGIN 122 GETDEF 102 DSPCLIPPINGREGION 90 SI::RESETUNWIND 85 \MVLIST 80 PPREPAINTFNA0001 52 CHANGEFONT 41 MOVETOUPPERLEFT 34 CHANGEFONT 16 \INSUREWINDOW 10 GETWINDOWUSERPROP) (189 BrowserPPWindowWidth 159 PF* 117 NOERROR 75 SI::RESETUNWIND 46 DEFAULTFONT 5 FNBROWSED) () PPRESHAPEFN :D8 (I 0 WINDOW) @g @ (16 BROWSEPP 10 GETWINDOWUSERPROP) (5 FNBROWSED) () DESCRIBEREPAINTFNA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 SI::*RESETFORMS* F 1 WIN F 2 EXTENT F 3 FN) Mgd gh PcgQ hhPcgQ RQR S (74 MSDESCRIBE 67 MOVETOUPPERLEFT 58 DSPSCROLL 38 OUTPUT 22 SETTOPVAL 10 GETTOPVAL) (52 OFF 32 OUTPUT 16 MSPRINTFLG 4 MSPRINTFLG) () DESCRIBEREPAINTFN :D8 (P 4 RESETSTATE P 3 SI::*RESETFORMS* P 2 LISPXHIST P 1 EXTENT P 0 FN I 1 REG I 0 WIN F 5 LISPXHIST) 8@g @ HU!g $h(48 SI::RESETUNWIND 43 \MVLIST 38 DESCRIBEREPAINTFNA0001 16 \INSUREWINDOW 10 GETWINDOWUSERPROP) (33 SI::RESETUNWIND 5 FNBROWSED) () BROWSERDESCRIBE :D8 (I 1 WIN I 0 FN) PAg@ A A AgjhA Ag Ag hA h (77 PUTWINDOWPROP 66 DSPYPOSITION 59 GETWINDOWPROP 48 GETWINDOWPROP 37 DSPYPOSITION 23 DESCRIBEREPAINTFN 17 CLEARW 11 PUTWINDOWPROP) (54 HEIGHT 43 WIDTH 29 EXTENT 5 FNBROWSED) () BROWSER.MIDDLEFN :D8 (I 1 NWINDOW I 0 NODE)  @h`dg` ` o` ` o` @` o` o` o` gg@hh dgdg@g @ (263 ED 244 ED 204 ADD.PROCESS 170 PRIN1 155 PRIN1 140 PRIN1 125 PRIN1 103 PRIN1 88 TERPRI 78 PRIN1 63 TERPRI 53 TERPRI 39 DEDITPROCESSRUNNINGP 22 EDITMODE) (239 :DONTWAIT 219 SEDIT:SEDIT 211 SEDIT 181 QUOTE 176 ED 165 PROMPTWINDOW 150 PROMPTWINDOW 135 PROMPTWINDOW 120 PROMPTWINDOW 98 PROMPTWINDOW 83 PROMPTWINDOW 73 PROMPTWINDOW 58 PROMPTWINDOW 48 PROMPTWINDOW 28 DEDIT 13 \RUNNING.PROCESS) ( 160 "window then selecting 'Edit'." 145 "into the Dedit " 130 " " 93 "You can call Dedit in the same process by typing " 68 "Dedit can't run in two processes at once, yet.") DEDITPROCESSRUNNINGP :D8 (F 0 \DEDITWINDOWS) gP(4 EDITMODE) (9 DEDIT) () REDRAWBROWSEGRAPH :D8 (P 2 WN I 0 WINDOW) L`H.hJgJ @gg @ hY@IiHX(53 APPLYTOSELECTEDNODE 47 PUTWINDOWPROP 30 APPLY) (42 APPLYTOSELECTEDNODE 37 BUTTONEVENTFN 23 NUMSPATHS 4 BROWSERWINDOWS) () STBROWSERA0001 :D8 (I 0 WINDOW) .`Hh` d@HX(23 DREMOVE) (28 BROWSERWINDOWS 18 BROWSERWINDOWS 4 BROWSERWINDOWS) () STBROWSER :D8 (P 2 TMP P 1 W I 1 ARGS I 0 GRAPH) `!Hq@oAZYoAZAo gg A@Ih`Igg ao_Bo@AAII"IAI@@IYgg HXXoJ YoJ R(212 CONCAT 194 CONCAT 171 SHOWGRAPH 95 WINDOWADDPROP 58 SHOWGRAPH 43 CONCAT) (166 BROWSER.MIDDLEFN 161 BROWSER.LEFTFN 90 STBROWSERA0001 85 CLOSEFN 77 BROWSERWINDOWS 71 BROWSERWINDOWS 53 BROWSER.MIDDLEFN 48 BROWSER.LEFTFN 4 BROWSERWINDOWS) ( 202 " TO " 184 " TO " 120 " FROM " 107 " FROM " 38 "" 27 "" 17 "PATHS") (PRETTYCOMPRINT BROWSERCOMS) (RPAQQ BROWSERCOMS ((FILES MASTERSCOPE GRAPHER) (DECLARE%: EVAL@COMPILE DONTCOPY (FILES (LOADCOMP) GRAPHER) (CONSTANTS (CHANGEDSHADE 8840))) (FNS MSPATHS.DISPATCH NUMSPATHS BROWSER BROWSER.WHENFNSCHANGED BRPATHS1 BROWSER.LEFTFN GET.BROWSE.PP.WINDOW GET.BROWSE.DESCRIBE.WINDOW BROWSEPP PPREPAINTFN PPRESHAPEFN DESCRIBEREPAINTFN BROWSERDESCRIBE BROWSER.MIDDLEFN DEDITPROCESSRUNNINGP REDRAWBROWSEGRAPH STBROWSER) (GLOBALRESOURCES BROWSEHASH) (DECLARE%: DONTCOPY ( RECORDS BROWSEWIN PATHSARGS)) (INITVARS (BROWSER T) (BROWSERBOXING) (BROWSERFORMAT) (BROWSERWINDOWS) ( NODESELECTIONWINDOW) (PFWINDOW) (BROWSER.DESCRIBE.WINDOW) (BrowserPPWindowWidth 750) (BROWSERMAX 10) ( BROWSERFONT (QUOTE (GACHA 8)))) (P (MOVD? (QUOTE NILL) (QUOTE MODERNWINDOW))) (VARS BROWSER.BORDERS) ( GLOBALVARS BROWSER.BORDERS BROWSERWINDOWS) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (BROWSER T))))) (FILESLOAD MASTERSCOPE GRAPHER) (/SETTOPVAL (QUOTE \BROWSEHASH.GLOBALRESOURCE) NIL) (RPAQ? BROWSER T) (RPAQ? BROWSERBOXING) (RPAQ? BROWSERFORMAT) (RPAQ? BROWSERWINDOWS) (RPAQ? NODESELECTIONWINDOW) (RPAQ? PFWINDOW) (RPAQ? BROWSER.DESCRIBE.WINDOW) (RPAQ? BrowserPPWindowWidth 750) (RPAQ? BROWSERMAX 10) (RPAQ? BROWSERFONT (QUOTE (GACHA 8))) (MOVD? (QUOTE NILL) (QUOTE MODERNWINDOW)) (RPAQQ BROWSER.BORDERS ((NORMAL "Normal" 2 -1) (GHOST "Shown elsewhere" 2 8840) (RECURSIVEGHOST "End of recursive chain" 2 0 -1) (MERGED "Includes other branches" 4 42405) (SELFRECURSIVE "Includes self-recursive calls" 2 61375) (RECURSIVE "Head of recursive chain" 4 28086) (ENDOFLINE "exceeded depth limit" 6 64510))) (BROWSER T) NIL