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