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