(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10) (FILECREATED "16-Nov-2023 21:59:19" ("compiled on " |{DSK}larry>il>medley>internal>MEDLEY-UTILS.;2|) "16-Nov-2023 20:33:02" |brecompiled| |changes:| |nothing| |in| "Welcome to Fuller sysout 16-Nov-2023 ..." |dated| "16-Nov-2023 20:36:14") (FILECREATED "16-Nov-2023 21:59:19" |{DSK}larry>il>medley>internal>MEDLEY-UTILS.;2| 18962 :EDIT-BY "lmm" :CHANGES-TO (VARS OKLIBRARY OKLISPUSERS) :PREVIOUS-DATE " 4-Nov-2023 15:23:16" |{DSK}larry>il>medley>internal>MEDLEY-UTILS.;1|) GATHER-INFOA0001 :D8 (L (0 X) F 0 DEFD) @ ´@Pc(5 \\DEFINEDP) NIL () GATHER-INFOA0002 :D8 (I 0 X F 0 CALLEDFNS) @ ³@g ´ @Pch(18 GETPROP 5 \\DEFINEDP) (13 CALLED-BY) () GATHER-INFO :D8 (P 26 FN P 25 DUPS P 24 DFN P 23 EXR P 22 VAL P 21 REV P 18 S P 17 Y P 16 DEFD P 10 X P 5 X P 1 I I 0 PHASE F 27 LOADEDFILES F 28 ALLFILESETSFILES F 29 SOURCES F 30 NO-SOURCE F 31 DEFINEDFNS F 32 CALLEDFNS F 33 DUPFNS F 34 FILESETS F 35 ALLCONTENT) # @dgð²¿ljIHó’±ûI ¿IkÔY°ïjð²'`` ho @dkð¢±Ö¿0`° dMg ºKµJh\J&»µáLc6o 0WD°dM h Z–Kµ0J\[¿µâLc8ooi A NµOc: [J°Í_g o ³Og _¿OµOh__¿N^°µO&_¿°õmÿð¢±§oi ¿W6AOµ\Oi ¿i oi ¿W:W8W6 i ¿i oi W8W6 i i _`³Od`®_¿OµOh__¿O_±ÿyO&_°ò@dlð¢±™¿g ¿O c>dLµhc@g ] ²1MgM O"o"O(µˆ_*¿O&µ L\°³_,°d_$O*MO$O* ¿µçO(_(¿O&_&¿°¾mþð²oi W@i i @dlð¢±”¿`±¨dMg ¿MgM ¿Mg °qdO.gð²_O.°Wd_0O0g ô²+O0i ¿oi ¿O0gO0°O0i ¿oi ¿µ©µhµ‚±ÿW0`°"dMdg ºKµJh\J&»µßLcF`°^dM °KdO4g ²&O4g Mh ¿O4O2³O4O2_2ŽO4gMh¿µ¶hµ£O2cBW>A NµOc<_g ³O_¿OµOh__¿N^°ÓO&_¿°õmýð²7oi ¿W 370 - 357 NAME 339 IP 333 EXTENSION 324 DIRECTORY 314 NAME 62 DIRECTORY 7 MEDLEYDIR) ( 679 " DONE" 629 "..." 608 " to " 588 "Converting " 576 " on BADFILES" 558 "Skipping " 509 "-> " 474 " already there" 408 "-" 352 "PS" 346 "IP" 287 "no such file " 217 (">." ">dinfo>") 191 "*" 149 ";*" 143 "*." 130 ("TED*" "SKETCH") 114 "tmp/psfiles" 98 "/tmp/psfiles/" 88 "MEDLEYDIR" 83 "mkdir -p ") PRETTYFILESA0001 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 X F 3 SI::NLSETQ-VALUE) i@R hcg(10 LISPSOURCEFILEP) (19 :NORMAL) () PRETTYFILESA0002 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 *FILE* F 1 STR F 2 A0032) PhQ hc¿$(12 \\MVLIST 7 PRETTYFILEINDEX) NIL () PRETTYFILESA0003 :D8 (F 0 STR F 1 A0032) PgQ(11 CL:CLOSE) (5 :ABORT) () PRETTYFILES :D8 (P 14 A0032 P 13 STR P 12 PSFILE P 11 DIR P 10 NAME P 9 TF P 8 SKIP P 6 *CONDITION-HANDLER-BINDINGS* P 5 SI::*NLSETQFLAG* P 4 *PROCEED-CASES* P 3 SI::NLSETQ-VALUE P 2 X P 0 PAT I 3 TOPDIRLEN I 2 REDOFLG I 1 DEST I 0 *FILE* F 15 *PROCEED-CASES* F 16 *CONDITION-HANDLER-BINDINGS*) Ã@µ `b ¢±6@ bC³dg b¿A³1oo o ¿ohidb¿o°d@H Iµ!µä@o IµfhZ ³UJ ²M`WioW L gð´Kµoi ¿Ji ¿h™JABC¿IY±ÿºoOµi²J ™JABC¿IY±ÿr_J ’h°ÖO_°Ë@ bµoi i ²é@ Og' Og'gogAiðOo °4ggOlCØmÿ oOgOg'gAdið’¿O B³%O ²Oi oi i @` ² oi @i oi oi ¿@i ¿oi ¿Oi ¿oi O ig OgO¿$oi i (704 TERPRI 698 PRIN1 682 CL:CLOSE 668 \\MVLIST 663 PRETTYFILESA0002 649 OPENPOSTSCRIPTSTREAM 642 PRIN1 630 PRIN1 621 PRIN1 609 PRIN1 601 PRIN1 589 PRIN1 578 PRIN1 571 PRIN1 558 MEMBER 546 TERPRI 540 PRIN1 529 PRIN1 519 INFILEP 506 PACKFILENAME.STRING 474 CONCAT 462 PACK 457 SUBST 452 UNPACK 447 SUBSTRING 422 CONCAT 366 UNPACKFILENAME.STRING 358 LISPSOURCEFILEP 352 TERPRI 346 PRIN1 331 INFILEP 314 STRPOS 309 L-CASE 293 PRETTYFILES 283 DIRECTORYNAMEP 251 PRETTYFILES 238 PRIN1 230 PRIN1 206 PRETTYFILESA0001 175 INFILEP 167 DIRECTORYNAMEP 151 DIRECTORY 146 CONCAT 122 DIRECTORY 117 CONCAT 95 MEDLEYDIR 81 |ShellCommand| 76 CONCAT 66 UNIX-GETENV 45 CL:LENGTH 40 FILENAMEFIELD.STRING 24 DIRECTORYNAME 14 DIRECTORYNAMEP) (675 :ABORT 658 PRETTYFILESA0003 553 BADFILES 492 DIRECTORY 486 HOST 479 HOST 434 > 429 - 406 NAME 396 EXTENSION 387 DIRECTORY 376 NAME 212 :NORMAL 185 SI::NLSETQ-PROCEED-CASE 35 DIRECTORY 7 MEDLEYDIR) ( 692 " DONE" 636 "..." 615 " to " 595 "Converting " 583 " on BADFILES" 565 "Skipping " 534 " already there" 467 "-" 417 ".pfi" 401 "ps" 340 "no such file " 265 ("clos" "cltl2" "rooms>" ".>") 224 "LISPSOURCEFILEP error" 194 (CL:ERROR . SI::NLSETQHANDLER) 141 "*" 103 ("*.;") 87 "tmp/psfiles" 71 "/tmp/psfiles/" 61 "MEDLEYDIR" 56 "mkdir -p ") (PRETTYCOMPRINT MEDLEY-UTILSCOMS) (RPAQQ MEDLEY-UTILSCOMS ((FNS GATHER-INFO MAKE-FULLER-DB MEDLEY-FIX-LINKS MEDLEY-FIX-DATES) (VARS MEDLEY-FIX-DIRS OKSOURCES OKLIBRARY OKLISPUSERS OKINTERNAL) (FNS MAKE-EXPORTS-ALL MAKE-WHEREIS-HASH) ( FNS BADFILE HCFILES PRETTYFILES) (INITVARS (HCFILES) (BADFILES)))) (RPAQQ MEDLEY-FIX-DIRS ("sources" "library" "lispusers" "internal" "greetfiles" "doctools")) (RPAQQ OKSOURCES (RENAMEFNS VMEM READSYS CASH-FILE HASH-FILE MEDLEYDIR MAKEINIT)) (RPAQQ OKLIBRARY (POSTSCRIPTSTREAM CHATTERMINAL DMCHAT CHAT PRESS READNUMBER EDITBITMAP IMAGEOBJ TEDIT HRULE TABLEBROWSER FILEBROWSER GRAPHER SPY WHERE-IS COPYFILES MSANALYZE MSPARSE MSCOMMON MASTERSCOPE UNIXCOMM UNIXPRINT UNICODE HASH CLIPBOARD UNIXCHAT VT100KP VTCHAT SKETCH SKETCHBMELT SCALEBITMAP SKETCHOBJ SKETCHEDIT SKETCHELEMENTS SKETCHOPS MATMULT SAMEDIR REMOTEVMEM ETHERRECORDS UNIXUTILS CHATDECLS BROWSER)) (RPAQQ OKLISPUSERS (THINFILES ISO8859IO DINFO HELPSYS MODERNIZE WHEELSCROLL PRETTYFILEINDEX WHO-LINE BACKGROUND-YIELD OBJECTWINDOW REGIONMANAGER COMPARETEXT EXAMINEDEFS COMPARESOURCES COMPAREDIRECTORIES PSEUDOHOSTS DATEFORMAT-EDITOR DOC-OBJECTS EQUATIONS BICLOCK FILEWATCH LIFE IDLEHAX GITFNS TMAX IMTOOLS EQUATIONFORMS UNBOXEDOPS TILED-SEDIT IDLEDEMO WDWHACKS BUTTONS PICK PAGEHOLD UNIXYCD)) (RPAQQ OKINTERNAL (MEDLEY-UTILS)) (RPAQ? HCFILES) (RPAQ? BADFILES) NIL