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