$ od -c -N 50000 [eris]<LispCore>SOURCES>COMPILE.DCOM!25
0000000 ( F I L E C R E A T E D " 2 2
0000020 - A u g - 8 6 1 6 : 5 8 : 1 1
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 > C O M P I L
0000120 E . ; 1 8 ) \r " 2 1 - A u g -
0000140 8 6 1 7 : 0 8 : 0 9 " t c o
0000160 m p l ' d i n " X e r o x
0000200 L i s p 2 1 - A u g - 8 6 .
0000220 . . " d a t e d " 2 1 - A u
0000240 g - 8 6 1 7 : 5 6 : 0 1 " ) \r
0000260 ( F I L E C R E A T E D " 2 2
0000300 - A u g - 8 6 1 6 : 5 6 : 5 3
0000320 " { E R I S } < L I S P C O R
0000340 E > S O U R C E S > C O M P I L
0000360 E . ; 1 8 8 0 6 4 1 c h a n
0000400 g e s t o : ( V A R S \r C
0000420 O M P I L E C O M S ) ( R E C
0000440 O R D S C O M P F I L E D E S
0000460 C R ) p r e v i o u s d a t
0000500 e : " 3 - A u g - 8 6 1 6
0000520 : 1 5 : 1 8 " \r { E R I S } <
0000540 L I S P C O R E > S O U R C E S
0000560 > C O M P I L E . ; 1 7 ) \r B C
0000600 O M P L A 0 0 0 1 D 1 \r ( N A
0000620 M E E R R O R S E T P 6
0000640 * P R I N T - B A S E * P 5
0000660 * R E A D - B A S E * P 4
0000700 * R E A D T A B L E * P 3
0000720 * P A C K A G E * P 2 E
0000740 P 1 N O F I X F N S L S T
0000760 P 0 N O F I X V A R S L S
0001000 T F 7 R E S E T V A R S L
0001020 S T F 1 0 Q F I L E S F
0001040 1 1 Q N O F I X V A R S L S
0001060 T F 1 2 Q N O F I X F N S
0001100 L S T F 1 3 Q N O B L O C
0001120 K S F L G F 1 4 Q O P T I
0001140 O N S S E T F 1 5 Q * O L
0001160 D - I N T E R L I S P - R E A D
0001200 - E N V I R O N M E N T * F
0001220 1 6 Q C F I L E F 1 7 Q
0001240 R E S E T Y ) \0 306 \a \t 002 \0 g \0
0001260 \0 d \t \0 \0 032 g \0 \0 ` \0 \0 \n \0 \0 277
0001300 W 016 032 c 016 277 g \0 \0 d \t \0 \0 032 g \0
0001320 \0 ` \0 \0 \n \0 \0 277 W 016 032 c 016 277 g \0
0001340 \0 d \t \0 \0 032 g \0 \0 ` \0 \0 \n \0 \0 277
0001360 W 016 032 c 016 277 g \0 \0 d \t \0 \0 032 g \0
0001400 \0 ` \0 \0 \n \0 \0 277 W 016 032 c 016 277 g \0
0001420 \0 d \t \0 \0 032 g \0 \0 ` \0 \0 \n \0 \0 277
0001440 W 016 032 c 016 277 g \0 \0 d \t \0 \0 032 g \0
0001460 \0 \t \0 \0 277 W 016 032 c 016 277 W 022 W 024 021
0001500 002 001 W 020 \t \0 \0 c 020 277 W 032 006 \0 \0 021
0001520 001 002 J 311 \0 J 311 002 J 311 004 J 311 004 021 004
0001540 006 W 020 W 034 W 026 W 030 \f \0 \0 022 022 022 c
0001560 036 i 020 \0 ( 2 7 5 Q B C O M P L
0001600 . B O D Y 2 3 0 Q R E S E T
0001620 O P E N F I L E S 2 0 5 Q S
0001640 E T T O P V A L 1 7 6 Q G E
0001660 T T O P V A L 1 6 0 Q S E T
0001700 T O P V A L 1 4 6 Q G E T T
0001720 O P V A L 1 3 0 Q S E T T O
0001740 P V A L 1 1 6 Q G E T T O P
0001760 V A L 1 0 0 Q S E T T O P V
0002000 A L 6 6 Q G E T T O P V A L
0002020 5 0 Q S E T T O P V A L 3
0002040 6 Q G E T T O P V A L 2 0 Q
0002060 S E T T O P V A L 6 G E T
0002100 T O P V A L ) \r ( 2 4 0 Q R E
0002120 A D E R - E N V I R O N M E N T
0002140 2 0 2 Q E X P R S L S T 1
0002160 7 2 Q E X P R S L S T 1 5 5
0002200 Q D W I M I F Y C O M P F L G
0002220 1 5 2 Q D W I M I F Y C O M
0002240 P F L G 1 4 2 Q D W I M I F
0002260 Y C O M P F L G 1 2 5 Q L A
0002300 M A 1 2 2 Q L A M A 1 1 2
0002320 Q L A M A 7 5 Q L A M S
0002340 7 2 Q L A M S 6 2 Q L A M
0002360 S 4 5 Q N L A M A 4 2 Q
0002400 N L A M A 3 2 Q N L A M A
0002420 1 5 Q N L A M L 1 2 Q N L
0002440 A M L 2 N L A M L ) \r ( ) \r
0002460 B C O M P L D 1 \r ( P 2 R
0002500 E S E T Z P 1 R E S E T Y
0002520 P 0 L I S P X H I S T I
0002540 3 O P T I O N S S E T I
0002560 2 N O B L O C K S F L G I
0002600 1 C F I L E I 0 F I L E
0002620 S F 3 L I S P X H I S T
0002640 F 4 R E S E T V A R S L S T
0002660 ) \0 " 003 002 \0 004 S 021 ! 002 T o \0 \0
0002700 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0 Z \n \0
0002720 \0 J 223 \b \0 \0 020 I 020 \0 ( 3 5 Q E
0002740 R R O R ! 3 0 Q R E S E T R
0002760 E S T O R E 1 6 Q B C O M P
0003000 L A 0 0 0 1 ) \r ( 2 4 Q E R R
0003020 O R 1 3 Q I N T E R N A L )
0003040 \r ( 1 0 Q ( B C O M P L A 0
0003060 0 0 1 ) ) \r B C O M P L . B O D
0003100 Y D 1 \r ( P 2 2 Q L I S P
0003120 X H I S T P 2 1 Q T E M
0003140 P 2 0 Q X P 1 7 Q D F
0003160 N F L G P 1 2 Q S C R A T
0003200 C H F I L E P 1 1 Q T E M
0003220 P 1 0 Q F I L E R O O T
0003240 P 7 B L K F N S P 6 B
0003260 L O C K S P 5 F I R S T
0003300 P 4 O T H E R S P 3 C
0003320 H A N G E S P 2 D E F S
0003340 P 1 L O C A L V A R S P
0003360 0 S P E C V A R S I 3 O
0003400 P T I O N S S E T I 2 N O
0003420 B L O C K S F L G I 1 C F
0003440 I L E I 0 F I L E S F
0003460 2 3 Q L C F I L F 2 4 Q
0003500 R E S E T V A R S L S T F 2
0003520 5 Q N O F I X F N S L S T F
0003540 2 6 Q H E R A L D S T R I N
0003560 G F 2 7 Q M A K E S Y S D
0003600 A T E ) 001 316 023 005 \0 004 i ` \0 \0 021
0003620 242 \v C 250 h o \0 \0 \0 \n \0 \0 277 A 265 025
0003640 g \0 \0 @ 001 \t \0 \0 _ 020 g \0 \0 ` \0 \0
0003660 \f \0 \0 \t \0 \0 W & 236 ` \0 \0 g \0 \0 g
0003700 \0 \0 \v \0 \0 _ 024 277 g \0 \0 h @ O 024 h
0003720 032 032 032 032 h h 032 032 W ( 032 c ( W & 262
0003740 [ g \0 \0 \b \0 \0 ` \0 \0 021 0 016 @ 260 034
0003760 d 001 \t \0 \0 _ 030 277 O 032 265 \t O 030 h 032
0004000 _ 034 202 O 030 & _ 032 277 002 003 265 345 O 034 022
0004020 032 ` \0 \0 B 223 g \0 \0 202 g \0 \0 g \0 \0
0004040 W , g \0 \0 W . h 032 032 032 032 032 032 032 032
0004060 032 W & ` \0 \0 \v \0 \0 277 021 020 017 @ 260 '
0004100 d 001 021 001 020 021 020 021 O ` \0 \0 \n \0 \0
0004120 _ " 231 O " d g \0 \0 360 262 037 277 O \t
0004140 \0 \0 023 023 002 003 265 332 h 023 ` \0 \0 ` \0 \0
0004160 ` \0 \0 021 0 016 J 260 2 g \0 \0 d d \f \0
0004200 \0 277 260 306 d 001 021 001 020 O 001 O 002 001
0004220 \n \0 \0 022 _ 030 277 O 032 265 \t O 030 h 032 _
0004240 034 202 O 030 & _ 032 277 002 003 265 332 O 034 022 W
0004260 * \n \0 \0 \n \0 \0 \n \0 \0 \n \0 \0 c * O
0004300 024 262 % L 260 023 d 001 021 001 020 O O 024 `
0004320 \0 \0 \v \0 \0 023 002 003 265 356 h O 024 ` \0 \0
0004340 \v \0 \0 277 h 274 ` \0 \0 263 $ O 020 g \0 \0
0004360 \n \0 \0 _ 026 g \0 \0 360 265 020 O 026 003 264 \v
0004400 g \0 \0 O 026 034 264 003 i 027 \0 \0 277 M 260 023
0004420 d 001 021 001 020 O W & ` \0 \0 \v \0 \0 023
0004440 002 003 265 356 021 020 022 B 254 N 232 N 001 \t \0 \0
0004460 277 N 002 ^ 260 366 J 262 032 J d 001 001 ` \0 \0
0004500 034 252 001 001 J 001 002 001 \n \0 \0 277 J 002 Z 260
0004520 350 023 W & \t \0 \0 020 \0 ( 7 1 3 Q F
0004540 U L L N A M E 6 7 7 Q C O M
0004560 P I L E 1 6 4 4 Q B C O M P
0004600 L 2 6 2 3 Q P R I N T 5 4
0004620 7 Q G E T P R O P 5 2 7 Q
0004640 P R I N T 5 1 1 Q P R I N T
0004660 4 6 1 Q \ A P P E N D 2 4
0004700 5 6 Q \ A P P E N D 2 4 5 3
0004720 Q \ A P P E N D 2 4 5 0 Q
0004740 \ N C O N C 2 4 0 7 Q R C O
0004760 M P 3 3 6 5 Q B C O M P L 1
0005000 A 3 2 6 Q C L O S E F 3 0
0005020 4 Q R E A D 2 5 5 Q P R I
0005040 N T 1 5 1 Q F U L L N A M E
0005060 1 3 3 Q D A T E 7 1 Q O
0005100 P E N S T R E A M 5 2 Q C O
0005120 M P S E T 4 7 Q P A C K F I
0005140 L E N A M E 3 4 Q N A M E F
0005160 I E L D 2 0 Q C O M P S E T
0005200 ) \r ( 6 6 4 Q D O N T C O M P
0005220 I L E F N S 6 2 0 Q F I L E
0005240 R D T B L 6 0 0 Q D W I M I
0005260 F Y C O M P F L G 5 6 7 Q C
0005300 L I S P 5 5 4 Q C L I S P
0005320 5 4 4 Q F I L E T Y P E 5 3
0005340 5 Q D W I M I F Y C O M P F L
0005360 G 5 2 4 Q F I L E R D T B L
0005400 5 0 6 Q F I L E R D T B L
0005420 3 6 0 Q D E F A U L T 3 4 7
0005440 Q L A M S 3 4 4 Q N L A M
0005460 L 3 4 1 Q N L A M A 3 1 5
0005500 Q S T O P 3 0 1 Q F I L E
0005520 R D T B L 2 5 2 Q F I L E R
0005540 D T B L 2 3 1 Q d a t e d
0005560 2 2 4 Q i n 2 2 1 Q b c o
0005600 m p l ' d 2 1 5 Q t c o m p
0005620 l ' d 2 1 0 Q C O M P V E R
0005640 S I O N 1 3 6 Q C O M P I L
0005660 E H E A D E R 1 3 0 Q F I L
0005700 E C R E A T E D 7 7 Q B C O
0005720 M P L 3 6 6 Q N E W 6 3 Q
0005740 B O T H 6 0 Q B C O M P L
0005760 . S C R A T C H 4 4 Q C O M
0006000 P I L E . E X T 4 1 Q E X T
0006020 E N S I O N 2 7 Q N A M E
0006040 3 S Y S L O C A L V A R S ) \r
0006060 ( 1 5 Q ( F % \r ) ) \r R E
0006100 S E T O P E N F I L E S A 0 0 0
0006120 1 D 1 \r ( I 0 F I L E S )
0006140 \0 017 \0 \0 \0 001 @ 206 d 001 \t \0 \0 277 002
0006160 003 265 370 h 020 \0 ( 6 C L O S E F ?
0006200 ) \r N I L \r ( ) \r R E S E T O P
0006220 E N F I L E S D 1 \r ( P 4
0006240 F I 0 F I L E S F 5
0006260 R E S E T V A R S L S T ) \0 ?
0006300 005 001 \0 001 g \0 \0 @ 021 A 004 H 265 023 I 022
0006320 b \0 h 032 032 h h 032 032 U 032 c \n @ 020 003
0006340 243 H 274 h 204 H 001 274 H 002 270 L g \0 \0 \n
0006360 \0 \0 273 J 265 \t K h 032 Z 271 260 320 K & 272
0006400 260 313 \0 ( 5 5 Q O P E N S T R E
0006420 A M ) \r ( 5 2 Q I N P U T 2
0006440 R E S E T O P E N F I L E S A
0006460 0 0 0 1 ) \r ( ) \r B C O M P L 1
0006500 D 1 \r ( P 1 D F N F L G
0006520 P 0 T E M I 0 X ) \0
0006540 6 002 \0 \0 001 021 001 @ d 262 / d 003 262 025
0006560 001 270 @ 002 b \0 277 H g \0 \0 d d \f \0 \0
0006600 277 260 347 ` \0 \0 \n \0 \0 X 230 H d g \0 \0
0006620 360 262 347 277 @ \t \0 \0 h 020 \0 ( 6 2 Q
0006640 C L O S E F 4 3 Q R E A D
0006660 3 2 Q B C O M P L 1 A ) \r ( 5
0006700 2 Q S T O P 4 0 Q F I L E
0006720 R D T B L 2 5 Q D E F A U L
0006740 T ) \r ( ) \r B C O M P L 1 A D
0006760 1 \r ( P 6 F I L E P K G F L
0007000 G P 5 X P 4 F I R S
0007020 T F L G 0 P 3 C O M P C O
0007040 P Y F L G 0 P 2 C O M P E
0007060 V A L F L G 0 P 1 D F N F
0007100 L G P 0 T E M I 3 F
0007120 I R S T F L G I 2 C O M P
0007140 E V A L F L G I 1 C O M P
0007160 C O P Y F L G I 0 X F
0007200 7 F I R S T F 1 0 Q C H
0007220 A N G E S F 1 1 Q D E F S
0007240 F 1 2 Q N O F I X V A R S
0007260 L S T F 1 3 Q O T H E R S
0007300 F 1 4 Q D F N F L G F
0007320 1 5 Q C O U T F I L E F 1
0007340 6 Q C O M M E N T F L G ) 001
0007360 327 \a \b \0 004 021 020 \0 @ 003 001 d g \0 \0 360
0007400 262 037 277 @ g \0 \0 \n \0 \0 W 020 \n \0 \0 c
0007420 020 277 W 016 @ h 032 \n \0 \0 c 016 277 260 < d
0007440 g \0 \0 360 262 030 277 A d g \0 \0 360 262 - 277
0007460 W 022 @ 002 \n \0 \0 c 022 277 260 037 d g \0 \0
0007500 360 242 261 001 " 277 W 030 B A g \0 \0 360 C @
0007520 002 021 025 006 M 003 265 037 023 A i 360 242 261 001 b
0007540 C i 360 242 261 001 P W 016 @ h 032 \n \0 \0 c
0007560 016 277 261 001 M 003 001 003 233 M 003 001 K J L \f
0007600 \0 \0 261 \0 332 M 003 001 d g \0 \0 360 225 277 h
0007620 [ 261 \0 313 d g \0 \0 360 245 d g \0 \0 360 236
0007640 277 A g \0 \0 360 242 261 \0 266 i [ 261 \0 260 d
0007660 g \0 \0 360 262 032 277 A g \0 \0 360 232 M 003 002
0007700 001 \t \0 \0 264 003 i 273 M 003 002 261 \0 223 d g
0007720 \0 \0 360 232 277 C 242 261 \0 206 i \ 261 \0 200 d
0007740 g \0 \0 360 224 277 h \ 260 t d g \0 \0 360 224
0007760 277 h Z 260 i d g \0 \0 360 245 d g \0 \0 360
0010000 227 277 B 262 Z i Z 260 U d g \0 \0 360 262 025
0010020 277 B 232 M 003 002 001 \t \0 \0 264 003 i 272 M 003
0010040 002 260 = d g \0 \0 360 224 277 i Y 260 0 d g
0010060 \0 \0 360 225 277 M 003 002 260 & d g \0 \0 360 263
0010100 035 d g \0 \0 360 263 026 d g \0 \0 360 255 277 M
0010120 003 001 o \0 \0 \0 032 W 032 \n \0 \0 277 M 003 002
0010140 ] 261 376 364 d g \0 \0 360 263 025 d g \0 \0 360
0010160 254 d g \0 \0 360 246 d g \0 \0 360 262 035 277 @
0010200 002 001 W 024 032 c 024 277 A d g \0 \0 360 242 261
0010220 376 313 277 i b 002 261 376 304 277 @ 003 001 W 034 360
0010240 221 h 020 A d g \0 \0 360 242 261 376 260 277 i b
0010260 002 261 376 251 W 026 @ h 032 \n \0 \0 c 026 277 B
0010300 i 360 264 340 @ \t \0 \0 277 260 330 \0 ( 7 2 2
0010320 Q E V A L 7 0 6 Q \ N C O
0010340 N C 2 5 4 6 Q P R I N T 4
0010360 4 4 Q E V A L 3 1 6 Q E V
0010400 A L 2 1 4 Q B C O M P L 1 A
0010420 1 7 1 Q \ N C O N C 2 1 0
0010440 1 Q \ N C O N C 2 4 4 Q \
0010460 N C O N C 2 3 1 Q \ N C O N
0010500 C 2 2 4 Q F I L E C H A N G
0010520 E S ) \r ( 6 6 2 Q D E F A U L
0010540 T 6 2 7 Q D E F A U L T 6
0010560 0 5 Q R P A Q Q 5 7 7 Q R
0010600 P A Q 5 7 1 Q S E T Q Q 5
0010620 6 2 Q S E T Q 5 2 6 Q E V
0010640 A L @ L O A D 5 1 7 Q D O E
0010660 V A L @ L O A D 5 1 0 Q D O
0010700 N T E V A L @ L O A D 4 7 4 Q
0010720 E V A L @ L O A D W H E N 4
0010740 6 1 Q C O M P I L E R V A R S
0010760 4 2 7 Q E V A L @ C O M P I
0011000 L E W H E N 4 1 1 Q E V A L
0011020 @ C O M P I L E 4 0 3 Q D O
0011040 E V A L @ C O M P I L E 3 7 0
0011060 Q D O N T E V A L @ C O M P I
0011100 L E 3 5 5 Q N O T F I R S T
0011120 3 3 4 Q F I R S T 3 0 5 Q
0011140 D E F A U L T 2 7 5 Q C O
0011160 P Y W H E N 2 5 7 Q D E F A
0011200 U L T 2 5 0 Q C O P Y 2 4
0011220 2 Q D O C O P Y 2 2 6 Q D
0011240 O N T C O P Y 1 2 7 Q D E F
0011260 A U L T 1 1 2 Q D E C L A R
0011300 E : 6 6 Q D E F A U L T 5
0011320 5 Q D E F I N E Q 2 1 Q F
0011340 N S 1 1 Q F I L E C R E A T
0011360 E D ) \r ( 5 4 0 Q ( U N R E
0011400 C O G N I Z E D D E C L A R E
0011420 T A G ) ) \r B C O M P L 2 A 0
0011440 0 0 1 D 1 \r ( N A M E E R R
0011460 O R S E T P 1 2 Q T E M 2
0011500 P 1 1 Q L S T P 1 0 Q
0011520 T E M P 7 X P 6 L
0011540 O C A L F R E E V A R S P 5
0011560 E N T R I E S P 4 B L K
0011600 A P P L Y F N S P 3 B N D
0011620 L E V P 2 B L K N A M E
0011640 P 1 L O C A L V A R S P
0011660 0 S P E C V A R S F 1 4 Q
0011700 R E S E T V A R S L S T F
0011720 1 5 Q B L O C K F 1 6 Q
0011740 F I L E M A P L S T F 1 7 Q
0011760 D E F S F 2 0 Q F N S
0012000 F 2 1 Q B L K F N S F 2
0012020 2 Q C O R E O K F 2 3 Q
0012040 R E T F N S F 2 4 Q B L K
0012060 L I B R A R Y F 2 5 Q B L
0012100 O C K S F 2 6 Q N O L I N
0012120 K F N S F 2 7 Q L I N K F
0012140 N S F 3 0 Q S P E C V A R
0012160 S F 3 1 Q L O C A L V A R
0012200 S F 3 2 Q R E S E T Y )
0012220 002 $ \f 017 002 \0 g \0 \0 d \t \0 \0 032 g \0
0012240 \0 ` \0 \0 \n \0 \0 277 W 030 032 c 030 277 g \0
0012260 \0 d \t \0 \0 032 g \0 \0 W & \n \0 \0 277 W
0012300 030 032 c 030 277 g \0 \0 d \t \0 \0 032 g \0 \0
0012320 W ( \n \0 \0 277 W 030 032 c 030 277 g \0 \0 d
0012340 \t \0 \0 032 g \0 \0 W , \n \0 \0 277 W 030 032
0012360 c 030 277 g \0 \0 d \t \0 \0 032 g \0 \0 W .
0012400 \n \0 \0 277 W 030 032 c 030 277 g \0 \0 d \t \0
0012420 \0 032 g \0 \0 ` \0 \0 \n \0 \0 277 W 030 032 c
0012440 030 277 W 0 W 2 W 032 001 j 021 204 \v J 246 i
0012460 \t \0 \0 261 \0 343 i \t \0 \0 261 \0 334 d 002 001
0012500 g \0 \0 360 231 277 O 016 002 002 001 \t \0 \0 200 002
0012520 _ 020 277 O 016 001 d g \0 \0 360 245 d g \0 \0
0012540 360 230 277 O 016 \t \0 \0 261 \0 256 277 O 016 001 O
0012560 016 d 002 003 242 002 260 024 001 \t \0 \0 _ 024 003 227
0012600 O 020 O 024 \n \0 \0 201 O 020 \n \0 \0 261 \0 211
0012620 W 034 262 033 O 016 W 034 W $ \v \0 \0 _ 020 263
0012640 d O 016 o \0 \0 \0 032 \t \0 \0 260 k O 016 W
0012660 036 026 _ 020 262 ' W * 214 d 001 _ 026 277 O 020
0012700 001 O 026 002 034 245 002 003 265 361 i 201 277 h 262 5
0012720 O 020 W 036 \n \0 \0 c 036 260 ) W $ 262 u O
0012740 016 i \n \0 \0 _ 020 \t \0 \0 262 h O 016 O 020
0012760 i h 032 032 032 _ 020 277 O 016 o \0 \0 \0 032 \t
0013000 \0 \0 277 O 022 O 020 h 032 \n \0 \0 _ 022 277 O
0013020 016 W " 032 c " 277 W 032 002 c 032 265 016 O 022
0013040 263 > J 262 > J h 032 c 032 001 _ 016 003 265 003
0013060 202 261 377 \f W 034 242 261 377 v J 222 261 377 T O
0013100 016 W \n \0 \0 222 261 377 I O 016 h 032 _ 020
0013120 260 262 O 016 o \0 \0 \0 032 \t \0 \0 260 272 J 265
0013140 I O 022 264 Q W 034 262 023 O 022 d 001 002 001 262
0013160 + 001 001 W \n \0 \0 262 O 022 d 001 001 `
0013200 \0 \0 \n \0 \0 263 036 001 001 O 022 001 002 001 O 022
0013220 001 002 002 001 \v \0 \0 207 O 022 001 001 i \n \0 \0
0013240 277 O 022 002 _ 022 260 275 O 022 h _ 022 277 M \v
0013260 \0 \0 277 h 022 c 4 i 020 \0 ( 1 0 3 3 Q
0013300 B L O C K C O M P I L E 1 1
0013320 0 1 1 Q B R E C O M P I L E 1
0013340 1 0 0 0 Q C O M P I L E 1
0013360 7 5 6 Q M E M B 7 4 1 Q R
0013400 E C O M P ? 7 0 5 Q C O M P
0013420 E M 6 5 7 Q R E C O M P ?
0013440 5 6 5 Q \ N C O N C 2 5 5 3
0013460 Q C O M P E M 5 2 3 Q E X
0013500 P R P 5 1 6 Q V I R G I N F
0013520 N 5 0 0 Q D R E M O V E 4
0013540 2 4 Q C O M P E M 4 0 6 Q
0013560 B R E C O M P I L E 3 3 6 6 Q
0013600 S E T 3 6 0 Q \ A P P E N
0013620 D 2 3 4 5 Q E V A L 3 2 1
0013640 Q E V A L 2 6 7 Q E V A L
0013660 2 4 3 Q L O C A L V A R S
0013700 2 3 4 Q S P E C V A R S 2 0
0013720 4 Q S E T T O P V A L 1 7 2
0013740 Q G E T T O P V A L 1 5 4 Q
0013760 S E T T O P V A L 1 4 3 Q
0014000 G E T T O P V A L 1 2 5 Q S
0014020 E T T O P V A L 1 1 4 Q G E
0014040 T T O P V A L 7 6 Q S E T T
0014060 O P V A L 6 5 Q G E T T O P
0014100 V A L 4 7 Q S E T T O P V A
0014120 L 3 6 Q G E T T O P V A L
0014140 2 0 Q S E T T O P V A L 6
0014160 G E T T O P V A L ) \r ( 7 5 3 Q
0014200 D O N T C O M P I L E F N S
0014220 3 1 1 Q L O C A L V A R S 3
0014240 0 3 Q S P E C V A R S 2 5 4
0014260 Q * 2 0 1 Q D O N T C O M
0014300 P I L E F N S 1 7 6 Q D O N
0014320 T C O M P I L E F N S 1 6 6 Q
0014340 D O N T C O M P I L E F N S
0014360 1 4 7 Q L I N K F N S 1 3 7
0014400 Q L I N K F N S 1 2 0 Q N
0014420 O L I N K F N S 1 1 0 Q N O
0014440 L I N K F N S 7 1 Q B L K L
0014460 I B R A R Y 6 1 Q B L K L I
0014500 B R A R Y 4 2 Q R E T F N S
0014520 3 2 Q R E T F N S 1 5 Q
0014540 G L O B A L V A R S 1 2 Q G
0014560 L O B A L V A R S 2 G L O B
0014600 A L V A R S ) \r ( 7 0 1 Q (
0014620 n o t c o m p i l e a b l e )
0014640 5 4 7 Q ( n o t o n f i
0014660 l e , c o m p i l i n g i n
0014700 c o r e d e f i n i t i o n
0014720 ) 4 2 0 Q ( n o t c o m p
0014740 i l e a b l e ) ) \r B C O M P L
0014760 2 D 1 \r ( P 2 R E S E T Z
0015000 P 1 R E S E T Y P 0
0015020 L I S P X H I S T I 2 C O
0015040 R E O K I 1 F I L E M A P
0015060 L S T I 0 B L O C K F
0015100 3 L I S P X H I S T F 4
0015120 R E S E T V A R S L S T ) \0 "
0015140 003 002 \0 003 S 021 ! 002 T o \0 \0 \0 g \0 \0
0015160 \n \0 \0 221 h 202 g \0 \0 Z \n \0 \0 J 223 \b
0015200 \0 \0 020 I 020 \0 ( 3 5 Q E R R O R
0015220 ! 3 0 Q R E S E T R E S T O
0015240 R E 1 6 Q B C O M P L 2 A 0
0015260 0 0 1 ) \r ( 2 4 Q E R R O R
0015300 1 3 Q I N T E R N A L ) \r (
0015320 1 0 Q ( B C O M P L 2 A 0 0 0
0015340 1 ) ) \r B C O M P L 3 D 1 \r (
0015360 P 0 F I L E I 2 S C R
0015400 A T C H F I L E I 1 F I L
0015420 E S I 0 C F I L E F 1
0015440 R E S E T S T A T E F 2
0015460 L C F I L F 3 C O U T F I
0015500 L E F 4 L S T F I L F
0015520 5 L S T F I L 1 ) \0 | 001 005 001
0015540 003 B 262 034 Q 252 B R j B \t \0 \0 \f \0 \0
0015560 277 B \t \0 \0 277 B \t \0 \0 \t \0 \0 277 R 265
0015600 031 T 222 U 265 016 @ 265 005 A 260 ; \t \0 \0 277
0015620 260 371 \t \0 \0 277 260 360 \t \0 \0 277 Q 262 344 R
0015640 \t \0 \0 \t \0 \0 277 260 332 d 001 021 001 \0 Q 263
0015660 024 g \0 \0 H i \n \0 \0 ` \0 \0 \n \0 \0 \n
0015700 \0 \0 277 023 002 003 265 343 Q h 360 264 020 S \t \0
0015720 \0 j 360 h 360 264 006 S \t \0 \0 020 \0 ( 1 7
0015740 1 Q T E R P R I 1 5 7 Q P
0015760 O S I T I O N 1 4 0 Q / S E
0016000 T A T O M V A L 1 3 5 Q R E
0016020 M O V E 1 2 7 Q N A M E F I
0016040 E L D 1 0 4 Q D E L F I L E
0016060 1 0 1 Q F U L L N A M E 7
0016100 1 Q C L O S E F ? 6 3 Q C
0016120 L O S E F ? 5 5 Q C L O S E
0016140 F ? 3 3 Q D E L F I L E 3
0016160 0 Q F U L L N A M E 2 3 Q
0016200 C L O S E F ? 1 6 Q C O P Y
0016220 B Y T E S 1 3 Q G E T F I L
0016240 E P T R ) \r ( 1 3 2 Q N O T C
0016260 O M P I L E D F I L E S 1 2 2
0016300 Q N O T C O M P I L E D F I L
0016320 E S ) \r ( ) \r B L O C K : D 1
0016340 \r ( I 0 X F 0 B L O C
0016360 K S ) \0 \v \0 001 003 001 P @ h 032 \n \0
0016400 \0 c \0 020 \0 ( 6 \ N C O N C 2 )
0016420 \r N I L \r ( ) \r B R E C O M P I
0016440 L E A 0 0 0 1 A 0 0 0 2 D 1 \r
0016460 ( N A M E E R R O R S E T F
0016500 0 C F I L E F 1 F I L
0016520 E . C O M ) \0 030 \0 002 002 \0 P 265 003
0016540 Q g \0 \0 g \0 \0 h o \0 \0 \0 \r 005 \0 \0
0016560 c \0 i 020 \0 ( 2 2 Q O P E N S T
0016600 R E A M ) \r ( 1 1 Q O L D 6
0016620 I N P U T ) \r ( 1 6 Q ( (
0016640 T Y P E B I N A R Y ) ) ) \r B
0016660 R E C O M P I L E A 0 0 0 1 D
0016700 1 \r ( N A M E E R R O R S E T
0016720 P 5 1 Q B L O C K P 4
0016740 5 Q D E S C R P 4 4 Q F
0016760 N L S T P 4 3 Q D O N E L
0017000 S T P 4 2 Q V A R L S T
0017020 P 4 1 Q L D F L G P 4 0
0017040 Q F L P 3 4 Q X P 3
0017060 2 Q F I L E P 2 3 Q C O
0017100 R E O K P 2 2 Q R O O T S
0017120 P 2 1 Q S C R A T C H F I
0017140 L E P 2 0 Q A D R L S T
0017160 P 1 7 Q T E M P 1 6 Q
0017200 F I L E . C O M P 1 5 Q F
0017220 I L E P 1 4 Q B L O C K S
0017240 P 1 3 Q B L K F N S P
0017260 1 2 Q F N L S T P 1 1 Q
0017300 F I L E M A P L S T P 1 0 Q
0017320 F I R S T P 7 O T H E R
0017340 S P 6 C H A N G E S P
0017360 5 L O C A L V A R S P 4
0017400 S P E C V A R S P 3 B U I
0017420 L D M A P F L G P 2 N O F
0017440 I X V A R S L S T P 1 N O
0017460 F I X F N S L S T P 0 * P
0017500 A C K A G E * F 5 2 Q R E
0017520 S E T V A R S L S T F 5 3 Q
0017540 F I L E S F 5 4 Q F N S
0017560 F 5 5 Q C F I L E F 5
0017600 6 Q L C F I L F 5 7 Q N
0017620 O B L O C K S F L G F 6 0 Q
0017640 R E A D B U F F 6 1 Q *
0017660 I N T E R L I S P - P A C K A G
0017700 E * F 6 2 Q H E R A L D S
0017720 T R I N G F 6 3 Q N O F I
0017740 X F N S L S T F 6 4 Q N O
0017760 F I X V A R S L S T F 6 5 Q
0020000 M A K E S Y S D A T E F 6
0020020 6 Q R E S E T Y ) 005 312 * \r 002
0020040 \0 g \0 \0 d \t \0 \0 032 g \0 \0 ` \0 \0 \n
0020060 \0 \0 277 W T 032 c T 277 g \0 \0 d \t \0 \0
0020100 032 g \0 \0 ` \0 \0 \n \0 \0 277 W T 032 c T
0020120 277 g \0 \0 d \t \0 \0 032 g \0 \0 ` \0 \0 \n
0020140 \0 \0 277 W T 032 c T 277 g \0 \0 d \t \0 \0
0020160 032 g \0 \0 ` \0 \0 \n \0 \0 277 W T 032 c T
0020200 277 g \0 \0 d \t \0 \0 032 g \0 \0 ` \0 \0 \n
0020220 \0 \0 277 W T 032 c T 277 g \0 \0 d \t \0 \0
0020240 032 g \0 \0 \t \0 \0 277 W T 032 c T 277 W b
0020260 W f W h i d ` \0 \0 021 366 024 021 020 025 W
0020300 Z 250 W X 245 ` \0 \0 c X 277 g \0 \0 \b \0
0020320 \0 h 032 032 h 032 W T 032 c T 277 W V \t \0
0020340 \0 c V 021 A 032 O , 003 265 ` O . 022 _ 036
0020360 265 ? W V 001 \t \0 \0 _ 032 277 g \0 \0 O 032
0020400 g \0 \0 ` \0 \0 \f \0 \0 _ 034 277 W X g \0
0020420 \0 360 222 261 \0 352 o \0 \0 \0 \t \0 \0 262 V W
0020440 Z \t \0 \0 222 261 \0 342 W Z \t \0 \0 _ 036 i
0020460 \n \0 \0 277 o \0 \0 \0 i \n \0 \0 277 W ^ 242
0020500 261 004 206 g \0 \0 261 004 203 001 _ 4 \t \0 \0 263
0020520 024 O 4 _ 2 277 O 0 265 023 O 2 h 032 _ 0
0020540 _ . 277 O , 002 _ , 261 377 200 O 2 & _ 0
0020560 277 260 362 ` \0 \0 g \0 \0 W Z 265 004 O 034 o
0020600 \0 \0 \0 o \0 \0 \0 W V 001 \t \0 \0 o \0 \0
0020620 \0 h 032 032 032 032 032 \v \0 \0 g \0 \0 360 263 _
0020640 ` \0 \0 g \0 \0 o \0 \0 \0 021 0 030 W V 260
0020660 034 d 001 \t \0 \0 _ , 277 O . 265 \t O , h
0020700 032 _ 0 202 O , & _ . 277 002 003 265 345 O 0
0020720 022 032 \v \0 \0 g \0 \0 360 242 261 \0 210 W ` 001
0020740 d g \0 \0 360 253 d g \0 \0 360 245 d g \0 \0
0020760 360 225 277 W ` 002 c ` 277 \b \0 \0 277 g \0 \0
0021000 c X 277 h c Z 277 h o \0 \0 \0 \n \0 \0 277
0021020 O 034 g \0 \0 g \0 \0 h o \0 \0 \0 \r 005 \0
0021040 \0 c \ 277 ` \0 \0 g \0 \0 g \0 \0 \v \0 \0
0021060 _ " 277 g \0 \0 W Z W V O " h 032 032 032
0021100 032 h h 032 032 W T 032 c T 277 W V 021 021 034
0021120 O 6 003 265 # i 022 _ & 277 021 @ W V 261
0021140 \0 226 o \0 \0 \0 i \n \0 \0 277 i d \n \0 \0
0021160 c Z 277 261 376 243 001 _ 8 \t \0 \0 _ 036 g \0
0021200 \0 \n \0 \0 001 002 O 8 360 264 315 O 036 g \0 \0
0021220 \n \0 \0 001 002 d g \0 \0 360 243 d i 360 222 277
0021240 i 201 277 h 242 h 260 260 O 6 002 _ 6 260 245 d
0021260 001 _ @ 277 g \0 \0 g \0 \0 021 " $ O @ j
0021300 \n \0 \0 277 O @ \t \0 \0 277 O @ d d i \n
0021320 \0 \0 \n \0 \0 \t \0 \0 032 O F \t \0 \0 032 022
0021340 _ : 277 O < 265 \t O : h 032 _ > 202 O :
0021360 & _ < 277 002 003 265 271 O > 022 _ 022 277 021 0
0021400 030 O 022 260 b d 001 021 001 % 021 0 037 O J 001
0021420 002 260 < d 001 _ ( 277 021 0 ( O ( 002 260 031
0021440 d 001 001 _ L 277 O N 265 \t O L h 032 _ P
0021460 202 O L & _ N 277 002 003 265 347 O P 022 _ :
0021500 003 232 O < 265 ; O : _ > _ < 277 002 003 265
0021520 304 O > 022 022 _ , 003 232 O . 265 032 O , _
0021540 0 _ . 277 002 003 265 237 O 0 022 _ 024 277 021 0
0021560 030 O 022 260 2 \t \0 \0 _ . O , 031 260 346 \t
0021600 \0 \0 _ < O : 031 260 305 d 001 021 001 % O J
0021620 002 \t \0 \0 022 _ , 003 232 O . 265 D O , _
0021640 0 _ . 277 002 003 265 343 O 0 022 J \n \0 \0 272
0021660 ` \0 \0 ` \0 \0 ` \0 \0 O 024 I \n \0 \0 \n
0021700 \0 \0 \n \0 \0 \n \0 \0 271 W \ 242 261 \0 331 g
0021720 \0 \0 \b \0 \0 ` \0 \0 021 0 030 W V 260 & \t
0021740 \0 \0 _ . O , 031 260 274 d 001 \t \0 \0 _ ,
0021760 277 O . 265 \t O , h 032 _ 0 202 O , & _
0022000 . 277 002 003 265 345 O 0 022 032 ` \0 \0 W ^ 223
0022020 g \0 \0 202 g \0 \0 h 032 032 032 032 032 W X d
0022040 g \0 \0 360 227 277 g \0 \0 h 032 260 \ d g \0
0022060 \0 360 225 277 g \0 \0 260 025 d g \0 \0 360 243 d
0022100 i 360 224 277 g \0 \0 203 277 g \0 \0 021 0 030 O
0022120 024 260 ( d 001 021 001 034 O 8 W X \n \0 \0 022
0022140 262 030 d 001 _ , 277 O . 265 \t O , h 032 _
0022160 0 202 O , & _ . 277 002 003 265 331 O 0 022 265
0022200 \a g \0 \0 h 032 032 g \0 \0 W d g \0 \0 W
0022220 j h 032 032 032 032 \n \0 \0 \n \0 \0 W \ ` \0
0022240 \0 \v \0 \0 277 O 024 217 d 001 021 001 034 O 8 d
0022260 \t \0 \0 \n \0 \0 023 002 003 265 357 O " 262 ( O
0022300 016 260 023 d 001 021 001 034 O 8 O " ` \0 \0 \v
0022320 \0 \0 023 002 003 265 356 h O " ` \0 \0 \v \0 \0
0022340 277 h _ 016 277 O 020 260 023 d 001 021 001 034 O 8
0022360 W \ ` \0 \0 \v \0 \0 023 002 003 265 356 ` \0 \0
0022400 263 $ O 032 g \0 \0 \n \0 \0 _ * g \0 \0 360
0022420 265 020 O * 003 264 \v g \0 \0 O * 034 264 003 i
0022440 027 \0 \0 277 W X g \0 \0 360 245 W Z \t \0 \0
0022460 277 W ^ 263 H O 030 260 A d 001 021 001 ) O R
0022500 d 001 263 O 022 \n \0 \0 260 - d 001 021 001 034
0022520 O 8 004 l 004 360 264 \t O 8 W X \n \0 \0 022
0022540 244 002 003 265 350 h 231 O R O 022 O & \v \0 \0
0022560 204 O R \t \0 \0 023 002 003 265 300 O 024 260 ? d
0022600 001 021 001 034 O 8 O 026 034 263 1 O 8 ` \0 \0
0022620 034 263 ) O 8 W X \n \0 \0 262 031 O 8 d O
0022640 022 O & \v \0 \0 _ 036 002 001 O 036 002 002 001 \v
0022660 \0 \0 205 O 8 i \n \0 \0 277 023 002 003 265 302 W
0022700 \ \t \0 \0 260 g \0 \0 i \n \0 \0 277 o \0
0022720 \0 \0 i \n \0 \0 277 i \t \0 \0 277 W V h W
0022740 ^ \v \0 \0 022 022 c l i 020 \0 ( 2 7 0 2
0022760 Q B C O M P L . B O D Y 2 6
0023000 7 1 Q T E R P R I 2 6 6 4 Q
0023020 P R I N 1 2 6 5 3 Q P R I
0023040 N 1 2 6 4 2 Q F U L L N A M
0023060 E 2 6 2 7 Q B R E C O M P I
0023100 L E 1 2 6 2 0 Q C O M P I L
0023120 E 1 2 6 0 4 Q B R E C O M P
0023140 I L E 3 2 5 7 0 Q R E C O M
0023160 P ? 2 5 2 4 Q B R E C O M P
0023200 I L E 1 2 5 1 6 Q B C O M P
0023220 L 2 2 4 7 5 Q R E C O M P ?
0023240 2 4 4 7 Q B C O M P L 2 2
0023260 4 1 6 Q I N P U T 2 3 5 0 Q
0023300 G E T P R O P 2 3 2 6 Q P
0023320 R I N T 2 2 7 6 Q P R I N T
0023340 2 2 6 0 Q P R I N T 2 2 2
0023360 4 Q R C O M P 3 2 2 2 1 Q
0023400 V I R G I N F N 2 2 0 2 Q P
0023420 R I N T 2 1 7 2 Q \ N C O N
0023440 C 2 2 1 6 7 Q \ N C O N C 2
0023460 2 0 7 5 Q R E C O M P ? 1
0023500 7 1 4 Q F U L L N A M E 1 7
0023520 0 0 Q L A S T 1 6 6 3 Q D
0023540 A T E 1 6 4 6 Q \ A P P E N
0023560 D 2 1 6 4 3 Q \ A P P E N D
0023600 2 1 6 4 0 Q \ A P P E N D 2
0023620 1 6 3 5 Q \ A P P E N D 2
0023640 1 6 1 5 Q \ N C O N C 2 1 5
0023660 6 2 Q B C O M P L 1 1 5 4 0
0023700 Q L A S T 1 5 2 6 Q L A S
0023720 T 1 2 7 4 Q D R E V E R S E
0023740 1 2 6 6 Q L O A D F N S C A
0023760 N 1 2 6 3 Q G E T F I L E M
0024000 A P 1 2 6 0 Q N A M E F I E
0024020 L D 1 2 4 7 Q I N P U T 1
0024040 2 4 1 Q S E T F I L E P T R
0024060 1 1 6 1 Q G E T P R O P 1 1
0024100 4 2 Q G E T P R O P 1 1 3 2
0024120 Q R O O T F I L E N A M E 1
0024140 1 1 6 Q R E A D 1 1 1 0 Q
0024160 P R I N 1 1 0 1 6 Q O P E N
0024200 S T R E A M 7 7 7 Q O P E N
0024220 S T R E A M 7 5 5 Q C O M P
0024240 S E T 7 3 2 Q E R R O R !
0024260 6 6 3 Q A S K U S E R 6 2 4
0024300 Q F U L L N A M E 5 7 0 Q
0024320 A S K U S E R 5 5 3 Q F U L
0024340 L N A M E 4 5 5 Q R A N D A
0024360 C C E S S P 4 3 2 Q P R I N
0024400 1 4 2 1 Q P R I N 1 4 1 3
0024420 Q C L O S E F 4 0 2 Q R A
0024440 N D A C C E S S P 3 7 3 Q B
0024460 R E C O M P I L E A 0 0 0 1 A 0
0024500 0 0 2 3 4 7 Q P A C K F I L
0024520 E N A M E 3 2 6 Q N A M E F
0024540 I E L D 2 7 7 Q R E S E T O
0024560 P E N F I L E S 2 5 7 Q I N
0024600 P U T 2 0 5 Q S E T T O P V
0024620 A L 1 7 6 Q G E T T O P V A
0024640 L 1 6 0 Q S E T T O P V A L
0024660 1 4 6 Q G E T T O P V A L
0024700 1 3 0 Q S E T T O P V A L 1
0024720 1 6 Q G E T T O P V A L 1 0
0024740 0 Q S E T T O P V A L 6 6 Q
0024760 G E T T O P V A L 5 0 Q S
0025000 E T T O P V A L 3 6 Q G E T
0025020 T O P V A L 2 0 Q S E T T O
0025040 P V A L 6 G E T T O P V A L
0025060 ) \r ( 2 6 4 7 Q B C O M P L
0025100 2 5 5 6 Q D O N T C O M P I L
0025120 E F N S 2 4 0 7 Q A L L 2
0025140 4 0 1 Q D W I M I F Y C O M P
0025160 F L G 2 3 7 0 Q C L I S P
0025200 2 3 5 5 Q C L I S P 2 3 4 5
0025220 Q F I L E T Y P E 2 3 3 6 Q
0025240 D W I M I F Y C O M P F L G
0025260 2 3 2 3 Q F I L E R D T B L
0025300 2 2 7 3 Q F I L E R D T B L
0025320 2 2 5 5 Q F I L E R D T B L
0025340 2 1 7 7 Q F I L E R D T B L
0025360 2 1 5 5 Q d a t e d 2 1 5 0
0025400 Q i n 2 1 4 2 Q n o t h i
0025420 n g 2 0 5 2 Q e x p l i c i
0025440 t l y : 2 0 4 5 Q e x p r s
0025460 : 2 0 3 3 Q E X P R S 2 0
0025500 2 5 Q c h a n g e s : 2 0 1
0025520 7 Q C H A N G E S 2 0 0 7 Q
0025540 A L L 2 0 0 1 Q A L L 1
0025560 7 6 5 Q b r e c o m p i l e d
0025600 1 7 6 1 Q r e c o m p i l e
0025620 d 1 7 5 3 Q C O M P V E R S
0025640 I O N 1 6 6 6 Q C O M P I L
0025660 E H E A D E R 1 6 6 0 Q F I
0025700 L E C R E A T E D 1 6 2 7 Q
0025720 L A M S 1 6 2 4 Q N L A M L
0025740 1 6 2 1 Q N L A M A 1 2 3
0025760 0 Q C O M P I L I N G 1 2 2
0026000 5 Q E X P R E S S I O N S 1
0026020 1 6 7 Q L O A D F N S 1 1 5
0026040 6 Q F I L E 1 1 3 7 Q F I
0026060 L E D A T E S 1 0 2 4 Q B C
0026100 O M P L 3 1 0 1 3 Q N E W
0026120 1 0 1 0 Q B O T H 1 0 0 5 Q
0026140 B C O M P L . S C R A T C H
0026160 7 6 6 Q N E W 7 6 3 Q O U
0026200 T P U T 7 3 6 Q A L L 7 1
0026220 6 Q S T F 7 1 0 Q F 7 0
0026240 2 Q S T 6 6 6 Q Y 6 0 4
0026260 Q Y 6 0 1 Q D W I M W A I
0026300 T 5 7 3 Q Y 5 2 7 Q Y
0026320 5 2 4 Q D W I M W A I T 4 4
0026340 4 Q T C O M P L 3 5 7 Q A
0026360 L L 3 4 4 Q C O M P I L E .
0026400 E X T 3 4 1 Q E X T E N S I
0026420 O N 3 3 4 Q N A M E 2 5 4
0026440 Q I N P U T 2 4 6 Q R E C
0026460 O M P I L E D E F A U L T 2 2
0026500 7 Q S Y S L O C A L V A R S
0026520 2 0 2 Q E X P R S L S T 1 7
0026540 2 Q E X P R S L S T 1 5 5 Q
0026560 D W I M I F Y C O M P F L G
0026600 1 5 2 Q D W I M I F Y C O M P
0026620 F L G 1 4 2 Q D W I M I F Y
0026640 C O M P F L G 1 2 5 Q L A M
0026660 A 1 2 2 Q L A M A 1 1 2 Q
0026700 L A M A 7 5 Q L A M S 7
0026720 2 Q L A M S 6 2 Q L A M S
0026740 4 5 Q N L A M L 4 2 Q N
0026760 L A M L 3 2 Q N L A M L 1
0027000 5 Q N L A M A 1 2 Q N L A
0027020 M A 2 N L A M A ) \r ( 2 6
0027040 6 0 Q " i n s t e a d . "
0027060 1 1 0 4 Q " F i l e t o u
0027100 s e f o r C F I L E ( s o
0027120 u r c e o f c o m p i l e d
0027140 d e f i n i t i o n s n o t
0027160 b e i n g r e c o m p i l e
0027200 d ) : " \r 7 7 3 Q ( ( T Y
0027220 P E B I N A R Y ) ) 7 5 2 Q
0027240 ( S T % \r ) 6 1 0 Q "
0027260 J u s t f o r g e t a b o u
0027300 t c o m p i l i n g " 5 5 7
0027320 Q " i n s t e a d " 5 4 5 Q
0027340 " c o m p i l e a l l f
0027360 u n c t i o n s o n " 5 4
0027400 1 Q " n o t f o u n d ; " \r
0027420 4 2 6 Q " n o t R A N D
0027440 A C C E S S P , u s i n g "
0027460 3 7 0 Q ( B R E C O M P I L
0027500 E A 0 0 0 1 A 0 0 0 2 ) ) \r B R
0027520 E C O M P I L E D 1 \r ( P 2
0027540 R E S E T Z P 1 R E S E
0027560 T Y P 0 L I S P X H I S T
0027600 I 3 N O B L O C K S F L G
0027620 I 2 F N S I 1 C F I
0027640 L E I 0 F I L E S F 3
0027660 L I S P X H I S T F 4 R
0027700 E S E T V A R S L S T ) \0 " 003
0027720 002 \0 004 S 021 ! 002 T o \0 \0 \0 g \0 \0 \n
0027740 \0 \0 221 h 202 g \0 \0 Z \n \0 \0 J 223 \b \0
0027760 \0 020 I 020 \0 ( 3 5 Q E R R O R !
0030000 3 0 Q R E S E T R E S T O R
0030020 E 1 6 Q B R E C O M P I L E
0030040 A 0 0 0 1 ) \r ( 2 4 Q E R R O
0030060 R 1 3 Q I N T E R N A L ) \r
0030100 ( 1 0 Q ( B R E C O M P I L
0030120 E A 0 0 0 1 ) ) \r B R E C O M P
0030140 I L E 1 D 1 \r ( P 7 Y P
0030160 6 X P 5 A D R P 4
0030200 X P 3 A D R L S T 0 P
0030220 2 N A M E P 1 X P
0030240 0 L S T I 1 N O B L O C
0030260 K S F L G I 0 F N / B L O
0030300 C K F 1 0 Q C F I L E F
0030320 1 1 Q B L K F N S F 1 2
0030340 Q A D R L S T F 1 3 Q C
0030360 O U T F I L E F 1 4 Q F I
0030400 L E M A P L S T F 1 5 Q L
0030420 C F I L ) 001 303 \b 006 \0 002 A 247 ` \0
0030440 \0 265 \b A 262 n @ 260 m g \0 \0 360 263 366 g
0030460 \0 \0 @ 026 002 g \0 \0 @ 026 002 g \0 \0 @ 026
0030500 002 g \0 \0 @ 026 002 003 @ 001 h 032 \n \0 \0 \n
0030520 \0 \0 \n \0 \0 \n \0 \0 021 001 \0 @ 260 0 d 001
0030540 021 001 001 I 004 l 004 360 262 # I W 022 032 c 022
0030560 277 I d H \n \0 \0 255 277 g \0 \0 @ 001 g \0
0030600 \0 I \f \0 \0 Y i \n \0 \0 277 023 002 003 265 320
0030620 h 020 @ 001 W 024 021 " 005 W 020 \t \0 \0 275 W
0030640 020 ` \0 \0 \n \0 \0 \ d 224 3 \b 262 355 L J
0030660 360 250 L J \n \0 \0 242 261 \0 244 L W 026 i \v
0030700 \0 \0 277 o \0 \0 \0 W 026 \n \0 \0 277 W 032 \t
0030720 \0 \0 277 L i \n \0 \0 277 L J 360 262 275 A 263
0030740 { L W 022 032 c 022 277 @ 260 m d 001 021 001 001
0030760 I d 223 3 \b 230 I W 022 032 c 022 277 260 X I
0031000 001 g \0 \0 360 262 P I 260 I d 001 021 001 006 N
0031020 J 360 263 > W 020 \t \0 \0 275 W 020 ` \0 \0 \n
0031040 \0 \0 N 360 263 024 N o \0 \0 \0 032 \t \0 \0 277
0031060 W 020 M \n \0 \0 260 031 N W 026 i \v \0 \0 277
0031100 o \0 \0 \0 W 026 \n \0 \0 277 N i \n \0 \0 277
0031120 023 002 003 265 267 023 002 003 265 223 h 020 K W 024 360
0031140 262 : W 024 260 0 d 001 021 001 \a O 016 001 J 360
0031160 250 O 016 001 J \n \0 \0 264 031 W 020 O 016 002 \n
0031200 \0 \0 277 @ A \n \0 \0 277 W 020 M \n \0 \0 277
0031220 i 022 244 002 003 265 321 h 263 302 L 226 L g \0 \0
0031240 360 262 ( J W 030 \n \0 \0 \ 233 J L 002 001 L
0031260 002 002 001 \v \0 \0 210 J o \0 \0 \0 032 \t \0 \0
0031300 277 W 020 M \n \0 \0 h 020 W 024 L M 032 h 032
0031320 \n \0 \0 c 024 277 L \t \0 \0 277 261 376 276 \0 (
0031340 6 7 5 Q L C S K I P 6 6 6 Q
0031360 \ N C O N C 2 6 5 2 Q S E
0031400 T F I L E P T R 6 4 3 Q C O
0031420 M P E M 6 3 1 Q C O M P I L
0031440 E 1 6 1 4 Q B R E C O M P I
0031460 L E 3 5 6 2 Q S E T F I L E
0031500 P T R 5 5 3 Q B R E C O M P
0031520 I L E 1 5 4 5 Q S E T F I L
0031540 E P T R 5 3 3 Q B R E C O M
0031560 P I L E 2 4 6 2 Q L C S K I
0031600 P 4 5 4 Q P R I N 1 4 4 2
0031620 Q P R I N 2 4 3 1 Q S E T
0031640 F I L E P T R 4 2 2 Q C O M
0031660 P E M 4 0 5 Q R E A D 3 7
0031700 4 Q G E T F I L E P T R 2 7
0031720 3 Q L C S K I P 2 6 5 Q O
0031740 U T P U T 2 5 7 Q P R I N 1
0031760 2 4 5 Q P R I N 2 2 3 2 Q
0032000 B R E C O M P I L E 2 2 1 2
0032020 Q R E A D 2 0 1 Q G E T F
0032040 I L E P T R 1 5 5 Q B R E C
0032060 O M P I L E 1 1 5 0 Q P A C
0032100 K * 1 3 2 Q M E M B 7 3 Q
0032120 \ A P P E N D 2 7 0 Q \ A
0032140 P P E N D 2 6 5 Q \ A P P E
0032160 N D 2 6 2 Q \ A P P E N D 2
0032200 ) \r ( 6 0 3 Q S T O P 4 0 2
0032220 Q F I L E R D T B L 3 4 7 Q
0032240 E N T R I E S 2 0 7 Q F I
0032260 L E R D T B L 1 4 4 Q / 1
0032300 3 7 Q \ 4 7 Q N O L I N K
0032320 F N S 4 1 Q B L K A P P L Y
0032340 F N S 3 3 Q R E T F N S 2
0032360 5 Q E N T R I E S 1 7 Q N
0032400 O B L O C K 4 B Y T E C O M
0032420 P F L G ) \r ( 6 3 7 Q ( n o
0032440 t f o u n d ) 4 4 7 Q " ,
0032460 " 4 1 6 Q ( n o t f o u
0032500 n d ) 2 5 2 Q " , " ) \r B
0032520 R E C O M P I L E 2 D 1 \r ( P
0032540 1 N P 0 N X I 1
0032560 F N I 0 X ) \0 e 005 \0 \0 002
0032600 A @ k h i \r 005 \0 \0 264 X @ \t \0 \0 k
0032620 330 A \t \0 \0 k 330 021 2 004 I l 005 330 H 361
0032640 263 B @ I \n \0 \0 l A 360 264 9 l 004 k 274
0032660 273 L K 363 263 @ I k 324 Y \n \0 \0 272 l
0032700 0 J 361 h 360 264 036 J l 9 361 221 h 206 L k
0032720 324 \ 260 340 i 264 016 I k 324 Y d H 360 262 275
0032740 i 020 h 020 \0 ( 7 5 Q N T H C H A
0032760 R C O D E 4 6 Q N T H C H A
0033000 R C O D E 2 4 Q N C H A R S
0033020 1 6 Q N C H A R S 1 0 Q
0033040 S T R P O S ) \r N I L \r ( ) \r B
0033060 R E C O M P I L E 3 D 1 \r ( P
0033100 5 Y P 3 X P 1 F
0033120 I L E P 0 D E F I 2
0033140 C O R E O K I 1 F I L E M
0033160 A P L S T I 0 F N ) \0 z
0033200 006 \0 \0 003 021 001 B 262 024 @ i \n \0 \0 X
0033220 \t \0 \0 227 @ H i h 032 032 032 020 A 021 021 003
0033240 J 003 265 ( h 022 264 # I H 002 001 \n \0 \0 I
0033260 ` \0 \0 \n \0 \0 X @ H 001 360 253 o \0 \0 \0
0033300 I \t \0 \0 i \v \0 \0 H 020 001 [ 001 001 271 K
0033320 001 002 002 021 021 005 L 003 265 \f h 022 262 034 K 265
0033340 306 i 260 303 001 275 @ M 002 002 026 X 225 M 265 355
0033360 i 260 352 L 002 \ 260 341 J 002 Z 260 246 \0 ( 1
0033400 0 3 Q E R R O R 7 7 Q F U
0033420 L L N A M E 6 1 Q R E A D
0033440 5 2 Q S E T F I L E P T R 1
0033460 6 Q E X P R P 1 2 Q V I R
0033500 G I N F N ) \r ( 5 6 Q F I L E
0033520 R D T B L ) \r ( 7 3 Q " f i
0033540 l e m a p d o e s n o t a
0033560 g r e e w i t h c o n t e n
0033600 t s o f " ) \r B L O C K C O M
0033620 P I L E A 0 0 0 1 A 0 0 0 2 D
0033640 1 \r ( N A M E E R R O R S E T
0033660 P 1 S P E C V A R S P
0033700 0 L O C A L V A R S F 2
0033720 B L K N A M E F 3 B L K F
0033740 N S F 4 L C F I L F 5
0033760 E N T R I E S F 6 F L G
0034000 F 7 L S T F I L ) \0 \ 002
0034020 006 002 \0 h 027 \0 \0 277 i ` \0 \0 021 002 001 R
0034040 003 262 030 S 251 U 247 R c 006 001 c 004 260 023 o
0034060 \0 \0 \0 R i \v \0 \0 206 S 245 R h 032 c 006
0034100 277 \b \0 \0 277 R S U \v \0 \0 V 263 030 T 235
0034120 h T ` \0 \0 \v \0 \0 277 T \t \0 \0 277 V 243
0034140 W 016 265 006 022 h 032 020 \t \0 \0 277 260 370 \0 (
0034160 1 2 7 Q C L O S E F 1 1 1 Q
0034200 C L O S E F 1 0 4 Q P R I
0034220 N T 6 7 Q B L O C K C O M P
0034240 I L E 1 6 0 Q C O M P S E T
0034260 4 4 Q E R R O R ) \r ( 1 0 1
0034300 Q F I L E R D T B L 1 0 Q
0034320 S Y S S P E C V A R S 3 E X
0034340 P R S L S T ) \r ( 3 7 Q " b
0034360 l o c k n a m e n o t a t
0034400 o m i c " ) \r B L O C K C O M P
0034420 I L E A 0 0 0 1 D 1 \r ( N A M
0034440 E E R R O R S E T P 1 M
0034460 A C R O Y P 0 M A C R O X
0034500 F 2 R E S E T V A R S L S
0034520 T F 3 N O F I X F N S L S
0034540 T F 4 N O F I X V A R S L
0034560 S T F 5 R E S E T Y ) \0
0034600 277 002 004 002 \0 g \0 \0 d \t \0 \0 032 g \0 \0
0034620 ` \0 \0 \n \0 \0 277 R 032 c 004 277 g \0 \0 d
0034640 \t \0 \0 032 g \0 \0 ` \0 \0 \n \0 \0 277 R 032
0034660 c 004 277 g \0 \0 d \t \0 \0 032 g \0 \0 ` \0
0034700 \0 \n \0 \0 277 R 032 c 004 277 g \0 \0 d \t \0
0034720 \0 032 g \0 \0 ` \0 \0 \n \0 \0 277 R 032 c 004
0034740 277 g \0 \0 S 032 g \0 \0 T 032 g \0 \0 ` \0
0034760 \0 032 R 032 032 032 c 004 021 021 001 R 271 o \0 \0
0035000 \0 g \0 \0 \n \0 \0 H 001 002 c 006 277 H 002 X
0035020 001 002 c \b 277 H 002 X 001 002 027 \0 \0 277 I d
0035040 R 360 225 277 H 002 c 004 215 R \n \0 \0 231 R k
0035060 I \v \0 \0 H 002 031 277 265 005 \b \0 \0 022 001 c
0035100 \n i 020 \0 ( 2 6 7 Q E R R O R !
0035120 2 5 6 Q N L E F T 2 4 7 Q
0035140 T A I L P 2 0 1 Q B L O C
0035160 K C O M P I L E A 0 0 0 1 A 0 0
0035200 0 2 1 2 5 Q S E T T O P V A
0035220 L 1 1 3 Q G E T T O P V A L
0035240 7 6 Q S E T T O P V A L 6
0035260 4 Q G E T T O P V A L 4 7 Q
0035300 S E T T O P V A L 3 5 Q G
0035320 E T T O P V A L 2 0 Q S E T
0035340 T O P V A L 6 G E T T O P V
0035360 A L ) \r ( 2 2 7 Q E X P R S L
0035400 S T 1 7 6 Q I N T E R N A L
0035420 1 5 3 Q E X P R S L S T 1
0035440 5 0 Q E X P R S L S T 1 4 3
0035460 Q N O F I X V A R S L S T 1
0035500 3 6 Q N O F I X F N S L S T
0035520 1 2 2 Q L A M A 1 1 7 Q L
0035540 A M A 1 0 7 Q L A M A 7 3
0035560 Q L A M S 7 0 Q L A M S
0035600 6 0 Q L A M S 4 4 Q N L A
0035620 M L 4 1 Q N L A M L 3 1 Q
0035640 N L A M L 1 5 Q N L A M A
0035660 1 2 Q N L A M A 2 N L A
0035700 M A ) \r ( 1 7 3 Q ( B L O C
0035720 K C O M P I L E A 0 0 0 1 A 0 0
0035740 0 2 ) ) \r B L O C K C O M P I L
0035760 E D 1 \r ( P 2 R E S E T Z
0036000 P 1 R E S E T Y P 0
0036020 L I S P X H I S T I 3 F L
0036040 G I 2 E N T R I E S I
0036060 1 B L K F N S I 0 B L K
0036100 N A M E F 3 L I S P X H I
0036120 S T F 4 R E S E T V A R S
0036140 L S T ) \0 " 003 002 \0 004 S 021 ! 002 T
0036160 o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0
0036200 Z \n \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 3 5
0036220 Q E R R O R ! 3 0 Q R E S
0036240 E T R E S T O R E 1 6 Q B L
0036260 O C K C O M P I L E A 0 0 0 1 )
0036300 \r ( 2 4 Q E R R O R 1 3 Q
0036320 I N T E R N A L ) \r ( 1 0 Q
0036340 ( B L O C K C O M P I L E A 0 0
0036360 0 1 ) ) \r B L O C K C O M P I L
0036400 E 1 D 1 \r ( P 1 2 Q X P
0036420 1 0 Q T E M P 7 C A L
0036440 L T A G S P 6 C O R E F L
0036460 G P 5 D E F P 4 F N
0036500 P 3 N E W D E F P 2
0036520 B L O C K L I S T P 1 F R
0036540 E E V A R S P 0 T A G N U
0036560 M I 2 E N T R I E S I
0036600 1 B L K F N S I 0 B L K
0036620 N A M E F 1 6 Q B L K A P
0036640 P L Y F N S F 1 7 Q C O U
0036660 T F I L E F 2 0 Q F R E E
0036700 V A R S F 2 1 Q S T R F )
0036720 001 s 016 004 \0 003 m 377 W 021 202 \t @ B
0036740 001 360 233 B d 002 250 277 W 034 243 h b 004 200 B
0036760 251 W 034 264 \n @ h 032 b 004 277 W 034 B 265 005
0037000 @ h 032 \n \0 \0 260 032 d 001 021 001 \n O 024 A
0037020 \n \0 \0 h 360 264 \b O 024 A 026 h 360 022 244 002
0037040 003 265 347 h _ 020 265 026 @ B \n \0 \0 262 ' @
0037060 o \0 \0 \0 B 002 237 o \0 \0 \0 216 001 o \0 \0
0037100 \0 032 \t \0 \0 h 020 o \0 \0 \0 \n \0 \0 032 \t
0037120 \0 \0 h 020 W 036 \t \0 \0 j 360 245 W 036 \t \0
0037140 \0 277 A 003 264 V A 001 _ 020 d 003 234 001 274 O
0037160 020 002 001 275 O 020 002 002 001 215 i \n \0 \0 ] \t
0037200 \0 \0 262 , O 020 274 i 276 L J 032 272 O 016 L
0037220 H k 331 X L M N \v \0 \0 N h 032 032 032 032
0037240 h 032 \n \0 \0 _ 016 277 A 002 b 002 260 267 O 020
0037260 o \0 \0 \0 032 \t \0 \0 h 020 b 002 277 021 0 \r
0037300 O 016 260 # d 001 _ 022 001 O 022 002 002 002 001 032
0037320 _ 026 277 O 030 265 \t O 026 h 032 _ 032 202 O 026
0037340 & _ 030 277 002 003 265 336 O 032 022 276 ` \0 \0 227
0037360 @ O 016 B \v \0 \0 206 @ O 016 B \v \0 \0 _
0037400 020 277 W " 262 ? @ ` \0 \0 034 250 @ ` \0 \0
0037420 032 027 \0 \0 277 N 260 * d 001 021 001 \n O 024 001
0037440 \t \0 \0 262 033 O 024 001 \t \0 \0 277 O 024 001 \t
0037460 \0 \0 277 O 024 001 ` \0 \0 032 027 \0 \0 277 023 002
0037500 003 265 327 O 020 265 003 @ 020 \0 ( 5 3 2 Q
0037520 / P U T D 5 2 3 Q S A V E D
0037540 E F 5 1 3 Q E X P R P 4 4
0037560 7 Q B L O C K C O M P I L E 2
0037600 4 3 7 Q B Y T E B L O C K C
0037620 O M P I L E 2 3 4 0 Q C O M
0037640 P E M 3 1 5 Q \ N C O N C 2
0037660 3 0 2 Q C O M P I L E 1 A
0037700 2 5 2 Q E X P R P 2 4 6 Q
0037720 V I R G I N F N 2 1 1 Q T E
0037740 R P R I 2 0 1 Q P O S I T I
0037760 O N 1 7 2 Q C O M P E M 1
0040000 6 6 Q \ A P P E N D 2 1 5 5
0040020 Q C O M P E M 1 2 5 Q M E
0040040 M B 7 3 Q M E M B 5 6 Q
0040060 \ A P P E N D 2 ) \r ( 5 4 5 Q
0040100 E X P R S L S T 5 4 1 Q E X
0040120 P R S L S T 4 7 4 Q L I N K
0040140 E D F N S 4 7 0 Q L I N K E
0040160 D F N S 4 6 2 Q L I N K E D
0040200 F N S 4 2 7 Q B Y T E C O M
0040220 P F L G ) \r ( 3 3 4 Q ( n o
0040240 t c o m p i l e a b l e ) 1
0040260 6 3 Q ( w h e n t h e r e
0040300 a r e a l s o B L K A P P L
0040320 Y F N S ) 1 5 1 Q ( n o t
0040340 o n B L K F N S ) 1 4 3 Q
0040360 ( s i n c e t h e r e i s
0040400 m o r e t h a n o n e e n
0040420 t r y ) \r 1 3 4 Q ( c a n '
0040440 t b e b o t h a n e n t
0040460 r y a n d t h e b l o c k
0040500 n a m e ) ) \r C O M P S E T
0040520 D 1 \r ( P 0 O L D O I 1
0040540 F L G I 0 F I L E F
0040560 1 L S T F I L F 2 L A P
0040600 F L G F 3 L C F I L F
0040620 4 S T R F F 5 S V F L G
0040640 F 6 L S T F I L 1 ) 001 2
0040660 001 006 \0 002 021 020 \0 @ 265 003 202 261 \0 375 o \0
0040700 \0 \0 ` \0 \0 A 265 006 o \0 \0 \0 \v \0 \0 b
0040720 \0 d g \0 \0 360 262 036 277 R 264 003 202 261 \0 264
0040740 o \0 \0 \0 i \n \0 \0 277 \b \0 \0 \t \0 \0 c
0040760 002 277 260 z g \0 \0 360 247 @ d g \0 \0 360 237
0041000 277 h c 004 277 i c \b 277 @ g \0 \0 360 260 [
0041020 g \0 \0 360 230 h c 004 c \b c \n 260 Q @ \t
0041040 \0 \0 c 004 262 . @ g \0 \0 360 263 023 @ g \0
0041060 \0 360 252 @ k 360 246 @ d l 002 360 236 277 o \0
0041100 \0 \0 i \n \0 \0 277 \b \0 \0 b \0 \t \0 \0 c
0041120 002 277 o \0 \0 \0 \t \0 \0 \t \0 \0 c \b 234 o
0041140 \0 \0 \0 \t \0 \0 \t \0 \0 c \n 277 R 264 $ Q
0041160 i 360 263 036 Q g \0 \0 \n \0 \0 263 025 Q g \0
0041200 \0 g \0 \0 h o \0 \0 \0 \r 005 \0 \0 c 002 200
0041220 h c \f 277 A 263 o \0 \0 \0 h o \0 \0 \0
0041240 \v \0 \0 \t \0 \0 264 020 o \0 \0 \0 i \n \0 \0
0041260 277 \b \0 \0 200 h b \0 \t \0 \0 c 006 265 006 g
0041300 \0 \0 020 i 360 263 372 S g \0 \0 \n \0 \0 265 022
0041320 S g \0 \0 g \0 \0 h o \0 \0 \0 \r 005 \0 \0
0041340 c 006 277 260 334 \0 ( 4 5 3 Q O P E N
0041360 S T R E A M 4 3 1 Q O P E N
0041400 P 4 0 6 Q C O M P S E T F
0041420 3 7 7 Q C O M P S E T R E A D
0041440 3 7 3 Q P R I N 1 3 6 1 Q
0041460 C O M P S E T Y 3 5 6 Q C
0041500 O M P S E T R E A D 3 3 0 Q
0041520 O P E N F I L E 3 0 6 Q O P
0041540 E N P 2 6 4 Q C O M P S E T
0041560 Y 2 6 1 Q C O M P S E T R E
0041600 A D 2 4 7 Q C O M P S E T Y
0041620 2 4 4 Q C O M P S E T R E A
0041640 D 2 3 2 Q C O M P S E T F
0041660 2 2 5 Q C O M P S E T R E A D
0041700 2 2 1 Q P R I N 1 1 5 5 Q
0041720 C O M P S E T Y 7 2 Q C O
0041740 M P S E T F 6 7 Q C O M P S
0041760 E T R E A D 6 3 Q P R I N 1
0042000 3 2 Q C O M P S E T R E A D
0042020 ) \r ( 4 4 2 Q N E W 4 3 7 Q
0042040 O U T P U T 4 2 6 Q O U T
0042060 P U T 4 1 5 Q D O N E 3 1
0042100 7 Q N E W 3 1 4 Q O U T P
0042120 U T 3 0 3 Q O U T P U T 1
0042140 7 4 Q Y E S 1 6 5 Q Y 1
0042160 3 6 Q F 1 3 0 Q S T 1 1
0042200 1 Q S T F 1 0 2 Q S T 4
0042220 0 Q S 2 0 Q C O M P S E T
0042240 K E Y L S T ) \r ( 4 4 7 Q (
0042260 ( T Y P E B I N A R Y ) ) 3
0042300 6 7 Q " f i l e n a m e :
0042320 " 3 5 3 Q ( N % \r ) 3 4
0042340 6 Q " o u t p u t f i l e ?
0042360 " 3 2 4 Q ( ( T Y P E T
0042400 E X T ) ) 2 5 6 Q " s a v e
0042420 e x p r s ? " 2 4 1 Q "
0042440 r e d e f i n e ? " 2 1 5 Q
0042460 " f i l e : " 5 7 Q " f
0042500 i l e : " \r 2 7 Q ( S T
0042520 % \r ) 1 5 Q " l i s t i n
0042540 g ? " ) \r C O M P S E T R E A
0042560 D D 1 \r ( P 0 X I 2
0042600 D E F A U L T I 1 K E Y L
0042620 S T I 0 M E S S F 1
0042640 R E A D B U F ) \0 q 001 001 \0 003 021
0042660 020 \0 ` \0 \0 233 Q 226 Q \t \0 \0 c 002 242 @
0042700 263 $ @ 225 @ i \n \0 \0 277 i \t \0 \0 270 `
0042720 \0 \0 263 * i \t \0 \0 g \0 \0 360 262 i \t
0042740 \0 \0 260 031 h 027 \0 \0 277 ` \0 \0 B @ A 265
0042760 005 ` \0 \0 i d \r 006 \0 \0 X 277 ` \0 \0 241
0043000 H 020 ` \0 \0 226 H i d \v \0 \0 020 ` \0 \0
0043020 001 001 001 ` \0 \0 H h 032 032 \n \0 \0 H 020 \0
0043040 ( 1 5 5 Q \ N C O N C 2 1 3
0043060 4 Q P R I N T 1 1 2 Q A S
0043100 K U S E R 6 2 Q R E A D C
0043120 5 0 Q P E E K C 3 6 Q L I
0043140 S P X R E A D 3 1 Q P R I N
0043160 1 1 4 Q L I S P X R E A D B
0043200 U F ) \r ( 1 4 6 Q H I S T S T
0043220 R 0 1 4 0 Q L I S P X H I S
0043240 T O R Y 1 2 5 Q R E R E A D
0043260 F L G 1 1 7 Q L I S P X H I
0043300 S T O R Y 1 0 4 Q C O M P S
0043320 E T D E F A U L T K E Y L S T
0043340 7 4 Q D W I M W A I T 7 0 Q
0043360 R E R E A D F L G 5 3 Q %
0043400 \r 4 2 Q R E R E A D F L G
0043420 5 D W I M F L G ) \r ( ) \r C O
0043440 M P S E T Y D 1 \r ( L ( 0
0043460 A ) ) \0 036 \0 \0 \0 001 @ g \0 \0 360 246
0043500 @ d g \0 \0 360 221 i 020 g \0 \0 360 246 @ d
0043520 g \0 \0 360 220 h 020 \0 N I L \r ( 3 0 Q
0043540 N O 2 1 Q N 1 2 Q Y E
0043560 S 3 Y ) \r ( ) \r C O M P S E
0043600 T F D 1 \r ( L ( 0 A ) )
0043620 \0 021 \0 \0 \0 001 @ d i 360 221 i 020 g \0 \0
0043640 360 221 h 020 @ 020 \0 N I L \r ( 1 1 Q
0043660 N ) \r ( ) \r R C O M P 3 D 1 \r
0043700 ( P 2 T E M 2 P 1 T E
0043720 M 1 P 0 T Y P E I 1
0043740 D E F I 0 F N F 3 C
0043760 O U T F I L E ) \0 323 003 001 \0 002 021
0044000 0 002 A \t \0 \0 X d 242 261 \0 306 d k 360 262
0044020 % 277 @ d ` \0 \0 \n \0 \0 263 025 277 g \0 \0
0044040 @ ` \0 \0 032 \n \0 \0 277 g \0 \0 271 260 I g
0044060 \0 \0 260 ) d l 003 360 262 a 277 @ d ` \0 \0
0044100 \n \0 \0 263 025 277 g \0 \0 @ ` \0 \0 032 \n \0
0044120 \0 277 g \0 \0 271 260 g \0 \0 Y \t \0 \0 \n
0044140 \0 \0 262 m I @ I \t \0 \0 \n \0 \0 \n \0 \0
0044160 277 o \0 \0 \0 272 o \0 \0 \0 S \n \0 \0 277 @
0044200 S i \v \0 \0 277 J 265 006 o \0 \0 \0 S \n \0
0044220 \0 277 I S \n \0 \0 @ 020 j 360 245 H l 002 360
0044240 262 , @ g \0 \0 Y \t \0 \0 \n \0 \0 263 267 @
0044260 g \0 \0 Y \t \0 \0 \n \0 \0 263 252 @ \t \0 \0
0044300 H 360 253 @ ` \0 \0 032 027 \0 \0 202 \b \0 \0 @
0044320 020 \0 ( 3 1 7 Q H E L P 3 0 0
0044340 Q A R G T Y P E 2 7 2 Q M
0044360 E M B 2 6 7 Q G E T T O P V
0044400 A L 2 5 5 Q M E M B 2 5 2
0044420 Q G E T T O P V A L 2 2 7 Q
0044440 P R I N T 2 2 1 Q P R I N
0044460 1 2 0 5 Q P R I N 2 1 7 6
0044500 Q P R I N 1 1 6 0 Q / S E
0044520 T 1 5 5 Q R E M O V E 1 5
0044540 2 Q G E T T O P V A L 1 4 2
0044560 Q M E M B 1 3 7 Q G E T T
0044600 O P V A L 1 2 1 Q / S E T
0044620 1 0 3 Q M E M B 5 0 Q / S
0044640 E T 3 2 Q M E M B 6 A R
0044660 G T Y P E ) \r ( 3 1 3 Q L A M
0044700 S 3 0 7 Q L A M S 2 6 3 Q
0044720 N L A M L 2 4 6 Q N L A M
0044740 A 1 3 3 Q N L A M L 1 2 5
0044760 Q N L A M A 1 1 5 Q N L A
0045000 M A 1 1 1 Q N L A M A 1 0
0045020 0 Q N L A M A 6 2 Q N L A
0045040 M A 5 4 Q N L A M L 4 4 Q
0045060 N L A M L 4 0 Q N L A M L
0045100 2 7 Q N L A M L ) \r ( 2 1
0045120 5 Q " w a s n o t o n
0045140 " 1 7 2 Q " * * * n o t e :
0045160 " 1 6 5 Q " w a s i n
0045200 c o r r e c t l y o n " ) \r
0045220 T C O M P L A 0 0 0 1 D 1 \r (
0045240 N A M E E R R O R S E T F
0045260 0 F I L E ) \0 \v \0 001 002 \0 P h
0045300 i d \f \0 \0 h 032 020 \0 ( 6 B C O M
0045320 P L ) \r N I L \r ( ) \r T C O M P
0045340 L D 1 \r ( P 4 F I L E I
0045360 0 F I L E S ) \0 ? 005 \0 \0 001
0045400 h o \0 \0 \0 \n \0 \0 @ 021 A 004 H 265 004 I
0045420 020 003 243 H 274 h 204 H 001 274 H 002 270 o \0 \0
0045440 \0 i \n \0 \0 001 265 \b L o \0 \0 \0 032 273 J
0045460 265 \t K h 032 Z 271 260 325 K & 272 260 320 \0 (
0045500 4 4 Q T C O M P L A 0 0 0 1
0045520 7 C O M P S E T ) \r N I L \r (
0045540 5 4 Q ( n o t c o m p i l
0045560 e d ) 4 0 Q ( T C O M P L A
0045600 0 0 0 1 ) 4 ( F % \r ) ) \r
0045620 R E C O M P I L E D 1 \r ( I
0045640 2 F N S I 1 C F I L E
0045660 I 0 P F I L E ) \0 \t \0 \0 \0
0045700 003 @ A B i \f \0 \0 020 \0 ( 6 B R E
0045720 C O M P I L E ) \r N I L \r ( ) \r
0045740 R E C O M P ? D 1 \r ( I 1
0045760 F N S I 0 X F 0 C H
0046000 A N G E S ) \0 J \0 001 \0 002 A d g
0046020 \0 \0 360 221 i 020 g \0 \0 360 223 @ P 034 020 A
0046040 i 360 250 A d g \0 \0 360 262 # 277 @ ` \0 \0
0046060 \n \0 \0 265 030 @ g \0 \0 \n \0 \0 265 \f @ g
0046100 \0 \0 \n \0 \0 265 003 @ \t \0 \0 020 003 243 @ A
0046120 360 020 @ A 034 020 \0 ( 7 5 Q E X P R
0046140 P 6 7 Q G E T P R O P 5 6
0046160 Q G E T P R O P 4 5 Q M E
0046200 M B ) \r ( 6 4 Q B R O K E N
0046220 5 3 Q A D V I S E D 4 2 Q
0046240 E X P R S L S T 3 2 Q E X P
0046260 R S 1 3 Q C H A N G E S 4
0046300 A L L ) \r ( ) \r C O M P I L E
0046320 A 0 0 0 1 A 0 0 0 2 D 1 \r ( N
0046340 A M E E R R O R S E T P 5
0046360 F N P 1 L O C A L V A R
0046400 S P 0 S P E C V A R S F
0046420 6 X F 7 L C F I L F
0046440 1 0 Q F L G F 1 1 Q S
0046460 P E C V A R S F 1 2 Q L O
0046500 C A L V A R S F 1 3 Q L S
0046520 T F I L F 1 4 Q L A P F L
0046540 G ) \0 j 006 \a 002 \0 W 022 W 024 021 002 001
0046560 \b \0 \0 277 021 @ 005 V d 223 3 \b 224 V h 032
0046600 260 036 V 260 033 d 001 ] d i \n \0 \0 i \v \0
0046620 \0 272 K 265 \a J h 032 \ 201 J & 273 002 003 265
0046640 346 L 022 c \f 277 W 020 263 037 W 016 237 h W 016
0046660 ` \0 \0 \v \0 \0 277 W 016 \t \0 \0 277 W 020 246
0046700 W 030 223 W 026 265 \a V 022 h 032 020 \t \0 \0 277
0046720 260 367 \0 ( 1 4 5 Q C L O S E F
0046740 1 2 2 Q C L O S E F 1 1 4 Q
0046760 P R I N T 4 7 Q C O M P I
0047000 L E 1 4 3 Q V I R G I N F N
0047020 1 1 Q C O M P S E T ) \r ( 1
0047040 1 1 Q F I L E R D T B L ) \r (
0047060 ) \r C O M P I L E A 0 0 0 1 D
0047100 1 \r ( N A M E E R R O R S E T
0047120 P 1 M A C R O Y P 0
0047140 M A C R O X F 2 R E S E T
0047160 V A R S L S T F 3 N O F I
0047200 X F N S L S T F 4 N O F I
0047220 X V A R S L S T F 5 R E S
0047240 E T Y ) \0 256 002 004 002 \0 g \0 \0 d \t
0047260 \0 \0 032 g \0 \0 ` \0 \0 \n \0 \0 277 R 032 c
0047300 004 277 g \0 \0 d \t \0 \0 032 g \0 \0 ` \0 \0
0047320 \n \0 \0 277 R 032 c 004 277 g \0 \0 d \t \0 \0
0047340 032 g \0 \0 ` \0 \0 \n \0 \0 277 R 032 c 004 277
0047360 g \0 \0 d \t \0 \0 032 g \0 \0 ` \0 \0 \n \0
0047400 \0 277 R 032 c 004 277 g \0 \0 S 032 g \0 \0 T
0047420 032 R 032 032 c 004 021 021 001 R 271 o \0 \0 \0 g
0047440 \0 \0 \n \0 \0 H 001 002 c 006 277 H 002 X 001 002
0047460 c \b 277 I d R 360 225 277 H 002 c 004 215 R \n
0047500 \0 \0 231 R k I \v \0 \0 H 002 031 277 265 005 \b
0047520 \0 \0 022 001 c \n i 020 \0 ( 2 4 6 Q E
0047540 R R O R ! 2 3 5 Q N L E F T
0047560 2 2 6 Q T A I L P 1 7 1 Q
0047600 C O M P I L E A 0 0 0 1 A 0 0
0047620 0 2 1 2 5 Q S E T T O P V A
0047640 L 1 1 3 Q G E T T O P V A L
0047660 7 6 Q S E T T O P V A L 6
0047700 4 Q G E T T O P V A L 4 7 Q
0047720 S E T T O P V A L 3 5 Q G
0047740 E T T O P V A L 2 0 Q S E T
0047760 T O P V A L 6 G E T T O P V
0050000 A L ) \r ( 1 6 6 Q I N T E R N
0050020 A L 1 4 3 Q N O F I X V A R
0050040 S L S T 1 3 6 Q N O F I X F
0050060 N S L S T 1 2 2 Q L A M A
0050100 1 1 7 Q L A M A 1 0 7 Q L
0050120 A M A 7 3 Q L A M S 7 0 Q
0050140 L A M S 6 0 Q L A M S 4
0050160 4 Q N L A M L 4 1 Q N L A
0050200 M L 3 1 Q N L A M L 1 5 Q
0050220 N L A M A 1 2 Q N L A M A
0050240 2 N L A M A ) \r ( 1 6 3 Q
0050260 ( C O M P I L E A 0 0 0 1 A 0
0050300 0 0 2 ) ) \r C O M P I L E D 1
0050320 \r ( P 2 R E S E T Z P 1
0050340 R E S E T Y P 0 L I S P
0050360 X H I S T I 1 F L G I
0050400 0 X F 3 L I S P X H I S
0050420 T F 4 R E S E T V A R S L
0050440 S T ) \0 " 003 002 \0 002 S 021 ! 002 T o
0050460 \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0 Z
0050500 \n \0 \0 J 223 \b \0 \0 020 I 020 \0 ( 3 5 Q
0050520 E R R O R ! 3 0 Q R E S E
0050540 T R E S T O R E 1 6 Q C O M
0050560 P I L E A 0 0 0 1 ) \r ( 2 4 Q
0050600 E R R O R 1 3 Q I N T E R N
0050620 A L ) \r ( 1 0 Q ( C O M P I
0050640 L E A 0 0 0 1 ) ) \r C O M P I L
0050660 E 1 D 1 \r ( P 0 F R E E V
0050700 A R S I 2 C O R E F L G
0050720 I 1 D E F I 0 F N F
0050740 1 F R E E V A R S ) \0 035 001
0050760 001 \0 003 @ A B \v \0 \0 b 002 Q 021 001 \0 `
0051000 \0 \0 225 @ A \n \0 \0 020 @ A \n \0 \0 020 \0
0051020 ( 3 2 Q C O M P I L E 2 2 4
0051040 Q B Y T E C O M P I L E 2 5
0051060 C O M P I L E 1 A ) \r ( 1 6 Q
0051100 B Y T E C O M P F L G ) \r ( )
0051120 \r C O M P I L E 1 A D 1 \r ( P
0051140 2 F I L E P K G F L G P
0051160 1 N O S P E L L F L G P 0
0051200 T E M I 2 C O R E F L G
0051220 I 1 D E F I 0 F N
0051240 F 3 C O U T F I L E F 4
0051260 N O F I X F N S L S T F 5
0051300 N O F I X V A R S L S T F
0051320 6 N O S P E L L F L G F 7
0051340 F I L E P K G F L G ) \0 247 003
0051360 005 \0 003 A \t \0 \0 242 261 \0 237 021 020 \0 ` \0
0051400 \0 263 $ A 002 003 002 003 001 003 X 001 d g \0 \0
0051420 360 222 277 i 215 g \0 \0 360 262 T H 002 003 001 g
0051440 \0 \0 360 262 J g \0 \0 @ h 032 032 S i \v \0
0051460 \0 277 V 265 005 B h 360 W 016 264 003 B 021 002 002
0051500 T 027 \0 \0 277 U 027 \0 \0 277 A @ \n \0 \0 277
0051520 T ` \0 \0 \n \0 \0 225 ` \0 \0 c \b 277 U `
0051540 \0 \0 \n \0 \0 225 ` \0 \0 c \n 277 023 S \t \0
0051560 \0 j 360 244 S \t \0 \0 277 ` \0 \0 232 A 001 `
0051600 \0 \0 360 223 A 002 001 020 ` \0 \0 230 A ` \0 \0
0051620 \n \0 \0 265 003 A 020 A 020 \0 ( 2 3 7 Q
0051640 G E T H A S H 2 0 4 Q T E R
0051660 P R I 1 7 5 Q P O S I T I O
0051700 N 1 6 1 Q T A I L P 1 4 3
0051720 Q T A I L P 1 3 3 Q D W I
0051740 M I F Y 0 7 5 Q P R I N T
0051760 3 E X P R P ) \r ( 2 3 4 Q C
0052000 L I S P A R R A Y 2 2 7 Q C
0052020 L I S P A R R A Y 2 1 6 Q C
0052040 L I S P T R A N F L G 2 1 0 Q
0052060 C L I S P T R A N F L G 1 6
0052100 5 Q N O F I X V A R S L S T 0
0052120 1 5 6 Q N O F I X V A R S L
0052140 S T 0 1 4 7 Q N O F I X F N
0052160 S L S T 0 1 4 0 Q N O F I X
0052200 F N S L S T 0 1 2 5 Q N O F
0052220 I X V A R S L S T 0 1 2 0 Q
0052240 N O F I X F N S L S T 0 6 4 Q
0052260 d w i m i f y i n g 5 6 Q
0052300 D E C L A R A T I O N S : 4 4
0052320 Q * 3 4 Q C L I S P : 1
0052340 5 Q D W I M I F Y C O M P F L
0052360 G ) \r ( ) \r C O M P I L E . F I
0052400 L E C H E C K D 1 \r ( I 0
0052420 F I L E ) \0 \t \0 \0 \0 001 @ g \0 \0
0052440 \n \0 \0 020 \0 ( 6 O P E N F I L E
0052460 ) \r ( 3 I N P U T ) \r ( ) \r C
0052500 O M P E M D 1 \r ( I 3 F L
0052520 I 2 E R R O R F L G I
0052540 1 Y I 0 X F 0 C O
0052560 U T F I L E ) \0 L \0 001 \0 004 C 243
0052600 P b 006 277 B 263 5 o \0 \0 \0 C \n \0 \0 @
0052620 C i \v \0 \0 A 233 k C \n \0 \0 277 A C \n
0052640 \0 \0 277 C \t \0 \0 C i 360 254 h i b 006 277
0052660 b 004 277 277 277 277 260 310 h 020 o \0 \0 \0 i \n
0052700 \0 \0 @ A i \v \0 \0 020 \0 ( 1 1 1 Q
0052720 E R R O R 1 0 3 Q P R I N 1
0052740 5 0 Q T E R P R I 4 3 Q
0052760 P R I N 1 3 5 Q S P A C E S
0053000 2 6 Q P R I N 1 2 0 Q P
0053020 R I N 1 ) \r N I L \r ( 7 7 Q
0053040 " * * * * * " 1 4 Q " \r \r *
0053060 * * * * " ) \r G E T C F I L E A
0053100 0 0 0 1 D 1 \r ( N A M E E R
0053120 R O R S E T F 0 C F I L E
0053140 F 1 X ) \0 017 \0 002 002 \0 P g
0053160 \0 \0 g \0 \0 \v \0 \0 c 002 i 020 \0 ( 1 1
0053200 Q O P E N S T R E A M ) \r ( 6
0053220 O L D 3 I N P U T ) \r ( )
0053240 \r G E T C F I L E D 1 \r ( P
0053260 1 S T R P 0 X I 1
0053300 C F I L E I 0 F I L E S
0053320 F 5 R E A D B U F ) \0 263 005
0053340 001 \0 002 021 001 o \0 \0 \0 \t \0 \0 262 023 H
0053360 \t \0 \0 221 H 020 H \t \0 \0 277 o \0 \0 \0 203
0053400 o \0 \0 \0 271 i \t \0 \0 277 ` \0 \0 g \0 \0
0053420 H 265 ! A I o \0 \0 \0 @ 001 \t \0 \0 o \0
0053440 \0 \0 h 032 032 032 032 032 \v \0 \0 g \0 \0 360 226
0053460 h 020 \t \0 \0 260 337 ` \0 \0 g \0 \0 o \0 \0
0053500 \0 021 0 004 @ 260 024 d 001 \t \0 \0 272 K 265 \a
0053520 J h 032 \ 201 J & 273 002 003 265 355 L 022 h 032
0053540 032 \v \0 \0 g \0 \0 360 262 031 U d 001 g \0 \0
0053560 360 246 001 g \0 \0 360 224 U 002 c \n 277 \b \0 \0
0053600 277 o \0 \0 \0 i \n \0 \0 277 i d \n \0 \0 b
0053620 002 277 261 377 T \0 ( 2 5 3 Q R E A D
0053640 2 4 5 Q P R I N 1 2 3 4 Q
0053660 E R R O R ! 2 0 0 Q A S K
0053700 U S E R 1 5 0 Q F U L L N A
0053720 M E 1 2 1 Q F U L L N A M E
0053740 1 0 7 Q A S K U S E R 7 2
0053760 Q F U L L N A M E 4 5 Q T
0054000 E R P R I 2 6 Q C L O S E F
0054020 1 7 Q R A N D A C C E S S P
0054040 1 1 Q G E T C F I L E A 0 0
0054060 0 1 ) \r ( 2 2 2 Q F 2 1 4 Q
0054100 S T 2 0 3 Q Y 1 3 1 Q
0054120 Y 1 2 6 Q D W I M W A I T
0054140 1 1 2 Q Y 5 4 Q Y 5 1 Q
0054160 D W I M W A I T ) \r ( 2 4 1
0054200 Q " T h e n w h a t s h a
0054220 l l I u s e f o r C F I
0054240 L E ? " 1 3 5 Q " S h
0054260 a l l I j u s t f o r g e
0054300 t a b o u t c o m p i l i n
0054320 g " 7 6 Q " i n s t e a d "
0054340 6 5 Q \r " c o m p i l e
0054360 a l l f u n c t i o n s o n
0054400 " 4 0 Q " n o t f o u n
0054420 d , " 3 3 Q " i s n o t
0054440 a r a n d o m a c c e s s
0054460 f i l e , " 6 ( G E T C F I
0054500 L E A 0 0 0 1 ) ) \r S P E C V A
0054520 R S D 1 \r ( I 0 A F 0
0054540 S P E C V A R S F 1 L O
0054560 C A L V A R S ) \0 % \0 002 003 001 @
0054600 003 262 023 P d 003 227 277 @ P \n \0 \0 260 023 i
0054620 360 254 @ 213 Q 003 ` \0 \0 \n \0 \0 c 002 277 i
0054640 c \0 020 \0 ( 3 4 Q U N I O N 1
0054660 5 Q \ A P P E N D 2 ) \r ( 3 1
0054700 Q S Y S L O C A L V A R S ) \r
0054720 ( ) \r L O C A L V A R S D 1 \r
0054740 ( I 0 A F 0 L O C A L
0054760 V A R S F 1 S P E C V A R
0055000 S ) \0 & \0 002 003 001 @ 003 262 023 P d 003
0055020 227 277 @ P \n \0 \0 260 023 i 360 254 @ 213 Q 003
0055040 ` \0 \0 \n \0 \0 c 002 277 i c \0 h 020 \0 (
0055060 3 4 Q U N I O N 1 5 Q \ A
0055100 P P E N D 2 ) \r ( 3 1 Q S Y S
0055120 S P E C V A R S ) \r ( ) \r G L O
0055140 B A L V A R S D 1 \r ( I 0
0055160 A ) \0 020 \0 \0 003 001 @ 003 264 \f @ ` \0
0055200 \0 \n \0 \0 027 \0 \0 020 \0 ( 1 2 Q U N
0055220 I O N ) \r ( 1 5 Q G L O B A L
0055240 V A R S 7 G L O B A L V A R
0055260 S ) \r ( ) \r C O M P I L E M O D
0055300 E D 1 \r ( P 0 X I 0
0055320 M O D E F 1 C O M P I L E
0055340 M O D E F 2 C O M P I L E
0055360 M O D E L S T ) \0 2 001 002 \0 001 Q
0055400 @ 262 . @ R 026 265 ! @ g \0 \0 \n \0 \0 260
0055420 030 d 001 021 001 \0 H d 001 003 224 001 \t \0 \0 205
0055440 001 H 002 \n \0 \0 023 002 003 265 350 @ c 002 277 020
0055460 \0 ( 4 6 Q S E T 3 7 Q E V
0055500 A L 1 7 Q E R R O R ) \r ( 1
0055520 4 Q ? ) \r ( ) \r ( P R E T T Y
0055540 C O M P R I N T C O M P I L E
0055560 C O M S ) \r ( R P A Q Q C O M
0055600 P I L E C O M S ( ( F N S B
0055620 C O M P L B C O M P L . B O D
0055640 Y R E S E T O P E N F I L E S
0055660 B C O M P L 1 B C O M P L 1
0055700 A B C O M P L 2 B C O M P L
0055720 3 B L O C K : \r B R E C O M
0055740 P I L E B R E C O M P I L E 1
0055760 B R E C O M P I L E 2 B R E
0056000 C O M P I L E 3 B L O C K C O
0056020 M P I L E B L O C K C O M P I
0056040 L E 1 C O M P S E T C O M P
0056060 S E T R E A D C O M P S E T Y
0056100 \r C O M P S E T F R C O M P
0056120 3 T C O M P L R E C O M P I
0056140 L E R E C O M P ? C O M P I
0056160 L E C O M P I L E 1 C O M P
0056200 I L E 1 A C O M P I L E . F I
0056220 L E C H E C K C O M P E M G
0056240 E T C F I L E \r S P E C V A R
0056260 S L O C A L V A R S G L O B
0056300 A L V A R S ) ( A D D V A R S
0056320 ( N O L I N K F N S H E L P
0056340 E R R O R X E R R O R S E T
0056360 E V A L V F A U L T E V A L
0056400 I N T E R R U P T \r S E A R
0056420 C H P D L M A P D L B R E A
0056440 K 1 E D I T E E D I T L )
0056460 ( L I N K F N S ) ( F R E E V
0056500 A R S ) ( S Y S S P E C V A R
0056520 S H E L P C L O C K L I S P
0056540 X H I S T R E S E T S T A T E
0056560 \r O L D V A L U E U N D O S
0056600 I D E 0 S P E C V A R S L O
0056620 C A L V A R S ) ( S Y S L O C
0056640 A L V A R S ) ( L O C A L F R
0056660 E E V A R S ) ( B L K L I B R
0056700 A R Y ) ( R E T F N S ) ( \r
0056720 B L K A P P L Y F N S ) ( D O
0056740 N T C O M P I L E F N S ) ( N
0056760 L A M L ) ( N L A M A ) ( L
0057000 A M S ) ( L A M A ) ) ( I N
0057020 I T V A R S ( S P E C V A R S
0057040 T ) ( L O C A L V A R S \r
0057060 S Y S L O C A L V A R S ) ) (
0057100 I N I T V A R S ( D W I M I F
0057120 Y C O M P F L G ) ( C O M P I
0057140 L E H E A D E R " c o m p i l
0057160 e d o n " ) ( C O M P S E
0057200 T L S T ( Q U O T E ( S T
0057220 F S T F \r S Y N 1 2
0057240 N I L T ) ) ) ( C O M P S
0057260 E T K E Y L S T ( Q U O T E
0057300 ( ( S T " o r e a n d r e
0057320 d e f i n e " K E Y L S T
0057340 ( " " ( F . " o r g e t
0057360 e x p r s " ) ) ) ( S \r .
0057400 " a m e a s l a s t t i m
0057420 e " ) ( F . " i l e o n
0057440 l y " ) ( T . " o t e r
0057460 m i n a l " ) ( 1 ) ( 2 )
0057500 ( Y . " e s " ) ( N .
0057520 " o " ) ) ) ) ( \r C O M P S E
0057540 T D E F A U L T K E Y L S T (
0057560 Q U O T E ( ( Y . " e s "
0057600 ) ( N . " o " ) ) ) ) (
0057620 B C O M P L . S C R A T C H (
0057640 S E L E C T Q ( S Y S T E M T
0057660 Y P E ) ( D ( Q U O T E \r
0057700 { C O R E } B C O M P L . S C R
0057720 A T C H ) ) ( Q U O T E B C
0057740 O M P L . S C R A T C H ; T ) )
0057760 ) ( R E C O M P I L E D E F A
0060000 U L T ( Q U O T E C H A N G
0060020 E S ) ) ( C O U T F I L E T
0060040 ) ( \r S V F L G T ) ( S T
0060060 R F T ) ( L S T F I L T )
0060100 ( L C F I L ) ( L A P F L G
0060120 T ) ) ( D E C L A R E : D
0060140 O N T C O P Y ( R E C O R D S
0060160 C O M P F I L E D E S C R )
0060200 ( M A C R O S \r D I G I T C H
0060220 A R P ) ( G L O B A L V A R S
0060240 N L A M A N L A M L L A M
0060260 A L A M S S Y S S P E C V A
0060300 R S S Y S L O C A L V A R S
0060320 G L O B A L V A R S R E C O M
0060340 P I L E D E F A U L T \r C O M
0060360 P I L E . E X T N O T C O M P
0060400 I L E D F I L E S B Y T E C O
0060420 M P F L G C O M P I L E H E A
0060440 D E R C O M P V E R S I O N
0060460 D W I M I F Y C O M P F L G B
0060500 C O M P L . S C R A T C H \r D
0060520 O N T C O M P I L E F N S L I
0060540 N K E D F N S N O F I X V A R
0060560 S L S T 0 N O F I X F N S L S
0060600 T 0 C L I S P T R A N F L G
0060620 C L I S P A R R A Y C O M P S
0060640 E T K E Y L S T R E R E A D F
0060660 L G \r H I S T S T R 0 L I S
0060700 P X H I S T O R Y C O M P S E
0060720 T D E F A U L T K E Y L S T F
0060740 I L E R D T B L D W I M F L G
0060760 D W I M W A I T E X P R S L
0061000 S T ) ) ( P ( M O V D ? (
0061020 Q U O T E N I L L \r ) ( Q U
0061040 O T E F I L E C H A N G E S )
0061060 ) ) ( C O M S ( * C O M P
0061100 I L E M O D E ) ( P R O P V
0061120 A R T Y P E C O M P I L E M O
0061140 D E L S T ) ( F N S C O M P
0061160 I L E M O D E ) ) ( \r D E C L
0061200 A R E : D O N T E V A L @ L O
0061220 A D D O E V A L @ C O M P I L
0061240 E D O N T C O P Y C O M P I
0061260 L E R V A R S ( A D D V A R S
0061300 ( N L A M A G L O B A L V A
0061320 R S L O C A L V A R S \r S P
0061340 E C V A R S B L O C K : ) (
0061360 N L A M L B C O M P L 3 ) (
0061400 L A M A ) ) ) ) ) \r ( A D D T O
0061420 V A R N O L I N K F N S H E
0061440 L P E R R O R X E R R O R S
0061460 E T E V A L V F A U L T E V
0061500 A L I N T E R R U P T S E A
0061520 R C H P D L M A P D L B R E
0061540 A K 1 E D I T E E D I T L )
0061560 \r ( A D D T O V A R L I N K F
0061600 N S ) \r ( A D D T O V A R F R
0061620 E E V A R S ) \r ( A D D T O V A
0061640 R S Y S S P E C V A R S H E
0061660 L P C L O C K L I S P X H I S
0061700 T R E S E T S T A T E O L D
0061720 V A L U E U N D O S I D E 0
0061740 S P E C V A R S L O C A L V A
0061760 R S ) \r ( A D D T O V A R S Y
0062000 S L O C A L V A R S ) \r ( A D D
0062020 T O V A R L O C A L F R E E V
0062040 A R S ) \r ( A D D T O V A R B
0062060 L K L I B R A R Y ) \r ( A D D T
0062100 O V A R R E T F N S ) \r ( A D
0062120 D T O V A R B L K A P P L Y F
0062140 N S ) \r ( A D D T O V A R D O
0062160 N T C O M P I L E F N S ) \r ( A
0062200 D D T O V A R N L A M L ) \r (
0062220 A D D T O V A R N L A M A ) \r
0062240 ( A D D T O V A R L A M S ) \r
0062260 ( A D D T O V A R L A M A ) \r
0062300 ( R P A Q ? S P E C V A R S
0062320 T ) \r ( R P A Q ? L O C A L V
0062340 A R S S Y S L O C A L V A R S
0062360 ) \r ( R P A Q ? D W I M I F Y
0062400 C O M P F L G ) \r ( R P A Q ?
0062420 C O M P I L E H E A D E R " c
0062440 o m p i l e d o n " ) \r ( R
0062460 P A Q ? C O M P S E T L S T
0062500 ( Q U O T E ( S T F S T F
0062520 S Y N 1 2 N I L T
0062540 ) ) ) \r ( R P A Q ? C O M P S
0062560 E T K E Y L S T ( Q U O T E
0062600 ( ( S T " o r e a n d r e
0062620 d e f i n e " K E Y L S T
0062640 ( " " ( F . " o r g e t
0062660 e x p r s " ) ) ) ( S . \r
0062700 " a m e a s l a s t t i m
0062720 e " ) ( F . " i l e o n
0062740 l y " ) ( T . " o t e r
0062760 m i n a l " ) ( 1 ) ( 2 )
0063000 ( Y . " e s " ) ( N .
0063020 " o " ) ) ) ) \r ( R P A Q ? C
0063040 O M P S E T D E F A U L T K E Y
0063060 L S T ( Q U O T E ( ( Y .
0063100 " e s " ) ( N . " o " )
0063120 ) ) ) \r ( R P A Q ? B C O M P
0063140 L . S C R A T C H ( S E L E C
0063160 T Q ( S Y S T E M T Y P E )
0063200 ( D ( Q U O T E { C O R E }
0063220 B C O M P L . S C R A T C H ) )
0063240 ( Q U O T E B C O M P L . S
0063260 C R A T C H ; T ) ) \r ) \r ( R P
0063300 A Q ? R E C O M P I L E D E F
0063320 A U L T ( Q U O T E C H A N
0063340 G E S ) ) \r ( R P A Q ? C O U
0063360 T F I L E T ) \r ( R P A Q ?
0063400 S V F L G T ) \r ( R P A Q ?
0063420 S T R F T ) \r ( R P A Q ? L
0063440 S T F I L T ) \r ( R P A Q ?
0063460 L C F I L ) \r ( R P A Q ? L A
0063500 P F L G T ) \r ( M O V D ? (
0063520 Q U O T E N I L L ) ( Q U O
0063540 T E F I L E C H A N G E S ) )
0063560 \r ( P U T P R O P S C O M P I
0063600 L E M O D E L S T V A R T Y P
0063620 E A L I S T ) \r ( P U T P R O
0063640 P S C O M P I L E C O P Y R
0063660 I G H T ( " X e r o x C o r
0063700 p o r a t i o n " T 1 9 8 4
0063720 1 9 8 5 1 9 8 6 ) ) \r N I L
0063740 \r
0063741