(DEFINE-FILE-INFO §READTABLE "INTERLISP" §PACKAGE "INTERLISP") (FILECREATED "19-Oct-86 13:51:45" ("compiled on " {ERIS}MISC>LIST-DIRECTORIES.;3) "14-Oct-86 21:06:05" recompiled changes%: GET-UNCONVERTED-FILES in "Xerox Lisp 14-Oct-86 ..." dated "14-Oct-86 22:24:47") (FILECREATED "19-Oct-86 13:51:36" {ERIS}MISC>LIST-DIRECTORIES.;3 1464 changes to%: (FNS GET-UNCONVERTED-FILES) (VARS LIST-DIRECTORIESCOMS) previous date%: "17-Oct-86 18:48:11" {ERIS}MISC>LIST-DIRECTORIES.;1) GET-UNCONVERTED-FILESA0001A0002 D1 (F 0 S) P (3 CLOSEF) NIL () GET-UNCONVERTED-FILESA0001 D1 (NAME ERRORSET F 0 S F 1 RESETVARSLST F 2 F F 3 RESETY) 0ghhhQc¿Rg c¿gP ¿P o ci(42 STREQUAL 35 RSTRING 30 RATOMS 20 OPENSTREAM) (26 %( 17 INPUT 2 GET-UNCONVERTED-FILESA0001A0002) ( 39 "DEFINE-FILE-INFO") GET-UNCONVERTED-FILES D1 (P 8 RESETZ P 7 RESETY P 6 LISPXHIST P 5 S P 4 F P 0 A2010 I 1 EXTENSION I 0 DIRECTORY F 9 LISPXHIST F 10 RESETVARSLST) e @Aµoo ho QH \µI”L ¼W!Wog ‘h‚g_ ¿O“O³ÉL»Jµ KhZ¹°½K&º°¸(76 ERROR! 69 RESETRESTORE 58 GET-UNCONVERTED-FILESA0001 40 CONCATCODES 29 \GENERATENEXTFILE 22 \GENERATEFILES 14 DIRECTORY.FILL.PATTERN) (64 ERROR 55 INTERNAL) ( 52 (GET-UNCONVERTED-FILESA0001) 19 (SORT) 11 "" 7 "") (PRETTYCOMPRINT LIST-DIRECTORIESCOMS) (RPAQQ LIST-DIRECTORIESCOMS ((FNS GET-UNCONVERTED-FILES))) (PUTPROPS LIST-DIRECTORIES COPYRIGHT ("Xerox Corporation" 1986)) NIL