$ od -c -N 50000 [eris]<Lisp>Harmony>BCPL>BCPLENV.DM!1>Pup1b.br 0000000 002 002 005 \a \0 \0 \0 017 \0 \0 001 026 \0 \0 001 1 0000020 \0 \0 004 337 \0 \0 005 006 \0 \0 \0 \0 \0 \0 \0 & 0000040 \0 \0 \0 004 n d b Q \0 \0 \0 \0 \b p 0000060 b i F r e e Q \0 \0 \0 \0 005 p b i 0000100 I Q \0 \0 \0 005 p b i T Q \0 \0 \0 0000120 \a s o c k e t Q \0 \0 \0 \t g a t 0000140 e w a y I Q \0 \0 \0 005 d P S I B 0000160 \0 \0 \0 \a n u m N e t s \0 \0 \0 0000200 \a p u p Z o n e \0 \0 \0 \a p u p 0000220 C t x Q \0 \0 \0 006 l e n P B I \0 0000240 \0 \0 \0 006 l e n P u p \0 \0 \0 \0 0000260 017 m a x P u p D a t a B y t e s 0000300 \0 \0 \0 \f p u p L e v e l 1 C t 0000320 x \0 \0 @ \0 001 \t P u p L e v e l 1 0000340 \0 @ \0 002 016 S o c k e t N o t F o 0000360 u n d \0 \0 A \0 003 \n F i l l I n N 0000400 e t s \0 \0 @ \0 004 \b P u p E r r o 0000420 r \0 \0 @ \0 005 \v C o m p l e t e P 0000440 u p \0 @ \0 006 \b R o u t e P u p \0 0000460 \0 A \0 \a \v D e f a u l t P o r t 0000500 \0 @ \0 \b \r E x c h a n g e P o r 0000520 t s \0 @ \0 \t \v S e t P u p D P o 0000540 r t \0 @ \0 \n \v S e t P u p S P o 0000560 r t \0 @ \0 \v \b S e t P u p I D \0 0000600 \0 @ \0 \f 006 G e t P B I \0 \0 @ \0 \r 0000620 \n R e l e a s e P B I \0 \0 \0 \0 \0 0000640 \a D e q u e u e \0 \0 \0 \0 005 B l o 0000660 c k \0 \0 \0 \0 \a H L o o k u p \0 \0 0000700 \0 \0 005 p u p R T \0 \0 \0 \0 \a E n q 0000720 u e u e \0 \0 \0 \0 \v P u p C h e c 0000740 k s u m \0 \0 \0 \0 \a H I n s e r t 0000760 \0 \0 \0 \0 \t M o v e B l o c k \0 \0 0001000 \0 \0 021 A p p e n d S t r i n g T 0001020 o P u p \0 \0 \0 \0 \t L o c a t e N 0001040 e t \0 \0 \0 \0 004 Z e r o \0 \0 \r \0 017 0001060 \0 001 \0 020 001 ; \0 021 001 P \0 022 001 v \0 023 0001100 001 335 \0 024 002 p \0 025 002 242 \0 026 002 356 \0 027 0001120 003 027 \0 030 003 $ \0 031 003 1 \0 032 003 ? \0 033 0001140 003 201 003 255 003 255 Z 001 \f 370 \0 017 \f 367 001 \b 0001160 % T i T \0 001 B 004 " 004 i Q \0 001 = M 0001200 # \0 202 \f 001 366 % L i I \0 001 B 004 " 004 0001220 202 \r 001 002 001 004 i E \0 \0 001 352 % > : 004 0001240 C 001 205 \0 : 004 C 002 205 \0 : 004 C 004 : 004 0001260 # 020 9 W 347 \0 202 \f 001 005 " 004 i 0 \0 001 0001300 001 327 : 004 # \r 9 N 347 300 B 005 : 004 # \r 0001320 9 H 347 \0 B 006 : 004 ; 003 Z \a " 005 : \a 0001340 ; 001 345 \r 001 @ " 005 202 \r 001 = : \a # 001 0001360 202 \r 001 9 % E * 005 i D \0 002 B \b " \b 0001400 202 \r 001 026 : \b # 001 9 G 347 300 202 \f 001 \n 0001420 : \b ; 002 Z \a 001 \v \0 \0 \0 \0 \0 \0 \0 \0 0001440 \0 \0 % _ * 004 i ^ \0 002 001 242 001 034 \t 016 0001460 031 C a n ' t g e t t h e r e 0001500 f r o m h e r e 342 \0 B \f 374 \0 0001520 Z \r 9 I Z 003 " 004 ) G i G \0 004 001 210 0001540 \0 377 377 \0 " 006 : \a ; 002 345 \r 001 \v " 006 0001560 202 \r 001 \b % 6 * 004 i 5 \0 002 001 K \0 \0 0001600 \0 \0 = J ; \0 Z \b " \b 202 \f 001 006 " 004 0001620 i g \0 001 001 f 037 \0 : 004 # 016 : \b ; 006 0001640 345 \f 001 a : 004 # 017 : \b ; \a 345 \f 001 [ 0001660 : \b # 004 202 @ 205 p 202 \r 001 / : 004 # \t 0001700 375 P 345 \0 202 220 : 004 236 \0 # \t B \t " \t 0001720 200 \r 001 # : \t Z \n " 004 9 005 346 \0 001 006 0001740 \0 \0 \0 \0 \0 \t 002 002 \0 \0 i T \0 001 * \n 0001760 215 \r 001 023 \t \b \f B a d C h e c k 0002000 s u m \0 342 \0 B 003 " 004 255 P i 356 \0 003 0002020 001 c \f 355 377 - \0 \0 : \a # 001 202 \f 001 026 0002040 " 005 202 \r 001 023 " 005 : 004 ; 003 C 001 % 250 0002060 * 005 i M \0 002 B \t " \a : \t C 002 " \t 0002100 203 \0 : \a + 002 \f 361 \0 377 " 004 i Z \0 001 0002120 : \b # 002 9 206 347 \0 202 \r 001 \r 001 006 \0 \0 0002140 \f 355 \0 : \f 355 \0 4 : \b # 001 9 K 347 \0 0002160 202 \f 001 021 \t \b \f P o r t I Q f 0002200 u l l \0 342 \0 B 003 " 004 ) ` i 256 \0 003 0002220 001 # \0 \0 : \b # 002 375 P 345 \0 : \b C 002 0002240 : \b # 001 375 P 345 \0 : \b C 001 " 004 9 O 0002260 346 \0 255 220 \f 361 200 \0 " \b : 004 C 002 " \b 0002300 9 G 346 \0 * 004 i 216 \0 002 001 006 \0 \0 : \b 0002320 ; \0 Z \b 001 T 001 236 \f 366 Z 001 \f 370 \0 \n 0002340 \f 367 \t \b \f N o s u c h p o r 0002360 t \0 342 \0 B 003 " 004 ) a i a \0 003 \f 366 0002400 \0 \0 \0 377 Z 001 \f 370 \0 \a \f 367 : 004 # \r 0002420 9 W 347 300 202 \f 001 \n : 004 ; 003 # 001 * 004 0002440 9 P 356 \0 202 300 \f 360 377 \0 : 004 # 020 9 H 0002460 347 300 202 \f 001 \n : 004 ; 003 # 001 * 004 9 d 0002500 356 \0 202 300 \f 360 377 \0 \f 366 \0 003 \0 004 \0 \v 0002520 Z 001 \f 370 \0 016 \f 367 B \b : 004 # \n 9 322 0002540 347 \0 9 365 345 \r 001 \a : 004 # \r 9 313 347 \0 0002560 202 \f 001 \a " 004 i I \0 001 001 N \f 355 377 005 0002600 " 004 9 K 346 \0 * 004 9 I 356 \0 9 H Z 003 0002620 i j \0 003 " 004 i 265 \0 001 " 005 : 004 C 035 0002640 205 \0 : 004 C 036 : 006 Z 003 " 004 ) ] i ] 0002660 \0 003 " 004 i [ \0 001 001 005 \0 002 \0 302 377 \0 0002700 \0 \r " \b 9 304 345 J 001 033 : \a 372 \r 001 030 0002720 : 004 ; 003 # 001 * 004 9 027 356 \0 202 300 \f 360 0002740 377 \0 : 004 ; 003 # 002 * 004 9 016 356 \0 \f 360 0002760 \0 377 205 \0 : 004 C 021 205 \0 : 004 C 022 % ^ 0003000 : 004 C 001 001 005 \0 020 \0 \ \f 355 \0 005 " 004 0003020 ) 236 i U \0 002 \f 366 \0 023 \0 \t \0 \n Z 001 0003040 \f 370 \0 016 \f 367 B \a " \a 9 310 345 J 001 \a 0003060 " 004 9 365 346 \0 * 005 \f 361 \0 377 " \a 9 206 0003100 345 J 001 004 " 006 : 004 C \t " 004 9 350 346 \0 0003120 255 \0 \f 361 377 \0 : 004 ; 002 Z \b " \b 202 \r 0003140 001 026 001 005 \0 \0 \0 031 \0 \0 \0 \0 " 004 9 251 0003160 346 \0 * \b 9 V 356 \0 i U \0 002 " 004 9 304 0003200 346 \0 * \b 9 P 356 \0 i M \0 002 : 004 # 004 0003220 9 K 347 004 205 P 202 \r 001 023 = G ; \0 # 001 0003240 202 \f 001 016 : 004 # 004 9 M 347 004 205 P 202 \r 0003260 001 \a " 004 i 252 \0 001 \f 366 \0 Z \0 \0 " \b 0003300 202 \r 001 \a : \b # 004 202 @ 205 p 202 \r 001 \a 0003320 " 004 9 244 346 \0 i Q \0 001 001 003 204 \0 001 001 0003340 : 004 + \t 375 P 355 \0 252 220 : 004 276 \0 C \t 0003360 " 004 i D \0 001 B \t : 004 # 003 202 \r 001 026 0003400 : 004 ; 003 # \n B \n " 004 * \t 016 \n \0 002 0003420 : 004 ; 003 # \v B \n " 004 016 \n \0 001 001 021 0003440 \0 \b \0 \0 \0 005 @ \0 \0 \0 : 004 # \r 9 i 0003460 347 300 i h \0 001 : 004 # 001 * 004 i d \0 002 0003500 \f 366 \0 Z 001 \f 370 \0 \t \f 367 : 004 # \r 0003520 9 X 347 300 212 \0 % X i X \0 002 B 005 " 005 0003540 202 \r 001 \r : 005 # 001 9 Q 347 300 9 P 344 K 0003560 001 006 : 005 # 002 001 005 001 027 \0 \0 205 \0 001 001 0003600 : 004 C 003 : 005 # 001 9 A 347 300 202 \f 001 006 0003620 : 004 # \r 9 U 347 \0 001 006 : 005 # 001 9 P 0003640 347 \0 001 001 001 001 \f 366 Z 001 \f 370 \0 \b \f 367 0003660 : 004 # \0 9 & 347 300 202 \f 001 034 : 005 # \0 0003700 9 347 300 202 \f 001 016 : 005 # \0 9 9 347 \0 0003720 202 \r 001 \b = 252 ; \0 # 001 * 005 202 300 \f 360 0003740 377 \0 : 005 # \0 9 \r 347 300 * 004 202 300 \f 360 0003760 377 \0 : 004 # \0 9 $ 347 \0 202 \f 001 020 001 \b 0004000 377 \0 \0 \0 \0 277 \0 215 \0 216 037 \0 \0 017 : 005 0004020 # \0 9 026 347 \0 * 004 \f 360 \0 377 : 004 # 001 0004040 202 \f 001 \r : 004 # 002 202 \f 001 \t : 005 # 001 0004060 : 004 C 001 : 005 # 002 : 004 C 002 \f 366 \0 377 0004100 Z 001 \f 370 \0 \f \f 367 " 004 9 K 346 \0 B 005 0004120 " 004 9 a 346 \0 B 006 375 \0 Z \a 001 026 " \a 0004140 : 005 236 \0 # \0 B \b " \a : 006 236 \0 # \0 0004160 * \a : 005 276 \0 C \0 " \b * \a : 006 276 \0 0004200 C \0 " \a 203 \0 B \a " \a 9 F 344 J 001 350 0004220 \f 366 Z 001 \f 370 \0 \v \f 367 " 004 9 " 346 \0 0004240 9 E Z 003 * 005 i ^ \0 003 \f 366 Z 001 \f 370 0004260 \0 \v \f 367 " 004 9 / 346 \0 9 8 Z 003 * 005 0004300 i Q \0 003 \f 366 Z 001 \f 370 \0 \b \f 367 : 005 0004320 # \0 : 004 C \v : 005 # 001 : 004 C \f \f 366 0004340 \0 \r Z 001 \f 370 \0 \f \f 367 B 006 : 004 # 001 0004360 9 247 347 \0 201 K 001 021 : 004 # 003 9 241 347 \0 0004400 201 K 001 \v % L i L \0 001 B \a " \a 202 \r 0004420 001 004 001 020 \0 020 \0 002 " 006 9 376 345 J 001 \a 0004440 : 005 372 \r 001 004 205 \0 001 036 \0 003 i D \0 \0 0004460 001 336 : 004 # 001 375 P 345 \0 : 004 C 001 : 004 0004500 # 003 375 P 345 \0 : 004 C 003 " \a ) 5 i 5 0004520 \0 002 " 004 : \a C 002 % 1 : \a C 001 " \a 0004540 001 002 002 \0 \f 366 Z 001 \f 370 \0 \n \f 367 : 004 0004560 ; 002 Z 005 " 005 202 \r 001 031 : 005 # 001 203 \0 0004600 : 005 C 001 : 004 # 004 202 @ 205 p 202 \r 001 \t 0004620 : 005 # 002 203 \0 : 005 C 002 001 \b \0 \0 \0 [ 0004640 : 005 # 003 203 \0 : 005 C 003 % 371 * 004 i \a 0004660 \0 002 \f 366 \0 ^ \0 024 \0 \0 002 + 002 320 \0 & 0004700 002 b 003 234 \0 ] 003 253 \0 331 \0 276 \0 \0 \0 \0 0004720 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 375 0004740 001 N 001 254 002 , 002 213 002 _ 002 003 \0 \0 \0 \0 0004760 \0 \0 \0 \0 001 322 003 235 003 250 002 322 002 321 003 254 0005000 002 212 001 4 003 177 002 002 002 317 003 252 \0 \0 0005016