$ od -c -N 50000 [eris]<Lisp>LIBRARY>COPYFILES.TEDIT!1
0000000 T h e C O P Y F I L E S P a
0000020 c k a g e \r S t o r e d o n :
0000040 { P h y l u m } < L i s p c
0000060 o r e > L i b r a r y > C o p y
0000100 F i l e s . T e d i t , . P r
0000120 e s s \r L a s t M o d i f i e
0000140 d : 1 2 J u n e 8 4 \r B
0000160 y : S y b a l s k y \r T h i
0000200 s i s a p a c k a g e o
0000220 f e x t e n s i o n s t o
0000240 t h e C O P Y F I L E f u n
0000260 c t i o n , t o m a k e i
0000300 t e a s y t o c o p y g
0000320 r o u p s o f f i l e s a
0000340 n d t o c o p y f i l e s
0000360 o n l y w h e n t h e s
0000400 o u r c e i s n e w e r t
0000420 h a n t h e t a r g e t .
0000440 T h e r e a r e f o u r
0000460 f u n c t i o n s : \r ( C O P Y
0000500 F I L E ? F R O M T O ) \r C
0000520 o p i e s t h e f i l e F
0000540 R O M t o t h e f i l e
0000560 T O , o n l y i f F R O M
0000600 ' s c r e a t i o n d a t e
0000620 i s l a t e r t h a n T
0000640 O ' s . R e t u r n s T
0000660 i f t h e c o p y w a s
0000700 d o n e , N I L i f i t
0000720 w a s n ' t . \r ( C O P Y F I L
0000740 E S F I L E S F R O M L I B
0000760 T O L I B V E R B O S E ? )
0001000 \r C o p i e s e a c h f i l
0001020 e i n F I L E S f r o m
0001040 F R O M L I B t o T O L I B
0001060 . T h i s i s d o n e
0001100 b y P A C K i n g F R O M L
0001120 I B a n d T O L I B o n t
0001140 o e a c h f i l e n a m e ,
0001160 s o y o u c a n u s e
0001200 t h i s f o r a r b i t r a
0001220 r y h o s t / d i r e c t o r
0001240 y / s u b - d i r e c t o r y
0001260 c h a n g e s . I f V E R
0001300 B O S E ? i s n o n - N I L
0001320 , i t i s a s t r e a m
0001340 o n w h i c h t h e f u
0001360 n c t i o n w i l l p r i n
0001400 t a m e s s a g e f o r
0001420 e a c h f i l e i t c o p
0001440 i e s . \r ( C O P Y F I L E S ?
0001460 F I L E S F R O M L I B T
0001500 O L I B V E R B O S E ? ) \r C
0001520 o p i e s e a c h f i l e
0001540 i n F I L E S f r o m F R
0001560 O M L I B t o T O L I B ;
0001600 h o w e v e r , a f i l e
0001620 i s c o p i e d o n l y i
0001640 f ( 1 ) i t d o e s n ' t
0001660 e x i s t o n T O L I B ,
0001700 o r ( 2 ) t h e c r e a
0001720 t i o n d a t e o n F R O
0001740 M L I B i s n e w e r t h
0001760 a n o n T O L I B . A g
0002000 a i n , t h i s i s d o n
0002020 e b y P A C K i n g F R O
0002040 M L I B a n d T O L I B o
0002060 n t o e a c h f i l e n a m
0002100 e , s o y o u c a n u s
0002120 e t h i s f o r a r b i t
0002140 r a r y h o s t / d i r e c t
0002160 o r y / s u b - d i r e c t o r
0002200 y c h a n g e s . I f V
0002220 E R B O S E ? i s n o n - N
0002240 I L , i t i s a s t r e
0002260 a m o n w h i c h t h e
0002300 f u n c t i o n w i l l p r
0002320 i n t a m e s s a g e f o
0002340 r e a c h f i l e i t c
0002360 o p i e s . \r ( C O M P A R E F
0002400 I L E S O L D F I L E N E W
0002420 F I L E ) \r C o i m p a r e s
0002440 t h e f i l e s O L D F I L
0002460 E a n d N E W F I L E t o
0002500 s e e i f t h e y a r e
0002520 i d e n t i c a l ; i f t
0002540 h e y a r e n ' t t h e s
0002560 a m e , C O M P A R E F I L E
0002600 S w i l l b r e a k . \r E x
0002620 a m p l e s : \r ( C O P Y F I L
0002640 E ? ' { P H Y L U M } < S Y B
0002660 A L S K Y > C O P Y F I L E . D
0002700 C O M \r '
0002720 { P H Y L U M } < L I S P C O R
0002740 E > L I B R A R Y > C O P Y F I
0002760 L E . D C O M ) \r W o u l d b
0003000 e a r e a s o n a b l e w
0003020 a y t o i n s t a l l t h
0003040 i s p a c k a g e . \r ( C O P
0003060 Y F I L E S ? ' ( C O P Y F I
0003100 L E S C O P Y F I L E S . D C
0003120 O M ) \r
0003140 ' { P H Y L U M } < S Y B A L S
0003160 K Y > \r
0003200 ' { P H L Y U M } < L I S P C O
0003220 R E > L I B R A R Y > P R O M
0003240 P T W I N D O W ) \r W o u l d
0003260 b e b e t t e r y e t , a
0003300 n d w o u l d m a r k i t
0003320 s p r o g r e s s w i t h
0003340 m e s s a g e s i n t h e
0003360 p r o m p t w i n d o w . \0 \0
0003400 \0 \0 \0 002 \0 \0 \0 \0 001 324 \0 \0 \0 \0 \0 \0
0003420 \0 003 \0 \0 \0 026 \0 \0 \0 \t H E L V E T
0003440 I C A \0 022 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
0003460 \0 \0 002 \0 \0 \0 \0 001 324 \0 \f \0 \0 \0 \0 \0
0003500 001 \0 \0 \0 g \0 \0 \0 \t H E L V E T I
0003520 C A \0 \b \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 \0
0003540 \0 002 \0 \0 \0 \0 001 324 \0 $ \0 \0 \0 \0 \0 004
0003560 \0 \0 \0 276 \0 \0 \0 005 G A C H A \0 \n \0
0003600 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 \0 \0 \0
0003620 \0 001 324 \0 022 \0 \0 \0 \0 \0 004 \0 \0 \0 024 \0
0003640 \0 \0 005 G A C H A \0 \f \0 \0 \0 \0 \0 \0
0003660 002 \0 \0 \0 \0 \0 \0 002 \0 030 \0 030 001 274 \0 006
0003700 \0 \0 \0 \0 \0 004 \0 \0 \0 211 \0 \0 \0 005 G A
0003720 C H A \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0
0003740 \0 \0 002 \0 \0 \0 \0 001 324 \0 022 \0 \0 \0 \0 \0
0003760 004 \0 \0 \0 ) \0 \0 \0 005 G A C H A \0 \f
0004000 \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 \0 002 \0 030
0004020 \0 030 001 274 \0 006 \0 \0 \0 \0 \0 004 \0 \0 001 $
0004040 \0 \0 \0 005 G A C H A \0 \n \0 \0 \0 \0 \0
0004060 \0 \0 \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 001 324 \0
0004100 022 \0 \0 \0 \0 \0 004 \0 \0 \0 * \0 \0 \0 005 G
0004120 A C H A \0 \f \0 \0 \0 \0 \0 \0 002 \0 \0 \0
0004140 \0 \0 \0 002 \0 030 \0 030 001 274 \0 006 \0 \0 \0 \0
0004160 \0 004 \0 \0 001 250 \0 \0 \0 005 G A C H A \0
0004200 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 \0
0004220 \0 \0 \0 001 324 \0 022 \0 \0 \0 \0 \0 004 \0 \0 \0
0004240 037 \0 \0 \0 005 G A C H A \0 \f \0 \0 \0 \0
0004260 \0 \0 002 \0 \0 \0 \0 \0 \0 002 \0 030 \0 030 001 274
0004300 \0 006 \0 \0 \0 \0 \0 004 \0 \0 \0 x \0 \0 \0 005
0004320 G A C H A \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0
0004340 \0 \0 \0 \0 002 \0 \0 \0 \0 001 324 \0 $ \0 \0 \0
0004360 \0 \0 004 \0 \0 \0 \n \0 \0 \0 \t H E L V E
0004400 T I C A \0 \f \0 \0 \0 \0 \0 \0 003 \0 \0 \0
0004420 \0 \0 \0 002 \0 \0 \0 \0 001 324 \0 022 \0 \0 \0 \0
0004440 \0 001 \0 \0 \0 , \0 \0 \0 005 G A C H A \0
0004460 \f \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 \0 002 \0
0004500 \0 \0 \0 001 324 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0
0004520 5 \0 \0 \0 005 G A C H A \0 \f \0 \0 \0 \0
0004540 \0 \0 002 \0 \0 \0 \0 \0 \0 002 \0 030 \0 030 001 274
0004560 \0 006 \0 \0 \0 \0 \0 004 \0 \0 \0 3 \0 \0 \0 005
0004600 G A C H A \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0
0004620 \0 \0 \0 \0 002 \0 \0 \0 \0 001 324 \0 022 \0 \0 \0
0004640 \0 \0 001 \0 \0 \0 ( \0 \0 \0 005 G A C H A
0004660 \0 \f \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 \0 \0 002
0004700 \0 \0 \0 \0 001 324 \0 \0 \0 \0 \0 \0 \0 001 \0 \0
0004720 \0 \0 \0 \0 005 G A C H A \0 \f \0 \0 \0
0004740 \0 \0 \0 002 \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 001
0004760 324 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 6 \0 \0 \0
0005000 005 G A C H A \0 \f \0 \0 \0 \0 \0 \0 002 \0
0005020 \0 \0 \0 \0 \0 002 \0 030 \0 030 001 274 \0 006 \0 \0
0005040 \0 \0 \0 004 \0 \0 \0 T \0 \0 \0 005 G A C H
0005060 A \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 006 376 \0
0005100 & z 270
0005103