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