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