$ od -c -N 50000 [eris]<Lisp>JCAI>sources>PUPPRINT.DCOM!1 0000000 ( F I L E C R E A T E D " 2 8 0000020 - M a r - 8 5 1 8 : 5 8 : 0 0 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 > P U P P R I 0000120 N T . ; 2 ) \r " 1 9 - M a r - 0000140 8 5 1 4 : 3 4 : 1 7 " r e c 0000160 o m p i l e d e x p r s : E 0000200 F T P i n " I N T E R L I S 0000220 P - D 1 9 - M a r - 8 5 . . 0000240 . " d a t e d " 1 9 - M a r 0000260 - 8 5 1 4 : 4 8 : 3 5 " ) \r ( 0000300 F I L E C R E A T E D " 2 8 - 0000320 M a r - 8 5 1 8 : 5 6 : 4 7 " 0000340 { E R I S } < L I S P C O R E 0000360 > S O U R C E S > P U P P R I N 0000400 T . ; 2 1 5 0 8 6 c h a n g 0000420 e s t o : ( F N S E F T P 0000440 ) \r p r e v i o u s d a t e 0000460 : " 3 0 - J a n - 8 5 2 2 : 0000500 2 5 : 2 7 " { E R I S } < L I 0000520 S P C O R E > S O U R C E S > P 0000540 U P P R I N T . ; 1 ) \r E F T P 0000560 A 0 0 0 1 D 1 \r ( N A M E E 0000600 R R O R S E T P 3 4 Q I P 0000620 U P P 3 3 Q C A P A B I L 0000640 I T I E S P 3 2 Q C L O S 0000660 E R P 3 1 Q A B O R T E R 0000700 P 3 0 Q P R E S S D A T A 0000720 P A G E # P 2 7 Q T H I S 0000740 P A G E L E N G T H P 2 6 Q 0000760 L E N G T H P 2 5 Q L A 0001000 S T P A G E L E N G T H P 2 0001020 4 Q L A S T P A G E # P 2 0001040 3 Q S O C P 2 2 Q I D 0001060 P 2 1 Q C U R P A G E # P 0001100 2 0 Q N E W S T A T U S P 0001120 1 7 Q S T A T U S P 1 6 0001140 Q H O S T N A M E P 1 5 Q 0001160 N C P 1 4 Q U S E R N A 0001200 M E S T R I N G P 1 3 Q E 0001220 N D I N G P 1 2 Q R E S U 0001240 L T P 1 1 Q D A T A P 0001260 1 0 Q S T R E A M P 7 C 0001300 R D A T E P 6 D O C N A M 0001320 E P 5 # C O P I E S P 0001340 4 # S I D E S P 3 O P U 0001360 P P 2 C H E C K S T A T U 0001400 S P 1 T I M E O U T P 0001420 0 H O S T P O R T F 4 1 Q 0001440 P R I N T O P T I O N S F 0001460 4 2 Q R E S E T V A R S L S T 0001500 F 4 3 Q H O S T F 4 4 0001520 Q F I L E F 4 5 Q R E S 0001540 E T Y ) 004 h ! 005 002 \0 W F g \0 \0 0001560 \n \0 \0 ` \0 \0 W B \b \0 \0 021 364 022 021 340 0001600 W H d 004 ` \0 \0 360 245 g \0 \0 \n \0 \0 0001620 _ 020 277 g \0 \0 O 020 h 032 032 _ 4 h h 032 0001640 032 W D 032 c D 277 O 020 g \0 \0 \n \0 \0 _ 0001660 , n 001 377 345 _ * 277 O , 343 342 _ ( 277 W 0001700 B 242 261 \0 257 O * j 360 251 o \0 \0 \0 W H 0001720 \n \0 \0 277 O ( k 331 _ 0 277 W B d 003 262 0001740 034 g \0 \0 \n \0 \0 274 W B g \0 \0 \n \0 \0 0001760 ^ 265 K W B g \0 \0 \n \0 \0 ] 005 001 223 M 0002000 j 361 241 k 275 W B g \0 \0 \n \0 \0 _ 016 d 0002020 237 005 \a 253 O 016 o \0 \0 \0 \n \0 \0 _ 016 277 0002040 h d i \v \0 \0 _ 030 \t \0 \0 _ 032 l 037 361 0002060 262 " O 030 k l 037 \v \0 \0 260 4 \t \0 \0 l 0002100 3 363 227 N k l 3 \v \0 \0 203 N \t \0 \0 276 0002120 260 243 l 034 O 032 h i \n \0 \0 _ 034 \t \0 \0 0002140 330 361 235 O 030 o \0 \0 \0 O 034 \v \0 \0 _ 030 0002160 277 g \0 \0 \b \0 \0 _ & h 032 032 h h 032 032 0002200 W D 032 c D 277 K H l 020 l 030 m 377 O & 0002220 i \r \a \0 \0 277 g \0 \0 O & K h 032 032 032 0002240 _ 2 h h 032 032 W D 032 c D 277 O " 236 ` 0002260 \0 \0 232 o \0 \0 \0 ` \0 \0 \n \0 \0 277 j _ 0002300 $ 277 O " j 360 263 / O 020 \t \0 \0 j 360 263 0002320 " O 020 \t \0 \0 227 O 020 j \n \0 \0 260 023 O 0002340 4 002 O 020 \t \0 \0 g \0 \0 \n \0 \0 _ 020 030 0002360 277 j _ " 277 K l 030 317 037 207 277 L d 005 001 0002400 241 005 002 242 261 \0 357 O 6 263 o H \t \0 \0 _ 0002420 265 B O 036 001 l 002 360 262 V h 272 H \t \0 0002440 \0 _ 6 263 U j d ` \0 \0 \v \0 \0 277 o \0 0002460 \0 \0 ` \0 \0 \n \0 \0 277 W F ` \0 \0 \n \0 0002500 \0 277 o \0 \0 \0 ` \0 \0 \n \0 \0 277 h _ 036 0002520 277 260 266 O 036 364 263 275 j d ` \0 \0 \v \0 \0 0002540 277 O _ 036 002 ` \0 \0 \n \0 \0 277 260 246 ` 0002560 \0 \0 \t \0 \0 277 260 225 g \0 \0 O 6 \n \0 \0 0002600 002 001 \t \0 \0 l T 360 262 V L k 360 263 024 g 0002620 \0 \0 O 6 \n \0 \0 002 001 \t \0 \0 l T 360 262 0002640 ? K l ( 320 _ 022 n 252 314 315 \0 277 O 022 n 0002660 360 377 315 001 277 K g \0 \0 L k 360 223 g \0 \0 0002700 202 g \0 \0 h 032 032 h 032 O 022 l 002 320 \n \0 0002720 \0 l 032 330 315 036 277 m 377 _ " 261 \0 272 W F 0002740 i \n \0 \0 277 o \0 \0 \0 i \n \0 \0 277 i \t 0002760 \0 \0 277 O " O ( 360 262 030 O * j 360 224 i 0003000 _ 026 260 & K O * _ . l 026 330 315 036 260 027 0003020 O ( O " 361 233 K n 002 \0 _ . l 026 330 315 0003040 036 202 i _ 026 277 O 026 235 K l 032 317 037 207 277 0003060 K l 026 315 036 260 ` K 313 O $ 360 263 Y O 0003100 020 K l ( 320 _ 022 277 _ < 311 006 311 6 _ : 0003120 277 O < O 022 j O . l 004 O : 016 277 O " 0003140 O 0 360 262 % O 022 k 315 \b 277 O 022 M 315 \t 0003160 277 N 231 O 022 l 200 320 N \n \0 \0 277 O 022 l 0003200 232 320 O 030 \n \0 \0 277 O 016 232 O 022 l 252 320 0003220 O 016 \n \0 \0 277 K O $ 314 277 ` \0 \0 _ 0003240 > 277 k _ @ O > 363 222 261 \0 346 J 262 9 H 0003260 \t \0 \0 _ d 262 / O 036 364 263 ) j d ` 0003300 \0 \0 \v \0 \0 277 O _ 036 002 ` \0 \0 \n \0 0003320 \0 277 O 036 001 d l 003 360 243 d k 360 224 277 ` 0003340 \0 \0 Y 277 h 272 O & K h d I \r 005 \0 \0 0003360 _ 8 265 022 W B 226 O $ j 360 221 i 272 O @ 0003400 k 324 260 241 312 037 207 d l 031 360 262 5 277 O 8 0003420 313 O 8 \t \0 \0 277 O $ 360 262 331 O $ k 0003440 324 _ $ 277 O " k 324 _ " 277 O 026 242 261 376 0003460 305 K O $ 314 277 O & K \n \0 \0 277 260 U 0003500 l 033 360 262 C ` \0 \0 232 o \0 \0 \0 ` \0 \0 0003520 \n \0 \0 277 O 8 310 ( O 8 \t \0 \0 277 d l 0003540 002 360 235 277 g \0 \0 O 8 l 002 \n \0 \0 032 260 0003560 3 d l 003 360 231 277 ` \0 \0 \t \0 \0 261 375 . 0003600 l 004 360 261 375 ( O 8 \t \0 \0 277 261 377 h O 0003620 026 262 027 O 2 g \0 \0 030 277 O 020 311 004 265 004 0003640 O 020 022 022 c J i 020 j d ` \0 \0 \v \0 \0 0003660 277 o \0 \0 \0 ` \0 \0 \n \0 \0 277 W F ` \0 0003700 \0 \n \0 \0 277 o \0 \0 \0 ` \0 \0 \n \0 \0 261 0003720 374 334 \0 ( 2 1 4 3 Q P R I N 1 0003740 2 1 3 0 Q P R I N 1 2 1 1 7 0003760 Q P R I N 1 2 1 0 4 Q T A 0004000 B 2 0 3 7 Q R E L E A S E . 0004020 P U P 2 0 2 1 Q D I S M I S 0004040 S 2 0 0 2 Q G E T P U P S T 0004060 R I N G 1 7 6 1 Q R E L E A 0004100 S E . P U P 1 7 4 7 Q P R I 0004120 N 1 1 7 2 1 Q S E N D P U P 0004140 1 6 5 3 Q R E L E A S E . P 0004160 U P 1 6 0 4 Q E X C H A N G 0004200 E P U P S 1 5 4 5 Q P R I N 0004220 1 1 5 3 1 Q T A B 1 5 0 7 0004240 Q P U P . P R I N T E R . S T 0004260 A T U S 1 4 5 1 Q S e t B c 0004300 p l S t r i n g 1 4 3 3 Q S 0004320 e t B c p l S t r i n g 1 4 2 0004340 0 Q S e t B c p l S t r i n g 0004360 1 2 0 6 Q T E R P R I 1 2 0004400 0 1 Q P R I N 1 1 1 7 0 Q 0004420 P R I N 1 1 1 4 5 Q \ S T O 0004440 R E P L I S T 1 0 6 0 Q C H 0004460 C O N 1 1 0 5 3 Q A S S O C 0004500 1 0 3 1 Q C H C O N 1 1 0 0004520 2 4 Q A S S O C 1 0 1 1 Q 0004540 B L O C K 1 0 0 0 Q P R I N 0004560 1 7 6 4 Q T A B 7 4 0 Q 0004600 P R I N 1 7 2 5 Q P R I N 1 0004620 7 1 4 Q P R I N 1 7 0 1 Q 0004640 T A B 6 6 5 Q P U P . P R 0004660 I N T E R . P R O P E R T I E S 0004700 6 4 3 Q P U P . P R I N T E 0004720 R . S T A T U S 6 0 1 Q O P 0004740 E N S T R E A M 5 7 3 Q C L 0004760 O S E F 5 6 1 Q S E T F I L 0005000 E P T R 5 5 2 Q R A N D A C 0005020 C E S S P 5 4 1 Q G E T F I 0005040 L E P T R 5 2 1 Q P R I N 1 0005060 4 5 1 Q S E T U P P U P 4 0005100 1 3 Q O P E N P U P S O C K E 0005120 T 4 0 2 Q C O N C A T 3 6 0005140 4 Q N C H A R S 3 5 7 Q E 0005160 T H E R H O S T N A M E 3 4 3 0005200 Q M K S T R I N G 3 3 6 Q 0005220 S U B S T R I N G 3 2 3 Q N 0005240 C H A R S 3 1 6 Q S U B S T 0005260 R I N G 2 7 7 Q N C H A R S 0005300 2 7 2 Q U S E R N A M E 2 0005320 6 1 Q G D A T E 2 4 1 Q L 0005340 I S T G E T 2 1 7 Q L I S T 0005360 G E T 2 0 4 Q L I S T G E T 0005400 1 7 3 Q L I S T G E T 1 4 0005420 7 Q H E L P 1 0 3 Q G E T 0005440 F I L E I N F O 4 4 Q O P E 0005460 N S T R E A M 1 7 Q A L L O 0005500 C A T E . P U P 7 B E S T P 0005520 U P A D D R E S S ) \r ( 2 1 4 0 0005540 Q P R O M P T W I N D O W 2 0005560 1 2 5 Q P R O M P T W I N D O 0005600 W 2 1 1 4 Q P R O M P T W I 0005620 N D O W 2 1 0 1 Q P R O M P 0005640 T W I N D O W 2 0 5 4 Q * 0005660 2 0 1 6 Q \ E F T P . L O N G 0005700 T I M E O U T 1 7 7 3 Q R E 0005720 J E C T 1 7 4 4 Q P U P T R 0005740 A C E F I L E 1 7 3 4 Q P U 0005760 P T R A C E F L G 1 5 6 6 Q 0006000 \ E F T P . L O N G T I M E O U 0006020 T 1 5 4 2 Q P R O M P T W I 0006040 N D O W 1 5 2 6 Q P R O M P 0006060 T W I N D O W 1 4 6 3 Q \ M 0006100 A X E T H E R T R I E S 1 1 3 0006120 0 Q T R U E 1 1 2 4 Q F A 0006140 L S E 1 1 1 5 Q D U P L E X 0006160 1 0 4 6 Q D U P L E X 1 0 0006200 1 7 Q P R I N T - I N S T A N 0006220 C E 1 0 0 6 Q \ E F T P . T 0006240 I M E O U T 7 7 5 Q P R O M 0006260 P T W I N D O W 7 6 1 Q P R 0006300 O M P T W I N D O W 7 3 5 Q 0006320 P R O M P T W I N D O W 7 2 2 0006340 Q P R O M P T W I N D O W 7 0006360 1 1 Q P R O M P T W I N D O W 0006400 6 7 6 Q P R O M P T W I N D 0006420 O W 5 7 6 Q I N P U T 5 1 0006440 6 Q P U P T R A C E F I L E 0006460 5 0 6 Q P U P T R A C E F L G 0006500 4 5 5 Q \ A B O R T . E F T 0006520 P 4 1 0 Q C L O S E P U P S 0006540 O C K E T 2 3 6 Q D O C U M 0006560 E N T . C R E A T I O N . D A T 0006600 E 2 1 4 Q # C O P I E S 2 0006620 0 1 Q D O C U M E N T . N A M 0006640 E 1 7 0 Q # S I D E S 1 0 0006660 0 Q L E N G T H 5 2 Q C L 0006700 O S E F 4 1 Q I N P U T 3 0006720 4 Q 004 003 S T R E A M T Y P E # 0006740 1 2 Q \ E F T P . T I M E O 0006760 U T 4 E R R O R ) \r ( 2 1 0007000 3 5 Q " ] " 2 1 1 1 Q " [ 0007020 N o r e s p o n s e f r o m 0007040 " 1 7 4 1 Q " [ a b o r t 0007060 ] " 1 1 7 5 Q " d o e s 0007100 n o t s u p p o r t # s i d 0007120 e s s p e c i f i c a t i o n 0007140 " 7 3 2 Q " ] " 7 0 6 Q 0007160 " [ N o r e s p o n s e f r 0007200 o m " 5 1 3 Q " ( r e s 0007220 t a r t i n g ) " 3 7 5 Q " 0007240 o n " 2 5 6 Q ( D A T E 0007260 F O R M A T T I M E . Z O N E 0007300 ) 1 4 2 Q " P r e s s f i 0007320 l e w i t h n o n - i n t e 0007340 g r a l n u m b e r o f p 0007360 a g e s ? " ) \r E F T P D 1 \r 0007400 ( P 2 R E S E T Z P 1 0007420 R E S E T Y P 0 L I S P X 0007440 H I S T I 2 P R I N T O P 0007460 T I O N S I 1 F I L E I 0007500 0 H O S T F 3 L I S P 0007520 X H I S T F 4 R E S E T V 0007540 A R S L S T ) \0 " 003 002 \0 003 S 021 0007560 ! 002 T o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 0007600 g \0 \0 Z \n \0 \0 J 223 \b \0 \0 020 I 020 \0 0007620 ( 3 5 Q E R R O R ! 3 0 Q 0007640 R E S E T R E S T O R E 1 6 Q 0007660 E F T P A 0 0 0 1 ) \r ( 2 4 Q 0007700 E R R O R 1 3 Q I N T E R 0007720 N A L ) \r ( 1 0 Q ( E F T P 0007740 A 0 0 0 1 ) ) \r \ A B O R T . E 0007760 F T P D 1 \r ( I 1 P U P 0010000 I 0 S O C ) \0 026 \0 \0 \0 002 A 0010020 l 033 317 037 207 A l 027 315 036 A k 315 ( @ A 0010040 \n \0 \0 020 \0 ( 2 3 Q S E N D P U 0010060 P ) \r N I L \r ( ) \r P U P . P R 0010100 I N T E R . S T A T U S D 1 \r 0010120 ( P 4 I P U P P 3 R E 0010140 S U L T P 2 O P U P P 0010160 1 S O C P 0 H O S T P O 0010200 R T I 0 P R I N T E R ) 0010220 \0 220 \a \0 \0 001 @ ` \0 \0 \n \0 \0 \b \0 \0 0010240 \b \0 \0 021 C 006 H 241 h 020 J H l 021 l 200 0010260 h I \r 006 \0 \0 ` \0 \0 275 k ^ M 363 263 J 0010300 I J h i \f \0 \0 \ 265 004 260 9 312 037 207 d 0010320 l 201 360 262 024 277 L 310 ( L l 002 \n \0 \0 032 0010340 273 L \t \0 \0 260 9 l 004 360 262 024 ` \0 \0 227 0010360 L ` \0 \0 \n \0 \0 277 L \t \0 \0 260 " L \t 0010400 \0 \0 277 N k 324 260 265 ` \0 \0 262 024 o \0 \0 0010420 \0 ` \0 \0 \n \0 \0 277 ` \0 \0 \t \0 \0 277 J 0010440 \t \0 \0 K 020 \0 ( 2 1 4 Q R E L E 0010460 A S E . P U P 2 0 7 Q T E R 0010500 P R I 2 0 0 Q P R I N 1 1 0010520 5 3 Q R E L E A S E . P U P 0010540 1 4 5 Q R E L E A S E . P U P 0010560 1 4 0 Q P R I N T E R R O R 0010600 P U P 1 1 6 Q R E L E A S E 0010620 . P U P 1 1 0 Q G E T P U P 0010640 S T R I N G 6 0 Q E X C H A 0010660 N G E P U P S 3 7 Q S E T U 0010700 P P U P 1 4 Q A L L O C A T 0010720 E . P U P 1 1 Q \ G E T M I 0010740 S C S O C K E T 6 B E S T P 0010760 U P A D D R E S S ) \r ( 2 0 4 Q 0011000 P U P T R A C E F I L E 1 7 0011020 5 Q P U P T R A C E F I L E 0011040 1 6 4 Q P U P T R A C E F L G 0011060 1 3 5 Q P U P T R A C E F I 0011100 L E 1 3 0 Q P U P T R A C E 0011120 F L G 4 2 Q \ M A X E T H E 0011140 R T R I E S 3 P R O M P T W 0011160 I N D O W ) \r ( 1 7 2 Q " P 0011200 r i n t e r s t a t u s r e 0011220 q u e s t t i m e d o u t " 0011240 ) \r P U P . P R I N T E R . P R 0011260 O P E R T I E S D 1 \r ( P 4 0011300 I P U P P 3 R E S U L T 0011320 P 2 O P U P P 1 S O 0011340 C P 0 H O S T P O R T I 0011360 0 P R I N T E R ) \0 177 \a \0 0011400 \0 001 @ ` \0 \0 \n \0 \0 \b \0 \0 \b \0 \0 021 0011420 C 006 H 241 h 020 J H l 021 l 202 h I \r 006 0011440 \0 \0 ` \0 \0 275 k ^ M 363 263 7 I J h i 0011460 \f \0 \0 \ 265 \a N k 324 260 356 312 037 207 d l 0011500 203 360 232 277 L \t \0 \0 \t \0 \0 [ 260 + l 004 0011520 360 262 345 ` \0 \0 262 " L ` \0 \0 \n \0 \0 260 0011540 030 ` \0 \0 262 024 o \0 \0 \0 ` \0 \0 \n \0 \0 0011560 277 ` \0 \0 \t \0 \0 277 L 223 L \t \0 \0 K 020 0011600 \0 ( 1 7 3 Q R E L E A S E . P 0011620 U P 1 6 4 Q T E R P R I 1 0011640 5 5 Q P R I N 1 1 3 4 Q P 0011660 R I N T E R R O R P U P 1 1 0 0011700 Q R E A D P L I S T 1 0 5 Q 0011720 G E T P U P S T R E A M 6 0 0011740 Q E X C H A N G E P U P S 3 0011760 7 Q S E T U P P U P 1 4 Q 0012000 A L L O C A T E . P U P 1 1 Q 0012020 \ G E T M I S C S O C K E T 0012040 6 B E S T P U P A D D R E S S 0012060 ) \r ( 1 6 1 Q P U P T R A C E 0012100 F I L E 1 5 2 Q P U P T R A 0012120 C E F I L E 1 4 1 Q P U P T 0012140 R A C E F L G 1 3 1 Q P U P 0012160 T R A C E F I L E 1 2 3 Q P 0012200 U P T R A C E F L G 4 2 Q \ 0012220 M A X E T H E R T R I E S 3 0012240 P R O M P T W I N D O W ) \r ( 0012260 1 4 7 Q " P r i n t e r c a 0012300 p a b i l i t y r e q u e s t 0012320 t i m e d o u t " ) \r ( P R 0012340 E T T Y C O M P R I N T P U P 0012360 P R I N T C O M S ) \r ( R P A Q 0012400 Q P U P P R I N T C O M S ( 0012420 ( F N S E F T P \ A B O R T 0012440 . E F T P P U P . P R I N T E 0012460 R . S T A T U S P U P . P R I 0012500 N T E R . P R O P E R T I E S ) 0012520 ( D E C L A R E : \r D O N T 0012540 C O P Y ( C O N S T A N T S 0012560 * E F T P P U P T Y P E S ) 0012600 ( C O N S T A N T S * E F T 0012620 P C O N S T A N T S ) ( A D D 0012640 V A R S * ( L I S T ( C O 0012660 N S ( Q U O T E P U P T Y P 0012700 E S \r ) E F T P P U P T Y P E 0012720 S ) ) ) ( G L O B A L V A R S 0012740 \ E F T P . T I M E O U T \ 0012760 E F T P . L O N G T I M E O U T 0013000 ) ) ( I N I T V A R S ( \ E 0013020 F T P . T I M E O U T 5 0 0 0 0013040 ) ( \r \ E F T P . L O N G T I 0013060 M E O U T 1 5 0 0 0 ) ) ) ) \r 0013100 ( R P A Q ? \ E F T P . T I M 0013120 E O U T 5 0 0 0 ) \r ( R P A Q 0013140 ? \ E F T P . L O N G T I M E 0013160 O U T 1 5 0 0 0 ) \r ( P U T P 0013200 R O P S P U P P R I N T C O 0013220 P Y R I G H T ( " X e r o x 0013240 C o r p o r a t i o n " 1 9 8 0013260 5 ) ) \r N I L \r 0013270