$ od -c -N 50000 [eris]<LispCore>SOURCES>AOFD.DCOM!31
0000000 ( F I L E C R E A T E D " 2 9
0000020 - S e p - 8 6 1 7 : 5 0 : 0 4
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 > A O F D . ;
0000120 2 9 ) \r " 1 6 - S e p - 8 6
0000140 1 1 : 5 7 : 3 0 " r e c o m p
0000160 i l e d c h a n g e s : O P
0000200 E N P \ G E T S T R E A M i
0000220 n " " d a t e d " 1 6 - S
0000240 e p - 8 6 1 2 : 2 9 : 4 1 " )
0000260 \r ( F I L E C R E A T E D " 2
0000300 9 - S e p - 8 6 1 7 : 4 7 : 1
0000320 6 " { E R I S } < L I S P C O
0000340 R E > S O U R C E S > A O F D .
0000360 ; 2 9 3 6 1 3 1 c h a n g e
0000400 s t o : ( F N S O P E N P
0000420 \r \ G E T S T R E A M ) ( V
0000440 A R S A O F D C O M S ) p r
0000460 e v i o u s d a t e : " 2 3
0000500 - S e p - 8 6 1 3 : 5 0 : 4 1
0000520 " { E R I S } < L I S P C O R
0000540 E > S O U R C E S > A O F D . ;
0000560 2 7 ) \r \ A D D - O P E N - S T
0000600 R E A M D 1 \r ( L ( 1 S T
0000620 R E A M 0 D E V I C E ) )
0000640 \0 % 001 \0 \0 002 A \t \0 \0 244 A \t \0 \0 277
0000660 @ 006 \0 \0 311 P 021 001 \0 A d H 034 252 277 @
0000700 006 \0 \0 A H 032 024 P A 020 \0 ( 1 0 Q
0000720 \ I L L E G A L . A R G 3 S
0000740 T R E A M P ) \r ( 3 4 Q F D E
0000760 V 1 5 Q F D E V ) \r ( ) \r \
0001000 G E N E R I C - U N R E G I S T
0001020 E R - S T R E A M D 1 \r ( L
0001040 ( 1 S T R E A M 0 D E V I
0001060 C E ) ) \0 2 001 \0 \0 002 A \t \0 \0 244
0001100 A \t \0 \0 277 @ 006 \0 \0 311 P 021 001 \0 ` \0
0001120 \0 234 A H 034 250 o \0 \0 \0 A \n \0 \0 277 @
0001140 006 \0 \0 A H \n \0 \0 024 P A 020 \0 ( 5 4
0001160 Q D R E M O V E 4 2 Q E R
0001200 R O R 1 0 Q \ I L L E G A L
0001220 . A R G 3 S T R E A M P ) \r
0001240 ( 4 7 Q F D E V 2 5 Q * I
0001260 S S U E - C L O S E - W A R N I
0001300 N G S * 1 5 Q F D E V ) \r (
0001320 3 6 Q " C l o s i n g a
0001340 s t r e a m t h a t ' s n o
0001360 t o p e n ! " ) \r C L O S E A
0001400 L L D 1 \r ( L ( 0 A L L F
0001420 L G ) F 5 M U L T I P L E
0001440 . S T R E A M S . P E R . F I L
0001460 E . A L L O W E D ) \0 R 005 001 \0
0001500 001 U 227 o \0 \0 \0 \t \0 \0 020 ` \0 \0 \t \0
0001520 \0 021 A 004 H 003 265 004 I 020 001 \ 006 \0 \0 312
0001540 004 @ j 360 263 $ L h i \v \0 \0 262 034 @ 251
0001560 L d g \0 \0 \n \0 \0 221 214 L \t \0 \0 273 J
0001600 265 \r K h 032 Z Y 277 H 002 X 260 312 K & Z
0001620 260 367 \0 ( 7 4 Q C L O S E F 6
0001640 6 Q S T R E A M P R O P 5 2
0001660 Q \ I O M O D E P 1 7 Q \
0001700 A P P E N D 2 1 0 Q E R R O
0001720 R ) \r ( 6 3 Q C L O S E A L L
0001740 3 5 Q S T R E A M 1 4 Q
0001760 \ O P E N F I L E S ) \r ( 5
0002000 " C L O S E A L L n o l o n
0002020 g e r s u p p o r t e d " ) \r
0002040 C L O S E F D 1 \r ( L ( 0
0002060 F I L E ) F 3 \ T E R M .
0002100 O F D F 4 \ P R I M I N .
0002120 O F D F 5 \ P R I M O U T
0002140 . O F D F 6 \ L I N E B U
0002160 F . O F D F 7 M U L T I P
0002200 L E . S T R E A M S . P E R . F
0002220 I L E . A L L O W E D ) \0 m 003
0002240 005 \0 001 @ \t \0 \0 021 ! 002 H S 360 252 H d
0002260 006 \0 \0 312 004 0 j 360 221 h 020 g \0 \0 \n \0
0002300 \0 211 d 001 271 H k I 017 016 277 002 003 265 365 \b
0002320 \0 \0 H d T 360 225 277 V c \b 277 H U 360 223
0002340 S c \n 277 W 016 244 H \t \0 \0 277 H \t \0 \0
0002360 H g \0 \0 \n \0 \0 211 d 001 272 H k J 017 016
0002400 277 002 003 265 365 H 006 \0 \0 311 004 265 003 H 020 \0
0002420 ( 1 2 3 Q S T R E A M P R O P
0002440 1 1 4 Q \ C L O S E F I L E
0002460 1 0 7 Q \ D E L E T E O F D
0002500 5 6 Q \ C L E A R O F D 3
0002520 5 Q S T R E A M P R O P 3
0002540 \ G E T S T R E A M ) \r ( 1 4 5
0002560 Q S T R E A M 1 2 0 Q A F
0002600 T E R C L O S E 3 2 Q B E F
0002620 O R E C L O S E 1 7 Q S T R
0002640 E A M ) \r ( ) \r E O F C L O S E
0002660 F D 1 \r ( L ( 0 F I L E )
0002700 ) \0 034 002 \0 \0 001 @ \t \0 \0 021 021 001 H
0002720 g \0 \0 \n \0 \0 265 005 ` \0 \0 271 H k I 017
0002740 016 h 020 \0 ( 1 5 Q S T R E A M P
0002760 R O P 3 G E T S T R E A M )
0003000 \r ( 2 2 Q D E F A U L T E O F
0003020 C L O S E 1 2 Q E O F C L O
0003040 S E ) \r ( ) \r I N P U T D 1 \r
0003060 ( L ( 0 F I L E ) F 0
0003100 \ P R I M I N . O F D F 1
0003120 \ L I N E B U F . O F D F 2
0003140 M U L T I P L E . S T R E A M
0003160 S . P E R . F I L E . A L L O W
0003200 E D ) \0 ' \0 003 \0 001 P Q 360 221 i 212
0003220 R 247 P 006 \0 \0 311 004 265 003 P @ 262 023 @ d
0003240 i 360 222 277 Q 205 g \0 \0 \n \0 \0 c \0 277 020
0003260 \0 ( 4 1 Q \ G E T S T R E A M
0003300 ) \r ( 3 6 Q I N P U T 1 3 Q
0003320 S T R E A M ) \r ( ) \r O P E N
0003340 P D 1 \r ( L ( 1 A C C E S
0003360 S 0 F I L E ) ) \0 036 \0 \0 \0
0003400 002 @ 265 \f g \0 \0 ` \0 \0 \n \0 \0 020 d 004
0003420 l \v 360 225 A i \v \0 \0 020 262 352 h 020 \0 (
0003440 2 7 Q \ G E T S T R E A M 1
0003460 3 Q \ M A P - O P E N - S T R
0003500 E A M S ) \r ( 1 0 Q \ F I L E
0003520 D E V I C E S 5 E V Q ) \r (
0003540 ) \r O U T P U T D 1 \r ( L (
0003560 0 F I L E ) F 0 \ P R I
0003600 M O U T . O F D F 1 \ T E
0003620 R M . O F D ) \0 ) \0 002 \0 001 P Q
0003640 360 221 i 214 ` \0 \0 247 P 006 \0 \0 311 004 265 003
0003660 P @ 262 023 @ d i 360 222 277 Q 205 g \0 \0 \n
0003700 \0 \0 c \0 277 020 \0 ( 4 3 Q \ G E T
0003720 S T R E A M ) \r ( 4 0 Q O U T
0003740 P U T 1 5 Q S T R E A M 1
0003760 0 Q M U L T I P L E . S T R E
0004000 A M S . P E R . F I L E . A L L
0004020 O W E D ) \r ( ) \r P O S I T I O
0004040 N D 1 \r ( L ( 1 N 0 F
0004060 I L E ) F 1 \ P R I M O U
0004100 T . O F D ) \0 % 001 001 \0 002 @ 265 031
0004120 Q 021 001 \0 H 006 \0 \0 310 035 A 262 025 H 006 \0
0004140 \0 A j 361 226 A 205 \t \0 \0 260 347 j 315 035 277
0004160 020 \0 ( 3 4 Q \ G E T S T R E A
0004200 M ) \r ( 2 3 Q S T R E A M 1
0004220 2 Q S T R E A M ) \r ( ) \r R A
0004240 N D A C C E S S P D 1 \r ( L
0004260 ( 0 F I L E ) F 1 \ L I
0004300 N E B U F . O F D ) \0 + 001 001 \0
0004320 001 @ \t \0 \0 021 001 \0 H 006 \0 \0 311 006 006 \0
0004340 \0 312 \0 020 j 360 h 360 264 022 H Q 360 h 360 264
0004360 \v H 006 \0 \0 311 004 265 003 H 020 \0 ( 3 \
0004400 G E T S T R E A M ) \r ( 4 3 Q
0004420 S T R E A M 1 7 Q F D E V
0004440 1 2 Q S T R E A M ) \r ( ) \r \
0004460 I O M O D E P D 1 \r ( L ( 2
0004500 N O E R R O R 1 A C C E S
0004520 S 0 S T R E A M ) ) \0 9 \0
0004540 \0 \0 003 A 265 \b @ \t \0 \0 260 ( @ \t \0 \0
0004560 360 263 " @ d \t \0 \0 g \0 \0 360 227 277 A o
0004600 \0 \0 \0 034 214 \t \0 \0 g \0 \0 360 227 A g \0
0004620 \0 360 221 @ 020 @ B \n \0 \0 020 \0 ( 6 6 Q
0004640 \ F I L E . N O T . O P E N
0004660 4 4 Q \ G E T A C C E S S 2
0004700 4 Q \ G E T A C C E S S 1 4
0004720 Q \ G E T A C C E S S 6 \
0004740 G E T A C C E S S ) \r ( 5 5 Q
0004760 O U T P U T 4 7 Q A P P E N
0005000 D 2 7 Q B O T H ) \r ( 3 7
0005020 Q ( I N P U T O U T P U T )
0005040 ) \r W H E N C L O S E D 1 \r (
0005060 L ( 0 N A R G S ) ) \0 264 005
0005100 \0 002 \0 e 021 001 \0 H j 361 264 \a k a \t \0
0005120 \0 021 001 001 H l 002 021 022 004 K J 363 222 261 \0
0005140 226 H K 361 264 006 K k 330 a 274 K a d g \0
0005160 \0 360 262 & 277 I g \0 \0 L d g \0 \0 360 222
0005200 277 i 217 g \0 \0 360 221 h 210 l 033 L h 032 032
0005220 \t \0 \0 \v \0 \0 260 U d g \0 \0 360 236 277 L
0005240 262 L I g \0 \0 L i \f \0 \0 260 @ d g \0
0005260 \0 360 236 277 L 262 7 I g \0 \0 L i \f \0 \0
0005300 260 + d g \0 \0 360 232 277 I g \0 \0 L \v \0
0005320 \0 260 032 g \0 \0 360 230 I g \0 \0 L \v \0 \0
0005340 211 l 033 K a h 032 032 \t \0 \0 277 K l 002 324
0005360 [ 261 377 j I 020 \0 ( 2 4 7 Q E R R
0005400 O R X 2 3 4 Q S T R E A M P
0005420 R O P 2 1 5 Q S T R E A M P
0005440 R O P 1 7 4 Q S T R E A M A
0005460 D D P R O P 1 4 7 Q S T R E
0005500 A M A D D P R O P 1 2 2 Q S
0005520 T R E A M P R O P 1 1 7 Q E
0005540 R R O R X 1 5 Q G E T S T R
0005560 E A M ) \r ( 2 3 0 Q E O F C L
0005600 O S E 2 2 2 Q E O F 2 1 1
0005620 Q S T A T U S F N 2 0 2 Q
0005640 S T A T U S 1 6 7 Q A F T E
0005660 R C L O S E 1 5 5 Q A F T E
0005700 R 1 4 2 Q B E F O R E C L O
0005720 S E 1 3 0 Q B E F O R E 1
0005740 0 2 Q Y E S 7 2 Q N O 6
0005760 5 Q C L O S E A L L 5 5 Q
0006000 C L O S E A L L ) \r ( ) \r S T R
0006020 E A M A D D P R O P D 1 \r ( L
0006040 ( 2 V A L 1 P R O P 0
0006060 S T R E A M ) ) \0 016 \0 \0 \0 003
0006100 @ A B @ A \n \0 \0 032 \v \0 \0 020 \0 ( 1
0006120 3 Q S T R E A M P R O P 7
0006140 S T R E A M P R O P ) \r N I L \r
0006160 ( ) \r \ B A S E B Y T E S . I O
0006200 . I N I T A 0 0 3 0 D 1 \r ( L
0006220 ( 5 S T R E A M 4 F D E
0006240 V 3 O T H E R I N F O 2
0006260 R E C O G 1 A C C E S S 0
0006300 F I L E ) ) \0 003 \0 \0 \0 006 E 020
0006320 \0 N I L \r N I L \r ( ) \r \ B A S
0006340 E B Y T E S . I O . I N I T A 0
0006360 0 3 3 D 1 \r ( L ( 1 I 0
0006400 S T R E A M ) ) \0 003 \0 \0 \0 002
0006420 h 020 \0 N I L \r N I L \r ( ) \r \ B
0006440 A S E B Y T E S . I O . I N I T
0006460 A 0 0 4 0 D 1 \r ( L ( 0 S
0006500 T R E A M ) ) \0 027 \0 \0 \0 001 @ 006
0006520 \0 \0 310 \0 @ 006 \0 \0 310 026 360 h 360 264 006 @
0006540 \t \0 \0 020 \0 ( 2 4 Q \ P A G E D
0006560 B A C K F I L E P T R ) \r ( 1 1
0006600 Q S T R E A M 3 S T R E A
0006620 M ) \r ( ) \r \ B A S E B Y T E S
0006640 . I O . I N I T A 0 0 4 3 D 1
0006660 \r ( L ( 0 S T R E A M ) )
0006700 \0 017 \0 \0 \0 001 @ 006 \0 \0 310 \0 @ 006 \0 \0
0006720 310 026 331 020 \0 N I L \r ( 1 1 Q S T
0006740 R E A M 3 S T R E A M ) \r (
0006760 ) \r \ B A S E B Y T E S . I O .
0007000 I N I T A 0 0 4 5 D 1 \r ( L
0007020 ( 0 S T R E A M ) ) \0 017 \0 \0
0007040 \0 001 @ 006 \0 \0 310 \v @ 006 \0 \0 310 026 331 020
0007060 \0 N I L \r ( 1 1 Q S T R E A M
0007100 3 S T R E A M ) \r ( ) \r \ B
0007120 A S E B Y T E S . I O . I N I T
0007140 A 0 0 4 7 D 1 \r ( L ( 0 S
0007160 T R E A M ) ) \0 022 \0 \0 \0 001 @ 006
0007200 \0 \0 310 \0 @ 006 \0 \0 310 \v 375 361 h 360 020 \0
0007220 N I L \r ( 1 1 Q S T R E A M
0007240 3 S T R E A M ) \r ( ) \r \ B A
0007260 S E B Y T E S . I O . I N I T A
0007300 0 0 4 9 D 1 \r ( L ( 3 N
0007320 2 O F F S T 1 B A S E 0
0007340 S T R E A M ) ) \0 \r \0 \0 \0 004
0007360 @ A B C g \0 \0 \r 005 \0 \0 020 \0 ( 1 2
0007400 Q \ B A S E B Y T E S . B L O
0007420 C K I O ) \r ( 6 I N P U T ) \r
0007440 ( ) \r \ B A S E B Y T E S . I O
0007460 . I N I T A 0 0 5 1 D 1 \r ( L
0007500 ( 3 N 2 O F F S T 1
0007520 B A S E 0 S T R E A M ) )
0007540 \0 \r \0 \0 \0 004 @ A B C g \0 \0 \r 005 \0
0007560 \0 020 \0 ( 1 2 Q \ B A S E B Y T
0007600 E S . B L O C K I O ) \r ( 6 O
0007620 U T P U T ) \r ( ) \r \ B A S E B
0007640 Y T E S . I O . I N I T D 1 \r
0007660 N I L 001 \r \0 \0 \0 \0 ` \0 \0 037 d g
0007700 \0 \0 024 \0 277 d k 317 \0 \0 277 d k 317 \0 020
0007720 277 d j 317 \0 0 277 d k 317 \0 @ 277 d k 317
0007740 \0 P 277 d j 317 \0 ` 277 d g \0 \0 024 002 277
0007760 d g \0 \0 024 004 277 d g \0 \0 024 006 277 d g
0010000 \0 \0 024 \b 277 d g \0 \0 024 \n 277 d g \0 \0
0010020 024 \f 277 d g \0 \0 024 016 277 d g \0 \0 024 020
0010040 277 d g \0 \0 024 022 277 d g \0 \0 024 024 277 d
0010060 g \0 \0 024 026 277 d g \0 \0 024 030 277 d g \0
0010100 \0 024 032 277 d g \0 \0 024 034 277 d g \0 \0 024
0010120 036 277 d g \0 \0 024 277 d g \0 \0 024 " 277
0010140 d g \0 \0 024 $ 277 d g \0 \0 024 & 277 d g
0010160 \0 \0 024 . 277 d g \0 \0 024 0 277 d g \0 \0
0010200 024 2 277 d g \0 \0 024 4 277 d g \0 \0 024 6
0010220 277 d g \0 \0 024 8 277 d g \0 \0 024 : 277 d
0010240 g \0 \0 024 T 277 d g \0 \0 024 R 277 d g \0
0010260 \0 024 N 277 d g \0 \0 024 * 277 027 \0 \0 h `
0010300 \0 \0 \n \0 \0 020 \0 ( 4 1 2 Q \ D E
0010320 F I N E D E V I C E ) \r ( 4 0 7
0010340 Q \ B A S E B Y T E S D E V I
0010360 C E 4 0 3 Q \ B A S E B Y T
0010400 E S D E V I C E 3 7 5 Q N I
0010420 L L 3 6 6 Q N I L L 3 5 7
0010440 Q N I L L 3 5 0 Q N I L L
0010460 3 4 1 Q \ I L L E G A L . D
0010500 E V I C E O P 3 3 2 Q \ B A
0010520 S E B Y T E S . I O . I N I T A
0010540 0 0 5 1 3 2 3 Q \ B A S E B
0010560 Y T E S . I O . I N I T A 0 0 4
0010600 9 3 1 4 Q \ B A S E B Y T E
0010620 S . I O . I N I T A 0 0 4 7 3
0010640 0 5 Q \ B A S E B Y T E S . I
0010660 O . I N I T A 0 0 4 5 2 7 6 Q
0010700 \ B A S E B Y T E S . I O . I
0010720 N I T A 0 0 4 3 2 6 7 Q \ B
0010740 A S E B Y T E S . S E T F I L E
0010760 P T R 2 6 0 Q \ B A S E B Y
0011000 T E S . I O . I N I T A 0 0 4 0
0011020 2 5 1 Q \ B A S E B Y T E S
0011040 . R E A D P 2 4 2 Q \ B A S
0011060 E B Y T E S . P E E K B I N 2
0011100 3 3 Q \ B A S E B Y T E S . B
0011120 O U T 2 2 4 Q \ B A S E B Y
0011140 T E S . B I N 2 1 5 Q \ I L
0011160 L E G A L . D E V I C E O P 2
0011200 0 6 Q \ B A S E B Y T E S . I
0011220 O . I N I T A 0 0 3 3 1 7 7 Q
0011240 N I L L 1 7 0 Q \ B A S E
0011260 B Y T E S . I O . I N I T A 0 0
0011300 3 0 1 6 1 Q N I L L 1 5 2
0011320 Q \ B A S E B Y T E S . O P E
0011340 N F N 1 4 3 Q N I L L 1 3
0011360 4 Q \ B A S E B Y T E S . N A
0011400 M E . F R O M . S T R E A M 1
0011420 2 5 Q N I L L 1 1 6 Q \ G
0011440 E N E R A T E N O F I L E S 1
0011460 0 7 Q N I L L 1 0 0 Q N I
0011500 L L 7 1 Q N I L L 6 2 Q
0011520 N I L L 7 B A S E B Y T E S
0011540 2 004 003 F D E V T Y P E # ) \r
0011560 ( ) \r \ M A K E B A S E B Y T E
0011600 S T R E A M D 1 \r ( L ( 5
0011620 O S T R E A M 4 W R I T E X
0011640 T E N S I O N F N 3 A C C E
0011660 S S 2 L E N 1 O F F S T
0011700 0 B A S E ) P 0 \ I N
0011720 T E R R U P T A B L E ) 002 W 001
0011740 \0 \0 006 @ 247 B j 360 243 \b \0 \0 277 A 005 001
0011760 233 B 005 001 227 B A 324 b 004 005 001 247 o \0 \0
0012000 \0 \t \0 \0 277 C 265 \t g \0 \0 b 006 260 030 g
0012020 \0 \0 360 263 023 C g \0 \0 360 252 C d g \0 \0
0012040 360 242 \t \0 \0 277 E 004 l \v 360 242 261 001 + E
0012060 d 311 006 ` \0 \0 360 225 \t \0 \0 261 001 207 \t \0
0012100 \0 277 E d 006 \0 \0 ` \0 \0 024 006 277 d j 317
0012120 2 \a 277 d h 024 2 277 d j 315 1 277 d j 315
0012140 0 277 d g \0 \0 024 . 277 d g \0 \0 024 , 277
0012160 d h 024 * 277 d h 024 ( 277 d ` \0 \0 024 &
0012200 277 d h 024 $ 277 d g \0 \0 024 " 277 d g \0
0012220 \0 024 277 d j 317 002 4 277 d j 317 030 277
0012240 d j 317 030 001 277 d ` \0 \0 315 037 277 d j 315
0012260 036 277 d j 315 035 277 d ` \0 \0 315 034 277 d j
0012300 315 033 277 d j 315 032 277 d h 024 030 277 d l \b
0012320 317 024 \a 277 d j 315 027 277 d j 315 026 277 d h
0012340 024 024 277 d h 024 022 277 d h 024 020 277 d h 024
0012360 016 277 d h 024 \f 277 d j 315 \v 277 d j 315 \n
0012400 277 d h 024 \b 277 d h 024 004 277 d j 317 004 R
0012420 277 d k 317 004 @ 277 d k 317 004 0 277 d j 317
0012440 004 277 d j 317 004 020 277 d j 317 004 \0 277 d
0012460 h 024 002 277 d j 317 002 4 277 d j 317 002 277
0012500 d j 317 002 020 277 d j 317 002 \0 277 d j 315 001
0012520 277 d j 315 \0 260 j l \v 037 d ` \0 \0 024 006
0012540 277 d g \0 \0 024 . 277 d g \0 \0 024 , 277 d
0012560 ` \0 \0 024 & 277 d g \0 \0 024 " 277 d g \0
0012600 \0 024 277 d j 317 030 001 277 d ` \0 \0 315 037
0012620 277 d j 315 035 277 d ` \0 \0 315 034 277 d h 024
0012640 030 277 d l \b 317 024 \a 277 d j 317 004 R 277 d
0012660 k 317 004 @ 277 d k 317 004 0 277 d h 024 002 277
0012700 b \n 277 021 020 \0 E j 317 004 0 277 E j 317 004
0012720 @ 277 E l \b 317 024 \a 277 E d j 315 \n 277 j
0012740 315 032 277 E @ 024 002 277 E d 006 \0 \0 A 315 026
0012760 277 A 315 \0 277 E d B 315 \v 277 B 315 001 277 E
0013000 C \n \0 \0 277 E h 024 004 277 E g \0 \0 024
0013020 277 E j 315 037 277 E j 315 035 277 E 006 \0 \0 C
0013040 g \0 \0 360 246 C g \0 \0 360 264 003 D 024 \f 277
0013060 E 006 \0 \0 j 315 027 E 020 \0 ( 1 0 4 0 Q
0013100 \ S E T A C C E S S 1 3 5 Q
0013120 C L O S E F 1 2 7 Q \ S E
0013140 T A C C E S S 1 0 1 Q \ I L
0013160 L E G A L . A R G 4 0 Q S H
0013200 O U L D N T 1 0 Q S H O U L
0013220 D N T ) \r ( 1 1 2 0 Q S T R E
0013240 A M 1 1 0 5 Q B O T H 1 0
0013260 7 7 Q O U T P U T 1 0 7 3 Q
0013300 S T R E A M 1 0 5 2 Q \ M
0013320 B S . O U T C H A R F N 1 0 1
0013340 1 Q S T R E A M 6 6 6 Q \
0013360 S T R E A M . D E F A U L T . M
0013400 A X B U F F E R S 6 5 2 Q F
0013420 I L E L I N E L E N G T H 6 3
0013440 5 Q \ F I L E O U T C H A R F
0013460 N 6 2 6 Q \ E O S E R R O R
0013500 6 1 7 Q \ N O I M A G E O P
0013520 S 6 1 0 Q \ S T R E A M . N
0013540 O T . O P E N 6 0 1 Q \ S T
0013560 R E A M . N O T . O P E N 5 7
0013600 2 Q \ B A S E B Y T E S D E V
0013620 I C E 3 2 7 Q \ S T R E A M
0013640 . D E F A U L T . M A X B U F F
0013660 E R S 3 0 6 Q F I L E L I N
0013700 E L E N G T H 2 5 5 Q \ F I
0013720 L E O U T C H A R F N 2 4 6 Q
0013740 \ E O S E R R O R 2 3 2 Q
0013760 \ N O I M A G E O P S 2 1 1 Q
0014000 \ S T R E A M . N O T . O P E
0014020 N 2 0 2 Q \ S T R E A M . N
0014040 O T . O P E N 1 4 6 Q \ B A
0014060 S E B Y T E S D E V I C E 1 4
0014100 3 Q S T R E A M 1 2 2 Q \
0014120 B A S E B Y T E S D E V I C E
0014140 7 4 Q B O T H 6 5 Q O U T
0014160 P U T 5 6 Q I N P U T 4 7
0014200 Q I N P U T ) \r ( 3 5 Q "
0014220 C u r r e n t l y c a n ' t
0014240 s u p p o r t f i x p - s i z
0014260 e d o f f s e t s " ) \r \ M B
0014300 S . O U T C H A R F N D 1 \r (
0014320 L ( 1 C H A R 0 S T R E
0014340 A M ) ) \0 036 002 \0 \0 002 @ 006 \0 \0 b
0014360 \0 A ! @ 006 \0 \0 @ 006 \0 \0 310 027 k 324 021
0014400 002 001 H I 315 027 I 020 \0 N I L \r ( 1 7
0014420 Q S T R E A M 1 3 Q S T R
0014440 E A M 3 S T R E A M ) \r ( )
0014460 \r \ B A S E B Y T E S . N A M E
0014500 . F R O M . S T R E A M D 1 \r
0014520 ( L ( 0 S T R E A M ) ) \0
0014540 036 \0 \0 \0 001 @ 006 \0 \0 311 004 265 026 @ 006 \0
0014560 \0 311 002 @ 006 \0 \0 310 026 @ \t \0 \0 h 032 032
0014600 032 020 \0 ( 2 7 Q G E T E O F P T
0014620 R ) \r ( 2 1 Q S T R E A M 1
0014640 3 Q S T R E A M 3 S T R E
0014660 A M ) \r ( ) \r \ B A S E B Y T E
0014700 S . B O U T D 1 \r ( L ( 1
0014720 B Y T E 0 S T R E A M ) )
0014740 \0 > 001 \0 \0 002 021 020 \0 @ 006 \0 \0 310 \0 X
0014760 @ 006 \0 \0 310 \v 375 361 263 032 @ 006 \0 \0 311 \f
0015000 X 227 @ k H 017 016 277 260 341 o \0 \0 \0 \t \0
0015020 \0 277 @ 006 \0 \0 311 002 H @ H k 330 315 \0 277
0015040 A 307 020 \0 ( 5 2 Q E R R O R ) \r
0015060 ( 5 7 Q S T R E A M 2 7 Q
0015100 S T R E A M 1 5 Q S T R E A
0015120 M 6 S T R E A M ) \r ( 4 7
0015140 Q " A t t e m p t t o w r
0015160 i t e p a s t e n d o f
0015200 b y t e s b l o c k " ) \r \ B
0015220 A S E B Y T E S . S E T F I L E
0015240 P T R D 1 \r ( L ( 1 I 0
0015260 S T R E A M ) ) \0 ) 001 \0 \0 002
0015300 A 021 001 \0 H @ 006 \0 \0 310 026 324 X d @ 006
0015320 \0 \0 310 \v 361 230 o \0 \0 \0 A \n \0 \0 206 @
0015340 006 \0 \0 H 315 \0 h 020 \0 ( 3 5 Q E R
0015360 R O R ) \r ( 4 2 Q S T R E A M
0015400 2 1 Q S T R E A M 1 0 Q
0015420 S T R E A M ) \r ( 3 1 Q " B
0015440 e y o n d e n d o f b y t
0015460 e r a n g e " ) \r \ B A S E B
0015500 Y T E S . R E A D P D 1 \r ( L
0015520 ( 1 F L G 0 S T R E A M
0015540 ) ) \0 : 002 \0 \0 002 @ 006 \0 \0 310 \0 @
0015560 006 \0 \0 310 \v 021 002 001 I j H 331 324 Y l 002
0015600 I 361 h 360 265 035 d j 360 221 h 020 A 265 024 @
0015620 006 \0 \0 311 002 @ 006 \0 \0 310 \0 302 l \r 360 h
0015640 360 020 \0 N I L \r ( 5 7 Q S T R E
0015660 A M 5 1 Q S T R E A M 1 1
0015700 Q S T R E A M 3 S T R E A
0015720 M ) \r ( ) \r \ B A S E B Y T E S
0015740 . B I N D 1 \r ( L ( 0 S T
0015760 R E A M ) ) \0 025 \0 \0 \0 001 @ \t \0
0016000 \0 @ 006 \0 \0 @ 006 \0 \0 310 \0 k 324 315 \0 277
0016020 020 \0 ( 3 \ B A S E B Y T E S .
0016040 P E E K B I N ) \r ( 1 3 Q S T
0016060 R E A M 7 S T R E A M ) \r (
0016100 ) \r \ B A S E B Y T E S . P E E
0016120 K B I N D 1 \r ( L ( 1 N O
0016140 E R R O R F L G 0 S T R E A
0016160 M ) ) \0 - 002 \0 \0 002 @ 006 \0 \0 310 \0
0016200 021 021 001 H @ 006 \0 \0 310 \v 375 361 257 A 253 @
0016220 006 \0 \0 311 " 271 @ k I 016 020 h 020 @ 006 \0
0016240 \0 311 002 H 302 020 \0 N I L \r ( 4 6 Q
0016260 S T R E A M 3 0 Q S T R E A
0016300 M 1 5 Q S T R E A M 3 S
0016320 T R E A M ) \r ( ) \r \ B A S E B
0016340 Y T E S . T R U N C A T E F N
0016360 D 1 \r ( L ( 1 I 0 S T R
0016400 E A M ) ) \0 7 003 \0 \0 002 A @ 006 \0
0016420 \0 310 026 @ 006 \0 \0 310 \v 021 003 002 H I 324 X
0016440 j A 361 223 d J 324 270 I A 361 243 H J 361 230
0016460 o \0 \0 \0 A \n \0 \0 020 @ 006 \0 \0 H 315 \v
0016500 H 020 \0 ( 5 3 Q E R R O R ) \r (
0016520 6 0 Q S T R E A M 1 2 Q S
0016540 T R E A M 4 S T R E A M ) \r
0016560 ( 4 7 Q " B e y o n d e n
0016600 d o f b y t e r a n g e "
0016620 ) \r \ B A S E B Y T E S . O P E
0016640 N F N D 1 \r ( L ( 4 F D E
0016660 V 3 O T H E R I N F O 2
0016700 R E C O G 1 A C C E S S 0
0016720 N A M E ) ) \0 , \0 \0 \0 005 @ d
0016740 006 \0 \0 311 004 226 277 @ A \n \0 \0 020 006 \0 \0
0016760 311 002 @ 006 \0 \0 310 026 @ \t \0 \0 A @ 006 \0
0017000 \0 311 \f @ \r 006 \0 \0 020 \0 ( 5 1 Q \
0017020 M A K E B A S E B Y T E S T R E
0017040 A M 3 5 Q G E T E O F P T R
0017060 1 5 Q O P E N S T R I N G S
0017100 T R E A M ) \r ( 4 2 Q S T R E
0017120 A M 2 7 Q S T R E A M 2 1
0017140 Q S T R E A M 4 S T R E A
0017160 M ) \r ( ) \r \ B A S E B Y T E S
0017200 . B L O C K I O D 1 \r ( L (
0017220 4 D I R E C T I O N 3 N
0017240 2 O F F S T 1 B A S E 0
0017260 S T R E A M ) ) \0 u 004 \0 \0 005
0017300 021 @ 003 C j 361 264 Y @ 006 \0 \0 311 002 270 @
0017320 006 \0 \0 310 \0 271 @ 006 \0 \0 310 \v 272 C J I
0017340 k 331 331 361 262 025 D g \0 \0 360 262 5 @ 006 \0
0017360 \0 311 " 273 @ k K 016 277 @ 006 \0 \0 I C 330
0017400 315 \0 277 D g \0 \0 360 233 A H b 002 277 270 B
0017420 I b 004 277 271 H I A B C \r 005 \0 \0 h 020
0017440 @ A B 302 ! 277 B k 324 b 004 277 C m 377 324
0017460 b 006 260 222 \0 ( 1 3 5 Q \ M O V E
0017500 B Y T E S ) \r ( 1 0 6 Q O U T
0017520 P U T 7 4 Q S T R E A M 6
0017540 0 Q S T R E A M 5 1 Q I N
0017560 P U T 3 1 Q S T R E A M 2
0017600 2 Q S T R E A M 1 3 Q S T
0017620 R E A M ) \r ( ) \r O P E N S T R
0017640 I N G S T R E A M D 1 \r ( L
0017660 ( 1 A C C E S S 0 S T R )
0017700 ) \0 q 002 \0 \0 002 021 001 @ d 005 \a 246
0017720 277 @ \t \0 \0 277 @ 312 \0 C j 360 221 h 200 i
0017740 Y @ 311 \0 265 003 i I 224 @ 310 003 340 202 @ 310
0017760 003 I 224 @ 310 002 340 202 @ 310 002 A d g \0 \0
0020000 360 263 027 d g \0 \0 360 256 d g \0 \0 360 250 265
0020020 006 g \0 \0 202 \t \0 \0 \f \0 \0 X I 226 d l
0020040 377 317 2 \a 277 H k 317 004 0 277 H k 317 004 @
0020060 277 k j 360 h 360 H 020 \0 ( 1 2 2 Q \
0020100 M A K E B A S E B Y T E S T R E
0020120 A M 1 1 7 Q \ I L L E G A L
0020140 . A R G 1 4 Q \ I L L E G A
0020160 L . A R G ) \r ( 1 1 3 Q I N P
0020200 U T 1 0 4 Q B O T H 7 6 Q
0020220 O U T P U T 6 7 Q I N P U
0020240 T ) \r ( ) \r \ S T R I N G S T R
0020260 E A M . I N I T A 0 0 1 2 D 1
0020300 \r ( L ( 5 S T R E A M 4
0020320 F D E V 3 O T H E R I N F O
0020340 2 R E C O G 1 A C C E S
0020360 S 0 F I L E ) ) \0 003 \0 \0 \0
0020400 006 E 020 \0 N I L \r N I L \r ( ) \r \
0020420 S T R I N G S T R E A M . I N I
0020440 T A 0 0 1 7 D 1 \r ( L ( 0
0020460 S T R E A M ) ) \0 4 002 \0 \0 001 @
0020500 006 \0 \0 @ d 006 \0 \0 311 \f 237 277 @ 006 \0 \0
0020520 311 \f @ 006 \0 \0 h 024 \f 277 215 006 \0 \0 311 004
0020540 \t \0 \0 265 006 @ \t \0 \0 021 002 001 H I 024 016
0020560 I 020 \0 ( 5 1 Q \ E O F . A C T
0020600 I O N 4 3 Q G N C C O D E )
0020620 \r ( 3 6 Q S T R E A M 2 6 Q
0020640 S T R E A M 2 0 Q S T R E
0020660 A M 1 0 Q S T R E A M 3
0020700 S T R E A M ) \r ( ) \r \ S T R I
0020720 N G S T R E A M . I N I T A 0 0
0020740 2 1 D 1 \r ( L ( 1 N O E R
0020760 R O R F L G 0 S T R E A M )
0021000 ) \0 036 \0 \0 \0 002 @ 006 \0 \0 311 \f 265 026
0021020 @ 006 \0 \0 311 004 \t \0 \0 265 \v A h 360 264 006
0021040 @ \t \0 \0 020 \0 ( 3 3 Q \ E O F .
0021060 A C T I O N 2 0 Q C H C O N
0021100 1 ) \r ( 1 3 Q S T R E A M 3
0021120 S T R E A M ) \r ( ) \r \ S T R
0021140 I N G S T R E A M . I N I T A 0
0021160 0 2 3 D 1 \r ( L ( 0 S T R
0021200 E A M ) ) \0 \b \0 \0 \0 001 @ \t \0 \0
0021220 h 360 020 \0 ( 3 E O F P ) \r N I L
0021240 \r ( ) \r \ S T R I N G S T R E A
0021260 M . I N I T A 0 0 2 5 D 1 \r (
0021300 L ( 0 S T R E A M ) ) \0 024
0021320 002 \0 \0 001 @ 006 \0 \0 @ 006 \0 \0 311 016 021 002
0021340 001 H I 024 \f I 020 \0 N I L \r ( 7 S
0021360 T R E A M 3 S T R E A M ) \r
0021400 ( ) \r \ S T R I N G S T R E A M
0021420 . I N I T A 0 0 2 9 D 1 \r ( L
0021440 ( 0 S T R E A M ) ) \0 027 \0
0021460 \0 \0 001 @ 006 \0 \0 311 \f h 360 264 \r @ 006 \0
0021500 \0 311 004 \t \0 \0 j 360 020 \0 ( 2 2 Q N
0021520 C H A R S ) \r ( 1 5 Q S T R E
0021540 A M 3 S T R E A M ) \r ( ) \r
0021560 \ S T R I N G S T R E A M . I N
0021600 I T D 1 \r ( F 0 \ S T R I
0021620 N G S T R E A M . F D E V ) \0
0021640 332 \0 001 \0 \0 ` \0 \0 037 d g \0 \0 024 \0 277
0021660 d g \0 \0 024 002 277 d g \0 \0 024 004 277 d g
0021700 \0 \0 024 006 277 d g \0 \0 024 \b 277 d g \0 \0
0021720 024 \n 277 d g \0 \0 024 \f 277 d g \0 \0 024 016
0021740 277 d g \0 \0 024 020 277 d g \0 \0 024 022 277 d
0021760 g \0 \0 024 024 277 d g \0 \0 024 026 277 d g \0
0022000 \0 024 030 277 d g \0 \0 024 032 277 d g \0 \0 024
0022020 034 277 d g \0 \0 024 036 277 d g \0 \0 024 " 277
0022040 d g \0 \0 024 $ 277 d g \0 \0 024 & 277 d g
0022060 \0 \0 024 4 277 d g \0 \0 024 T 277 d g \0 \0
0022100 024 R 277 d g \0 \0 024 N 277 d g \0 \0 024 :
0022120 277 d g \0 \0 024 8 277 d g \0 \0 024 6 277 d
0022140 g \0 \0 024 2 277 d g \0 \0 024 0 277 d g \0
0022160 \0 024 . 277 d g \0 \0 024 * 277 c \0 020 \0 N
0022200 I L \r ( 3 2 2 Q N I L L 3 1
0022220 3 Q \ I S . N O T . R A N D A
0022240 C C E S S P 3 0 4 Q \ I L L
0022260 E G A L . D E V I C E O P 2 7
0022300 5 Q \ I S . N O T . R A N D A
0022320 C C E S S P 2 6 6 Q \ G E N
0022340 E R I C . B I N S 2 5 7 Q \
0022360 G E N E R I C . B O U T S 2 5
0022400 0 Q \ G E N E R I C . R E N A
0022420 M E F I L E 2 4 1 Q N I L L
0022440 2 3 2 Q N I L L 2 2 3 Q
0022460 N I L L 2 1 4 Q \ S T R I N
0022500 G S T R E A M . I N I T A 0 0 2
0022520 9 2 0 5 Q \ S T R I N G S T
0022540 R E A M . I N I T A 0 0 2 5 1
0022560 7 6 Q \ S T R I N G S T R E A
0022600 M . I N I T A 0 0 2 3 1 6 7 Q
0022620 \ S T R I N G S T R E A M . I
0022640 N I T A 0 0 2 1 1 6 0 Q \ S
0022660 T R I N G S T R E A M . I N I T
0022700 A 0 0 1 7 1 5 1 Q \ I L L E
0022720 G A L . D E V I C E O P 1 4 2
0022740 Q N I L L 1 3 3 Q N I L L
0022760 1 2 4 Q \ S T R I N G S T R
0023000 E A M . I N I T A 0 0 1 2 1 1
0023020 5 Q \ I L L E G A L . D E V I
0023040 C E O P 1 0 6 Q N I L L 7
0023060 7 Q N I L L 7 0 Q N I L L
0023100 6 1 Q N I L L 5 2 Q \ N
0023120 U L L F I L E G E N E R A T O R
0023140 4 3 Q N I L L 3 4 Q N I
0023160 L L 2 5 Q N I L L 1 6 Q
0023200 N I L L 7 S T R I N G 2
0023220 004 003 F D E V T Y P E # ) \r ( ) \r
0023240 G E T S T R E A M D 1 \r ( L
0023260 ( 2 N O E R R O R 1 A C C
0023300 E S S 0 F I L E ) ) \0 \b \0
0023320 \0 \0 003 @ A B \v \0 \0 020 \0 ( 5 \ G
0023340 E T S T R E A M ) \r N I L \r ( )
0023360 \r \ A D D O F D D 1 \r ( L (
0023400 0 S T R E A M ) ) \0 027 \0 \0 \0
0023420 001 \b \0 \0 @ d 006 \0 \0 311 004 231 277 @ ` \0
0023440 \0 032 027 \0 \0 @ 020 \0 ( 2 \ C L E A
0023460 R O F D ) \r ( 2 3 Q \ O P E N
0023500 F I L E S 1 7 Q \ O P E N F
0023520 I L E S 7 S T R E A M ) \r (
0023540 ) \r \ C L E A R O F D D 1 \r N
0023560 I L \0 005 \0 \0 \0 \0 g \0 \0 020 \0 N I
0023600 L \r ( 2 I F ) \r ( ) \r \ D E L
0023620 E T E O F D D 1 \r ( L ( 0
0023640 O F D ) ) \0 \f \0 \0 \0 001 @ ` \0 \0
0023660 \n \0 \0 027 \0 \0 020 \0 ( 6 D R E M O
0023700 V E ) \r ( 1 1 Q \ O P E N F I
0023720 L E S 3 \ O P E N F I L E S
0023740 ) \r ( ) \r \ G E T S T R E A M
0023760 D 1 \r ( L ( 2 N O E R R O R
0024000 1 A C C E S S 0 X ) F
0024020 0 \ P R I M I N . O F D F
0024040 1 \ L I N E B U F . O F D
0024060 F 2 \ P R I M O U T . O F D
0024100 F 3 \ T E R M . O F D )
0024120 \0 264 \0 004 \0 003 @ 265 G A d g \0 \0 360 262
0024140 033 277 P d ` \0 \0 360 237 277 ` \0 \0 Q 006 \0
0024160 \0 311 016 360 222 \b \0 \0 P 020 g \0 \0 360 262 023
0024200 ` \0 \0 232 R d ` \0 \0 360 224 277 \b \0 \0 R
0024220 020 P Q 360 241 P 200 R A B \v \0 \0 020 i 360
0024240 262 6 A d g \0 \0 360 235 277 Q d ` \0 \0 360
0024260 224 277 \b \0 \0 Q 020 g \0 \0 360 242 A 263 023 `
0024300 \0 \0 232 S d ` \0 \0 360 224 277 \b \0 \0 S 020
0024320 @ B \n \0 \0 020 @ d 004 l \v 360 263 274 004 l
0024340 004 360 235 B h 360 264 " o \0 \0 \0 @ \n \0 \0
0024360 020 A g \0 \0 360 242 A 263 330 @ d 004 ` \0 \0
0024400 360 262 320 006 \0 \0 311 \0 020 \0 ( 2 3 1 Q
0024420 E R R O R 1 7 6 Q \ F I L E
0024440 . N O T . O P E N 1 6 7 Q \
0024460 C R E A T E . T T Y D I S P L A
0024500 Y S T R E A M 1 3 6 Q \ C R
0024520 E A T E . T T Y D I S P L A Y S
0024540 T R E A M 1 0 6 Q \ I O M O
0024560 D E P 7 0 Q \ C R E A T E .
0024600 T T Y D I S P L A Y S T R E A M
0024620 4 1 Q \ C R E A T E . T T Y
0024640 D I S P L A Y S T R E A M ) \r (
0024660 2 5 7 Q W I N D O W 2 5 1 Q
0024700 004 003 W I N D O W T Y P E # 2
0024720 3 6 Q O U T P U T 1 6 1 Q
0024740 \ D E F A U L T T T Y D I S P L
0024760 A Y S T R E A M 1 5 3 Q \ D
0025000 E F A U L T T T Y D I S P L A Y
0025020 S T R E A M 1 4 3 Q O U T P
0025040 U T 1 3 0 Q \ D E F A U L T
0025060 L I N E B U F 1 2 0 Q I N P
0025100 U T 6 2 Q \ D E F A U L T T
0025120 T Y D I S P L A Y S T R E A M
0025140 5 4 Q \ D E F A U L T T T Y D
0025160 I S P L A Y S T R E A M 4 6 Q
0025200 O U T P U T 3 2 Q S T R E
0025220 A M 2 6 Q \ K E Y B O A R D
0025240 . S T R E A M 2 0 Q \ D E F
0025260 A U L T L I N E B U F 7 I N
0025300 P U T ) \r ( 2 2 5 Q " L I T
0025320 A T O M ' s t r e a m s ' n
0025340 o l o n g e r s u p p o r t
0025360 e d " ) \r \ S E A R C H O P E N
0025400 F I L E S D 1 \r ( L ( 1 A
0025420 C C E S S 0 N A M E ) ) \0
0025440 + 002 \0 \0 002 ` \0 \0 021 021 001 H 003 265 004 h
0025460 020 001 271 @ I 006 \0 \0 311 004 265 003 I 360 232 A
0025500 226 I A i \v \0 \0 020 I 020 H 002 X 260 337 \0
0025520 ( 4 1 Q \ I O M O D E P ) \r (
0025540 2 2 Q S T R E A M 2 \ O P
0025560 E N F I L E S ) \r ( ) \r ( P R E
0025600 T T Y C O M P R I N T A O F D
0025620 C O M S ) \r ( R P A Q Q A O F
0025640 D C O M S ( ( * ; ; ; " s
0025660 t r e a m s ( = O p e n F i
0025700 l e D e s c r i p t o r s ) " )
0025720 ( C O M S ( F N S \ A D D
0025740 - O P E N - S T R E A M \r \ G
0025760 E N E R I C - U N R E G I S T E
0026000 R - S T R E A M ) ( I N I T V
0026020 A R S ( * I S S U E - C L O S
0026040 E - W A R N I N G S * N I L )
0026060 ) ( F N S C L O S E A L L
0026100 C L O S E F E O F C L O S E F
0026120 \r I N P U T O P E N P O U
0026140 T P U T P O S I T I O N R A
0026160 N D A C C E S S P \ I O M O D
0026200 E P W H E N C L O S E ) ( F
0026220 N S S T R E A M A D D P R O P
0026240 ) ( I N I T V A R S ( \r D E
0026260 F A U L T E O F C L O S E ( Q
0026300 U O T E N I L L ) ) ( \ O P
0026320 E N F I L E S ) ) ( G L O B A
0026340 L V A R S D E F A U L T E O F
0026360 C L O S E \ O P E N F I L E S
0026400 ) ) ( C O M S ( * ; ; \r
0026420 " S T R E A M i n t e r f a c
0026440 e t o R e a d a n d W r
0026460 i t e t o r a n d o m m e
0026500 m o r y " ) ( D E C L A R E :
0026520 D O N T C O P Y ( E X P O R
0026540 T ( R E C O R D S \r B A S E
0026560 B Y T E S T R E A M ) ) ) ( F
0026600 N S \ B A S E B Y T E S . I O
0026620 . I N I T \ M A K E B A S E B
0026640 Y T E S T R E A M \ M B S . O
0026660 U T C H A R F N \r \ B A S E B
0026700 Y T E S . N A M E . F R O M . S
0026720 T R E A M \ B A S E B Y T E S
0026740 . B O U T \ B A S E B Y T E S
0026760 . S E T F I L E P T R \ B A S
0027000 E B Y T E S . R E A D P \ B A
0027020 S E B Y T E S . B I N \r \ B A
0027040 S E B Y T E S . P E E K B I N
0027060 \ B A S E B Y T E S . T R U N C
0027100 A T E F N \ B A S E B Y T E S
0027120 . O P E N F N \ B A S E B Y T
0027140 E S . B L O C K I O ) ( G L O
0027160 B A L V A R S \r \ B A S E B Y
0027200 T E S D E V I C E ) ( D E C L
0027220 A R E : D O N T E V A L @ L O
0027240 A D ( P ( \ B A S E B Y T E
0027260 S . I O . I N I T ) ) ) ( F N
0027300 S O P E N S T R I N G S T R E
0027320 A M ) ) ( C O M S ( * \r ;
0027340 ; " S T R E A M i n t e r f
0027360 a c e f o r o l d - s t y l
0027400 e s t r i n g s " ) ( F N S
0027420 \ S T R I N G S T R E A M . I
0027440 N I T ) ( D E C L A R E : D
0027460 O N T E V A L @ L O A D D O C
0027500 O P Y ( \r P ( \ S T R I N G
0027520 S T R E A M . I N I T ) ) ) )
0027540 ( C O M S ( F N S G E T S T
0027560 R E A M \ A D D O F D \ C L
0027600 E A R O F D \ D E L E T E O F
0027620 D \ G E T S T R E A M \r \ S
0027640 E A R C H O P E N F I L E S )
0027660 ( D E C L A R E : D O N T C O
0027700 P Y ( E X P O R T ( M A C R
0027720 O S \ I N S T R E A M A R G
0027740 \ O U T S T R E A M A R G \ S
0027760 T R E A M A R G ) ) ) ( M A C
0030000 R O S \r G E T O F D \ G E T
0030020 O F D ) ) ( L O C A L V A R S
0030040 . T ) ( D E C L A R E :
0030060 D O N T E V A L @ L O A D D O
0030100 E V A L @ C O M P I L E D O N
0030120 T C O P Y C O M P I L E R V A
0030140 R S ( A D D V A R S \r ( N L
0030160 A M A ) ( N L A M L ) ( L A
0030200 M A W H E N C L O S E ) ) ) )
0030220 ) \r ( R P A Q ? * I S S U E -
0030240 C L O S E - W A R N I N G S *
0030260 N I L ) \r ( R P A Q ? D E F A
0030300 U L T E O F C L O S E ( Q U O
0030320 T E N I L L ) ) \r ( R P A Q ?
0030340 \ O P E N F I L E S ) \r ( \ B
0030360 A S E B Y T E S . I O . I N I T
0030400 ) \r ( \ S T R I N G S T R E A M
0030420 . I N I T ) \r ( P U T P R O P S
0030440 G E T O F D M A C R O ( =
0030460 . G E T S T R E A M ) ) \r (
0030500 P U T P R O P S \ G E T O F D
0030520 M A C R O ( = . \ G E T
0030540 S T R E A M ) ) \r ( P U T P R O
0030560 P S A O F D C O P Y R I G H
0030600 T ( " X e r o x C o r p o r
0030620 a t i o n " 1 9 8 1 1 9 8 2
0030640 1 9 8 3 1 9 8 4 1 9 8 5
0030660 1 9 8 6 ) ) \r N I L \r
0030673