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