(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10) (FILECREATED "14-Sep-94 18:48:35" ("compiled on " |{DSK}lispusers>WHOCALLS.;1|) "28-Jul-94 17:28:46" |bcompl'd| |in| "Medley 25-Aug-94 ..." |dated| "25-Aug-94 10:02:49") (FILECREATED "18-Dec-86 19:03:25" {ERIS}INTERNAL>LIBRARY>WHOCALLS.\;2 4500 |changes| |to:| ( FNS DISTRIBUTE.CALLINFO DISTRIBUTE-CALL-INFO-FOR-SYMBOL) (VARS WHOCALLSCOMS) |previous| |date:| " 7-Nov-86 02:47:11" {ERIS}LISPCORE>WHOCALLS.\;2) WHOCALLS :D8 (P 5 VAL P 4 CALLTYPE P 3 TYPE I 1 USAGE I 0 CALLEE) Ad=@A&d[lFo K IHhZH&Jbgg/Ag&AgAgAgAdggbg?gAdgdgAhbgAdgg g M(205 MAPATOMS 192 \\ILLEGAL.ARG 34 \\ILLEGAL.ARG 26 MISSPELLED?) (200 WHOCALLS1 186 FNAPPLY 178 CALLS 168 VARAPPLY 154 GLOBALS 146 USEDFREE 136 BOUND 129 VARAPPLY 121 USES 113 GLOBALS 104 USEDFREE 95 BOUND 86 VARS 77 VAR 68 USES 60 VARAPPLY) ( 21 (BOUND USEDFREE GLOBALS)) WHOCALLS1A0001 :D8 (I 1 FLG I 0 CALLED F 0 CALLEE F 1 USAGE F 2 FN F 3 VAL) @QAQ 4P@P @P$Ri oi RScg (61 RETFROM 46 PRIN1 34 PRIN1 21 MEMB 9 MEMB) (56 WHOCALLS1) ( 40 ", ") WHOCALLS1 :D8 (I 0 FN F 0 CALLTYPE) @ @Pg (24 BLOCK 19 CALLSCCODE 5 CCODEP) (14 WHOCALLS1A0001) () DISTRIBUTE.CALLINFO :D8 NIL ogg (19 ADD.PROCESS) (14 DISTRIBUTE-CALL-INFO 9 NAME) ( 4 (MAPATOMS (QUOTE DISTRIBUTE-CALL-INFO-FOR-SYMBOL))) DISTRIBUTE-CALL-INFO-FOR-SYMBOL :D8 (P 5 Z P 0 Y I 0 X) @ @ AH(dMg @IMg@I H(dMg @JMg@J H(dMg @KMg@K H(dMg @LMg@L h(209 PUTPROP 190 GETPROP 160 PUTPROP 141 GETPROP 112 PUTPROP 93 GETPROP 65 PUTPROP 46 GETPROP 22 CALLSCCODE 10 CCODEP 4 BLOCK) (201 USEDGLOBALBY 185 USEDGLOBALBY 152 USEDFREEBY 136 USEDFREEBY 104 BOUNDBY 88 BOUNDBY 57 CALLEDBY 41 CALLEDBY) () (PRETTYCOMPRINT WHOCALLSCOMS) (RPAQQ WHOCALLSCOMS ((FNS WHOCALLS WHOCALLS1 DISTRIBUTE.CALLINFO DISTRIBUTE-CALL-INFO-FOR-SYMBOL) ( PROP PROPTYPE CALLEDBY USEDFREEBY USEDGLOBALBY BOUNDBY))) (PUTPROPS CALLEDBY PROPTYPE IGNORE) (PUTPROPS USEDFREEBY PROPTYPE IGNORE) (PUTPROPS USEDGLOBALBY PROPTYPE IGNORE) (PUTPROPS BOUNDBY PROPTYPE IGNORE) (PUTPROPS WHOCALLS COPYRIGHT ("Xerox Corporation" 1986)) NIL