(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "28-Jul-2023 20:13:45" ("compiled on " {DSK}larry>il>medley>library>SPY.;4) "22-Jul-2023 09:15:01" brecompiled changes%: SPY.BUFFER.ENTRY \SPY.INTERRUPT SPY.ADD.ENTRY in "FULL 22-Jul-2023 ..." dated "22-Jul-2023 09:15:05") (FILECREATED "28-Jul-2023 20:13:45" {DSK}larry>il>medley>library>SPY.;4 64149 :EDIT-BY "lmm" :CHANGES-TO (VARS SPYCOMS) (FNS \SPY.INTERRUPT SPY.BUFFER.ENTRY SPY.ADD.ENTRY) :PREVIOUS-DATE " 4-Jan-2022 14:09:48" {DSK}larry>il>medley>library>SPY.;1) SPYOBJ :D8 (P 4 *PRINT-PRETTY* P 3 *PRINT-LENGTH* P 2 *PRINT-LEVEL* I 2 STATUS I 1 PERCENT I 0 NAME F 5 LABEL F 6 SPYOBJ.IMAGEFNS) ) @¸A¹kdhoAUIHhV (38 IMAGEOBJCREATE 24 CL:FORMAT) NIL ( 17 "~D ~S") SPYOBJ.BUTTON :D8 (L (7 BUTTON 6 TEXT 5 WINDOW 4 RELY 3 RELX 2 SEL 1 WINDOWSTREAM 0 OBJ)) hNIL NIL () SPYOBJ.SAVE :D8 (I 1 STREAM I 0 OBJ) @ÉA`(18 PRIN2) (13 FILERDTBL 5 IMAGEOBJ) () SPYOBJ.COPY :D8 (L (0 OBJ)) @NIL NIL () SPYOBJ.GET :D8 (I 1 TEXTSTREAM I 0 STREAM F 0 SPYOBJ.IMAGEFNS) @` P (16 IMAGEOBJCREATE 10 READ) (5 FILERDTBL) () SPYOBJ.IMAGEBOX :D8 (P 1 HEIGHT P 0 DATA I 1 FONTSOURCE I 0 OBJ) 5A§`b¿@É@A @ A Ijdh(42 STRINGWIDTH 36 SPYOBJ.LABEL 27 SPYOBJ.HEIGHT) (15 IMAGEOBJ 6 SPY.FONT) () SPYOBJ.DISPLAY :D8 (P 1 HEIGHT P 0 DATA I 1 STREAM I 0 OBJ) E`A @É@A jIAÈ l×Õl×A@ A (66 PRIN3 60 SPYOBJ.LABEL 54 RELMOVETO 28 SPYOBJ.HEIGHT 10 DSPFONT) (39 FONTDESCRIPTOR 16 IMAGEOBJ 4 SPY.FONT) () SPYOBJ.LABEL :D8 (L (0 OBJ)) @ÉNIL (5 IMAGEOBJ) () SPYOBJ.HEIGHT :D8 (P 1 FH P 0 DATUM I 1 STREAM I 0 OBJ) ,@ÉAÈ "IH`ÖIÖld×»ZKó‘JKNIL (27 SPY.MAXLINES 13 FONTDESCRIPTOR 5 IMAGEOBJ) () SPYOBJ.COPYIN :D8 (I 2 C I 1 B I 0 A) (4 HELP) NIL () SPY.COPYBUTTON :D8 (I 0 WINDOW) @i (6 SPY.GRAPH.EDITOR) NIL () SPY.MERGEINFO :D8 (I 2 PARENT-NAME I 1 SPYDATA I 0 NAME F 2 SPY.MERGEINFO) IAg'²Ag'Hµhµ@Rµo@ ´oY@ð˜BI“I°×HX°Î(43 STRPOS) (14 MERGEINFO 5 MERGEINFO) ( 50 (:INTERPRETER CL:EVAL) 37 "\interpret-") SPY.FIND.TREE :D8 (P 1 X I 0 FN) N`Hµ,hµ'`d@¿dj¿dg¿`YÉ@ð•IµÊi°ÇHX°¾NIL (60 SPYRECORD 51 SPY.TREE 45 SPY.TREE 37 NORMAL 20 |SPYRECORDTYPE#| 4 SPY.TREE) () SPY.TOGGLEA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS*) l (6 SPY.TREE) NIL () SPY.TOGGLE :D8 (P 0 SI::*RESETFORMS*) K`gð²9g` hhhg ¿$(72 SPY.START 62 SI::RESETUNWIND 57 \MVLIST 52 SPY.TOGGLEA0001 32 CURSOR 17 SPY.END) (47 SI::RESETUNWIND 27 WAITINGCURSOR 22 CURSOR 9 \SPY.INTERRUPT 4 \PERIODIC.INTERRUPT) () SPY.TREE :D8 (P 0 SPYDATA I 3 DEPTHLIMIT I 2 MERGETYPE I 1 INDIVIDUALP I 0 THRESHOLD F 1 *PACKAGE* F 2 *READTABLE* F 3 *PRINT-CASE*) z`¥ogQgRgSgAhðg@µ`gBdgð‘¿iµA•g€igCh`H H h(118 SPY.MAKE.TREE 112 SPY.MERGE) (106 SPY.TREE 82 DEPTH 75 ALL 62 DEFAULT 55 MERGETYPE 50 SPY.SHOW.THRESHOLD 42 THRESHOLD 34 CUMULATIVE 28 PRINT-CASE 22 READTABLE 16 PACKAGE 4 SPY.TREE) ( 10 "no spy samples have been gathered") SPY.LEGEND :D8 (F 4 SPY.BORDERS) g@T°7d[hddKhddd`KKh¸IµHhZH&¹µÊJT h`hl ogd(100 SHOWGRAPH 84 LAYOUTGRAPH 69 REVERSE) (94 NILL 75 SPY.FONT 26 SPY.FONT) ( 89 "SPY border interpretation") SPY.GRAPH.EDITOR :D8 (P 17 NAME P 16 *PRINT-CASE* P 15 *PACKAGE* P 14 *READTABLE* P 13 MULTIPLE P 12 PENDING P 11 SPYDATA P 10 WINDOW P 9 NODE P 8 LASTNODE P 7 ACTION P 6 TOPCOUNT P 5 NEW-TREES P 0 TREES I 1 COPY I 0 W F 18 DEFAULTFONT) à@g Q@g A @_g `l ål ÿ´¿`låjðhð Og'Og'Og'@ ¿@g @ @ µA_Oð³