$ od -c -N 50000 [eris]<LispCore>SOURCES>CMLFILESYS.DCOM!4
0000000 ( F I L E C R E A T E D " 9
0000020 - O c t - 8 6 1 5 : 2 0 : 2 5
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P C O R
0000100 E > S O U R C E S > C M L F I L
0000120 E S Y S . ; 4 ) \r " 1 - O c
0000140 t - 8 6 2 0 : 2 3 : 1 5 " "
0000160 C O M P I L E - F I L E d " i
0000200 n " X e r o x L i s p 1
0000220 - O c t - 8 6 . . . " d a t
0000240 e d " 1 - O c t - 8 6 2 1
0000260 : 2 4 : 4 4 " ) \r ( F I L E C R
0000300 E A T E D " 9 - O c t - 8 6
0000320 1 5 : 1 9 : 1 5 " { E R I S
0000340 } < L I S P C O R E > S O U R C
0000360 E S > C M L F I L E S Y S . ; 4
0000400 4 7 7 9 c h a n g e s t o
0000420 : ( F U N C T I O N S \r P R
0000440 O B E - F I L E D E L E T E -
0000460 F I L E ) p r e v i o u s d
0000500 a t e : " 2 - O c t - 8 6
0000520 0 9 : 5 2 : 1 3 " { E R I S }
0000540 < L I S P C O R E > S O U R C E
0000560 S > C M L F I L E S Y S . ; 3 )
0000600 \r ( R P A Q Q C M L F I L E S
0000620 Y S C O M S ( ( F U N C T I O
0000640 N S C L : D I R E C T O R Y
0000660 F I L E - A U T H O R F I L E
0000700 - L E N G T H F I L E - P O S
0000720 I T I O N \r U S E R - H O M E
0000740 D I R - P A T H N A M E F I L
0000760 E - W R I T E - D A T E ) ( F
0001000 U N C T I O N S P R O B E - F
0001020 I L E R E N A M E - F I L E
0001040 D E L E T E - F I L E ) ( P R
0001060 O P F I L E T Y P E \r C M L
0001100 F I L E S Y S ) ) ) \r C L : D I
0001120 R E C T O R Y D 1 \r ( L ( 0
0001140 P A T H N A M E ) ) \0 7 005 \0
0001160 \0 001 @ \t \0 \0 \t \0 \0 h o \0 \0 \0 \v \0
0001200 \0 021 021 001 021 0 004 H \t \0 \0 Y 221 h 200 i
0001220 263 026 I \t \0 \0 274 K 265 \t L h 032 [ 272 260
0001240 350 L & 273 260 343 J 020 \0 ( 4 3 Q P A
0001260 T H N A M E 3 0 Q \ G E N E
0001300 R A T E N E X T F I L E 1 6 Q
0001320 \ G E N E R A T E F I L E S
0001340 6 D I R E C T O R Y . F I L L
0001360 . P A T T E R N 3 N A M E S
0001400 T R I N G ) \r N I L \r ( 1 3 Q
0001420 ( S O R T ) ) \r F I L E - A U
0001440 T H O R D 1 \r ( L ( 0 F I
0001460 L E ) ) \0 025 \0 \0 \0 001 @ g \0 \0 \n
0001500 \0 \0 265 006 o \0 \0 \0 g \0 \0 \n \0 \0 020 \0
0001520 ( 2 2 Q C O E R C E 6 G E
0001540 T F I L E I N F O ) \r ( 1 7 Q
0001560 S I M P L E - S T R I N G 3
0001600 A U T H O R ) \r ( 1 4 Q " "
0001620 ) \r F I L E - L E N G T H D 1
0001640 \r ( L ( 0 F I L E - S T R E
0001660 A M ) ) \0 022 \0 \0 \0 001 @ \t \0 \0 264
0001700 \f @ \t \0 \0 264 006 @ \t \0 \0 020 \0 ( 1 7
0001720 Q G E T E O F P T R 1 1 Q
0001740 O P E N P 3 S T R E A M P )
0001760 \r N I L \r ( ) \r F I L E - P O S
0002000 I T I O N D 1 \r ( L ( 0 -
0002020 a r g s - ) ) \0 9 004 \0 002 \0 e 021
0002040 001 \0 k a 021 ! 003 l 002 H 361 221 h 204 i 272
0002060 l 002 a 273 J 224 I \t \0 \0 020 I K d g \0
0002100 \0 360 222 277 j 212 g \0 \0 360 224 I \t \0 \0 200
0002120 K \n \0 \0 i 020 \0 ( 6 5 Q S E T F
0002140 I L E P T R 6 0 Q G E T E O
0002160 F P T R 3 3 Q G E T F I L E
0002200 P T R ) \r ( 5 2 Q : E N D 4
0002220 2 Q : S T A R T ) \r ( ) \r U S
0002240 E R - H O M E D I R - P A T H N
0002260 A M E D 1 \r ( L ( 0 H O S
0002300 T ) ) \0 \r \0 \0 \0 001 ` \0 \0 265 005 `
0002320 \0 \0 \t \0 \0 020 \0 ( 1 2 Q P A T H
0002340 N A M E ) \r ( 7 * D E F A U L
0002360 T - P A T H N A M E - D E F A U
0002400 L T S * 2 L O G I N H O S T
0002420 / D I R ) \r ( ) \r F I L E - W R
0002440 I T E - D A T E D 1 \r ( L (
0002460 0 F I L E ) ) \0 023 \0 \0 \0 001 @
0002500 \t \0 \0 d 232 g \0 \0 \n \0 \0 o \0 \0 \0 324
0002520 020 \0 ( 1 3 Q G E T F I L E I N
0002540 F O 3 P R O B E - F I L E )
0002560 \r ( 1 0 Q I W R I T E D A T E
0002600 ) \r ( 1 7 Q 2 0 1 7 0 2 3 1
0002620 6 0 0 Q ) \r P R O B E - F I L E
0002640 D 1 \r ( L ( 0 F I L E ) )
0002660 \0 7 \0 \0 \0 001 @ d \t \0 \0 262 ( 277 @
0002700 d \t \0 \0 235 277 @ 006 \0 \0 311 004 265 003 @ \t
0002720 \0 \0 020 006 \0 \0 311 004 265 003 @ \t \0 \0 d 233
0002740 \t \0 \0 020 \t \0 \0 d 222 \t \0 \0 020 \0 ( 6
0002760 4 Q P A T H N A M E 5 7 Q
0003000 I N F I L E P 5 3 Q P A T H
0003020 N A M E 4 6 Q I N F I L E P
0003040 3 2 Q P A T H N A M E 1 4
0003060 Q O P E N P 4 S T R E A M
0003100 P ) \r ( 3 6 Q S T R E A M 2
0003120 2 Q S T R E A M ) \r ( ) \r R E
0003140 N A M E - F I L E D 1 \r ( L
0003160 ( 1 N E W - N A M E 0 F I
0003200 L E ) ) \0 > 002 \0 \0 002 @ \t \0 \0 021
0003220 021 001 @ d \t \0 \0 262 035 277 @ d \t \0 \0 231
0003240 277 o \0 \0 \0 @ \n \0 \0 216 006 \0 \0 311 004 265
0003260 003 @ b \0 A \n \0 \0 Y 277 A @ \n \0 \0 H
0003300 I \t \0 \0 \v \0 \0 020 \0 ( 7 3 Q V A
0003320 L U E S 7 0 Q P A T H N A M
0003340 E 6 3 Q M E R G E - P A T H
0003360 N A M E S 5 4 Q R E N A M E
0003400 F I L E 3 5 Q C L : E R R O
0003420 R 2 3 Q O P E N P 1 3 Q
0003440 S T R E A M P 3 P A T H N A
0003460 M E ) \r ( 4 1 Q S T R E A M )
0003500 \r ( 3 1 Q " R e n a m i n g
0003520 o p e n s t r e a m s i s
0003540 n o t s u p p o r t e d :
0003560 ~ S " ) \r D E L E T E - F I L E
0003600 D 1 \r ( L ( 0 F I L E ) )
0003620 \0 > 001 \0 \0 001 @ \t \0 \0 021 001 \0 @ \t
0003640 \0 \0 230 @ g \0 \0 i \v \0 \0 277 H 265 \v @
0003660 \t \0 \0 262 025 h 260 023 \t \0 \0 \t \0 \0 221 h
0003700 200 i 236 o \0 \0 \0 205 i 227 o \0 \0 \0 @ \n
0003720 \0 \0 i 020 \0 ( 7 2 Q C L : E R R
0003740 O R 4 6 Q D E L F I L E 4
0003760 3 Q I N T E R L I S P - N A M
0004000 E S T R I N G 3 3 Q S T R E
0004020 A M P 2 3 Q C L O S E 1 2
0004040 Q S T R E A M P 3 P R O B
0004060 E - F I L E ) \r ( 1 7 Q : A B
0004100 O R T ) \r ( 6 6 Q " F i l e
0004120 t o b e d e l e t e d d
0004140 o e s n o t e x i s t : ~
0004160 S " 5 7 Q " C o u l d n o
0004200 t d e l e t e t h e f i l
0004220 e ~ S " ) \r ( P U T P R O P S
0004240 C M L F I L E S Y S F I L E
0004260 T Y P E C O M P I L E - F I L
0004300 E ) \r ( P U T P R O P S C M L
0004320 F I L E S Y S C O P Y R I G H
0004340 T ( " X e r o x C o r p o r
0004360 a t i o n " 1 9 8 6 ) ) \r N I
0004400 L \r
0004402