$ od -c -N 50000 [eris]<LispCore>SOURCES>CMLCOMPILE.DCOM!12
0000000 ( F I L E C R E A T E D " 6
0000020 - O c t - 8 6 2 2 : 3 7 : 4 4
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P C O R
0000100 E > S O U R C E S > C M L C O M
0000120 P I L E . ; 1 2 ) \r " 1 - O
0000140 c t - 8 6 2 0 : 2 3 : 1 5 "
0000160 " C O M P I L E - F I L E d "
0000200 i n " X e r o x L i s p
0000220 1 - O c t - 8 6 . . . " d a
0000240 t e d " 1 - O c t - 8 6 2
0000260 1 : 2 4 : 4 4 " ) \r ( F I L E C
0000300 R E A T E D " 6 - O c t - 8
0000320 6 2 2 : 3 6 : 5 7 " { E R I
0000340 S } < L I S P C O R E > S O U R
0000360 C E S > C M L C O M P I L E . ;
0000400 1 2 3 2 3 7 2 c h a n g e s
0000420 t o : ( F N S \r C O M P I
0000440 L E - F I L E ) p r e v i o u
0000460 s d a t e : " 3 0 - S e p -
0000500 8 6 2 3 : 1 4 : 1 2 " { E R
0000520 I S } < L I S P C O R E > S O U
0000540 R C E S > C M L C O M P I L E .
0000560 ; 1 1 ) \r ( R P A Q Q C M L C
0000600 O M P I L E C O M S ( ( C O M
0000620 S ( F U N C T I O N S C L :
0000640 C O M P I L E D I S A S S E M
0000660 B L E ) ( F N S C O M P I L
0000700 E - F I L E I N T E R L I S P
0000720 - F O R M A T - P \r I N T E R
0000740 L I S P - N L A M B D A - F U N
0000760 C T I O N - P C O M P I L E -
0001000 F I L E - E X P R E S S I O N
0001020 C O M P I L E - F I L E - W A L
0001040 K - F U N C T I O N A R G T Y
0001060 P E . S T A T E \r C O M P I L
0001100 E . C H E C K . A R G T Y P E
0001120 C O M P I L E . F I L E . D E F
0001140 I N E Q C O M P I L E - F I L
0001160 E - S E T F - S Y M B O L - F U
0001200 N C T I O N C O M P I L E - F
0001220 I L E - E X / I M P O R T \r C
0001240 O M P I L E . F I L E . A P P L
0001260 Y C O M P I L E . F I L E . R
0001300 E S E T C O M P I L E - I N -
0001320 C O R E ) ( V A R S A R G T
0001340 Y P E . V A R S ) ( P R O P
0001360 \r C O M P I L E - F I L E - E X
0001400 P R E S S I O N D E F I N E Q
0001420 * S E T F - S Y M B O L - F
0001440 U N C T I O N ) ( F U N C T I
0001460 O N S C O M P I L E - F I L E
0001500 - D E C L A R E : ) ) ( C O M
0001520 S ( F N S \r N E W D E F C )
0001540 ( D E C L A R E : D O N T E
0001560 V A L @ L O A D D O C O P Y
0001600 ( P ( M O V D ( Q U O T E
0001620 N E W D E F C ) ( Q U O T E
0001640 D E F C ) ) ) ) ) ( C O M S
0001660 ( * ; \r " O p t i m i z e r
0001700 d e f i n i t i o n s a n d
0001720 e n v i r o n m e n t h a c
0001740 k i n g " ) ( D E F I N E - T
0001760 Y P E S O P T I M I Z E R S )
0002000 ( F U N C T I O N S \r C O M
0002020 P I L E R : O P T I M I Z E R -
0002040 L I S T ) ( F U N C T I O N S
0002060 D E F O P T I M I Z E R ) (
0002100 S T R U C T U R E S C O M P I
0002120 L E R : : E N V C O M P I L E
0002140 R : C O N T E X T ) ( F N S
0002160 \r C O M P I L E R : C O P Y - E
0002200 N V - W I T H - F U N C T I O N
0002220 C O M P I L E R : C O P Y - E
0002240 N V - W I T H - V A R I A B L E
0002260 C O M P I L E R : E N V - B O
0002300 U N D P \r C O M P I L E R : E
0002320 N V - F B O U N D P C O M P I
0002340 L E R : M A K E - E M P T Y - E
0002360 N V ) ) ( P R O P C O M P I
0002400 L E - F I L E - E X P R E S S I
0002420 O N P R E T T Y C O M P R I N
0002440 T ) ( P R O P \r F I L E T Y
0002460 P E C M L C O M P I L E ) (
0002500 D E C L A R E : D O N T E V A
0002520 L @ L O A D D O E V A L @ C O
0002540 M P I L E D O N T C O P Y C
0002560 O M P I L E R V A R S ( A D D
0002600 V A R S ( N L A M A ) ( \r N
0002620 L A M L ) ( L A M A C O M P
0002640 I L E R : M A K E - E M P T Y -
0002660 E N V C O M P I L E R : E N V
0002700 - F B O U N D P C O M P I L E
0002720 R : E N V - B O U N D P \r C O
0002740 M P I L E R : C O P Y - E N V -
0002760 W I T H - V A R I A B L E C O
0003000 M P I L E R : C O P Y - E N V -
0003020 W I T H - F U N C T I O N C O
0003040 M P I L E - F I L E ) ) ) ) ) \r
0003060 C L : C O M P I L E D 1 \r ( L
0003100 ( 1 L A M B D A - E X P R
0003120 0 N A M E ) ) \0 * 001 \0 \0 002 @
0003140 265 005 g \0 \0 021 001 \0 H A 265 006 @ \t \0 \0
0003160 \n \0 \0 A 232 @ 233 @ g \0 \0 A \v \0 \0 277
0003200 @ 265 006 H \t \0 \0 020 \0 ( 4 7 Q G E
0003220 T D 3 7 Q / P U T P R O P
0003240 2 3 Q C O M P I L E - I N - C
0003260 O R E 2 0 Q G E T D ) \r ( 3
0003300 3 Q E X P R 5 \ C L C O M
0003320 P I L E T E M P ) \r ( ) \r D I S
0003340 A S S E M B L E D 1 \r ( L (
0003360 0 - a r g s - ) F 2 1 Q
0003400 * S T A N D A R D - O U T P U T
0003420 * ) \0 370 021 001 002 \0 e 021 001 \0 k a 021
0003440 361 020 H l 002 273 272 K d J 363 262 b 277 h 274
0003460 H l 002 276 275 N d M 363 262 g 277 l \b _ 016
0003500 277 H l 002 _ 022 277 _ 020 277 O 022 d O 020 363
0003520 262 c 277 W " _ 024 277 H l 002 _ 030 277 _ 026
0003540 277 O 030 d O 026 363 262 b 277 h _ 032 277 H l
0003560 002 _ 036 277 _ 034 277 O 036 d O 034 363 262 b 277
0003600 h _ 277 I \t \0 \0 264 m I 260 w a g \0
0003620 \0 360 225 K k 330 a 260 230 K l 002 324 [ 260 212
0003640 a g \0 \0 360 225 N k 330 a 260 224 N l 002 324
0003660 ^ 260 205 a g \0 \0 360 226 O 022 k 330 a 260 227
0003700 O 022 l 002 324 _ 022 260 205 a g \0 \0 360 226 O
0003720 030 k 330 a 260 227 O 030 l 002 324 _ 030 260 206 a
0003740 g \0 \0 360 226 O 036 k 330 a 260 227 O 036 l 002
0003760 324 _ 036 260 206 I d 004 l 004 360 222 \t \0 \0 \n
0004000 \0 \0 L O 016 O 024 O 032 O \r 006 \0 \0 020
0004020 \0 ( 3 6 5 Q P R I N T C O D E
0004040 3 5 0 Q C L : C O M P I L E
0004060 3 4 5 Q S Y M B O L - F U N
0004100 C T I O N 1 5 6 Q C C O D E
0004120 P ) \r ( 3 1 1 Q : M A R K E D
0004140 - P C 2 6 3 Q : F I R S T -
0004160 B Y T E 2 3 5 Q : O U T P U
0004200 T 2 1 2 Q : R A D I X 1 6
0004220 7 Q : L E V E L - P ) \r ( ) \r
0004240 C O M P I L E - F I L E A 0 0 0
0004260 1 D 1 \r ( N A M E E R R O R
0004300 S E T P 2 2 Q D E F E R R
0004320 E D . E X P R E S S I O N S P
0004340 2 1 Q * P R I N T - B A S E
0004360 * P 2 0 Q * R E A D - B A
0004400 S E * P 1 7 Q * R E A D T
0004420 A B L E * P 1 6 Q * P A C
0004440 K A G E * P 5 L S T F I L
0004460 P 3 S P E C V A R S P
0004500 2 L O C A L V A R S P 1
0004520 * R E A D - B A S E * P 0
0004540 * P A C K A G E * F 2 3 Q
0004560 R E S E T V A R S L S T F 2
0004600 4 Q O U T P U T - F I L E F
0004620 2 5 Q F I L E N A M E F
0004640 2 6 Q P R O C E S S - E N T I
0004660 R E - F I L E F 2 7 Q R E
0004700 D E F I N E F 3 0 Q L A P
0004720 F 3 1 Q N L A M L F 3
0004740 2 Q C O M P I L E . E X T F
0004760 3 3 Q N L A M A F 3 4 Q
0005000 L A M S F 3 5 Q L A M A
0005020 F 3 6 Q C O M P I L E R -
0005040 O U T P U T F 3 7 Q R E S
0005060 E T Y F 4 0 Q S A V E - E
0005100 X P R S F 4 1 Q C O U T F
0005120 I L E F 4 2 Q * I N T E R
0005140 L I S P - P A C K A G E * F
0005160 4 3 Q S Y S L O C A L V A R S
0005200 F 4 4 Q * C O M M O N - L
0005220 I S P - R E A D - E N V I R O N
0005240 M E N T * F 4 5 Q P E F P
0005260 F 4 6 Q C O M P I L E . F
0005300 I L E . V A L U E ) 002 * 023 024 002
0005320 \0 g \0 \0 h 032 h h 032 032 W & 032 c & 277
0005340 g \0 \0 d \t \0 \0 032 g \0 \0 W 2 \n \0 \0
0005360 277 W & 032 c & 277 g \0 \0 d \t \0 \0 032 g
0005400 \0 \0 W 6 \n \0 \0 277 W & 032 c & 277 g \0
0005420 \0 d \t \0 \0 032 g \0 \0 W 8 \n \0 \0 277 W
0005440 & 032 c & 277 g \0 \0 d \t \0 \0 032 g \0 \0
0005460 W : \n \0 \0 277 W & 032 c & 277 g \0 \0 d
0005500 \t \0 \0 032 g \0 \0 \t \0 \0 277 W & 032 c &
0005520 277 g \0 \0 d \t \0 \0 032 g \0 \0 W < \n \0
0005540 \0 277 W & 032 c & 277 g \0 \0 d \t \0 \0 032
0005560 g \0 \0 W . \n \0 \0 277 W & 032 c & 277 g
0005600 \0 \0 d \t \0 \0 032 g \0 \0 W @ 264 \t W .
0005620 264 005 g \0 \0 \n \0 \0 277 W & 032 c & 277 g
0005640 \0 \0 d \t \0 \0 032 g \0 \0 W 0 \n \0 \0 277
0005660 W & 032 c & 277 W D l \n W F i 021 244 \r
0005700 g \0 \0 W * g \0 \0 \n \0 \0 \ h 032 032 h
0005720 h 032 032 W & 032 c & 277 L g \0 \0 i \v \0
0005740 \0 \t \0 \0 _ 022 001 _ 016 277 O 022 002 001 _ 020
0005760 277 O 016 d 224 W H 360 h 360 276 W J 221 h 200
0006000 i 223 N c , 277 W 0 222 W B 275 L \t \0 \0
0006020 c * 277 g \0 \0 W ( 265 024 g \0 \0 h g \0
0006040 \0 W 4 g \0 \0 W * \r 006 \0 \0 g \0 \0 g
0006060 \0 \0 o \0 \0 \0 \f \0 \0 c ( L W * \t \0
0006100 \0 h 032 032 032 032 h h 032 032 W & 032 c & 277
0006120 W ( 262 & g \0 \0 d \t \0 \0 032 g \0 \0 W
0006140 ( \n \0 \0 277 W & 032 c & 277 L h 032 o \0
0006160 \0 \0 O 016 \v \0 \0 277 O 016 006 \0 \0 _ 032 311
0006200 \0 O 032 311 002 O 032 311 004 O 032 311 004 021 004 021
0006220 021 020 022 O 020 W ( h W , \f \0 \0 277 L \t
0006240 \0 \0 277 L d \t \0 \0 262 > 277 W , 262 ! O
0006260 $ \t \0 \0 260 027 d 001 _ 026 001 _ 024 277 O 026
0006300 002 W ( l 002 O 024 017 016 277 002 003 265 352 L \t
0006320 \0 \0 023 h W ( \n \0 \0 023 W ( \t \0 \0 c
0006340 L 022 c > i 020 \t \0 \0 _ 030 277 N 222 O 030
0006360 204 O 030 \t \0 \0 _ 020 260 235 \0 ( 1 0 4 4
0006400 Q C M L T R A N S L A T E 1
0006420 0 2 7 Q R E A D 1 0 1 5 Q
0006440 C L O S E F 1 0 0 7 Q P R I
0006460 N T 1 0 0 0 Q C L O S E F
0006500 7 4 2 Q R E V E R S E 7 2 6
0006520 Q E O F P 7 2 0 Q S K I P
0006540 S E P R C O D E S 7 1 3 Q C
0006560 O M P I L E - F I L E - E X P R
0006600 E S S I O N 6 4 5 Q P R I N
0006620 T - C O M P I L E - H E A D E R
0006640 6 2 2 Q S E T T O P V A L
0006660 6 1 1 Q G E T T O P V A L 5
0006700 5 7 Q R O O T F I L E N A M E
0006720 5 4 7 Q O P E N S T R E A M
0006740 5 3 2 Q P A C K F I L E N A
0006760 M E . S T R I N G 4 7 6 Q F
0007000 U L L N A M E 4 2 2 Q \ M V
0007020 L I S T 4 1 7 Q \ P A R S E
0007040 - F I L E - H E A D E R 3 7 1
0007060 Q O P E N S T R E A M 3 3 5
0007100 Q S E T T O P V A L 3 2 4 Q
0007120 G E T T O P V A L 3 0 6 Q
0007140 S E T T O P V A L 2 6 4 Q G
0007160 E T T O P V A L 2 4 6 Q S E
0007200 T T O P V A L 2 3 5 Q G E T
0007220 T O P V A L 2 1 7 Q S E T T
0007240 O P V A L 2 0 6 Q G E T T O
0007260 P V A L 1 7 0 Q S E T T O P
0007300 V A L 1 6 1 Q G E T T O P V
0007320 A L 1 4 3 Q S E T T O P V A
0007340 L 1 3 2 Q G E T T O P V A L
0007360 1 1 4 Q S E T T O P V A L
0007400 1 0 3 Q G E T T O P V A L 6
0007420 5 Q S E T T O P V A L 5 4 Q
0007440 G E T T O P V A L 3 6 Q S
0007460 E T T O P V A L 2 5 Q G E T
0007500 T O P V A L ) \r ( 6 5 3 Q R E
0007520 A D E R - E N V I R O N M E N T
0007540 6 1 5 Q L C F I L 6 0 5 Q
0007560 L C F I L 5 4 0 Q N E W
0007600 5 3 5 Q O U T P U T 5 2 4 Q
0007620 B O D Y 5 1 7 Q E X T E N
0007640 S I O N 5 1 3 Q V E R S I O
0007660 N 5 0 4 Q C O M P I L E . F
0007700 I L E . R E S E T 4 1 3 Q R
0007720 E T U R N 3 6 6 Q I N P U T
0007740 3 6 1 Q C L O S E F ? 3 3
0007760 0 Q L A P F L G 3 2 0 Q L
0010000 A P F L G 3 0 3 Q D E F E R
0010020 2 7 0 Q S V F L G 2 6 0 Q
0010040 S V F L G 2 4 1 Q S T R F
0010060 2 3 1 Q S T R F 2 1 2 Q
0010100 C O U T F I L E 2 0 2 Q C O
0010120 U T F I L E 1 6 5 Q D F N F
0010140 L G 1 5 5 Q D F N F L G 1
0010160 3 6 Q L A M A 1 2 6 Q L A
0010200 M A 1 0 7 Q L A M S 7 7 Q
0010220 L A M S 6 0 Q N L A M A
0010240 5 0 Q N L A M A 3 1 Q N L
0010260 A M L 2 1 Q N L A M L 2
0010300 R E S E T U N D O ) \r ( 6 4 0
0010320 Q ( " C O M P I L E - F I L E
0010340 d " ) 5 4 4 Q ( ( T Y P E
0010360 B I N A R Y ) ) ) \r C O M P I L
0010400 E - F I L E D 1 \r ( L ( 0
0010420 - a r g s - ) P 3 0 Q R E
0010440 S E T Y P 2 7 Q L I S P X
0010460 H I S T P 2 6 Q C O M P I
0010500 L E . F I L E . V A L U E P
0010520 2 5 Q C O M P I L E . F I L E
0010540 . A F T E R P 2 4 Q P R O
0010560 C E S S - E N T I R E - F I L E
0010600 P 2 1 Q P E F P P 2 0
0010620 Q C O M P I L E R - O U T P U
0010640 T P 1 5 Q S A V E - E X P
0010660 R S P 1 2 Q O U T P U T -
0010700 F I L E P 7 R E D E F I N
0010720 E P 4 L A P P 1 F I
0010740 L E N A M E F 3 2 Q L I S
0010760 P X H I S T F 3 3 Q R E S
0011000 E T V A R S L S T ) 001 b 032 002 002
0011020 \0 e 021 001 \0 k a 021 361 020 021 ` 026 H l 002
0011040 273 272 K d J 363 242 261 \0 235 277 h 274 H l 002
0011060 276 275 N d M 363 242 261 \0 242 277 h _ 016 277 H
0011100 l 002 _ 022 277 _ 020 277 O 022 d O 020 363 242 261
0011120 \0 237 277 h _ 024 277 H l 002 _ 030 277 _ 026 277
0011140 O 030 d O 026 363 242 261 \0 237 277 i _ 032 277 H
0011160 l 002 _ 036 277 _ 034 277 O 036 d O 034 363 242 261
0011200 \0 237 277 i _ 277 i _ " 277 H l 002 _ &
0011220 277 _ $ 277 O & d O $ 363 242 261 \0 233 277 h
0011240 _ " _ ( 277 h _ * _ , 277 W 4 021 ! 031
0011260 W 6 o \0 \0 \0 g \0 \0 \n \0 \0 242 261 \0 221
0011300 h 261 \0 220 a g \0 \0 360 226 K k 330 a 261 377
0011320 ^ K l 002 324 [ 261 377 M a g \0 \0 360 226 N
0011340 k 330 a 261 377 Y N l 002 324 ^ 261 377 H a g
0011360 \0 \0 360 227 O 022 k 330 a 261 377 [ O 022 l 002
0011400 324 _ 022 261 377 G a g \0 \0 360 227 O 030 k 330
0011420 a 261 377 [ O 030 l 002 324 _ 030 261 377 G a g
0011440 \0 \0 360 227 O 036 k 330 a 261 377 [ O 036 l 002
0011460 324 _ 036 261 377 G a g \0 \0 360 227 O & k 330
0011500 a 261 377 a O & l 002 324 _ & 261 377 K g \0
0011520 \0 _ 2 \n \0 \0 277 O 2 223 \b \0 \0 277 023 O
0011540 * \t \0 \0 206 d 001 \t \0 \0 277 002 003 265 370 O
0011560 , 020 \0 ( 5 3 0 Q E V A L 5 2
0011600 2 Q R E V E R S E 5 1 3 Q
0011620 E R R O R ! 5 0 4 Q R E S E
0011640 T R E S T O R E 2 5 2 Q C O
0011660 M P I L E - F I L E A 0 0 0 1 )
0011700 \r ( 4 7 7 Q E R R O R 4 5 0
0011720 Q : P R O C E S S - E N T I R
0011740 E - F I L E 4 2 0 Q : C O M
0011760 P I L E R - O U T P U T 3 7 0
0012000 Q : S A V E - E X P R S 3 4
0012020 0 Q : O U T P U T - F I L E
0012040 3 1 3 Q : R E D E F I N E 2
0012060 6 6 Q : L A P 2 4 7 Q I N
0012100 T E R N A L ) \r ( 2 4 4 Q (
0012120 C O M P I L E - F I L E A 0 0 0
0012140 1 ) ) \r I N T E R L I S P - F O
0012160 R M A T - P D 1 \r ( I 0 S
0012200 T R E A M ) \0 031 \0 \0 \0 001 @ \t \0
0012220 \0 d l ; 360 221 h 020 d l 006 360 245 d l (
0012240 360 264 366 i 020 \0 ( 3 P E E K C C O
0012260 D E ) \r N I L \r ( ) \r I N T E R
0012300 L I S P - N L A M B D A - F U N
0012320 C T I O N - P D 1 \r ( I 0
0012340 X ) \0 % \0 \0 \0 001 @ 004 l 004 360 264 036
0012360 @ \t \0 \0 d k 360 244 d l 003 360 222 277 i 201
0012400 277 h 264 \n @ \t \0 \0 221 h 020 i 020 \0 ( 3
0012420 6 Q S P E C I A L - F O R M -
0012440 P 1 2 Q A R G T Y P E ) \r N
0012460 I L \r ( ) \r C O M P I L E - F I
0012500 L E - E X P R E S S I O N A 0 0
0012520 0 1 D 1 \r ( L ( 0 X ) )
0012540 \0 \a \0 \0 \0 001 @ d 003 220 001 020 \0 N I L
0012560 \r N I L \r ( ) \r C O M P I L E -
0012600 F I L E - E X P R E S S I O N A
0012620 0 0 0 2 D 1 \r ( L ( 0 X )
0012640 ) \0 \f \0 \0 \0 001 @ 003 264 \b @ 002 001 \t
0012660 \0 \0 020 \0 ( 1 1 Q C L : E V A L
0012700 ) \r N I L \r ( ) \r C O M P I L E
0012720 - F I L E - E X P R E S S I O N
0012740 A 0 0 0 3 A 0 0 0 4 D 1 \r ( L
0012760 ( 0 X ) F 0 C O M P I
0013000 L E D . F I L E F 1 C O M
0013020 P I L E . T I M E . T O O F
0013040 2 D E F E R ) \0 \t \0 003 \0 001 @
0013060 P Q R \f \0 \0 020 \0 ( 6 C O M P I
0013100 L E - F I L E - E X P R E S S I
0013120 O N ) \r N I L \r ( ) \r C O M P I
0013140 L E - F I L E - E X P R E S S I
0013160 O N A 0 0 0 3 D 1 \r ( F 0
0013200 F O R M ) \0 \v \0 001 \0 \0 g \0 \0 P
0013220 002 002 \n \0 \0 020 \0 ( 1 0 Q C L : M
0013240 A P C ) \r ( 2 C O M P I L E -
0013260 F I L E - E X P R E S S I O N A
0013300 0 0 0 3 A 0 0 0 4 ) \r ( ) \r C O
0013320 M P I L E - F I L E - E X P R E
0013340 S S I O N D 1 \r ( P 1 0 Q
0013360 P R O P P 7 I N N E R - F
0013400 O R M P 6 I N N E R - F O
0013420 R M P 5 C O M P I L E . S
0013440 P E C I F I E D P 4 L O A
0013460 D . S P E C I F I E D P 3
0013500 E V A L . S P E C I F I E D P
0013520 2 V A L S P 1 V A R S
0013540 P 0 X I 3 D E F E R
0013560 I 2 C O M P I L E . T I M
0013600 E . T O O I 1 C O M P I L
0013620 E D . F I L E I 0 F O R M
0013640 ) 001 ` \t \0 \0 004 @ 003 264 003 202 261 \0 333
0013660 @ 001 d g \0 \0 360 232 277 @ A B i C \r 005
0013700 \0 \0 020 d g \0 \0 360 262 030 277 @ 214 d 001 021
0013720 001 \0 H A B C \f \0 \0 023 002 003 265 361 h 020
0013740 d g \0 \0 360 222 261 \0 241 d g \0 \0 360 262
0013760 g \0 \0 @ 002 001 \n \0 \0 g \0 \0 @ 002 001 \n
0014000 \0 \0 021 002 002 I J g \0 \0 \v \0 \0 020 d g
0014020 \0 \0 360 262 v 277 g \0 \0 @ 002 001 034 265 \t g
0014040 \0 \0 @ 002 001 034 g \0 \0 @ 002 001 034 265 \t g
*
0014100 \0 \0 @ 002 001 034 021 003 005 L 221 h 200 i 262 035
0014120 M 245 B 264 5 K 264 2 @ 002 211 d 001 021 001 006
0014140 N \t \0 \0 023 002 003 265 364 h 020 @ 002 260 026 d
0014160 001 021 001 \a O 016 A M 265 006 B 264 003 K C \f
0014200 \0 \0 023 002 003 265 352 h 020 g \0 \0 360 234 @ A
0014220 ` \0 \0 \v \0 \0 @ \t \0 \0 020 @ 001 g \0 \0
0014240 \n \0 \0 265 \n @ 001 g \0 \0 \n \0 \0 021 001 \b
0014260 O 020 221 h 200 i 262 ) @ 001 \t \0 \0 221 h 200
0014300 i 262 036 @ 001 \t \0 \0 221 h 200 i 262 023 @ d
0014320 \t \0 \0 b \0 360 247 @ A B C \f \0 \0 020 B
0014340 224 @ \t \0 \0 277 O 020 265 031 @ d g \0 \0 g
0014360 \0 \0 \v \0 \0 b \0 364 221 h 200 i 263 333 g \0
0014400 \0 @ C \v \0 \0 020 \0 ( 5 3 5 Q C O
0014420 M P I L E . F I L E . A P P L Y
0014440 5 1 4 Q W A L K - F O R M
0014460 4 7 4 Q E V A L 4 6 5 Q C
0014500 O M P I L E - F I L E - E X P R
0014520 E S S I O N 4 5 2 Q M A C R
0014540 O E X P A N D - 1 4 3 7 Q I
0014560 N T E R L I S P - N L A M B D A
0014600 - F U N C T I O N - P 4 2 4 Q
0014620 S P E C I A L - F O R M - P
0014640 4 0 4 Q G E T P R O P 3 7 2
0014660 Q G E T P R O P 3 6 1 Q E
0014700 V A L 3 5 5 Q P R I N T 3
0014720 3 1 Q C O M P I L E - F I L E
0014740 - E X P R E S S I O N 2 7 3 Q
0014760 E V A L 1 4 4 Q \ D O . P
0015000 R O G V 1 3 1 Q C L : M A P
0015020 C A R 1 2 0 Q C L : M A P C
0015040 A R 6 0 Q C O M P I L E - F
0015060 I L E - E X P R E S S I O N 3
0015100 1 Q C O M P I L E - F I L E -
0015120 D E C L A R E : ) \r ( 5 3 0 Q
0015140 P R I N T 5 1 1 Q C O M P I
0015160 L E - F I L E - W A L K - F U N
0015200 C T I O N 5 0 6 Q : W A L K
0015220 - F U N C T I O N 4 0 1 Q C
0015240 O M P I L E . F I L E . E X P R
0015260 E S S I O N 3 6 7 Q C O M P
0015300 I L E - F I L E - E X P R E S S
0015320 I O N 3 5 2 Q F I L E R D T
0015340 B L 3 4 3 Q I N - P A C K A
0015360 G E 2 3 1 Q C L : C O M P I
0015400 L E 2 2 0 Q C O M P I L E
0015420 2 1 1 Q C L : L O A D 2 0 0
0015440 Q L O A D 1 7 1 Q C L : E
0015460 V A L 1 6 0 Q E V A L 1 5
0015500 1 Q E V A L - W H E N 1 4 1
0015520 Q C O M P I L E - F I L E - E
0015540 X P R E S S I O N A 0 0 0 3 1
0015560 2 3 Q C O M P I L E - F I L E
0015600 - E X P R E S S I O N A 0 0 0 2
0015620 1 1 2 Q C O M P I L E - F I
0015640 L E - E X P R E S S I O N A 0 0
0015660 0 1 1 0 4 Q C O M P I L E R
0015700 - L E T 7 3 Q Q U O T E 3
0015720 6 Q P R O G N 1 5 Q D E C
0015740 L A R E : ) \r ( ) \r C O M P I L
0015760 E - F I L E - W A L K - F U N C
0016000 T I O N D 1 \r ( I 0 F O R
0016020 M ) \0 017 \0 \0 \0 001 @ d 003 240 020 d 001
0016040 \t \0 \0 \n \0 \0 020 \0 ( 1 4 Q V A L
0016060 U E S 1 1 Q I N T E R L I S
0016100 P - N L A M B D A - F U N C T I
0016120 O N - P ) \r N I L \r ( ) \r A R G
0016140 T Y P E . S T A T E D 1 \r ( P
0016160 0 X F 1 A R G T Y P E
0016200 . V A R S ) \0 + 001 001 \0 \0 Q 260 $
0016220 d 001 021 001 \0 H i \n \0 \0 277 k i \n \0 \0
0016240 277 H 002 001 \t \0 \0 i \n \0 \0 277 i \t \0 \0
0016260 023 002 003 265 335 h 020 \0 ( 4 2 Q T E R
0016300 P R I 3 5 Q P R I N 1 3 1
0016320 Q E V A L 2 2 Q S P A C E
0016340 S 1 4 Q P R I N 1 ) \r N I L
0016360 \r ( ) \r C O M P I L E . C H E C
0016400 K . A R G T Y P E D 1 \r ( P
0016420 2 V A L P 1 A T Y P E P
0016440 A I R P 0 B L K F L G I
0016460 1 A T I 0 X F 3
0016500 C O U T F I L E F 4 A R G
0016520 T Y P E . V A R S ) \0 346 003 002 \0
0016540 002 A 021 020 \0 @ \t \0 \0 022 360 222 261 \0 330 T
0016560 261 \0 315 d 001 021 001 001 @ I 002 001 \t \0 \0 034
0016600 021 001 002 A I 001 360 262 D J 262 4 o \0 \0 \0
0016620 S \n \0 \0 277 @ S \n \0 \0 277 o \0 \0 \0 S
0016640 \n \0 \0 277 I 002 001 S \n \0 \0 277 o \0 \0 \0
0016660 S \n \0 \0 277 I 002 002 001 S \n \0 \0 277 I 002
0016700 001 @ I 002 001 \t \0 \0 032 260 m J 262 n o \0
0016720 \0 \0 S \n \0 \0 277 @ S \n \0 \0 277 o \0 \0
0016740 \0 S \n \0 \0 277 g \0 \0 A T 026 002 002 001 265
0016760 006 o \0 \0 \0 g \0 \0 h 032 032 032 S \n \0 \0
0017000 277 o \0 \0 \0 S \n \0 \0 277 I 002 002 001 S \n
0017020 \0 \0 277 o \0 \0 \0 S \n \0 \0 277 I 002 001 S
0017040 \n \0 \0 277 S \t \0 \0 277 I 002 001 @ I 002 001
0017060 \t \0 \0 \n \0 \0 \n \0 \0 277 023 023 002 003 265 003
0017100 202 261 377 2 h 020 \0 ( 3 2 7 Q / S E
0017120 T T O P V A L 3 2 4 Q R E M
0017140 O V E 3 2 1 Q G E T T O P V
0017160 A L 3 0 6 Q T E R P R I 3
0017200 0 1 Q P R I N 1 2 7 1 Q P
0017220 R I N 1 2 6 0 Q P R I N 1
0017240 2 4 7 Q P R I N 1 2 3 6 Q
0017260 P R I N 1 2 0 3 Q P R I N 1
0017300 1 7 2 Q P R I N 1 1 6 4 Q
0017320 P R I N 1 1 4 6 Q G E T T
0017340 O P V A L 1 3 3 Q P R I N 1
0017360 1 2 2 Q P R I N 1 1 1 1 Q
0017400 P R I N 1 1 0 1 Q P R I N
0017420 1 7 0 Q P R I N 1 6 2 Q
0017440 P R I N 1 3 5 Q \ E V A L V
0017460 1 7 C O M P . A R G T Y P E
0017500 ) \r ( 2 2 6 Q f u n c t i o n
0017520 2 0 7 Q a ) \r ( 2 6 5 Q
0017540 " b e c a u s e i t w a s
0017560 i n c o r r e c t l y o n
0017600 " 2 4 3 Q " w a s a "
0017620 2 2 3 Q " L A M B D A s p
0017640 r e a d " 1 7 7 Q " " 1
0017660 6 0 Q " W a r n i n g : c o
0017700 m p i l e r t h o u g h t "
0017720 \r 1 1 6 Q " b u t c o m
0017740 p i l e r d o e s n ' t t h
0017760 i n k i t s a " 7 5 Q
0020000 " o n " 5 6 Q " C o m p
0020020 i l e r c o n f u s e d : "
0020040 ) \r C O M P I L E . F I L E . D
0020060 E F I N E Q D 1 \r ( P 1 D
0020100 E F I 1 L C F I L I 0
0020120 F O R M F 2 D O N T C O
0020140 M P I L E F N S ) \0 2 002 001 \0 002
0020160 @ 002 021 021 001 H 003 265 004 h 020 001 Y d 001 R
0020200 034 263 032 001 I 002 001 \t \0 \0 \n \0 \0 277 I 001
0020220 I 001 I 002 001 \n \0 \0 \n \0 \0 277 H 002 X 260
0020240 327 \0 ( 5 2 Q B Y T E C O M P I
0020260 L E 2 4 7 Q C O M P I L E 1
0020300 A 3 4 Q C O M P I L E . C H
0020320 E C K . A R G T Y P E 3 1 Q
0020340 A R G T Y P E ) \r N I L \r ( ) \r
0020360 C O M P I L E - F I L E - S E T
0020400 F - S Y M B O L - F U N C T I O
0020420 N D 1 \r ( I 1 L C F I L
0020440 I 0 F O R M ) \0 K \0 \0 \0 002
0020460 @ 002 002 001 003 001 d g \0 \0 360 245 d g \0 \0
0020500 360 222 277 i 201 277 h 262 $ @ d 002 001 003 001 g
0020520 \0 \0 360 262 031 d 002 002 001 002 001 003 236 002 001 002
0020540 001 @ 002 002 001 002 001 \n \0 \0 020 @ g \0 \0 g
0020560 \0 \0 \v \0 \0 A \n \0 \0 020 \0 ( 1 1 0 Q
0020600 P R I N T 1 0 4 Q W A L K
0020620 - F O R M 7 1 Q B Y T E C O
0020640 M P I L E 2 ) \r ( 1 0 1 Q C O
0020660 M P I L E - F I L E - W A L K -
0020700 F U N C T I O N 7 6 Q : W A
0020720 L K - F U N C T I O N 4 1 Q
0020740 Q U O T E 1 7 Q C L : F U N
0020760 C T I O N 1 1 Q F U N C T I
0021000 O N ) \r ( ) \r C O M P I L E - F
0021020 I L E - E X / I M P O R T D 1
0021040 \r ( I 2 R D T B L I 1
0021060 L C F I L I 0 F O R M )
0021100 \0 \f \0 \0 \0 003 @ A B \v \0 \0 @ \t \0 \0
0021120 020 \0 ( 1 1 Q E V A L 5 P R
0021140 I N T ) \r N I L \r ( ) \r C O M P
0021160 I L E . F I L E . A P P L Y D
0021200 1 \r ( I 2 D E F E R I 1
0021220 F O R M I 0 P R O P F
0021240 0 D E F E R R E D . E X P R
0021260 E S S I O N S F 1 C O M P
0021300 I L E D . F I L E ) \0 023 \0 002 \0
0021320 003 B 227 @ A 032 P 032 c \0 020 A Q l 002 @
0021340 017 016 020 \0 N I L \r N I L \r ( ) \r C
0021360 O M P I L E . F I L E . R E S E
0021400 T D 1 \r ( I 2 R O O T N A
0021420 M E I 1 S O U R C E F I L
0021440 E I 0 C O M P I L E D . F
0021460 I L E F 0 R E S E T S T A
0021500 T E F 1 N O T C O M P I L
0021520 E D F I L E S ) \0 - \0 002 \0 003 @
0021540 265 035 A 265 024 P 263 # g \0 \0 B Q \n \0 \0
0021560 \n \0 \0 g \0 \0 020 \t \0 \0 277 260 352 \t \0 \0
0021600 262 342 @ \t \0 \0 277 260 333 h 020 \0 ( 4 6 Q
0021620 C L O S E - A N D - M A Y B E
0021640 - D E L E T E 4 0 Q O P E N
0021660 P 3 2 Q C L O S E F ? 2 3
0021700 Q / S E T A T O M V A L 2 0
0021720 Q R E M O V E ) \r ( 2 6 Q R
0021740 e m o v e s 1 3 Q N O T C O
0021760 M P I L E D F I L E S ) \r ( ) \r
0022000 C O M P I L E - I N - C O R E A
0022020 0 0 0 1 A 0 0 0 2 D 1 \r ( N A
0022040 M E E R R O R S E T P 7
0022060 F R E E V A R S P 6 L C F
0022100 I L P 5 L O C A L V A R S
0022120 P 4 S P E C V A R S P
0022140 3 L S T F I L P 2 S V F
0022160 L G P 1 S T R F P 0
0022200 L A P F L G F 1 0 Q f n -
0022220 e x p r F 1 1 Q f n - n a
0022240 m e F 1 2 Q P R I N T L A
0022260 P F 1 3 Q N O R E D E F I
0022300 N E F 1 4 Q f n - t y p e
0022320 F 1 5 Q N O S A V E F
0022340 1 6 Q S Y S S P E C V A R S
0022360 F 1 7 Q R E S E T Y F 2
0022400 0 Q F R E E V A R S ) \0 H \b
0022420 \t 002 \0 W 024 264 \n ` \0 \0 221 i 201 l 002 W
0022440 026 221 h 200 i W 030 g \0 \0 360 223 g \0 \0 205
0022460 W 032 221 h 200 i i W 034 i 021 026 006 W 022 W
0022500 020 i \v \0 \0 c 020 277 W 021 001 \a W 022 W
0022520 020 \n \0 \0 022 022 c 036 i 020 \0 ( 1 0 0 Q
0022540 B Y T E C O M P I L E 2 6 1
0022560 Q C O M P I L E 1 A ) \r ( 3 3
0022600 Q S E L E C T O R 2 6 Q S
0022620 E L E C T O R 6 B Y T E C O
0022640 M P F L G ) \r ( ) \r C O M P I L
0022660 E - I N - C O R E A 0 0 0 1 D
0022700 1 \r ( N A M E E R R O R S E T
0022720 P 2 R E S E T Z P 1
0022740 R E S E T Y P 0 L I S P X
0022760 H I S T F 3 N U L L F I L
0023000 E F 4 C O U T F I L E F
0023020 5 L I S P X H I S T F 6
0023040 R E S E T V A R S L S T ) \0
0023060 G 003 004 002 \0 g \0 \0 \t \0 \0 233 S \t \0 \0
0023100 226 S \t \0 \0 221 S 212 g \0 \0 g \0 \0 \n \0
0023120 \0 c 006 c \b 277 U 021 ! 002 V o \0 \0 \0 g
0023140 \0 \0 \n \0 \0 221 h 202 g \0 \0 Z \n \0 \0 277
0023160 J 223 \b \0 \0 200 I 022 h 032 020 \0 ( 7 7 Q
0023200 E R R O R ! 7 1 Q R E S E
0023220 T R E S T O R E 5 7 Q C O M
0023240 P I L E - I N - C O R E A 0 0 0
0023260 1 A 0 0 0 2 3 3 Q O P E N F
0023300 I L E 1 7 Q O P E N P 1 2
0023320 Q S T R E A M P 5 B O U N
0023340 D P ) \r ( 6 5 Q E R R O R 5
0023360 4 Q I N T E R N A L 3 0 Q
0023400 O U T P U T 2 5 Q { N U L L
0023420 } 2 N U L L F I L E ) \r (
0023440 5 1 Q ( C O M P I L E - I N -
0023460 C O R E A 0 0 0 1 A 0 0 0 2 ) )
0023500 \r C O M P I L E - I N - C O R E
0023520 D 1 \r ( P 4 M A C R O Y
0023540 P 3 M A C R O X P 2 P
0023560 R I N T L A P P 1 N O R E
0023600 D E F I N E P 0 D O N T -
0023620 T R A N S F E R - P U T D I
0023640 3 N O S A V E I 2 f n -
0023660 t y p e I 1 f n - e x p r
0023700 I 0 f n - n a m e F 5
0023720 R E S E T V A R S L S T F
0023740 6 N L A M A F 7 N L A M
0023760 L F 1 0 Q L A M S F 1
0024000 1 Q L A M A F 1 2 Q N O
0024020 F I X V A R S L S T F 1 3 Q
0024040 C O U T F I L E ) \0 235 005 \a \0
0024060 004 i 021 A 004 g \0 \0 V 032 g \0 \0 W 016 032
0024100 g \0 \0 W 020 032 g \0 \0 W 022 032 g \0 \0 `
0024120 \0 \0 032 g \0 \0 W 024 032 g \0 \0 W 026 032 U
0024140 032 032 032 032 032 032 032 c \n [ \ o \0 \0 \0 g
0024160 \0 \0 \n \0 \0 K 001 002 c \f 277 K 002 [ 001 002
0024200 c 016 277 K 002 [ 001 002 c 020 277 K 002 [ 001 002
0024220 c 022 277 K 002 [ 001 002 027 \0 \0 277 K 002 [ 001
0024240 002 c 024 277 K 002 [ 001 002 c 026 277 L d U 360
0024260 225 277 K 002 c \n 215 U \n \0 \0 231 U k L \v
0024300 \0 \0 K 002 031 277 265 005 \b \0 \0 001 020 \0 ( 2
0024320 3 1 Q E R R O R ! 2 2 0 Q
0024340 N L E F T 2 1 1 Q T A I L P
0024360 1 0 3 Q C O M P I L E - I N
0024400 - C O R E A 0 0 0 1 ) \r ( 1 5 1
0024420 Q N O F I X F N S L S T 1 0
0024440 0 Q I N T E R N A L 5 2 Q
0024460 C O U T F I L E 4 4 Q N O F
0024500 I X V A R S L S T 4 0 Q N O
0024520 F I X F N S L S T 3 5 Q N O
0024540 F I X F N S L S T 2 7 Q L A
0024560 M A 2 1 Q L A M S 1 3 Q
0024600 N L A M L 6 N L A M A ) \r (
0024620 7 5 Q ( C O M P I L E - I N
0024640 - C O R E A 0 0 0 1 ) ) \r ( R P
0024660 A Q Q A R G T Y P E . V A R S
0024700 ( ( 1 N L A M L " N L A M
0024720 B D A s p r e a d " ) ( 2
0024740 L A M A " L A M B D A n o s
0024760 p r e a d " ) ( 0 L A M S
0025000 " L A M B D A s p r e a d " )
0025020 ( 3 \r N L A M A " N L A M
0025040 B D A n o - s p r e a d " ) )
0025060 ) \r ( P U T P R O P S D E F I
0025100 N E Q C O M P I L E - F I L E
0025120 - E X P R E S S I O N C O M P
0025140 I L E . F I L E . D E F I N E Q
0025160 ) \r ( P U T P R O P S * C O
0025200 M P I L E - F I L E - E X P R E
0025220 S S I O N N I L L ) \r ( P U T
0025240 P R O P S S E T F - S Y M B O
0025260 L - F U N C T I O N C O M P I
0025300 L E - F I L E - E X P R E S S I
0025320 O N C O M P I L E - F I L E -
0025340 S E T F - S Y M B O L - F U N C
0025360 T I O N ) \r C O M P I L E - F I
0025400 L E - D E C L A R E : D 1 \r (
0025420 L ( 4 D E F E R 3 D O C
0025440 O P Y 2 E V A L @ C O M P I
0025460 L E 1 C O M P I L E D . F I
0025500 L E 0 F O R M ) F 2 C
0025520 O U T F I L E ) \0 370 002 001 \0 005 @
0025540 002 021 021 001 H d \t \0 \0 221 h 020 001 004 l 004
0025560 360 242 261 \0 267 H 001 Y g \0 \0 360 222 261 \0 323
0025600 I g \0 \0 360 222 261 \0 312 I d g \0 \0 360 222
0025620 261 \0 277 d g \0 \0 360 226 277 H 002 X 261 \0 262
0025640 g \0 \0 360 247 I d g \0 \0 360 226 277 i b 004
0025660 261 \0 237 g \0 \0 360 225 h b 004 261 \0 224 I d
0025700 g \0 \0 360 234 277 H 002 X 001 \t \0 \0 b 004 261
0025720 \0 200 g \0 \0 360 247 I d g \0 \0 360 225 277 i
0025740 b 006 260 m g \0 \0 360 224 h b 006 260 c I d
0025760 g \0 \0 360 233 277 H 002 X 001 \t \0 \0 b 006 260
0026000 P g \0 \0 360 230 R o \0 \0 \0 H 002 260 026 I
0026020 g \0 \0 360 263 < I g \0 \0 360 263 5 R o \0
0026040 \0 \0 H 001 \v \0 \0 260 ( H 001 001 g \0 \0 360
0026060 233 H 001 A B C D \r 005 \0 \0 260 024 B 225 H
0026100 001 \t \0 \0 277 C 230 H 001 A B D \f \0 \0 277
0026120 H 002 X 261 377 022 \0 ( 3 5 7 Q C O M
0026140 P I L E - F I L E - E X P R E S
0026160 S I O N 3 4 4 Q E V A L 3
0026200 3 3 Q C O M P I L E - F I L E
0026220 - D E C L A R E : 3 0 7 Q F
0026240 O R M A T 2 3 5 Q E V A L
0026260 1 5 5 Q E V A L 1 1 Q E N
0026300 D P ) \r ( 3 1 7 Q D E C L A R
0026320 E : 2 7 2 Q C O M P I L E R
0026340 V A R S 2 6 3 Q N O T F I R
0026360 S T 2 4 4 Q F I R S T 2 2
0026400 3 Q C O P Y W H E N 2 0 7 Q
0026420 D O N T C O P Y 1 7 4 Q D
0026440 O C O P Y 1 6 5 Q C O P Y
0026460 1 4 3 Q E V A L @ C O M P I L
0026500 E W H E N 1 2 6 Q D O N T E
0026520 V A L @ C O M P I L E 1 1 2 Q
0026540 D O E V A L @ C O M P I L E
0026560 1 0 3 Q E V A L @ C O M P I L
0026600 E 6 7 Q E V A L @ L O A D W
0026620 H E N 5 6 Q D O N T E V A L
0026640 @ L O A D 4 4 Q D O E V A L
0026660 @ L O A D 3 3 Q E V A L @ L
0026700 O A D ) \r ( 3 0 2 Q " W a r
0026720 n i n g : I g n o r i n g u
0026740 n r e c o g n i z e d D E C L
0026760 A R E : t a g : ~ S ~ % % "
0027000 2 5 3 Q " W a r n i n g :
0027020 ( D E C L A R E : - - F I R
0027040 S T - - - - ) n o t i m
0027060 p l e m e n t e d i n C O M
0027100 P I L E - F I L E : ~ S ~ % %
0027120 " ) \r N E W D E F C D 1 \r ( I
0027140 1 D F I 0 N M F 2
0027160 D F N F L G F 3 C O M P
0027200 I L E . F I L E . A F T E R F
0027220 4 S V F L G F 5 * E R
0027240 R O R - O U T P U T * ) \0 226 002
0027260 004 \0 002 T g \0 \0 360 262 A g \0 \0 @ d 262
0027300 026 d i 360 257 3 020 221 h 200 i 227 g \0 \0 @
0027320 h 032 032 200 @ A d 262 026 d i 360 257 3 020 221
0027340 h 200 i 227 g \0 \0 A h 032 032 200 A i h 032
0027360 032 032 032 S 032 c 006 260 O R 224 R i 360 262 '
0027400 @ \t \0 \0 262 031 @ i \n \0 \0 277 R 256 U o
0027420 \0 \0 \0 @ \v \0 \0 277 @ \t \0 \0 277 @ A i
0027440 \v \0 \0 260 # @ g \0 \0 A d 005 006 262 026 277
0027460 l \r 037 A 006 \0 \0 311 \0 021 002 001 H d I 024
0027500 \0 277 022 \v \0 \0 A 020 \0 ( 2 2 2 Q /
0027520 P U T P R O P 1 5 7 Q / P U
0027540 T D 1 5 0 Q S A V E D E F
0027560 1 4 3 Q F O R M A T 1 2 7 Q
0027600 V I R G I N F N 1 2 0 Q \
0027620 D E F I N E D P ) \r ( 2 0 3 Q
0027640 A R R A Y P 1 6 5 Q C O D E
0027660 6 3 Q Q U O T E 3 3 Q Q
0027700 U O T E 1 1 Q N E W D E F C
0027720 3 D E F E R ) \r ( 1 3 7 Q
0027740 " ~ & ( ~ S r e d e f i n e
0027760 d ) ~ % % " ) \r ( M O V D ( Q
0030000 U O T E N E W D E F C ) ( Q
0030020 U O T E D E F C ) ) \r ( A D D
0030040 T O V A R P R E T T Y D E F M
0030060 A C R O S ( O P T I M I Z E R
0030100 S X ( P * ( M A P C A R
0030120 ( Q U O T E X ) ( F U N C
0030140 T I O N ( L A M B D A ( I T
0030160 E M ) ( C L : D O ( ( D E F
0030200 ( \r G E T D E F I T E M (
0030220 Q U O T E O P T I M I Z E R S
0030240 ) ) ) ) ( D E F D E F ) (
0030260 C E R R O R " R e - f e t c h
0030300 t h e d e f i n i t i o n "
0030320 \r " N o ~ S d e f i n i t
0030340 i o n f o r ~ S " ( Q U O
0030360 T E O P T I M I Z E R S ) I
0030400 T E M ) ) ) ) ) ) ) ) \r ( A D D
0030420 T O V A R P R E T T Y T Y P E
0030440 L S T ( C H A N G E D O P T I
0030460 M I Z E R S L S T O P T I M I
0030500 Z E R S " C O M P I L E R O
0030520 P T I M I Z E R S " ) ) \r ( C O
0030540 N D ( ( N O T ( C L : G E T
0030560 H A S H ( Q U O T E O P T I
0030600 M I Z E R S ) * D E F I N I T
0030620 I O N - H A S H - T A B L E * )
0030640 ) ( C L : P U T H A S H ( Q
0030660 U O T E O P T I M I Z E R S )
0030700 \r * D E F I N I T I O N - H A
0030720 S H - T A B L E * ( M A K E -
0030740 H A S H - T A B L E ( Q U O T
0030760 E : T E S T ) ( Q U O T E
0031000 C L : E Q U A L ) ( Q U O T E
0031020 : S I Z E ) 5 0 ( Q U O T
0031040 E \r : R E H A S H - S I Z E )
0031060 5 0 ) ) ) ) \r ( A D D T O V A
0031100 R F I L E P K G T Y P E S O
0031120 P T I M I Z E R S ) \r ( P U T P
0031140 R O P S O P T I M I Z E R S
0031160 G E T D E F \ D E F I N E - T
0031200 Y P E - G E T D E F ) \r ( P U T
0031220 P R O P S O P T I M I Z E R S
0031240 F I L E P K G C O N T E N T S
0031260 N I L L ) \r ( P U T P R O P S
0031300 O P T I M I Z E R S P R O P
0031320 T Y P E O P T I M I Z E R S )
0031340 \r e x p a n d - C O M P I L E R
0031360 : O P T I M I Z E R - L I S T
0031400 D 1 \r ( L ( 1 $ $ M A C R O
0031420 - E N V I R O N M E N T 0 $
0031440 $ M A C R O - F O R M ) ) \0 022
0031460 001 \0 \0 002 @ 002 001 021 001 \0 g \0 \0 H o \0
0031500 \0 \0 032 032 020 \0 N I L \r ( 1 0 Q G
0031520 E T ) \r ( 1 5 Q ( ( Q U O T
0031540 E C O M P I L E R : O P T I M
0031560 I Z E R - L I S T ) ) ) \r ( S E
0031600 T F - M A C R O - F U N C T I O
0031620 N ( Q U O T E C O M P I L E
0031640 R : O P T I M I Z E R - L I S T
0031660 ) ( Q U O T E e x p a n d -
0031700 C O M P I L E R : O P T I M I Z
0031720 E R - L I S T ) ) \r e x p a n d
0031740 - D E F O P T I M I Z E R D 1
0031760 \r ( L ( 1 $ $ M A C R O - E
0032000 N V I R O N M E N T 0 $ $ M
0032020 A C R O - F O R M ) ) 001 a \r \0
0032040 \0 002 @ 002 \t \0 \0 021 301 \f @ 271 H 001 272 H
0032060 002 [ 001 274 K 002 275 A 276 g \0 \0 g \0 \0 M
0032100 221 h 200 i 262 M g \0 \0 g \0 \0 J h 032 032
0032120 o \0 \0 \0 g \0 \0 g \0 \0 g \0 \0 J h 032
0032140 032 o \0 \0 \0 032 032 g \0 \0 g \0 \0 L h 032
0032160 032 h 032 032 h 032 032 032 h 032 032 032 032 J o \0
0032200 \0 \0 L \v \0 \0 L \t \0 \0 \n \0 \0 272 261 \0
0032220 232 J _ 030 277 L _ 026 265 003 202 261 \0 314 o \0
0032240 \0 \0 O 030 \n \0 \0 _ 024 277 O 026 g \0 \0 M
0032260 J N g \0 \0 g \0 \0 g \0 \0 g \0 \0 \r \t
0032300 \0 \0 \t \0 \0 _ 022 001 _ 020 277 O 022 002 001 _
0032320 016 277 g \0 \0 g \0 \0 O 024 o \0 \0 \0 O 016
0032340 O 020 h 032 \n \0 \0 032 032 032 g \0 \0 g \0 \0
0032360 O 030 h 032 032 o \0 \0 \0 g \0 \0 g \0 \0 g
0032400 \0 \0 O 030 h 032 032 o \0 \0 \0 032 032 g \0 \0
0032420 g \0 \0 O 024 h 032 032 h 032 032 h 032 032 032 h
0032440 032 032 032 032 h 032 032 032 h 032 032 g \0 \0 o \0
0032460 \0 \0 g \0 \0 g \0 \0 g \0 \0 g \0 \0 J h
0032500 032 032 o \0 \0 \0 g \0 \0 I h 032 032 h 032 032
0032520 032 032 h 032 032 032 h 032 032 032 g \0 \0 J h 032
0032540 032 h 032 032 032 032 020 004 l 004 360 242 261 377 2 M
0032560 002 242 261 377 , L Z M 001 M 002 275 _ 026 277 261
0032600 377 ( \0 ( 3 0 4 Q \ A P P E N D
0032620 2 2 4 2 Q \ M V L I S T 2
0032640 3 7 Q P A R S E - D E F M A C
0032660 R O 2 0 4 Q P A C K * 1 5
0032700 2 Q I N T E R N 1 4 7 Q S
0032720 Y M B O L - P A C K A G E 1 4
0032740 3 Q S T R I N G - A P P E N D
0032760 4 R E M O V E - C O M M E N
0033000 T S ) \r ( 4 7 2 Q Q U O T E
0033020 4 4 6 Q Q U O T E 4 3 3 Q
0033040 Q U O T E 4 3 0 Q \ D E F I
0033060 N E - T Y P E - S A V E - D E F
0033100 N 4 2 5 Q F I L E P K G F L
0033120 G 4 2 2 Q A N D 4 1 3 Q
0033140 E V A L - W H E N 3 6 0 Q Q
0033160 U O T E 3 5 5 Q L I S T 3
0033200 3 7 Q Q U O T E 3 3 4 Q G
0033220 E T P R O P 3 3 1 Q U N I O
0033240 N 3 1 5 Q Q U O T E 3 1 2
0033260 Q P U T P R O P 2 6 5 Q D
0033300 E F U N 2 6 2 Q P R O G N
0033320 2 3 3 Q $ $ C T X 2 3 0 Q
0033340 : C O N T E X T 2 2 5 Q $ $
0033360 E N V 2 2 2 Q : E N V I R O
0033400 N M E N T 2 1 4 Q $ $ W H O
0033420 L E 1 1 2 Q Q U O T E 1 0
0033440 7 Q L I S T 7 2 Q Q U O T
0033460 E 6 7 Q G E T P R O P 6 4
0033500 Q U N I O N 5 1 Q Q U O T
0033520 E 4 6 Q P U T P R O P 3 4
0033540 Q W I T H O U T - F I L E P K
0033560 G 3 1 Q P R O G N ) \r ( 4
0033600 4 3 Q ( Q U O T E O P T I M
0033620 I Z E R S ) 4 1 7 Q ( C L :
0033640 E V A L ) 3 5 0 Q ( ( Q U O
0033660 T E C O M P I L E R : O P T I
0033700 M I Z E R - L I S T ) ) 3 2 6
0033720 Q ( Q U O T E C O M P I L E
0033740 R : O P T I M I Z E R - L I S T
0033760 ) \r 2 7 3 Q ( $ $ W H O L E
0034000 $ $ E N V $ $ C T X ) 1 7
0034020 7 Q " o p t i m i z e - " 1
0034040 3 7 Q " - O P T I M I Z E D -
0034060 B Y - " 1 0 2 Q ( ( Q U O T
0034100 E C O M P I L E R : O P T I M
0034120 I Z E R - L I S T ) ) \r 6 1 Q
0034140 ( Q U O T E C O M P I L E R
0034160 : O P T I M I Z E R - L I S T )
0034200 ) \r ( S E T F - M A C R O - F U
0034220 N C T I O N ( Q U O T E D E
0034240 F O P T I M I Z E R ) ( Q U O
0034260 T E e x p a n d - D E F O P T
0034300 I M I Z E R ) ) \r ( A D D T O V
0034320 A R P R E T T Y P R I N T M A
0034340 C R O S ( D E F O P T I M I Z
0034360 E R . P P R I N T - D E F I
0034400 N E R ) ) \r ( L E T * ( ( A 1
0034420 0 0 0 ( Q U O T E D E F O P
0034440 T I M I Z E R ) ) ( A 1 0 0 1
0034460 ( Q U O T E C L : F U N C T
0034500 I O N ) ) ( A 1 0 0 2 " d e
0034520 f i n e a n o p t i m i z e
0034540 r f o r N A M E " ) \r ) (
0034560 P R O G N ( C O N D ( ( F B
0034600 O U N D P ( Q U O T E S E T
0034620 - D O C U M E N T A T I O N ) )
0034640 ( S E T - D O C U M E N T A T
0034660 I O N A 1 0 0 0 A 1 0 0 1
0034700 A 1 0 0 2 ) ) ) A 1 0 0 2 ) )
0034720 \r C O M P I L E R : : E N V - F
0034740 E N V D 1 \r ( L ( 0 O B J
0034760 E C T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0
0035000 311 002 020 \0 N I L \r ( 3 C O M P I
0035020 L E R : : E N V ) \r ( ) \r s e t
0035040 f - C O M P I L E R : : E N V -
0035060 F E N V D 1 \r ( L ( 1 V A
0035100 L U E 0 O B J E C T ) ) \0
0035120 \n \0 \0 \0 002 @ 006 \0 \0 A 024 002 A 020 \0 N
0035140 I L \r ( 3 C O M P I L E R : :
0035160 E N V ) \r ( ) \r ( R E M P R O P
0035200 ( Q U O T E C O M P I L E R
0035220 : : E N V - F E N V ) ( Q U O
0035240 T E S E T F - M E T H O D - E
0035260 X P A N D E R ) ) \r ( P U T P R
0035300 O P S C O M P I L E R : : E N
0035320 V - F E N V S E T F - I N V E
0035340 R S E s e t f - C O M P I L E
0035360 R : : E N V - F E N V ) \r C O M
0035400 P I L E R : : E N V - V E N V
0035420 D 1 \r ( L ( 0 O B J E C T )
0035440 ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 \0 020 \0
0035460 N I L \r ( 3 C O M P I L E R :
0035500 : E N V ) \r ( ) \r s e t f - C O
0035520 M P I L E R : : E N V - V E N V
0035540 D 1 \r ( L ( 1 V A L U E
0035560 0 O B J E C T ) ) \0 \n \0 \0 \0
0035600 002 @ 006 \0 \0 A 024 \0 A 020 \0 N I L \r (
0035620 3 C O M P I L E R : : E N V )
0035640 \r ( ) \r ( R E M P R O P ( Q U
0035660 O T E C O M P I L E R : : E N
0035700 V - V E N V ) ( Q U O T E S
0035720 E T F - M E T H O D - E X P A N
0035740 D E R ) ) \r ( P U T P R O P S
0035760 C O M P I L E R : : E N V - V E
0036000 N V S E T F - I N V E R S E
0036020 s e t f - C O M P I L E R : : E
0036040 N V - V E N V ) \r C O M P I L E
0036060 R : : E N V - P D 1 \r ( L (
0036100 0 O B J E C T ) ) \0 006 \0 \0 \0
0036120 001 @ 303 \0 \0 020 \0 N I L \r ( 3 C O
0036140 M P I L E R : : E N V ) \r ( ) \r
0036160 C O M P I L E R : : C O P Y - E
0036200 N V D 1 \r ( L ( 0 O B J E
0036220 C T ) ) \0 \t \0 \0 \0 001 ` \0 \0 @ \n
0036240 \0 \0 020 \0 ( 6 N C R E A T E 2 )
0036260 \r ( 2 004 003 C O M P I L E R : :
0036300 E N V T Y P E # ) \r ( ) \r ( D E
0036320 F P R I N T ( Q U O T E C O
0036340 M P I L E R : : E N V ) ( F U
0036360 N C T I O N \ D E F P R I N T
0036400 . D E F S T R U C T . D E F A U
0036420 L T ) ) \r C O M P I L E R : : M
0036440 A K E - E N V D 1 \r ( L ( 0
0036460 - a r g s - ) ) \0 X 005 \0 002 \0
0036500 e 021 001 \0 H k 021 002 002 J d I 363 262 $ 277
0036520 h 022 021 1 004 H k 273 272 K d J 363 262 ' 277
0036540 h 274 ` \0 \0 037 d I 024 \0 277 d L 024 002 277
0036560 020 a g \0 \0 360 225 J k 330 a 260 326 J l 002
0036600 324 Z 260 310 a g \0 \0 360 225 K k 330 a 260 323
0036620 K l 002 324 [ 260 305 \0 N I L \r ( 1 0 7
0036640 Q : F E N V 6 4 Q : V E N
0036660 V 4 4 Q 004 003 C O M P I L E R
0036700 : : E N V T Y P E # ) \r ( ) \r (
0036720 P U T P R O P ( Q U O T E C
0036740 O M P I L E R : : E N V ) ( Q
0036760 U O T E S T R U C T U R E - C
0037000 O N S T R U C T O R ) ( Q U O
0037020 T E C O M P I L E R : : M A K
0037040 E - E N V ) ) \r ( P U T P R O P
0037060 ( Q U O T E C O M P I L E R
0037100 : : E N V ) ( Q U O T E % %
0037120 S T R U C T U R E - C L A S S )
0037140 ( Q U O T E S T R U C T U R
0037160 E - C L A S S ) ) \r ( P U T P R
0037200 O P ( Q U O T E C O M P I L
0037220 E R : : E N V ) ( Q U O T E
0037240 % % S L O T - D E S C R I P T I
0037260 O N S ) ( Q U O T E ( ( V E
0037300 N V N I L ) ( F E N V N I
0037320 L ) ) ) ) \r ( P U T P R O P (
0037340 Q U O T E C O M P I L E R : :
0037360 E N V ) ( Q U O T E % % L O
0037400 C A L - S L O T - N A M E S )
0037420 ( Q U O T E ( F E N V V E N
0037440 V ) ) ) \r ( / D E C L A R E D A
0037460 T A T Y P E ( Q U O T E C O
0037500 M P I L E R : : E N V ) ( Q U
0037520 O T E ( P O I N T E R P O I
0037540 N T E R ) ) ( Q U O T E ( (
0037560 C O M P I L E R : : E N V 0
0037600 P O I N T E R ) ( \r C O M P I
0037620 L E R : : E N V 2 P O I N T
0037640 E R ) ) ) ( Q U O T E 4 ) )
0037660 \r C O M P I L E R : C O N T E X
0037700 T - P R E D I C A T E - P D 1
0037720 \r ( L ( 0 O B J E C T ) )
0037740 \0 \b \0 \0 \0 001 @ 006 \0 \0 311 004 020 \0 N I
0037760 L \r ( 3 C O M P I L E R : C O
0040000 N T E X T ) \r ( ) \r s e t f - C
0040020 O M P I L E R : C O N T E X T -
0040040 P R E D I C A T E - P D 1 \r (
0040060 L ( 1 V A L U E 0 O B J
0040100 E C T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0
0040120 A 024 004 A 020 \0 N I L \r ( 3 C O M
0040140 P I L E R : C O N T E X T ) \r (
0040160 ) \r ( R E M P R O P ( Q U O T
0040200 E C O M P I L E R : C O N T E
0040220 X T - P R E D I C A T E - P )
0040240 ( Q U O T E S E T F - M E T H
0040260 O D - E X P A N D E R ) ) \r ( P
0040300 U T P R O P S C O M P I L E R
0040320 : C O N T E X T - P R E D I C A
0040340 T E - P S E T F - I N V E R S
0040360 E s e t f - C O M P I L E R :
0040400 C O N T E X T - P R E D I C A T
0040420 E - P ) \r C O M P I L E R : C O
0040440 N T E X T - V A L U E S - U S E
0040460 D D 1 \r ( L ( 0 O B J E C
0040500 T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 002
0040520 020 \0 N I L \r ( 3 C O M P I L E
0040540 R : C O N T E X T ) \r ( ) \r s e
0040560 t f - C O M P I L E R : C O N T
0040600 E X T - V A L U E S - U S E D
0040620 D 1 \r ( L ( 1 V A L U E 0
0040640 O B J E C T ) ) \0 \n \0 \0 \0 002
0040660 @ 006 \0 \0 A 024 002 A 020 \0 N I L \r ( 3
0040700 C O M P I L E R : C O N T E X
0040720 T ) \r ( ) \r ( R E M P R O P (
0040740 Q U O T E C O M P I L E R : C
0040760 O N T E X T - V A L U E S - U S
0041000 E D ) ( Q U O T E S E T F -
0041020 M E T H O D - E X P A N D E R )
0041040 ) \r ( P U T P R O P S C O M P
0041060 I L E R : C O N T E X T - V A L
0041100 U E S - U S E D S E T F - I N
0041120 V E R S E s e t f - C O M P I
0041140 L E R : C O N T E X T - V A L U
0041160 E S - U S E D ) \r C O M P I L E
0041200 R : C O N T E X T - T O P - L E
0041220 V E L - P D 1 \r ( L ( 0 O
0041240 B J E C T ) ) \0 \b \0 \0 \0 001 @ 006
0041260 \0 \0 311 \0 020 \0 N I L \r ( 3 C O M
0041300 P I L E R : C O N T E X T ) \r (
0041320 ) \r s e t f - C O M P I L E R :
0041340 C O N T E X T - T O P - L E V E
0041360 L - P D 1 \r ( L ( 1 V A L
0041400 U E 0 O B J E C T ) ) \0 \n
0041420 \0 \0 \0 002 @ 006 \0 \0 A 024 \0 A 020 \0 N I
0041440 L \r ( 3 C O M P I L E R : C O
0041460 N T E X T ) \r ( ) \r ( R E M P R
0041500 O P ( Q U O T E C O M P I L
0041520 E R : C O N T E X T - T O P - L
0041540 E V E L - P ) ( Q U O T E S
0041560 E T F - M E T H O D - E X P A N
0041600 D E R ) ) \r ( P U T P R O P S
0041620 C O M P I L E R : C O N T E X T
0041640 - T O P - L E V E L - P S E T
0041660 F - I N V E R S E s e t f - C
0041700 O M P I L E R : C O N T E X T -
0041720 T O P - L E V E L - P ) \r C O M
0041740 P I L E R : : C O N T E X T - P
0041760 D 1 \r ( L ( 0 O B J E C T
0042000 ) ) \0 006 \0 \0 \0 001 @ 303 \0 \0 020 \0 N
0042020 I L \r ( 3 C O M P I L E R : C
0042040 O N T E X T ) \r ( ) \r C O M P I
0042060 L E R : : C O P Y - C O N T E X
0042100 T D 1 \r ( L ( 0 O B J E C
0042120 T ) ) \0 \t \0 \0 \0 001 ` \0 \0 @ \n \0
0042140 \0 020 \0 ( 6 N C R E A T E 2 ) \r
0042160 ( 2 004 003 C O M P I L E R : C O
0042200 N T E X T T Y P E # ) \r ( ) \r (
0042220 D E F P R I N T ( Q U O T E
0042240 C O M P I L E R : C O N T E X T
0042260 ) ( F U N C T I O N \ D E F
0042300 P R I N T . D E F S T R U C T .
0042320 D E F A U L T ) ) \r C O M P I L
0042340 E R : M A K E - C O N T E X T
0042360 D 1 \r ( L ( 0 - a r g s - )
0042400 ) \0 202 \b \0 002 \0 e 021 001 \0 H k 021 002
0042420 002 J d I 363 262 ; 277 h 022 021 a \a H k 273
0042440 272 K d J 363 262 > 277 g \0 \0 274 H k 276 275
0042460 N d M 363 262 B 277 h _ 016 277 ` \0 \0 037 d
0042500 I 024 \0 277 d L 024 002 277 d O 016 024 004 277 020
0042520 a g \0 \0 360 225 J k 330 a 260 277 J l 002 324
0042540 Z 260 261 a g \0 \0 360 225 K k 330 a 260 276 K
0042560 l 002 324 [ 260 256 a g \0 \0 360 225 N k 330 a
0042600 260 270 N l 002 324 ^ 260 252 \0 N I L \r ( 1
0042620 6 1 Q : P R E D I C A T E - P
0042640 1 3 6 Q : V A L U E S - U S
0042660 E D 1 1 3 Q : T O P - L E V
0042700 E L - P 6 5 Q 004 003 C O M P I
0042720 L E R : C O N T E X T T Y P E #
0042740 4 2 Q : U N K N O W N ) \r (
0042760 ) \r ( P U T P R O P ( Q U O T
0043000 E C O M P I L E R : C O N T E
0043020 X T ) ( Q U O T E S T R U C
0043040 T U R E - C O N S T R U C T O R
0043060 ) ( Q U O T E C O M P I L E
0043100 R : M A K E - C O N T E X T ) )
0043120 \r ( P U T P R O P ( Q U O T E
0043140 C O M P I L E R : C O N T E X
0043160 T ) ( Q U O T E % % S T R U
0043200 C T U R E - C L A S S ) ( Q U
0043220 O T E S T R U C T U R E - C L
0043240 A S S ) ) \r ( P U T P R O P (
0043260 Q U O T E C O M P I L E R : C
0043300 O N T E X T ) ( Q U O T E %
0043320 % S L O T - D E S C R I P T I O
0043340 N S ) ( Q U O T E ( ( T O P
0043360 - L E V E L - P N I L ) ( V
0043400 A L U E S - U S E D \r : U N K
0043420 N O W N ) ( P R E D I C A T E
0043440 - P N I L ) ) ) ) \r ( P U T P
0043460 R O P ( Q U O T E C O M P I
0043500 L E R : C O N T E X T ) ( Q U
0043520 O T E % % L O C A L - S L O T
0043540 - N A M E S ) ( Q U O T E (
0043560 P R E D I C A T E - P V A L U
0043600 E S - U S E D \r T O P - L E V
0043620 E L - P ) ) ) \r ( / D E C L A R
0043640 E D A T A T Y P E ( Q U O T E
0043660 C O M P I L E R : C O N T E X
0043700 T ) ( Q U O T E ( P O I N T
0043720 E R P O I N T E R P O I N T
0043740 E R ) ) ( Q U O T E ( ( C O
0043760 M P I L E R : C O N T E X T \r
0044000 0 P O I N T E R ) ( C O M P
0044020 I L E R : C O N T E X T 2 P
0044040 O I N T E R ) ( C O M P I L E
0044060 R : C O N T E X T 4 P O I N
0044100 T E R ) ) ) ( Q U O T E 6 )
0044120 ) \r C O M P I L E R : C O P Y -
0044140 E N V - W I T H - F U N C T I O
0044160 N D 1 \r ( L ( 0 - a r g s
0044200 - ) ) \0 K \b \0 002 \0 e 021 001 \0 k a
0044220 021 a \a l 002 a 272 l 003 H 361 223 g \0 \0 202
0044240 l 003 a 273 l 004 H 361 221 h 202 l 004 a 274 I
0044260 265 037 \b \0 \0 ] _ 016 277 J K L h 032 032 032
0044300 O 016 \t \0 \0 032 276 O 016 N \n \0 \0 M 020 \t
0044320 \0 \0 260 343 \0 ( 1 0 7 Q C O M P I
0044340 L E R : : C O P Y - E N V 1 0
0044360 2 Q s e t f - C O M P I L E R
0044400 : : E N V - F E N V 7 2 Q C
0044420 O M P I L E R : : E N V - F E N
0044440 V 5 2 Q C O M P I L E R : M
0044460 A K E - E M P T Y - E N V ) \r (
0044500 2 4 Q : F U N C T I O N ) \r (
0044520 ) \r C O M P I L E R : C O P Y -
0044540 E N V - W I T H - V A R I A B L
0044560 E D 1 \r ( L ( 0 - a r g s
0044600 - ) ) \0 8 \a \0 002 \0 e 021 001 \0 k a
0044620 021 Q 006 l 002 a 272 l 003 H 361 223 g \0 \0 202
0044640 l 003 a 273 I 265 027 \b \0 \0 \ 276 J K 032 N
0044660 \t \0 \0 032 275 N M \n \0 \0 L 020 \t \0 \0 260
0044700 353 \0 ( 6 4 Q C O M P I L E R :
0044720 : C O P Y - E N V 5 7 Q s e
0044740 t f - C O M P I L E R : : E N V
0044760 - V E N V 5 0 Q C O M P I L
0045000 E R : : E N V - V E N V 3 7 Q
0045020 C O M P I L E R : M A K E - E
0045040 M P T Y - E N V ) \r ( 2 4 Q :
0045060 L E X I C A L ) \r ( ) \r C O M P
0045100 I L E R : E N V - B O U N D P
0045120 D 1 \r ( L ( 1 V A R 0 E
0045140 N V ) ) \0 \r \0 \0 \0 002 A @ \t \0 \0
0045160 \n \0 \0 d 220 002 020 \0 ( 7 C L : A S
0045200 S O C 4 C O M P I L E R : :
0045220 E N V - V E N V ) \r N I L \r ( )
0045240 \r C O M P I L E R : E N V - F B
0045260 O U N D P D 1 \r ( L ( 1 F
0045300 N 0 E N V ) ) \0 $ 001 \0 \0 002
0045320 A @ \t \0 \0 \n \0 \0 021 001 \0 H d 262 025 002
0045340 001 d g \0 \0 360 232 277 g \0 \0 H 002 002 001 \n
0045360 \0 \0 020 \0 ( 4 1 Q V A L U E S
0045400 7 C L : A S S O C 4 C O M
0045420 P I L E R : : E N V - F E N V )
0045440 \r ( 3 2 Q : M A C R O 2 4 Q
0045460 : M A C R O ) \r ( ) \r C O M P
0045500 I L E R : M A K E - E M P T Y -
0045520 E N V D 1 \r N I L \0 005 \0 \0 \0
0045540 \0 \b \0 \0 020 \0 ( 2 C O M P I L E
0045560 R : : M A K E - E N V ) \r N I L
0045600 \r ( ) \r ( P U T P R O P S P R
0045620 E T T Y C O M P R I N T C O M
0045640 P I L E - F I L E - E X P R E S
0045660 S I O N N I L L ) \r ( P U T P
0045700 R O P S C M L C O M P I L E
0045720 F I L E T Y P E C O M P I L E
0045740 - F I L E ) \r ( P U T P R O P S
0045760 C M L C O M P I L E C O P Y
0046000 R I G H T ( " X e r o x C o
0046020 r p o r a t i o n " 1 9 8 5
0046040 1 9 8 6 ) ) \r N I L \r
0046053