$ od -c -N 50000 [eris]<Lisp>JCAI>library>SAMEDIR.DCOM!1
0000000 ( F I L E C R E A T E D " 9
0000020 - J u n - 8 5 2 3 : 5 6 : 4 1
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 > L I B R A R Y > S A M E D I
0000120 R . ; 3 ) \r " 7 - J u n - 8
0000140 5 1 4 : 4 2 : 2 4 " r e c o
0000160 m p i l e d e x p r s : n o
0000200 t h i n g i n " I N T E R L
0000220 I S P - D 7 - J u n - 8 5
0000240 . . . " d a t e d \r " 7 -
0000260 J u n - 8 5 1 4 : 5 8 : 0 3 "
0000300 ) \r ( F I L E C R E A T E D "
0000320 9 - J u n - 8 5 2 3 : 5 6 :
0000340 2 7 " { E R I S } < L I S P C
0000360 O R E > L I B R A R Y > S A M E
0000400 D I R . ; 3 3 1 8 9 c h a n
0000420 g e s t o : ( F N S \r C H
0000440 E C K S A M E D I R ) p r e v
0000460 i o u s d a t e : " 2 0 - M
0000500 a r - 8 4 1 5 : 5 2 : 5 2 "
0000520 { E R I S } < L I S P C O R E >
0000540 L I B R A R Y > S A M E D I R .
0000560 ; 1 ) \r C H E C K S A M E D I R
0000600 A 0 0 0 2 D 1 \r ( N A M E E
0000620 R R O R S E T F 0 H O S T
0000640 / D I R ) \0 016 \0 001 002 \0 P 265 \a i
0000660 d \n \0 \0 \t \0 \0 i 020 \0 ( 1 2 Q C
0000700 N D I R 7 R E A D ) \r N I L
0000720 \r ( ) \r C H E C K S A M E D I R
0000740 D 1 \r ( P 1 2 Q D I R P
0000760 1 1 Q H O S T P 1 0 Q
0001000 O L D F I L E P 6 O K H O
0001020 S T / D I R S P 5 N E W V
0001040 P 4 L S T P 3 D I R
0001060 P 2 H O S T P 1 H O
0001100 S T / D I R P 0 D A T E S
0001120 I 0 F I L E ) 001 026 \v \0 \0
0001140 001 @ g \0 \0 033 021 a 006 H 003 241 h 020 i d
0001160 \n \0 \0 Y d ` \0 \0 026 002 d 003 243 d 221 h
0001200 032 032 276 H 021 1 \n O 016 003 265 X i 022 242 261
0001220 \0 205 l \n g \0 \0 o \0 \0 \0 @ o \0 \0 \0
0001240 I o \0 \0 \0 h 032 032 032 032 032 g \0 \0 o \0
0001260 \0 \0 H 001 002 \t \0 \0 Y o \0 \0 \0 \v \0 \0
0001300 o \0 \0 \0 032 032 o \0 \0 \0 032 \f \0 \0 d g
0001320 \0 \0 360 263 231 d g \0 \0 360 262 034 277 \b \0 \0
0001340 260 ( 001 _ 020 002 \t \0 \0 N 034 222 h 260 240 O
0001360 016 002 _ 016 260 225 d g \0 \0 360 223 277 h Y 207
0001400 g \0 \0 360 243 \b \0 \0 277 o \0 \0 \0 \t \0 \0
0001420 277 261 377 X g \0 \0 h g \0 \0 H 001 002 \f \0
0001440 \0 \t \0 \0 ] d 242 261 377 F H 001 002 360 222 261
0001460 377 = l 017 g \0 \0 H 001 002 o \0 \0 \0 M g
0001500 \0 \0 \n \0 \0 \t \0 \0 o \0 \0 \0 o \0 \0 \0
0001520 h 032 032 032 032 032 \v \0 \0 d g \0 \0 360 223 277
0001540 261 377 \f g \0 \0 360 226 \b \0 \0 277 261 377 \0 \b
0001560 \0 \0 277 261 376 371 \0 ( 4 2 0 Q S H O
0001600 U L D N T 4 1 1 Q E R R O R
0001620 ! 3 6 7 Q A S K U S E R 3
0001640 4 6 Q M K S T R I N G 3 4 3
0001660 Q F I L E N A M E F I E L D
0001700 3 0 2 Q I N F I L E P 2 7 7
0001720 Q P A C K F I L E N A M E 2
0001740 5 6 Q C H E C K S A M E D I R
0001760 A 0 0 0 2 2 4 6 Q S H O U L
0002000 D N T 2 0 7 Q H O S T & D I
0002020 R E C T O R Y F I E L D 1 7 6
0002040 Q E R R O R ! 1 5 4 Q A S
0002060 K U S E R 1 3 6 Q C O N C A
0002100 T 1 2 6 Q H O S T & D I R E
0002120 C T O R Y F I E L D 2 1 Q D
0002140 I R E C T O R Y N A M E ) \r ( 4
0002160 0 4 Q N 3 7 3 Q Y 3 4 0
0002200 Q V E R S I O N 3 2 5 Q Y
0002220 2 7 1 Q B O D Y 2 6 5 Q
0002240 V E R S I O N 2 4 1 Q O 2
0002260 3 0 Q C 1 6 7 Q N 1 6 0
0002300 Q Y 1 1 4 Q O 6 5 Q Y
0002320 2 6 Q M I G R A T I O N S
0002340 3 F I L E D A T E S ) \r ( 3
0002360 5 6 Q " D o y o u w a n t
0002400 t o m a k e t h e f i l
0002420 e a n y w a y " 3 5 2 Q "
0002440 h a s s i n c e a p p e a r
0002460 e d ) . " 3 3 4 Q " i s n
0002500 o t t h e m o s t r e c e
0002520 n t v e r s i o n ( v e r s
0002540 i o n " 2 5 3 Q ( C H E C K
0002560 S A M E D I R A 0 0 0 2 ) 1 5
0002600 0 Q ( ( C " o n n e c t t
0002620 o o t h e r d i r e c t o r
0002640 y : " ) ( Y " e s , w r
0002660 i t e i t h e r e \r " ) (
0002700 N " o , a b o r t M A K E
0002720 F I L E \r " ) ) 1 4 2 Q ( C
0002740 O N F I R M F L G T ) 1 3 3
0002760 Q " [ c o n f i r m ] "
0003000 1 2 0 Q " o p s ! C o n n
0003020 e c t t o " 1 0 3 Q " -
0003040 - s h o u l d I w r i t e
0003060 i t o u t a n y w a y "
0003100 7 6 Q " i n y o u r c o n
0003120 n e c t e d d i r e c t o r y
0003140 " 7 1 Q " Y o u h a v e n
0003160 ' t l o a d e d o r w r i
0003200 t t e n " ) \r H O S T & D I R E
0003220 C T O R Y F I E L D D 1 \r ( P
0003240 2 T A I L I 0 F I L E
0003260 N A M E ) \0 9 003 \0 \0 001 @ \t \0 \0
0003300 021 ! 002 H Z 003 265 \a I \t \0 \0 020 001 d g
0003320 \0 \0 360 253 d g \0 \0 360 245 d g \0 \0 360 222
0003340 277 i 201 277 h 230 J 001 J 002 001 I 032 032 271 J
0003360 002 002 260 322 \0 ( 1 7 Q P A C K F I
0003400 L E N A M E 3 U N P A C K F
0003420 I L E N A M E ) \r ( 4 1 Q D E
0003440 V I C E 3 3 Q D I R E C T O
0003460 R Y 2 5 Q H O S T ) \r ( ) \r
0003500 ( P R E T T Y C O M P R I N T
0003520 S A M E D I R C O M S ) \r ( R P
0003540 A Q Q S A M E D I R C O M S
0003560 ( ( F N S C H E C K S A M E D
0003600 I R H O S T & D I R E C T O R
0003620 Y F I E L D ) ( A D D V A R S
0003640 ( M A K E F I L E F O R M S
0003660 ( O R ( N L S E T Q ( \r C H
0003700 E C K S A M E D I R F I L E )
0003720 ) ( R E T F R O M ( Q U O T
0003740 E M A K E F I L E ) ) ) ) (
0003760 M I G R A T I O N S ) ) ( G L
0004000 O B A L V A R S M I G R A T I
0004020 O N S ) ) ) \r ( A D D T O V A R
0004040 M A K E F I L E F O R M S (
0004060 O R ( N L S E T Q ( C H E C
0004100 K S A M E D I R F I L E ) )
0004120 ( R E T F R O M ( Q U O T E
0004140 M A K E F I L E ) ) ) ) \r ( A D
0004160 D T O V A R M I G R A T I O N
0004200 S ) \r ( P U T P R O P S S A M
0004220 E D I R C O P Y R I G H T (
0004240 " X e r o x C o r p o r a t i
0004260 o n " 1 9 8 2 1 9 8 4 1 9
0004300 8 5 ) ) \r N I L \r
0004311