(FILECREATED "22-Jul-85 18:49:41" ("compiled on " {ERIS}SOURCES>MASTERSCOPE.;18) "21-Jul-85 19:41:07" brecompiled changes: UPDATEFN MSNOTICEFILE MSUPDATEFN1 UPDATECHANGED1 MSDESCRIBE MSCHECKBLOCKS UNSAVEFNS ONFILE in "INTERLISP-D 21-Jul-85 ..." dated "21-Jul-85 19:55:18") (FILECREATED "22-Jul-85 18:48:33" {ERIS}SOURCES>MASTERSCOPE.;18 96592 changes to: (FNS UPDATEFN UNSAVEFNS MSUPDATEFN1 UPDATECHANGED1 MSDESCRIBE MSNOTICEFILE MSCHECKBLOCKS ONFILE) (VARS MSDATABASECOMS MSCOMPILETIME) previous date: "13-Jul-85 03:33:23" {ERIS}SOURCES>MASTERSCOPE.;16) ADDHASH D1 (L (2 ARRAY 1 VAL 0 ITEM)) @BHAHHAh @AhB h(33Q PUTHASH 22Q \NCONC2) NIL () SUBHASH D1 (L (2 ARRAY 1 VAL 0 ITEM)) @BHAH @hB h(24Q PUTHASH 15Q DREMOVE) NIL () MAKEHASH D1 (L (0 N)) @g (6 HASHARRAY) (3 MSREHASH) () MSREHASH D1 (L (0 HA)) @ lll2(3 HARRAYSIZE) NIL () MSVBTABLES D1 (L (1 MOD 0 VERB)) N@db@bgA o+g!g@dgxAdgoggAdggoAdgoggAdgggoAgggAhg@dg6AdggrgggA o]gSgMgAh?g9@dgpAdgo!goAdgooAdgogoAdgogogAho@dgAhgg:AdgggowAdgohh`oY@dgAhHgBg8Adgg.gg#Adggh o@dg9AdggggAdgghog+AdggggAho@dgAdgo~gosAdggfgg\AdgoNoGAdgo9gg/Adgo!goAdgogjddhNIL (1500Q TYPE 1465Q VALUE 1450Q TESTING 1434Q RECORDS 1425Q PROP 1420Q PROPNAMES 1404Q PREDICATE 1357Q LOCALLY 1350Q LOCALFREEVARS 1343Q INDIRECTLY 1336Q CLISP 1330Q I.S.OPRS 1313Q FREELY 1277Q FIELDS 1264Q USE 1234Q TEST 1227Q LOCALLY 1221Q TESTFREE 1213Q FREELY 1203Q TEST 1156Q SMASH 1150Q LOCALLY 1140Q SMASHFREE 1133Q FREELY 1125Q REPLACE 1117Q FIELDS 1106Q SMASH 1057Q SET 1051Q LOCALLY 1041Q SETFREE 1034Q FREELY 1026Q REPLACE 1020Q FIELDS 1010Q SET 1002Q REPLACE 763Q REPLACE 725Q LOCALLY 707Q FREELY 701Q FETCH 673Q FIELDS 663Q REFERENCE 655Q PROG 636Q PROG 607Q KNOWN 566Q TYPE 551Q VARS 533Q RECORDS 516Q PROPS 467Q KNOWN 451Q FNS 434Q FIELDS 423Q IS 413Q FETCH 375Q FETCH 367Q SPECVARS 355Q SPECVARS 335Q LOCALVARS 330Q LOCALVARS 322Q LOCALVARS 314Q LOCALLY 303Q DECLARE 273Q CREATE 255Q CREATE 247Q NLAMBDA 235Q NLAMBDA 220Q VALUE 212Q PREDICATE 204Q TESTING 174Q PREDICATE 167Q PREDICATE 152Q NOTERROR 132Q APPLY 124Q INDIRECTLY 114Q EFFECT 107Q EFFECT 72Q DIRECTLY 61Q CALL 51Q BIND 37Q NOTUSE 17Q BIND) ( 1474Q (REF REFFREE SMASH SMASHFREE) 1456Q (TEST TESTFREE) 1443Q (CREATE RECORD) 1413Q (TEST TESTFREE) 1375Q (REF REFFREE SET SETFREE SMASH SMASHFREE TEST TESTFREE) 1366Q (REF SET SMASH TEST) 1321Q (REFFREE SETFREE SMASHFREE TESTFREE) 1306Q (FETCH REPLACE) 1254Q (TEST TESTFREE) 1175Q (SMASH SMASHFREE) 1076Q (SET SETFREE) 753Q (REF REFFREE TEST TESTFREE SMASH SMASHFREE) 734Q (REF TEST SMASH) 715Q (REFFREE TESTFREE SMASHFREE) 626Q (CALL NOBIND REF) 601Q ((0)) 560Q ((BIND) (REFFREE) (REF) (SETFREE) (SET) (SMASHFREE) (SMASH) (TEST) (TESTFREE)) 541Q ((RECORD) (CREATE)) 525Q ((PROP)) 506Q (CALL NOBIND REF (CALL) (BIND) (REFFREE) (REF) (SETFREE) (SET) (SMASHFREE) (SMASH) (RECORDS) (FETCH) (REPLACE) (PROP) (APPLY) (TEST) (TESTFREE)) 476Q (CALL NOBIND REF) 457Q (CALL NOBIND REF (CALL) (APPLY)) 443Q ((FETCH) (REPLACE)) 347Q (LOCALVARS SPECVARS) 226Q (CALL NLAMBDA) 161Q (APPLY CALL EFFECT PREDICATE NLAMBDA) 142Q (APPLY CALL EFFECT ERROR PREDICATE NLAMBDA) 101Q (CALL EFFECT PREDICATE NLAMBDA) 31Q (BIND REF SET SMASH TEST)) MSCHECKBLOCKS D1 (L (0 FILES) P 1 SPECVARS P 0 LOCALVARS) 3`ir@ `bv@g@hbf@cd^ Ng K N ]d MJ Ng ]gM Ng ]gM Ng ]ggM jd JA O,O\KsoLdd o Y_` !Kh__hO_O+Oh__O__OO OiOO&_g@LJK KdJK h(452Q \MSCHECKBLOCKS/MSCHECKBLOCK 440Q \MSCHECKBLOCKS/MSCHECKBLOCK 377Q MEMB 313Q MEMB 300Q \APPEND2 275Q \APPEND2 266Q LDIFF 217Q TAB 212Q UPDATECHANGED 202Q APPLY 165Q FILECOMSLST 155Q APPLY 144Q FILECOMSLST 134Q APPLY 123Q FILECOMSLST 113Q \NCONC2 101Q UPDATEFN 72Q FILEFNSLST 65Q \NCONC2 61Q FILECOMSLST 51Q MSNOTICEFILE) (427Q File 310Q DONTCOMPILEFNS 175Q GLOBALVARS 172Q ADDTOVAR 162Q GLOBALVARS 151Q SPECVARS 141Q SPECVARS 130Q LOCALVARS 120Q LOCALVARS 56Q BLOCKS 26Q FILEGROUP 14Q FILELST 2 SYSLOCALVARS) ( 272Q (--) 247Q (no block -)) \MSCHECKBLOCKS/MSCHECKBLOCKA0001 D1 (NAME ERRORSET P 15Q SHOULDBESPECVARS P 14Q ERRORS P 13Q BLKAPPLYCALLERS P 6 BLKFNS P 5 LOCALFREEVARS P 4 ENTRIES P 3 BLKAPPLYFNS P 1 LOCALVARS P 0 SPECVARS F 37Q BLOCK F 40Q SPECVARS F 41Q LOCALVARS F 42Q BLOCKS F 43Q FNS) W@WBW>JdhZiHi`H `W>d_ddg _OOd-_OO O OdgOi`Y|dgOip`Xidgbdg[dgTdgMdgFdg?dg8dg1dg*dg#Oo N Oo ON^,JW>J Kdohi hNd_ WFO `O o JO W>WD O g` _O g` O g` O g` O g` d_dOd`d ~Odg` :Odg` (Odg` Odg` OO_*O Hi O O OdOO oOi OO g` OO OoO i >O g` O g` O g` O g` O _pOJ Oh_$_"RW>h_0_.}O%_2jO2O2 o W>d@W>AO4#_$O,O$`"O$HO$MO$`O$gO$d g` O$g` O$g` O$g` 1O4 O6_(dN_:O8O:h_8_6O4_4O:&_8O$dg` LO$dg` :O$dg` (O$dg` O$dg` O$oOj O$oO$oOi O"u_0dgdgdgdgO0h_,_*_,OtO,OmO,g` O,g` O,g` O,g` O,g` h_(_&hO,oO0i O*{_(NO(iO&տO._<_:O84O:h_8_6O<.O6o  O2o O _O:&_8O4_4d oo hh(2602Q PRIN1 2561Q \MSCHECKBLOCKS/PRINTERROR 2530Q DREVERSE 2522Q PRIN1 2506Q PRIN2 2502Q \NCONC2 2400Q \MSCHECKBLOCKS/DOERROR 2350Q UNION 2345Q UNION 2342Q UNION 2337Q UNION 2334Q GETTABLE 2316Q GETTABLE 2300Q GETTABLE 2262Q GETTABLE 2244Q GETTABLE 2112Q \MSCHECKBLOCKS/DOERROR 2066Q BOUNDP 2046Q TESTTABLE 2024Q TESTTABLE 2002Q TESTTABLE 1760Q TESTTABLE 1736Q TESTTABLE 1632Q UNION 1627Q UNION 1624Q UNION 1621Q GETTABLE 1603Q GETTABLE 1565Q GETTABLE 1547Q GETTABLE 1527Q CONSTANTEXPRESSIONP 1375Q PRIN1 1365Q TERPRI 1361Q TERPRI 1355Q \FZEROP 1336Q POSITION 1274Q \MSCHECKBLOCKS/MSCHECKBOUNDFREE 1253Q UNION 1246Q UNION 1243Q UNION 1240Q UNION 1235Q GETTABLE 1217Q GETTABLE 1201Q GETTABLE 1163Q GETTABLE 1134Q \MSCHECKBLOCKS/DOERROR 1117Q \MSCHECKBLOCKS/SPECVARP 1105Q GETTABLE 1064Q \MSCHECKBLOCKS/DOERROR 1036Q \MSCHECKBLOCKS/UNECCSPEC 1021Q \MSCHECKBLOCKS/SPECVARP 1001Q TESTTABLE 757Q TESTTABLE 735Q TESTTABLE 713Q TESTTABLE 671Q \MSCHECKBLOCKS/GLOBALVARP 635Q UNION 632Q UNION 627Q UNION 624Q UNION 621Q GETTABLE 603Q GETTABLE 565Q GETTABLE 547Q GETTABLE 527Q GETTABLE 510Q \MSCHECKBLOCKS/MSCHECKFNINBLOCK 474Q \MSCHECKBLOCKS/DOERROR 431Q \MSCHECKBLOCKS/DOERROR 413Q \MSCHECKBLOCKS/MSCHECKBLOCKBASIC 364Q \MSCHECKBLOCKS/DOERROR 352Q MEMB 344Q \MSCHECKBLOCKS/DOERROR 147Q SET 141Q \APPEND2 104Q EVAL 42Q UNION) (2326Q MSDATABASELST 2323Q BIND 2310Q MSDATABASELST 2305Q REF 2272Q MSDATABASELST 2267Q SET 2254Q MSDATABASELST 2251Q SMASH 2236Q MSDATABASELST 2233Q TEST 2162Q GLOBALVARS 2154Q LOCALFREEVARS 2146Q LOCALVARS 2137Q SPECVARS 2040Q MSDATABASELST 2035Q TEST 2016Q MSDATABASELST 2013Q SMASH 1774Q MSDATABASELST 1771Q SET 1752Q MSDATABASELST 1747Q REF 1730Q MSDATABASELST 1725Q BIND 1613Q MSDATABASELST 1610Q REFFREE 1575Q MSDATABASELST 1572Q SETFREE 1557Q MSDATABASELST 1554Q SMASHFREE 1541Q MSDATABASELST 1536Q TESTFREE 1514Q GLOBALVAR 1502Q GLOBALVARS 1447Q SYSSPECVARS 1227Q MSDATABASELST 1224Q REFFREE 1211Q MSDATABASELST 1206Q SETFREE 1173Q MSDATABASELST 1170Q SMASHFREE 1155Q MSDATABASELST 1152Q TESTFREE 1077Q MSDATABASELST 1074Q LOCALFREEVARS 773Q MSDATABASELST 770Q TESTFREE 751Q MSDATABASELST 746Q SMASHFREE 727Q MSDATABASELST 724Q SETFREE 705Q MSDATABASELST 702Q REFFREE 660Q SYSSPECVARS 613Q MSDATABASELST 610Q REF 575Q MSDATABASELST 572Q SET 557Q MSDATABASELST 554Q SMASH 541Q MSDATABASELST 536Q TEST 521Q MSDATABASELST 516Q BIND 461Q BLKLIBRARY 436Q BLKLIBRARY 326Q SYSLOCALVARS 317Q RETFNS 310Q NOLINKFNS 301Q LINKFNS 272Q ENTRIES 263Q BLKAPPLYFNS 254Q SYSSPECVARS 245Q BLKLIBRARY 236Q GLOBALVARS 227Q LOCALFREEVARS 220Q SYSSPECVARS 204Q LOCALVARS 175Q SYSLOCALVARS 157Q SPECVARS 74Q * 46Q SYSSPECVARS 36Q SYSSPECVARS) ( 2577Q ", " 2572Q "---------------- " 2517Q ": >>>>>" 2477Q (--) 2371Q "not mentioned in block, but on" 2104Q "not bound, not a GLOBALVAR, used freely by" 2075Q "not declared, never bound, no top-level value, used freely by" 2056Q "not declared, used freely by " 1372Q "<<<<< In " 1126Q "should be SPECVAR (used in functional arg) in" 1056Q "binds and never uses" 471Q "not on the file" 424Q "BLKAPPLYFNS but not a real block" 361Q "on block twice" 341Q "unrecognized item in block declaration") \MSCHECKBLOCKS/MSCHECKBLOCK D1 (I 2 BLOCKS I 1 FNS I 0 BLOCK F 2 RESETVARSLST) g`g`g`g`g`g`RcRYog HHXHXHXHXHXIdRHcR RkI H(224Q ERROR! 213Q NLEFT 204Q TAILP 101Q \MSCHECKBLOCKS/MSCHECKBLOCKA0001) (164Q DONTCOMPILEFNS 153Q LINKFNS 142Q NOLINKFNS 131Q BLKLIBRARY 120Q RETFNS 107Q GLOBALVARS 76Q INTERNAL 50Q DONTCOMPILEFNS 45Q DONTCOMPILEFNS 41Q LINKFNS 36Q LINKFNS 32Q NOLINKFNS 27Q NOLINKFNS 23Q BLKLIBRARY 20Q BLKLIBRARY 14Q RETFNS 11Q RETFNS 5 GLOBALVARS 2 GLOBALVARS) ( 73Q (\MSCHECKBLOCKS/MSCHECKBLOCKA0001)) \MSCHECKBLOCKS/MSCHECKFNINBLOCK D1 (L (2 BLOCKS 1 BLOCK 0 FN) F 6 ENTRIES F 7 BLKFNS F 10Q BLKAPPLYFNS)  `@gYe@V@`h@g` X@g` @g` @g` @g` I@dVIg @ohi {d]d@dWiMW7Bh[ hG@o;\A@L LdML L#iKMH@`@W@oM J@W@o h(411Q \MSCHECKBLOCKS/DOERROR 365Q \MSCHECKBLOCKS/DOERROR 321Q MEMB 304Q MEMB 216Q \MSCHECKBLOCKS/DOERROR 202Q MSFIND 152Q UNION 147Q UNION 144Q UNION 141Q UNION 136Q GETTABLE 121Q GETTABLE 104Q GETTABLE 67Q GETTABLE 51Q GETTABLE) (345Q RETFNS 177Q IGNOREMACRO 130Q MSDATABASELST 125Q CALL 113Q MSDATABASELST 110Q EFFECT 76Q MSDATABASELST 73Q PREDICATE 61Q MSDATABASELST 56Q NLAMBDA 43Q MSDATABASELST 40Q APPLY 25Q BLKLIBRARY 6 MACRO) ( 406Q "not an entry, not called from inside the block" 361Q "not an entry or on RETFNS or BLKAPPLYFNS, called indirectly by" 266Q "not an entry, called from outside the block by" 211Q "internal block function with MACRO property") \MSCHECKBLOCKS/MSCHECKBLOCKBASIC D1 (L (1 BLKNAME 0 BLOCK) F 10Q ENTRIES F 11Q BLKFNS F 12Q BLKAPPLYFNS F 13Q BLKAPPLYCALLERS) WAdW d@o AWWdWhWWAhcAW Ao WWAhc dHW Ho `1HWg@o!YgIgIgIgIg{Idgrg` Ig` Ig` Ig` Ig` hZ'hIgIohi WIh cHXB[WKiJd[g` Kg` Kg` Kg` Kg` 1L,MXIHZYJc4Wohi  YHdW_NOh^]L\O&^h(703Q LAST 677Q \MSCHECKBLOCKS/DOERROR 627Q UNION 624Q UNION 621Q UNION 616Q UNION 613Q GETTABLE 576Q GETTABLE 561Q GETTABLE 544Q GETTABLE 527Q GETTABLE 457Q \NCONC2 446Q \MSCHECKBLOCKS/DOERROR 415Q UNION 412Q UNION 407Q UNION 404Q UNION 401Q GETTABLE 364Q GETTABLE 347Q GETTABLE 332Q GETTABLE 315Q GETTABLE 152Q \MSCHECKBLOCKS/DOERROR 141Q MEMB 124Q \APPEND2 105Q \MSCHECKBLOCKS/DOERROR 74Q MEMB 30Q \MSCHECKBLOCKS/DOERROR 12Q MEMB) (605Q MSDATABASELST 602Q APPLY 570Q MSDATABASELST 565Q CALL 553Q MSDATABASELST 550Q EFFECT 536Q MSDATABASELST 533Q PREDICATE 521Q MSDATABASELST 516Q NLAMBDA 432Q BLKLIBRARYDEF 373Q MSDATABASELST 370Q APPLY 356Q MSDATABASELST 353Q CALL 341Q MSDATABASELST 336Q EFFECT 324Q MSDATABASELST 321Q PREDICATE 307Q MSDATABASELST 304Q NLAMBDA 276Q MEMBER 266Q TAILP 255Q NTH 244Q GETP 233Q GETPROP 222Q EQUAL 163Q BLKLIBRARY) ( 672Q "BLKAPPLYFNS but no calls to BLKAPPLY in block" 441Q "on BLKLIBRARY but no BLKLIBRARYDEF property" 212Q (BLKAPPLY BLKAPPLY*) 147Q "on ENTRIES or BLKAPPLYFNS but not in block" 102Q "can't be both entry and block name" 25Q "must also be the FIRST function in the block") \MSCHECKBLOCKS/MSCHECKBOUNDFREE D1 (L (1 BLKNAME 0 BOUNDFREE) P 11Q U P 10Q SFLG P 7 LF1 P 5 LF P 3 SEEN P 0 V F 12Q BLKFNS F 13Q LOCALFREEVARS F 14Q LOCALVARS F 15Q SPECVARS) S @%d!`lg hHg` Hg` Hg` Hg` HWHg` Hg` Hg` Hg` Hg` #K L `XdmK NdkK L%d OdWNHOd M_O OAWiWiNYKhZdWKdlmHJ JH I(514Q \MSCHECKBLOCKS/UNECCSPEC 506Q \MSCHECKBLOCKS/SPECVARP 403Q \MSCHECKBLOCKS/MSCHECKVARS1 371Q \MSCHECKBLOCKS/NECCSPEC 332Q PUTHASH 314Q PUTHASH 275Q CLRHASH 266Q CLRHASH 257Q UNION 254Q UNION 251Q UNION 246Q UNION 243Q GETTABLE 226Q GETTABLE 211Q GETTABLE 174Q GETTABLE 157Q GETTABLE 136Q UNION 133Q UNION 130Q UNION 125Q GETTABLE 110Q GETTABLE 73Q GETTABLE 56Q GETTABLE 31Q HASHARRAY) (442Q MSCRATCHASH 301Q MSCRATCHASH 235Q MSDATABASELST 232Q BIND 220Q MSDATABASELST 215Q REF 203Q MSDATABASELST 200Q SET 166Q MSDATABASELST 163Q SMASH 151Q MSDATABASELST 146Q TEST 117Q MSDATABASELST 114Q REFFREE 102Q MSDATABASELST 77Q SETFREE 65Q MSDATABASELST 62Q SMASHFREE 50Q MSDATABASELST 45Q TESTFREE 40Q MSCRATCHASH 26Q MSREHASH 13Q MSCRATCHASH) () \MSCHECKBLOCKS/PRINTERROR D1 (L (0 ERR)) @@lHdjHoiHoo I@ _Kjd Kl o Hh_ _O^MlNJMl ؾMNll_o Kl o Kh__O#g Hh__O1g YO_hO_O_O k O_hO_O_k O \dOh__LLKO_LOLOLhOO_ hO_ O_O k d_"l Mi o Oi o Ni o O"l o h(707Q PRIN1 677Q \MSCHECKBLOCKS/SHORTLST 666Q PRIN1 656Q TAB 650Q PRIN1 640Q TAB 631Q PRIN1 621Q TAB 613Q \MSCHECKBLOCKS/SHORTLST 576Q SPACES 571Q PRIN1 440Q PRIN1 432Q SPACES 377Q SPACES 372Q PRIN2 334Q TERPRI 330Q PRIN1 305Q PRIN1 257Q PRIN1 247Q \MSCHECKBLOCKS/SHORTLST 236Q PRIN1 172Q POSITION 146Q PRIN1 136Q POSITION 132Q \MSCHECKBLOCKS/SHORTLST 121Q TAB 74Q DREVERSE 56Q PRIN1 7 LINELENGTH) (325Q %. 302Q -) ( 704Q ". " 663Q "-" 645Q " %"%" " 626Q " -" 254Q ". " 233Q " -" 143Q " - " 53Q " (probable error) " 46Q " (possible error) " 33Q " (note) ") \MSCHECKBLOCKS/MSCHECKVARS1 D1 (L (0 FN) F 3 SEEN F 4 U F 5 LF1 F 6 V F 7 ENTRIES F 10Q BLKFNS F 11Q LF F 12Q BLKAPPLYFNS F 13Q BLKAPPLYCALLERS)  U2@dW,VoT@oo@ohTi hc c@g` @g` @g` @g` @g` l@WWH XzHwdZSdjkdmedl_dllYTdk#JdWVJT JlS Il3iY.didlIliYJjS Jd S l I(410Q SHOULDNT 402Q PUTHASH 376Q \MSCHECKBLOCKS/MSCHECKVARS1 370Q PUTHASH 321Q PUTHASH 311Q \MSCHECKBLOCKS/NECCSPEC 217Q UNION 177Q UNION 174Q UNION 171Q UNION 166Q UNION 163Q GETTABLE 146Q GETTABLE 131Q GETTABLE 114Q GETTABLE 77Q GETTABLE 53Q \MSCHECKBLOCKS/DOERROR) (155Q MSDATABASELST 152Q APPLY 140Q MSDATABASELST 135Q CALL 123Q MSDATABASELST 120Q EFFECT 106Q MSDATABASELST 103Q PREDICATE 71Q MSDATABASELST 66Q NLAMBDA) ( 41Q "can reach functions using it freely" 34Q "but the entry" 27Q "but used freely by the entry" 17Q "on LOCALFREEVARS") \MSCHECKBLOCKS/UNECCSPEC D1 (L (1 VAR 0 FN)) #A A@g`  Ao@i (40Q \MSCHECKBLOCKS/DOERROR 23Q GETTABLE 3 \MSCHECKBLOCKS/GLOBALVARP) (15Q MSDATABASELST 12Q LOCALFREEVARS) ( 33Q "might not need to be a specvar in") \MSCHECKBLOCKS/NECCSPEC D1 (L (1 BINDER 0 VAR) F 0 SFLG F 1 SHOULDBESPECVARS F 2 U) )P%@A ic@Qc@oRohAi h(44Q \MSCHECKBLOCKS/DOERROR 7 \MSCHECKBLOCKS/SPECVARP) NIL ( 33Q "is not a SPECVAR in" 26Q "(used freely in)") \MSCHECKBLOCKS/SPECVARP D1 (L (1 FN 0 X) F 0 LOCALVARS F 1 SPECVARS F 2 LOCALFREEVARS) K@Ag` h@Ag` iPi@PhQi@Q@R@`@g(37Q GETTABLE 15Q GETTABLE) (107Q GLOBALVAR 100Q GLOBALVARS 31Q MSDATABASELST 26Q SPECVARS 7 MSDATABASELST 4 LOCALVARS) () \MSCHECKBLOCKS/SHORTLST D1 (L (1 N 0 X)) G@A@@A bbAkbdjk @ jAdd ˿o (102Q PRIN1 70Q \FZEROP 50Q PRIN2 43Q SPACES 16Q \MSCHECKBLOCKS/SHORTLST) NIL ( 77Q " etc") \MSCHECKBLOCKS/DOERROR D1 (L (3 QUESTIONABLE 2 ARG 1 MSG 0 AT) F 2 ERRORS) RC=AR AhhRc@B*IH HIhHBI IBh AbIHHIHh(73Q \NCONC2 62Q MEMBER 7 SASSOC) NIL () \MSCHECKBLOCKS/GLOBALVARP D1 (L (0 X)) @`@gNIL (12Q GLOBALVAR 3 GLOBALVARS) () MSPATHSA0001 D1 (NAME ERRORSET F 0 NAMED F 1 UNDONE F 2 SEEN F 3 TEM F 4 FIRST) dhP&TPR hcPjR Phi PcQ hhRcSjS QcQhhR Qhc(130Q PUTHASH 61Q TERPRI 44Q \MSPATHSBLOCK/MSPATHS1 34Q PUTHASH 20Q \MSPATHSBLOCK/DASHES) (3 MSPRINTFLG) () MSPATHS D1 (L (0 FROM) P 12Q TEM P 11Q NAMED P 10Q TABS P 7 UNDONE P 6 FIRST P 5 LINENUM P 4 BELOWCNT P 3 LL P 0 SEEN I 6 MARKING I 5 NOTRACE I 4 SEPARATE I 3 AVOIDING I 2 INVERTED I 1 TO F 13Q RESETVARSLST) `-lg !hjdi@i 5 Bo O `dEdE mjH jd g`WcYog IJdWIcW WkJ IhH(225Q ERROR! 215Q NLEFT 205Q TAILP 155Q MSPATHSA0001 124Q TAB 112Q PUTHASH 101Q MSMEMBSET 62Q CLRHASH 52Q PRINT 36Q MSLISTSET 26Q LINELENGTH 14Q HASHARRAY) (234Q MSCRATCHASH 163Q MSPRINTFLG 152Q INTERNAL 133Q MSPRINTFLG 130Q MSPRINTFLG 66Q MSCRATCHASH 23Q MSCRATCHASH 11Q MSREHASH 2 MSCRATCHASH) ( 147Q (MSPATHSA0001) 47Q (inverted tree)) \MSPATHSBLOCK/MSPATHS1 D1 (L (2 LAST 1 FIRST 0 FROM) P 5 TABS F 15Q TABS F 16Q SEEN F 17Q NAMED F 20Q LINENUM F 21Q SEPARATE F 22Q INVERTED F 23Q LL)  WAAW kc o W W ZWWj BWc@ [@ @WYjUId`l 3jIo II o IIW@h cIWi"@mJW W$O@g` @g` @g` @g` @g` @g`M@g` @g` @g` @g` @g` @g` 1 O O_)d _OOh__O_O&_HbW"@W" _Od KlW&h") %. D1 (L (0 MASTERSCOPECOMMAND)) @ (3 MASTERSCOPE) NIL () MSMARKCHANGE1 D1 (L (1 FLG 0 FNS)) 3Aib@Hg@Ah HhHHIA` (56Q PUTHASH 31Q UNDOSAVE) (53Q MSCHANGEDARRAY 20Q MSMARKCHANGE1) () MSFIND D1 (L (1 X 0 IN)) @A@@A @b(16Q MSFIND) NIL () MSSTOREDATA D1 (L (0 FNNAME) I 1 FNDATA) _g 1h@i` `Z$@dH @ig` @h` h[`Kdi @KI J(130Q STORETABLE 121Q \MSSTOREDATA/MSCOLLECTDATA 73Q PUTHASH 62Q PUTTABLE 41Q TESTRELATION 24Q PUTHASH 5 PARSERELATION) (103Q NODUMPRELATIONS 70Q MSCHANGEDARRAY 54Q MSDATABASELST 51Q NOBIND 27Q MSDATABASELST 21Q MSCHANGEDARRAY 14Q MSDBEMPTY 2 KNOWN) () \MSSTOREDATA/MSCOLLECTDATA D1 (L (1 FLG 0 TNAME) F 0 FNDATA) X@A@`B@Pdg@i @i g@i @i l hbb(113Q SHOULDNT 105Q UNION 102Q \MSSTOREDATA/MSCOLLECTDATA 72Q \MSSTOREDATA/MSCOLLECTDATA 54Q LDIFFERENCE 51Q \MSSTOREDATA/MSCOLLECTDATA 41Q \MSSTOREDATA/MSCOLLECTDATA) (60Q + 26Q - 11Q TABLE.TO.NOTICED) () \MASTERSCOPEBLOCK/MSINTERPRETSET D1 (L (2 ARG 1 OP 0 SET) P 35Q OTHERSET P 33Q V P 32Q OTHERSET F 42Q NEEDUPDATE) ""@pHdHIJBh @P@gh@!O.O0ghdhhO._2hO._2O._.O0gO2 _0AdgBgAdg@ gFl dg/AdggAdggHBkKl dgAAdgHgbbgAdgDgHgB hl dgAdgOgAdgiHHH#O4g _8d`O0dO2LLg *O0#dO8dO2MM O6 _6O6gWHHHO8^h_BO@@@@gO<O<O>X'dgKO<ggO<ggO>ghddhhgihgO>gihXgjO>gl gO<g%O>g O<@ @g (O<O> O>gO>g i XhAgO>gO> _BO<O< _@@gO<gO@O>@AB OBg$AgH gH hiX@Hl (4037Q SHOULDNT 4013Q MSONPATH 4003Q \MASTERSCOPEBLOCK/CHECKPATHS 3755Q \MASTERSCOPEBLOCK/MSINTERPRETSET 3717Q \MASTERSCOPEBLOCK/GETVERBTABLES 3701Q \MASTERSCOPEBLOCK/MSINTERPRETSET 3647Q \MASTERSCOPEBLOCK/ONFILE 3641Q \MASTERSCOPEBLOCK/MSINTERPRETSET 3577Q \MASTERSCOPEBLOCK/ONFILE 3546Q \MASTERSCOPEBLOCK/MSINTERPRETSET 3521Q SHOULDNT 3144Q UNION 3137Q RECORDFIELDNAMES 3131Q MSLISTSET 3054Q \MASTERSCOPEBLOCK/MSGETBLOCKDEC 3051Q \MASTERSCOPEBLOCK/MSINTERPRETSET 3003Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2763Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2705Q EVAL 2571Q SHOULDNT 2536Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2457Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2371Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2333Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2314Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2243Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2226Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2171Q SHOULDNT 2136Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2115Q UNION 2047Q \MASTERSCOPEBLOCK/MSINTERPRETSET 2030Q \MASTERSCOPEBLOCK/MSINTERPRETSET 1767Q \MASTERSCOPEBLOCK/MSINTERPRETSET 1752Q \MASTERSCOPEBLOCK/MSINTERPRETSET 1715Q SHOULDNT 1667Q LAST 1653Q TERPRI 1646Q PRIN1 1637Q PRIN1 1626Q PRIN1 1571Q \MASTERSCOPEBLOCK/ONFILE 1532Q GETD 1522Q TESTTABLE 1503Q TESTTABLE 1464Q TESTTABLE 1404Q TERPRI 1377Q PRIN1 1366Q PRIN1 1357Q PRIN1 1344Q \DEFINEDP 1254Q UNION 1212Q SHOULDNT 1125Q GETTABLE 1065Q \MASTERSCOPEBLOCK/MSHASHLIST 1000Q SHOULDNT 752Q \MASTERSCOPEBLOCK/MSINTERPRETSET 716Q GETTABLE 622Q UNION 615Q GETTABLE 556Q MAPTABLE 520Q \MASTERSCOPEBLOCK/MSINTERPRETSET 427Q SHOULDNT 417Q \MASTERSCOPEBLOCK/MSINTERPRETSET 321Q SHOULDNT 234Q SHOULDNT 216Q \MASTERSCOPEBLOCK/LISTHARD 154Q \NCONC2 151Q \MASTERSCOPEBLOCK/GETVERBTABLES 34Q SHOULDNT) (4007Q GETHASH 3774Q CHECK 3765Q PATHS 3735Q ED 3727Q INRELATION 3670Q CHECK 3660Q CHECK 3636Q HARD 3631Q FNS 3574Q FNS 3543Q HARD 3533Q ED 3525Q QUOTE 3512Q WHICH 3501Q CONTAIN 3463Q TOPFLG 3455Q TO 3444Q TOPFLG 3427Q TO 3421Q FROM 3413Q ED 3405Q PATHS 3375Q SOMEHOW 3362Q CALL 3330Q THAT 3264Q THAT 3227Q ANDNOT 3221Q OR 3213Q AND 3164Q THAT 3117Q QUOTE 3075Q CHECK 3065Q FIELDS 3046Q HARD 3022Q QUOTE 3000Q CHECK 2760Q CHECK 2740Q CHECK 2731Q BLOCKS 2700Q QUOTE 2671Q IN 2616Q NOT 2606Q AND 2576Q ANDNOT 2552Q MEMB 2532Q MEMB 2521Q MEMB 2452Q MEMB 2364Q MEMB 2324Q MSBLIP 2311Q LIST 2303Q MSBLIP 2266Q LIST 2257Q HARD 2237Q CHECK 2222Q CHECK 2210Q CHECK 2176Q AND 2152Q MEMB 2132Q MEMB 2121Q MEMB 2105Q MSBLIP 2076Q QUOTE 2065Q QUOTE 2040Q MSBLIP 2021Q MSBLIP 2012Q HARD 2003Q LIST 1763Q CHECK 1746Q CHECK 1734Q CHECK 1722Q OR 1701Q MEMB 1554Q FNS 1546Q KNOWN 1514Q MSDATABASELST 1511Q REF 1475Q MSDATABASELST 1472Q NOBIND 1456Q MSDATABASELST 1453Q CALL 1444Q KNOWN 1435Q FILELST 1423Q FILES 1413Q FILES 1334Q CLISPWORD 1323Q FNS 1272Q LIST 1263Q HARD 1232Q CHECK 1217Q QUOTE 1135Q MSBLIP 1102Q MEMB 1037Q HARD 1030Q LIST 1020Q CHECK 1005Q GETHASH 745Q MEMB 643Q MEMB 553Q MSINTERPA 526Q MSBLIP 515Q LIST 466Q HARD 457Q LIST 447Q CHECK 434Q INRELATION 413Q MEMB 404Q MEMB 374Q LIST 364Q HARD 347Q CHECK 337Q CHECK 326Q NOT 301Q MEMB 271Q LIST 261Q HARD 253Q CHECK 242Q APPLY 222Q MEMB 207Q HARD 175Q LIST 166Q CHECK 144Q IS 73Q ANY 50Q INRELATION) ( 1633Q " => ON " 1373Q "is a CLISP word and is not treated like a function!" 1353Q "Warning: ") \MASTERSCOPEBLOCK/CHANGEI.S. D1 (L (2 REASON 1 TYPE 0 NAME)) [`VBdg@ hE@oi oi gBg'@oi @ @ oi gi (130Q MSNEEDUNSAVE 121Q UNION 116Q GETRELATION 106Q L-CASE 100Q U-CASEP 74Q GETRELATION 46Q MSNEEDUNSAVE 36Q GETRELATION 21Q GETD) (124Q i.s.oprs 60Q DELETED 52Q CHANGED 11Q DEFINED 2 MSDATABASELST) ( 112Q (USE I.S.OPRS) 70Q (USE I.S.OPRS) 42Q (i.s.oprs as functions) 32Q (CALL DIRECTLY)) \MASTERSCOPEBLOCK/CHANGEMACRO D1 (L (2 REASON 1 TYPE 0 NAME)) ,`'Bgh@oi Ag @i g (51Q MSNEEDUNSAVE 42Q \MASTERSCOPEBLOCK/TEMPLATE 35Q FILEPKGTYPE 26Q GETRELATION) (45Q MACRO 32Q DESCRIPTION 10Q DEFINED 2 MSDATABASELST) ( 22Q (CALL DIRECTLY)) CHANGERECORD D1 (L (2 OLDFLG 1 RFIELDS 0 RNAME)) 6`1B.@oi Adoi H Hg` (63Q MSNEEDUNSAVE 43Q UNION 37Q GETRELATION 20Q GETRELATION) (60Q MSRECORDTRANFLG 55Q records 2 MSDATABASELST) ( 33Q (USE FIELDS) 14Q (USE RECORDS)) \MASTERSCOPEBLOCK/CHANGEVAR D1 (L (2 REASON 1 TYPE 0 NAME)) `@`@oi o (33Q MSNEEDUNSAVE 24Q GETRELATION) (10Q COMPILE.TIME.CONSTANTS 2 MSDATABASELST) ( 30Q "constants" 20Q (USE FREELY)) \MASTERSCOPEBLOCK/CHECKFORCHANGED D1 (L (2 UPDATEALL 1 NOTTHISONE 0 SET) P 0 NEEDUPDATE) 2@gAh@ BbHd B h(56Q \MASTERSCOPEBLOCK/MSCHECKEMPTY 52Q UPDATECHANGED 37Q UPDATEFN 23Q \MASTERSCOPEBLOCK/MSINTERPRETSET) (6 CHECK) () \MASTERSCOPEBLOCK/CHECKPATHS D1 (L (1 VAL 0 OPTIONS)) Z0@Y H g@hZdg"dgdgdgdgdgihJgJg iI(121Q \MASTERSCOPEBLOCK/MSINTERPRETSET) (115Q FROM 110Q CHECK 72Q SEPARATE 64Q MARKING 56Q NOTRACE 47Q AVOIDING 40Q TO 31Q FROM 15Q FROM) () DUMPDATABASE D1 (L (0 FNLST) P 3 DUMPTABLE P 0 DUMPEDFLG)  @6o g `Jg hd [` 1@KiKg @dYK I HJZ(171Q PRINT 157Q DUMPDATABASE1 153Q GETTABLE 135Q MAPTABLE 107Q MEMB 67Q UPDATEFN 60Q TERPRI 55Q PRIN1 47Q TERPRI 31Q TERPRI 26Q PRIN1 20Q PRINT 10Q UPDATECHANGED) (132Q DUMPDATABASE1 104Q NODUMPRELATIONS 52Q %) 34Q MSDATABASELST 23Q %() ( 15Q (READATABASE)) DUMPDATABASE1 D1 (L (1 FN 0 VALUE) F 0 DUMPEDFLG F 1 DUMPTABLE) $A!PQ ck A k @ k (41Q SPACES 35Q PRIN2 31Q SPACES 25Q PRIN2 20Q SPACES 11Q PRIN2) NIL () \MASTERSCOPEBLOCK/FMAPRINT D1 (L (4 SEP 3 RIGHT 2 LEFT 1 FILE 0 LST)) ;BBA Dgb@@ DA @A @bCdA h(67Q PRIN1 51Q PRIN2 42Q PRIN1 32Q PRIN2 6 PRIN1) (14Q % ) () GETRELATION D1 (L (2 INVERTED 1 RELATION 0 ITEM)) > Adg- (d@BIdlAo II H H(65Q UNION 61Q GETTABLE 50Q ERROR 16Q PARSERELATION) (10Q TABLES) ( 45Q "CAN'T BE INVERTED") GETTEMPLATE D1 (L (0 FN)) @i (4 SETTEMPLATE) NIL () \MASTERSCOPEBLOCK/GETVERBTABLES D1 (L (1 MODIFIER 0 ROOT)) 80@A *l #dd`h`IHhZH&J(16Q SHOULDNT 7 MSVBTABLES) (42Q MSDATABASELST 31Q MSDATABASELST) () \MASTERSCOPEBLOCK/LISTHARD D1 (L (0 SET)) J0@@IHIhIIgJdg@gJ dH@ (101Q \MASTERSCOPEBLOCK/MSHASHLIST 70Q \MASTERSCOPEBLOCK/GETVERBTABLES) (63Q KNOWN 47Q FNS 42Q IS) () MAPRELATIONA0005 D1 (L (1 MAPX 0 DUMMY) F 1 MAPFN F 2 MAPFN2 F 3 MAPZ F 4 MAPW) :RdAH h$SkAkQAT dAHlQh(44Q GETRELATION 14Q TESTTABLE) NIL () MAPRELATION D1 (L (0 RELATION) P 2 MAPFN2 P 1 MAPW P 0 MAPZ I 1 MAPFN) A @ IdZg h(26Q MAPTABLE 7 PARSERELATION 3 NARGS) (23Q MAPRELATIONA0005) () MASTERSCOPE D1 (L (1 TOPFLG 0 MASTERSCOPECOMMAND)) @ddhAh (23Q \MASTERSCOPEBLOCK/MSINTERPRET 5 MASTERSCOPE1) NIL () MASTERSCOPE1A0006 D1 (NAME ERRORSET F 0 X) Poi` id cdgdgid g "dgdgg Pghg i(114Q LISPX 77Q RETFROM 52Q LISPX 44Q LISPXREAD 20Q LISPXREAD 12Q PROMPTCHAR) (111Q MASTERSCOPEXEC 105Q _ 74Q MASTERSCOPE1 66Q STOP 60Q OK 47Q _ 34Q _ 26Q E 7 LISPXHISTORY) ( 3 "_. ") MASTERSCOPE1 D1 (P 0 X) $oi `i i oi (37Q MASTERSCOPE1A0006 24Q TERPRI 17Q PRIN1 7 PRIN1) (13Q MASTERSCOPEDATE) ( 33Q (MASTERSCOPE1A0006) 3 "Masterscope ") MASTERSCOPEXEC D1 (L (1 LINE 0 X) F 1 LISPXHIST F 2 LISPXVALUE) A@l@-gx`@ hl@dld AE@AXdgdgdgdgdgghi QQgQH ciAAh@d lh(210Q ARGTYPE 163Q \MASTERSCOPEBLOCK/MSINTERPRET 142Q RETFROM 56Q \DEFINEDP 37Q STRPOSL) (152Q %. 135Q MASTERSCOPE1 127Q stop 121Q ok 113Q BYE 104Q STOP 75Q OK 33Q CLISPCHARRAY 25Q NOBIND) () \MASTERSCOPEBLOCK/MSCHECKEMPTY D1 NIL  `oi i g `gg`hI `oI ggIh XF`3 `l oooH Xo gH `oi i h(240Q ERROR! 234Q TERPRI 227Q PRIN1 211Q MASTERSCOPE 177Q ASKUSER 166Q \APPEND2 126Q \APPEND2 123Q \APPEND2 43Q FILEPKGCHANGES 34Q UPDATEFILES 30Q TERPRI 23Q PRIN1) (215Q MSDBEMPTY 202Q Y 143Q DWIMWAIT 134Q DWIMWAIT 113Q ' 110Q IN 74Q FILELST 62Q FILELST 57Q ' 54Q ON 47Q FILELST 40Q FNS 5 MSDBEMPTY) ( 223Q "Sorry, no functions were found to analyze!" 174Q ((Y "es ") (N "o ")) 162Q (ANALYZE THE FNS) 156Q "want to ." 152Q (Y) 102Q (OR) 17Q "No functions have been analyzed!") MSCLOSEFILES D1 NIL +`HhYId  HX(43Q CLOSEF 34Q OPENP) (16Q MSOPENFILES 2 MSOPENFILES) () MSDESCRIBE D1 (L (1 SN) I 0 FN)  `@g` Z @ @ ihJZo ` @ ` Jhoo @g` (@g` @g` oi A A )@A[!l-i o K o @g` @g` @g` @g` @g` o @g` @g` @g` @g` @g` o @g` @g` @g` @g` @g` A NKOo @g` @g` @g` @g` H_JJOdJO_OOh__N^O&_dd`dgHIIo Ho @g` @g` o `\h] M L(1225Q \MASTERSCOPEBLOCK/MSDESCRIBE1 1215Q EVAL 1204Q TERPRI 1172Q \MASTERSCOPEBLOCK/MSDESCRIBE1 1163Q UNION 1160Q GETTABLE 1143Q GETTABLE 1126Q \MASTERSCOPEBLOCK/MSDESCRIBE1 1116Q \MASTERSCOPEBLOCK/MSDESCRIBE1 773Q UNION 770Q UNION 765Q UNION 762Q GETTABLE 745Q GETTABLE 730Q GETTABLE 713Q GETTABLE 676Q \MASTERSCOPEBLOCK/MSDESCRIBE1 655Q UNION 652Q UNION 647Q UNION 644Q UNION 641Q GETTABLE 624Q GETTABLE 607Q GETTABLE 572Q GETTABLE 555Q GETTABLE 540Q \MASTERSCOPEBLOCK/MSDESCRIBE1 531Q UNION 526Q UNION 523Q UNION 520Q UNION 515Q GETTABLE 500Q GETTABLE 463Q GETTABLE 446Q GETTABLE 431Q GETTABLE 414Q \MASTERSCOPEBLOCK/MSDESCRIBE1 405Q UNION 402Q UNION 377Q UNION 374Q UNION 371Q GETTABLE 354Q GETTABLE 337Q GETTABLE 322Q GETTABLE 305Q GETTABLE 270Q TERPRI 264Q PRIN1 254Q PRIN1 251Q ABS 244Q PRIN1 234Q TAB 214Q HARRAYP 205Q HARRAYP 200Q PRIN1 167Q TESTTABLE 150Q TESTTABLE 131Q TESTTABLE 114Q \MASTERSCOPEBLOCK/FMAPRINT 77Q CHANGEFONT 70Q PRIN2 63Q CHANGEFONT 54Q PRIN1 34Q SMARTARGLIST 26Q \DEFINEDP 17Q GETTABLE) (1175Q DESCRIBELST 1152Q MSDATABASELST 1147Q FETCH 1135Q MSDATABASELST 1132Q REPLACE 1071Q GLOBALVAR 1063Q GLOBALVARS 754Q MSDATABASELST 751Q REFFREE 737Q MSDATABASELST 734Q SETFREE 722Q MSDATABASELST 717Q SMASHFREE 705Q MSDATABASELST 702Q TESTFREE 633Q MSDATABASELST 630Q BIND 616Q MSDATABASELST 613Q REF 601Q MSDATABASELST 576Q SET 564Q MSDATABASELST 561Q SMASH 547Q MSDATABASELST 544Q TEST 507Q MSDATABASELST 504Q APPLY 472Q MSDATABASELST 467Q CALL 455Q MSDATABASELST 452Q EFFECT 440Q MSDATABASELST 435Q PREDICATE 423Q MSDATABASELST 420Q NLAMBDA 363Q MSDATABASELST 360Q APPLY 346Q MSDATABASELST 343Q CALL 331Q MSDATABASELST 326Q EFFECT 314Q MSDATABASELST 311Q PREDICATE 277Q MSDATABASELST 274Q NLAMBDA 161Q MSDATABASELST 156Q REF 142Q MSDATABASELST 137Q NOBIND 123Q MSDATABASELST 120Q CALL 74Q DEFAULTFONT 60Q BOLDFONT 11Q MSDATABASELST 6 ARGS) ( 1167Q "fields: " 1123Q "globals: " 1113Q "uses free:" 673Q "binds: " 535Q "called by:" 411Q "calls: " 261Q "}" 241Q " {line " 174Q " (not analyzed)" 111Q ")" 105Q " " 51Q "(") \MASTERSCOPEBLOCK/MSDESCRIBE1 D1 (L (1 STR 0 LST)) U@!l A k  @@ hY@ lHI @ @bg (121Q PRIN1 104Q PRIN2 76Q TAB 63Q NCHARS 56Q POSITION 51Q POSITION 45Q LINELENGTH 40Q TERPRI 34Q PRIN2 17Q SPACES 13Q PRIN1 7 SPACES) (116Q ,) () \MASTERSCOPEBLOCK/MSERASE D1 (L (0 ATOMS) F 0 MSFILETABLE F 1 MSARGTABLE) '@dihddcdcid h(36Q MSSTOREDATA) (30Q MSDBEMPTY 16Q MSDATABASELST 12Q MSCHANGEDARRAY) () \MASTERSCOPEBLOCK/MSGETBLOCKDEC D1 (L (2 FILES 1 FNSET 0 TYPE))  B`_OHO_hO_O_Og _AO@dgg H _AOdYlIA hX@g@g@!OhZ[lKdHHXJOh](@gOOOOHOHOi^'N\@@L@Ndg H M(361Q UNION 353Q EVAL 144Q MSMEMBSET 112Q UNION 106Q FILECOMSLST 56Q FILECOMSLST) (343Q * 246Q ENTRIES 166Q BLOCK 160Q BLKFNS 103Q FNS 75Q BLKFNS 53Q BLOCKS 10Q FILELST) () \MASTERSCOPEBLOCK/MSHASHLIST D1 (L (0 HTABLE) I 3 BADMARKS I 2 OTHERSET I 1 PREVVALUE) @g A(6 MAPTABLE) (3 MSHASHLIST1) () MSHASHLIST1 D1 (L (1 KEY 0 VAL) F 0 BADMARKS F 1 PREVVALUE F 2 OTHERSET) 3@`h*@P P@PihAQhRAR AQc(51Q MSMEMBSET) (3 MSBLIP) () \MASTERSCOPEBLOCK/MSINIT D1 (L (0 DATABASE) F 4 MSFILETABLE F 5 MSARGTABLE) ` @hl @h@`Ld[K@Kdg`K Kd3 @KKi IHhZH&Jg`cg`c i(137Q MAKETABLE 107Q MAKETABLE 25Q HASHARRAY) (210Q MSDATABASELST 205Q ARGS 177Q MSDATABASELST 174Q FILE 171Q MSDATABASELST 77Q USERTEMPLATES 71Q USERTEMPLATES 45Q MSDATABASEINIT 36Q MSDBEMPTY 30Q MSCHANGEDARRAY 20Q MSDATABASELST 2 MSDATABASELST) () MSINTERPA D1 (L (1 KEY 0 VAL) F 2 V F 3 OTHERSET) ;ARhSS@@H hARcSgI IiHX(55Q \MASTERSCOPEBLOCK/MSINTERPRETSET) (51Q MEMB) () \MASTERSCOPEBLOCK/MSINTERPRETA0008A0009A0010 D1 (NAME ERRORSET F 0 FN F 1 EDITCOMS) gPQ i i(14Q PRINT 10Q APPLY) (2 EDITF) () \MASTERSCOPEBLOCK/MSINTERPRETA0008A0009A0011 D1 (L (1 KEY 0 VAL) F 0 DONE F 1 TYPE F 2 SHOWSET F 3 EDIT F 4 EDITCOMS) @iAdg` yAdg` hAdg` WAdg` FAdg` 5Adg` $Adg` Ag` AQRSgT APc(230Q MSSHOWUSE 212Q TESTTABLE 172Q TESTTABLE 151Q TESTTABLE 130Q TESTTABLE 107Q TESTTABLE 66Q TESTTABLE 45Q TESTTABLE 24Q TESTTABLE) (223Q CHANGED 204Q MSDATABASELST 201Q NLAMBDA 164Q MSDATABASELST 161Q PREDICATE 143Q MSDATABASELST 140Q EFFECT 122Q MSDATABASELST 117Q CALL 101Q MSDATABASELST 76Q APPLY 60Q MSDATABASELST 55Q REF 37Q MSDATABASELST 34Q NOBIND 16Q MSDATABASELST 13Q CALL) () \MASTERSCOPEBLOCK/MSINTERPRETA0008A0009 D1 (NAME ERRORSET L (0 NIL) P 23Q NEEDUPDATE P 17Q FN P 15Q SHOWSET P 13Q TYPE P 11Q NEEDUPDATE P 10Q DONE P 5 EDITCOMS P 4 EDIT F 26Q COMMAND F 27Q RESETVARSLST F 30Q SUBROUTINE) @W,dgdgdghW, `iHi Hdg HW,hoo HgHi gFHdgHig di gdg?HX Hhg Xd`oi i Hd gdgdgHHHHtO;N Ni )dOi oi o gi ر__O_Odg!ghddhgONO__O _Ngi _O$dYd`OOLhM IO_ O`g gON i dZOJOOLhM gdg%gHH X W0jd H dgH!O _"O$"Idgi_$O"gO$h,HghddhghgghddhhHh1H _(O&d O(gH'gH_*gO* hhW.c.O$g gHO$ggHO$gHgHgHgH hdgHig gdg%Hhi jd Hi d h^dg3H HHi [ddi3 gKhH &gH H Hgg l h(1651Q SHOULDNT 1643Q MSCHECKBLOCKS 1640Q MSLISTSET 1620Q \MASTERSCOPEBLOCK/CHECKFORCHANGED 1603Q EVAL 1553Q MSLISTSET 1535Q \MASTERSCOPEBLOCK/CHECKFORCHANGED 1505Q MSDESCRIBE 1477Q MSLISTSET 1470Q TAB 1462Q \MASTERSCOPEBLOCK/CHECKFORCHANGED 1434Q \MASTERSCOPEBLOCK/MSERASE 1431Q MSLISTSET 1400Q MSPATHS 1306Q \MASTERSCOPEBLOCK/MSOUTPUT 1261Q LINELENGTH 1224Q \MASTERSCOPEBLOCK/MSCHECKEMPTY 1220Q UPDATECHANGED 1205Q UPDATEFN 1172Q \MASTERSCOPEBLOCK/CHECKPATHS 1012Q \MASTERSCOPEBLOCK/MSSOLVE 1005Q TAB 774Q \MASTERSCOPEBLOCK/CHECKFORCHANGED 770Q MSJOINSET 727Q MSSHOWUSE 702Q MSLISTSET 676Q MSJOINSET 664Q \MASTERSCOPEBLOCK/MSCHECKEMPTY 660Q MAPHASH 637Q UPDATEFN 624Q MSSHOWUSE 570Q \MASTERSCOPEBLOCK/MSINTERPRETSET 555Q \MASTERSCOPEBLOCK/VERBNOTICELIST 447Q PRINT 437Q \MASTERSCOPEBLOCK/MSINTERPRETA0008A0009A0010 427Q PRIN1 416Q PRIN2 401Q MSLISTSET 373Q \MASTERSCOPEBLOCK/CHECKFORCHANGED 310Q UPDATEFN 300Q ERROR! 274Q TERPRI 267Q PRIN1 246Q MSLISTSET 235Q \MASTERSCOPEBLOCK/CHECKFORCHANGED 204Q UPDATEFN 175Q MSLISTSET 151Q \MASTERSCOPEBLOCK/MSINIT 137Q \MASTERSCOPEBLOCK/MSERASE 120Q MAPRINT 75Q \MASTERSCOPEBLOCK/MSOUTPUT 56Q PRINT 42Q MSPARSE) (1635Q FILES 1632Q HARD 1610Q CHECK 1571Q QUOTE 1521Q FOR 1447Q DESCRIBE 1440Q ok 1426Q KNOWN 1414Q ERASE 1403Q MSTHOSE 1370Q MARKING 1361Q NOTRACE 1352Q SEPARATE 1343Q AVOIDING 1332Q TO 1326Q FROM 1314Q FROM 1302Q TO 1254Q LINELENGTH 1241Q LINELENGTH 1230Q OUTPUT 1133Q KNOWN 1130Q IS 1124Q THAT 1113Q FROM 1076Q TO 1057Q FROM 1021Q PATHS 756Q AND 747Q ? 740Q done 670Q AND 655Q \MASTERSCOPEBLOCK/MSINTERPRETA0008A0009A0011 652Q MSCHANGEDARRAY 606Q MSCHANGEDARRAY 564Q CHECK 530Q THAT 515Q S 507Q ED 443Q failed 335Q SHOW 327Q EDIT 320Q done 253Q MSBLIP 243Q KNOWN 223Q ANALYZE 214Q done 172Q KNOWN 160Q REANALYZE 143Q ok 126Q ERASE 65Q OUTPUT 46Q MSPRINTFLG 25Q - 17Q * 11Q ;) ( 434Q (\MASTERSCOPEBLOCK/MSINTERPRETA0008A0009A0010) 423Q " : " 263Q "Sorry, can't figure out which functions you mean." 115Q " " 111Q ". ") \MASTERSCOPEBLOCK/MSINTERPRETA0008 D1 (NAME ERRORSET L (0 NIL) F 2 RESETVARSLST F 3 RESETY) ygi hhRcghhRcgi hhRcg`RcRog HIdRHcR RkI Hci(161Q ERROR! 150Q NLEFT 141Q TAILP 113Q \MASTERSCOPEBLOCK/MSINTERPRETA0008A0009 47Q SETREADTABLE 26Q LINELENGTH 6 OUTPUT) (121Q EDITQUIETFLG 110Q INTERNAL 67Q EDITQUIETFLG 64Q EDITQUIETFLG 43Q SETREADTABLE 23Q LINELENGTH 2 OUTPUT) ( 105Q (\MASTERSCOPEBLOCK/MSINTERPRETA0008A0009)) \MASTERSCOPEBLOCK/MSINTERPRET D1 (P 1 RESETY P 0 LISPXHIST I 1 SUBROUTINE I 0 COMMAND F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q \MASTERSCOPEBLOCK/MSINTERPRETA0008) (24Q ERROR 13Q INTERNAL) ( 10Q (\MASTERSCOPEBLOCK/MSINTERPRETA0008)) MSLISTSET D1 (L (2 TYPE 1 TRYHARD 0 SET)) @AggB (15Q \MASTERSCOPEBLOCK/MSINTERPRETSET) (11Q LIST 5 HARD) () MSMARKCHANGED D1 (L (2 REASON 1 TYPE 0 NAME)) A`` oi i hd XgHhhhQcHijH h(72Q COPYBYTES 67Q GETEOFPTR 40Q INPUT 35Q INFILE 27Q TERPRI 22Q PRIN1 10Q INFILEP) (44Q CLOSEF 5 MSHELPFILE) ( 16Q "Sorry, HELP file not available!") MSSHOWUSEA0014 D1 (L (4 INCLISP 3 PRNT 2 SE 1 SS 0 ITEM) F 0 ANYFOUND F 1 SHOWFN) k@A bPjdi Q o CDdC hDPcBg4CP-l Cl Po Dl o h(146Q PRIN1 137Q LVLPRIN2 132Q OUTPUT 126Q PRIN1 112Q LVLPRINT 105Q OUTPUT 101Q SPACES 45Q MSFIND 34Q PRIN1 24Q PRIN2 17Q TAB 4 MSMEMBSET) (63Q SHOW) ( 143Q "} " 123Q " {under " 31Q " : ") MSSHOWUSE D1 (L (5 EDITCOMS 4 IFCANT 3 SHOWEDIT 2 SHOWSET 1 SHOWTYPE) P 1 ANYFOUND I 0 SHOWFN) @@gCgggo Cg@ Z@Jg @gX@HAgBCh I"hoi @i oi i hCgwIdddgKgI@gogIihggoooEgEghhhgIghhhlgid i(353Q PRINT 155Q TERPRI 150Q PRIN1 137Q PRIN1 131Q PRIN1 113Q \MASTERSCOPEBLOCK/MSUPDATEFN1 62Q LOADFNS 47Q EDITLOADFNS? 32Q GETDEF) (344Q EDITF 322Q N 316Q F 301Q TTY: 273Q BIND 252Q IF 247Q LPQ 236Q F 227Q BIND 220Q *ANY* 205Q == 163Q EDIT 101Q MSSHOWUSEA0014 67Q EXPR 57Q PROP 40Q EDIT 23Q CURRENT 17Q ? 12Q SHOW 6 FNS) ( 266Q (S #1) 262Q (ORR (P) NIL) 256Q (NEQ (##) #1) 233Q (E (SETQ #1) T) 144Q "!" 125Q "Can't find a definition for " 27Q (NOERROR NODWIM NOCOPY)) \MASTERSCOPEBLOCK/MSSOLVE D1 (L (0 SET)) @i P@[ddgKK[gKZg%@g``hhXiHH g@KKKhKhddhghhY`Ad\ o IL0@i dJ dNMh_M&O g(270Q PRINT 236Q MSMEMBSET 226Q MSLISTSET 211Q PRIN1 201Q PRIN2 121Q PRINT 110Q OUTPUT 4 MSLISTSET) (300Q done 171Q MSTHOSE 156Q QUOTE 124Q done 100Q MSTHOSE 74Q MSTHOSE 67Q WHICH 57Q WHICH 45Q INRELATION 24Q AND 7 MSTHOSE) ( 206Q " -- ") \MASTERSCOPEBLOCK/MSUPDATE D1 (L (2 EACHTIME 1 FNDEF 0 FNNAME) P 6 VARS P 0 VARS F 7 COMMENTFLG F 10Q ANYFOUND) `@ `i8`i1AZg%JWJgAdgdgihA@A B<`i`d3 `kj` @i [`ggi Agh@iB \`d@ALlM`gLY`4gI,g"KIBW@i Ioi Koi @L h(364Q MSSTOREDATA 356Q PRIN1 343Q PRIN1 330Q PRIN2 226Q ALLCALLS 211Q PRIN1 170Q PRIN2 114Q MSPRGDWIM 6 \MASTERSCOPEBLOCK/MSNLAMBDACHECK) (310Q ? 300Q %. 271Q MSPRINTFLG 261Q ERRORS 256Q MSERRORFN 232Q ANALYZEUSERFNS 216Q ARG 205Q %. 200Q %. 175Q MSPRINTFLG 161Q MSPRINTCNT 156Q MSPRINTFLG 150Q MSPRINTCNT 143Q MSPRINTCNT 132Q MSPRINTFLG 123Q MSPRINTFLG 73Q NLAMBDA 65Q LAMBDA 54Q DECLARATIONS: 35Q CLISP: 20Q CLISPIFYPRETTYFLG 11Q DWIMIFYCOMPFLG) ( 352Q ", " 337Q " (CALLS ppe)") \MASTERSCOPEBLOCK/MSUPDATEFN1 D1 (L (3 DOSUBFNS 2 EACHTIME 1 DEF 0 FN)) @AB CW@g` @g` @g` @g` @g` !HhYg` 8Ig` )Ig` Iggo ZIJBi HX(243Q \MASTERSCOPEBLOCK/MSUPDATEFN1 232Q GETDEF 212Q TESTTABLE 173Q TESTTABLE 154Q TESTTABLE 125Q UNION 122Q UNION 117Q UNION 114Q UNION 111Q GETTABLE 74Q GETTABLE 57Q GETTABLE 42Q GETTABLE 25Q GETTABLE 5 \MASTERSCOPEBLOCK/MSUPDATE) (223Q CURRENT 220Q FNS 204Q MSDATABASELST 201Q REF 165Q MSDATABASELST 162Q NOBIND 146Q MSDATABASELST 143Q CALL 103Q MSDATABASELST 100Q APPLY 66Q MSDATABASELST 63Q CALL 51Q MSDATABASELST 46Q EFFECT 34Q MSDATABASELST 31Q PREDICATE 17Q MSDATABASELST 14Q NLAMBDA) ( 227Q (NOCOPY NODWIM NOERROR MASTERSCOPE)) \MASTERSCOPEBLOCK/ONFILE D1 (L (2 FINDITEMS 1 TYPES 0 FILES))  ` AddAdgdgdih@`O/`HAhMd@BH_O/O_hO_O_OOd` g O AhKKhKKLgLgLgB6OHBhIdOHIhIIJLO JiOL H MhMMNdgdg𤒱*N,i'_O(O_hO_O_BOg H _OO_hO_O_OgOi OdHHXO_hO_O_Ogi H (653Q UNION 647Q GETRELATION 573Q TESTRELATION 517Q UNION 513Q GETRELATION 370Q UNION 364Q FILECOMSLST 346Q INFILECOMS? 343Q FILECOMS 216Q MSNOTICEFILE 210Q GETRELATION 201Q MEMB) (643Q CONTAINS 565Q CONTAINS 510Q CONTAINS 422Q KNOWN 414Q FNS 266Q FNS 256Q KNOWN 250Q FNS 205Q CONTAINS 176Q FILELST 66Q MSHASHFILE 53Q FILELST 34Q KNOWN 26Q FNS 5 MSHASHFILE) () PARSERELATION D1 (L (0 RELATION)) >@g@g0@ dd``IHhZH&J(25Q \MASTERSCOPEBLOCK/PARSERELATION1 2 \MASTERSCOPEBLOCK/MSINIT) (46Q MSDATABASELST 40Q MSDATABASELST 16Q TABLES 7 TABLES) () \MASTERSCOPEBLOCK/PARSERELATION1 D1 (L (2 TAIL 1 MOD 0 ROOT) F 1 MSWORDS) B@wAL@A g@QgAQgAQgAQ Ag  @g dgdgdgdgpAhbb@hbbbsdgg0dgBgBbggggBg @A BB lHdgdgdghAbbAAbb(333Q \MASTERSCOPEBLOCK/PARSERELATION1 322Q \MASTERSCOPEBLOCK/PARSERELATION1 312Q ERROR 127Q ERROR 112Q MSVBTABLES 106Q ERROR 23Q MSVBTABLES) (361Q ANDNOT 353Q OR 345Q AND 307Q ? 302Q UNION 275Q OR 271Q INTERSECTION 264Q LDIFFERENCE 252Q NOT 240Q AND 232Q LDIFFERENCE 224Q ANDNOT 160Q FOR 152Q AN 144Q AS 135Q A 124Q ? 103Q ? 70Q FOR 56Q AS 44Q V 34Q S) () READATABASE D1 NIL dgdgo h@[dgi K`X/Yi` ddhIHJ Ih` oid (201Q READ 175Q LISPXPRINT 161Q PUTHASH 150Q STORETABLE 132Q READ 126Q PUTHASH 112Q READ 74Q \MASTERSCOPEBLOCK/TEMPLATE 70Q READ 61Q READ 44Q READ 32Q \MASTERSCOPEBLOCK/MSINIT 26Q HELP 2 RATOM) (156Q MSCHANGEDARRAY 123Q MSCHANGEDARRAY 103Q MSDATABASELST 53Q USERTEMPLATES 36Q MSDBEMPTY 14Q %( 6 %[) ( 170Q (*** incompatible MASTERSCOPE data base) 23Q (BAD DATABASE)) SETTEMPLATE D1 (L (1 TEMPLATE 0 FN) F 2 LISPXHIST) @Ad)dgo;Adi4dgA*o !dgAgAgAdA HddgHgH hhgHYAiRg@Hh I(211Q UNDOSAVE 121Q COPY 116Q \MASTERSCOPEBLOCK/TEMPLATE 52Q ERROR) (200Q SETTEMPLATE 164Q ! 147Q CALL 136Q MACRO 102Q CALL 72Q ! 61Q MACRO 35Q MACRO 11Q EVAL) ( 47Q "Invalid template" 20Q (CALL .. EVAL)) \MASTERSCOPEBLOCK/TEMPLATE D1 (L (2 FLG 1 TEMPLATE 0 FN)) o@`@`HihAHTAiOB'`@gHhh `@oi g @Addg @` io ` H(153Q PUTHASH 145Q ERROR 105Q MSMARKCHANGED 77Q GETRELATION 61Q MARKASCHANGED) (150Q USERTEMPLATES 131Q MSTEMPLATES 120Q MACRO 102Q FNS 65Q MSDATABASELST 51Q TEMPLATES 44Q FILEPKGFLG 12Q MSTEMPLATES 3 USERTEMPLATES) ( 142Q "Invalid template" 73Q (CALL DIRECTLY)) TESTRELATION D1 (L (3 INVERTED 2 ITEM2 1 RELATION 0 ITEM)) :Adg) $dB@CH@CHH H hi(55Q TESTTABLE 46Q GETTABLE 13Q PARSERELATION) (5 TABLES) () UNSAVEFNSA0019 D1 (NAME ERRORSET F 0 FN) hPg hh(13Q MARKASCHANGED) (10Q FNS 3 MSDATABASELST) () UNSAVEFNS D1 (L (0 FNS) P 1 FN F 6 RESETVARSLST) &@ ` bQH@`goi i Yg IgI I Ii I `dgCg`Vc Zog JKdVJc V VkK JgIg` h\$Igg 7gIhid Ig 8]`MggM` LgIhid Igg gI` HX(435Q /SETATOMVAL 432Q REMOVE 417Q LOADDEF 404Q PRINT 363Q /SETATOMVAL 327Q UNSAVEDEF 317Q PRINT 301Q HASDEF 261Q WHEREIS 237Q ERROR! 226Q NLEFT 217Q TAILP 171Q UNSAVEFNSA0019 126Q SAVEDEF 121Q VIRGINFN 113Q \DEFINEDP 103Q EXPRP 52Q TERPRI 46Q PRIN1 10Q \APPEND2) (427Q MSNEEDUNSAVE 423Q MSNEEDUNSAVE 414Q ? 411Q FNS 373Q loading 357Q NOTCOMPILEDFILES 353Q NOTCOMPILEDFILES 345Q FILE 336Q NOTCOMPILEDFILES 324Q FNS 306Q unsaving 276Q SAVED 273Q FNS 256Q FILELST 253Q FNS 245Q EXPRS 177Q MSDATABASELST 166Q INTERNAL 150Q MSDATABASELST 145Q MSDATABASELST 136Q CHANGES 132Q RECOMPILEDEFAULT 74Q ADVISED 65Q BROKEN 33Q CHANGES 30Q RECOMPILEDEFAULT 5 MSNEEDUNSAVE) ( 163Q (UNSAVEFNSA0019) 42Q "WARNING: you must set RECOMPILEDEFAULT to EXPRS in order to have these functions recompiled automatically") UPDATECHANGED D1 NIL `g h(13Q MAPHASH 2 \MASTERSCOPEBLOCK/MSINIT) (10Q UPDATECHANGED1 5 MSCHANGEDARRAY) () UPDATECHANGED1 D1 (L (1 KEY 0 VAL)) @iAdg` {Adg` jAdg` YAdg` HAdg` 7Adg` &Adg` Adg` 6Aggo bA@hi Ai oi i Ah ` (307Q PUTHASH 300Q \MASTERSCOPEBLOCK/MSERASE 272Q TERPRI 265Q PRIN1 254Q PRIN1 246Q \MASTERSCOPEBLOCK/MSUPDATEFN1 234Q GETDEF 213Q TESTTABLE 172Q TESTTABLE 151Q TESTTABLE 130Q TESTTABLE 107Q TESTTABLE 66Q TESTTABLE 45Q TESTTABLE 24Q TESTTABLE) (304Q MSCHANGEDARRAY 225Q ? 222Q FNS 205Q MSDATABASELST 202Q NLAMBDA 164Q MSDATABASELST 161Q PREDICATE 143Q MSDATABASELST 140Q EFFECT 122Q MSDATABASELST 117Q CALL 101Q MSDATABASELST 76Q APPLY 60Q MSDATABASELST 55Q REF 37Q MSDATABASELST 34Q NOBIND 16Q MSDATABASELST 13Q CALL) ( 261Q " disappeared!" 231Q (NOERROR NOCOPY MASTERSCOPE)) UPDATEFN D1 (L (2 IFCANT 1 EVENIFVALID 0 FN)) @dBl<A7@d`0g` @g` @dg` h@gBjggo X|Bdg@oi &Bgoi @i oi i @dg` &@dg` @dg` @h ` h@H h(337Q \MASTERSCOPEBLOCK/MSUPDATEFN1 330Q PUTHASH 321Q \MASTERSCOPEBLOCK/MSERASE 310Q TESTTABLE 267Q TESTTABLE 246Q TESTTABLE 227Q TERPRI 222Q PRIN1 211Q PRIN2 203Q PRIN1 161Q ERROR 135Q GETDEF 104Q TESTTABLE 65Q TESTTABLE 46Q TESTTABLE 17Q \MASTERSCOPEBLOCK/MSINIT) (325Q MSCHANGEDARRAY 302Q MSDATABASELST 277Q REF 261Q MSDATABASELST 256Q NOBIND 240Q MSDATABASELST 235Q CALL 170Q PRINT 145Q ERROR 126Q ? 122Q CURRENT 113Q FNS 76Q MSDATABASELST 73Q REF 57Q MSDATABASELST 54Q NOBIND 40Q MSDATABASELST 35Q CALL 27Q MSCHANGEDARRAY) ( 216Q " can't be analyzed!" 177Q "Sorry, the function " 155Q "can't be analyzed " 132Q (NOERROR NOCOPY MASTERSCOPE)) \MASTERSCOPEBLOCK/VERBNOTICELIST D1 (L (0 VPART)) h@dgdgdgih@ @ @@ 5oi @i ki @oi oi i (145Q ERROR! 142Q TERPRI 135Q PRIN1 124Q PRIN1 107Q SPACES 101Q PRIN1 72Q PRIN1 60Q MSVBNOTICED 50Q UNION 45Q \MASTERSCOPEBLOCK/VERBNOTICELIST 37Q \MASTERSCOPEBLOCK/VERBNOTICELIST) (21Q ANDNOT 13Q AND 5 OR) ( 131Q "!" 120Q "" 66Q "can't SHOW or EDIT where things ") STORETABLE D1 (P 1 Z P 0 OLDREL I 2 VALUE I 1 TABLST I 0 KEY) H@A @BA A1BdI@A HdIBI@A h(76Q SUBTABLE 45Q ADDTABLE 21Q PUTTABLE 6 GETTABLE) NIL () EQMEMBHASH D1 (L (2 H 1 V 0 X)) A@B (6 MEMB) NIL () (PRETTYCOMPRINT MASTERSCOPECOMS) (RPAQQ MASTERSCOPECOMS ((COMS * MSDATABASECOMS) (COMS * MSAUXCOMS) (COMS * MSDBCOMS) (COMS * MSCHECKBLOCKSCOMS) (COMS * MSPATHSCOMS) (COMS (FNS MSFIND) (VARS MSBLIP) (COMS (* SCRATCHASH) ( INITVARS (MSCRATCHASH)) (DECLARE: DONTCOPY (MACROS SCRATCHASH)))) (COMS (* marking changed) (FNS MSMARKCHANGED CHANGEMACRO CHANGEVAR CHANGEI.S. CHANGERECORD MSNEEDUNSAVE UNSAVEFNS) (ADDVARS ( COMPILE.TIME.CONSTANTS)) (VARS (RECORDCHANGEFN (QUOTE CHANGERECORD))) (INITVARS (CHECKUNSAVEFLG T) ( MSNEEDUNSAVE))) (DECLARE: EVAL@COMPILE DONTCOPY (RECORDS * PARSERRECORDS) (MACROS GETWORDTYPE)) (COMS (* interactive routines) (VARS * (LIST (LIST (QUOTE MASTERSCOPEDATE) (SUBSTRING (DATE) 1 9)))) ( ADDVARS (HISTORYCOMS %.)) (FNS %. MASTERSCOPE MASTERSCOPE1 MASTERSCOPEXEC) (* Interpreting commands) ( FNS MSINTERPRETSET MSINTERPA MSGETBLOCKDEC LISTHARD MSMEMBSET MSLISTSET MSHASHLIST MSHASHLIST1 CHECKPATHS ONFILE) (FNS MSINTERPRET VERBNOTICELIST MSOUTPUT MSCHECKEMPTY CHECKFORCHANGED MSSOLVE) ( DECLARE: DONTCOPY (RECORDS GETHASH INRELATION PATHOPTIONS))) (DECLARE: DONTCOPY (COMS * MSCOMPILETIME) ) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA %.) (NLAML) (LAMA))))) (RPAQQ MSDATABASECOMS ((FNS UPDATEFN MSNOTICEFILE MSSHOWUSE MSUPDATEFN1 MSUPDATE MSNLAMBDACHECK MSCOLLECTDATA) (FNS UPDATECHANGED UPDATECHANGED1) (VARS TABLE.TO.NOTICED) (FNS MSCLOSEFILES) (VARS ( MSFILELST) (MSOPENFILES)) (VARS (MSPRINTFLG (QUOTE %.)) (MSPRINTCNT 0)) (ADDVARS (MSHASHFILE) ( ANALYZEUSERFNS)))) (RPAQQ TABLE.TO.NOTICED ((BIND (- (- (- (- (+ BIND ARG) REF) SMASH) SET) TEST)) (REFFREE (- (- (- REFFREE SETFREE) SMASHFREE) TESTFREE)) (REF (- (- (- REF SET) SMASH) TEST)) (PREDICATE (- PREDICATE CALL)) (EFFECT (- (- EFFECT CALL) PREDICATE)) (CALL (- CALL NLAMBDA)) (0 TYPE) (APPLY (+ APPLY STACK)) (ARGS ARG))) (RPAQQ MSFILELST NIL) (RPAQQ MSOPENFILES NIL) (RPAQQ MSPRINTFLG %.) (RPAQQ MSPRINTCNT 0) (ADDTOVAR MSHASHFILE) (ADDTOVAR ANALYZEUSERFNS) (RPAQQ MSAUXCOMS ((* things which are not in the "main stream" of MASTERSCOPE) (COMS (* Describe command) (FNS MSDESCRIBE MSDESCRIBE1 FMAPRINT) (ADDVARS (DESCRIBELST)) (GLOBALVARS DESCRIBELST)) (COMS (* Print help file) (FNS MSPRINTHELPFILE) (VARS MSHELPFILE)) (COMS (* templates - export TEMPLATE GETTEMPLATE SETTEMPLATE) (FNS TEMPLATE GETTEMPLATE SETTEMPLATE) (FILEPKGCOMS TEMPLATES)))) (ADDTOVAR DESCRIBELST) (RPAQQ MSHELPFILE MASTERSCOPE.SYNTAX) (PUTDEF (QUOTE TEMPLATES) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (P * (MAPCAR (QUOTE X) (FUNCTION ( LAMBDA (FN) (LIST (QUOTE SETTEMPLATE) (KWOTE FN) (KWOTE (GETTEMPLATE FN)))))))) CONTENTS NILL) (TYPE DESCRIPTION "masterscope templates")))) (RPAQQ MSDBCOMS ((* functions for manipulating the data base) (FNS MSMARKCHANGE1 MSINIT GETVERBTABLES MSSTOREDATA STORETABLE) (ADDVARS (MSCHANGEDARRAY) (MSDATABASELST)) (INITVARS (MSDBEMPTY T)) (VARS MSDATABASEINIT NODUMPRELATIONS) (FNS PARSERELATION PARSERELATION1 GETRELATION MAPRELATION TESTRELATION ) (COMS (* table lookup functions) (FNS ADDHASH SUBHASH MAKEHASH MSREHASH EQMEMBHASH) (P (MAPC (QUOTE ((GETHASH GETTABLE) (GETHASH TESTTABLE) (PUTHASH PUTTABLE) (ADDHASH ADDTABLE) (SUBHASH SUBTABLE) ( MAPHASH MAPTABLE) (MAKEHASH MAKETABLE) (EQMEMBHASH EQMEMBTABLE))) (FUNCTION (LAMBDA (X) (MOVD? (CAR X) (CADR X)))))) (DECLARE: EVAL@COMPILE (FNS MSVBTABLES)) (DECLARE: DONTCOPY (MACROS GETRELQ TESTRELQ)) (BLOCKS (NIL ADDHASH SUBHASH MAKEHASH MSREHASH MSVBTABLES (LOCALVARS . T)))) (COMS (* erase function) (FNS MSERASE)) (COMS (* dump data base) (FNS DUMPDATABASE DUMPDATABASE1 READATABASE) (VARS DATABASECOMS)) (ADDVARS (GAINSPACEFORMS (MSDATABASELST "erase current Masterscope database" (%. ERASE) ))))) (ADDTOVAR MSCHANGEDARRAY) (ADDTOVAR MSDATABASELST) (RPAQ? MSDBEMPTY T) (RPAQQ MSDATABASEINIT ((CALL 25 . 50) (BIND 10 . 10) (NLAMBDA 10 . 10) (NOBIND 10) (RECORD 20 . 10) ( CREATE 2 . 2) (FETCH 10 . 10) (REPLACE 10 . 10) (REFFREE 10 . 1) (REF 10 . 25) (SETFREE 1 . 1) (SET 20 . 30) (SMASHFREE 1 . 1) (SMASH 1 . 1) (PROP 1 . 1) (TEST 1 . 1) (TESTFREE 1 . 1) (PREDICATE 10 . 10) (EFFECT 10 . 10) (CLISP 10 . 10) (SPECVARS 10 . 10) (LOCALVARS 10 . 10) (APPLY 10 . 10) (ERROR 10 . 10 ) (LOCALFREEVARS 10 . 10) (CONTAINS 10 . 10) (FILE 10) (ARGS 10) (USERTEMPLATES NIL . T) (0 10 . 10))) (RPAQQ NODUMPRELATIONS (CONTAINS FILE)) (MAPC (QUOTE ((GETHASH GETTABLE) (GETHASH TESTTABLE) (PUTHASH PUTTABLE) (ADDHASH ADDTABLE) (SUBHASH SUBTABLE) (MAPHASH MAPTABLE) (MAKEHASH MAKETABLE) (EQMEMBHASH EQMEMBTABLE))) (FUNCTION (LAMBDA (X) ( MOVD? (CAR X) (CADR X))))) (DEFINEQ (MSVBTABLES (LAMBDA (VERB MOD) (* gbn " 5-Jun-85 20:39") (COND ((LISTP VERB) (SETQ MOD (CADR VERB)) (SETQ VERB (CAR VERB)))) (MKLIST (SELECTQ VERB (BIND (SELECTQ MOD (NIL (QUOTE (BIND REF SET SMASH TEST))) (NOTUSE (QUOTE BIND)) NIL)) (CALL (SELECTQ MOD (DIRECTLY (QUOTE (CALL EFFECT PREDICATE NLAMBDA))) (EFFECT (QUOTE EFFECT)) (INDIRECTLY (QUOTE APPLY)) (NIL (QUOTE (APPLY CALL EFFECT ERROR PREDICATE NLAMBDA))) (NOTERROR (QUOTE (APPLY CALL EFFECT PREDICATE NLAMBDA))) (PREDICATE (QUOTE PREDICATE)) (TESTING (QUOTE PREDICATE)) (VALUE (QUOTE (CALL NLAMBDA))) (NLAMBDA (QUOTE NLAMBDA)) NIL)) (CREATE (SELECTQ MOD (NIL (QUOTE CREATE)) NIL)) (DECLARE (SELECTQ MOD (LOCALLY (QUOTE LOCALVARS)) ( LOCALVARS (QUOTE LOCALVARS)) (NIL (QUOTE (LOCALVARS SPECVARS))) (SPECVARS (QUOTE SPECVARS)) NIL)) ( FETCH (SELECTQ MOD (NIL (QUOTE FETCH)) NIL)) (IS (SELECTQ MOD (FIELDS (QUOTE ((FETCH) (REPLACE)))) ( FNS (QUOTE (CALL NOBIND REF (CALL) (APPLY)))) (KNOWN (QUOTE (CALL NOBIND REF))) (NIL (QUOTE (CALL NOBIND REF (CALL) (BIND) (REFFREE) (REF) (SETFREE) (SET) (SMASHFREE) (SMASH) (RECORDS) (FETCH) ( REPLACE) (PROP) (APPLY) (TEST) (TESTFREE)))) (PROPS (QUOTE ((PROP)))) (RECORDS (QUOTE ((RECORD) ( CREATE)))) (VARS (QUOTE ((BIND) (REFFREE) (REF) (SETFREE) (SET) (SMASHFREE) (SMASH) (TEST) (TESTFREE)) )) (TYPE (QUOTE ((0)))) NIL)) (KNOWN (SELECTQ MOD (NIL (QUOTE (CALL NOBIND REF))) NIL)) (PROG (SELECTQ MOD (NIL (QUOTE PROG)) NIL)) (REFERENCE (SELECTQ MOD (FIELDS (QUOTE FETCH)) (FREELY (QUOTE (REFFREE TESTFREE SMASHFREE))) (LOCALLY (QUOTE (REF TEST SMASH))) (NIL (QUOTE (REF REFFREE TEST TESTFREE SMASH SMASHFREE))) NIL)) (REPLACE (SELECTQ MOD (NIL (QUOTE REPLACE)) NIL)) (SET (SELECTQ MOD (FIELDS (QUOTE REPLACE)) (FREELY (QUOTE SETFREE)) (LOCALLY (QUOTE SET)) (NIL (QUOTE (SET SETFREE))) NIL)) (SMASH ( SELECTQ MOD (FIELDS (QUOTE REPLACE)) (FREELY (QUOTE SMASHFREE)) (LOCALLY (QUOTE SMASH)) (NIL (QUOTE ( SMASH SMASHFREE))) NIL)) (TEST (SELECTQ MOD (FREELY (QUOTE TESTFREE)) (LOCALLY (QUOTE TEST)) (NIL ( QUOTE (TEST TESTFREE))) NIL)) (USE (SELECTQ MOD (FIELDS (QUOTE (FETCH REPLACE))) (FREELY (QUOTE ( REFFREE SETFREE SMASHFREE TESTFREE))) (I.S.OPRS (QUOTE CLISP)) (INDIRECTLY (QUOTE LOCALFREEVARS)) ( LOCALLY (QUOTE (REF SET SMASH TEST))) (NIL (QUOTE (REF REFFREE SET SETFREE SMASH SMASHFREE TEST TESTFREE))) (PREDICATE (QUOTE (TEST TESTFREE))) (PROPNAMES (QUOTE PROP)) (RECORDS (QUOTE (CREATE RECORD))) (TESTING (QUOTE (TEST TESTFREE))) (VALUE (QUOTE (REF REFFREE SMASH SMASHFREE))) (TYPE (QUOTE 0)) NIL)) VERB))))) (RPAQQ DATABASECOMS ((E (DUMPDATABASE)))) (ADDTOVAR GAINSPACEFORMS (MSDATABASELST "erase current Masterscope database" (%. ERASE))) (RPAQQ MSCHECKBLOCKSCOMS ((* blocks checker) (FNS MSCHECKBLOCKS MSCHECKBLOCK MSCHECKFNINBLOCK MSCHECKBLOCKBASIC MSCHECKBOUNDFREE GLOBALVARP PRINTERROR MSCHECKVARS1 UNECCSPEC NECCSPEC SPECVARP SHORTLST DOERROR) (BLOCKS (MSCHECKBLOCKS MSCHECKBLOCKS MSCHECKBLOCK MSCHECKFNINBLOCK MSCHECKBLOCKBASIC MSCHECKBOUNDFREE PRINTERROR MSCHECKVARS1 UNECCSPEC NECCSPEC SPECVARP SHORTLST DOERROR (LOCALFREEVARS SEEN BLKFNS V ERRORS SFLG LF BLKAPPLYCALLERS U LF1 SHOULDBESPECVARS) (NOLINKFNS . T) (SPECVARS SPECVARS LOCALVARS RETFNS BLKAPPLYFNS BLKLIBRARY NOLINKFNS LINKFNS LOCALFREEVARS DONTCOMPILEFNS ENTRIES) (GLOBALVARS SYSLOCALVARS SYSSPECVARS FILELST MSCRATCHASH) GLOBALVARP)))) (RPAQQ MSPATHSCOMS ((* PATHS) (FNS MSPATHS MSPATHS1 MSPATHS2 MSONPATH MSPATHS4 DASHES DOTABS BELOWMARKER MSPATHSPRINTFN) (BLOCKS (MSPATHSBLOCK (ENTRIES MSPATHS MSONPATH MSPATHS2) MSPATHS MSPATHS1 MSPATHS2 MSONPATH MSPATHS4 DASHES DOTABS BELOWMARKER MSPATHSPRINTFN (LOCALFREEVARS TABS NAMED LINENUM LL BELOWCNT MARKING SEEN INVERTED TO NOTRACE AVOIDING SEPARATE) (GLOBALVARS MSBLIP MSCRATCHASH) ( NOLINKFNS . T))))) (RPAQQ MSBLIP "sysout and inform Masinter@PARC") (RPAQ? MSCRATCHASH) (ADDTOVAR COMPILE.TIME.CONSTANTS) (RPAQQ RECORDCHANGEFN CHANGERECORD) (RPAQ? CHECKUNSAVEFLG T) (RPAQ? MSNEEDUNSAVE) (RPAQ MASTERSCOPEDATE "22-Jul-85") (ADDTOVAR HISTORYCOMS %.) (PUTPROPS MASTERSCOPE COPYRIGHT ("Xerox Corporation" 1983 1984 1985)) NIL