$ od -c -N 50000 [eris]<Lisp>KOTO>Library>CMLCOMPILE.DCOM!1
0000000 ( F I L E C R E A T E D " 1 5
0000020 - A u g - 8 5 1 6 : 1 5 : 2 5
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 > L I B R A R Y > C M L C O M
0000120 P I L E . ; 6 ) \r " 1 2 - A u
0000140 g - 8 5 1 9 : 3 8 : 4 8 " r
0000160 e c o m p i l e d c h a n g e
0000200 s : N E W D E F C i n " I
0000220 N T E R L I S P - D 1 2 - A u
0000240 g - 8 5 . . . " d a t e d
0000260 \r " 1 2 - A u g - 8 5 1 9 : 5
0000300 1 : 4 0 " ) \r ( F I L E C R E A
0000320 T E D " 1 5 - A u g - 8 5 1
0000340 6 : 1 4 : 4 0 " { E R I S } <
0000360 L I S P C O R E > L I B R A R Y
0000400 > C M L C O M P I L E . ; 6 1
0000420 2 5 4 7 c h a n g e s t o :
0000440 ( F N S N E W D E F C \r )
0000460 p r e v i o u s d a t e : "
0000500 9 - A u g - 8 5 1 8 : 1 9 :
0000520 2 5 " { E R I S } < L I S P C
0000540 O R E > L I B R A R Y > C M L C
0000560 O M P I L E . ; 5 ) \r C O M P I
0000600 L E - F I L E A 0 0 0 1 D 1 \r
0000620 ( N A M E E R R O R S E T P
0000640 1 0 Q E X P P 7 D E F
0000660 E R R E D . E X P R E S S I O N
0000700 S P 6 F I L E . E X P R E
0000720 S S I O N P 4 R O O T N A
0000740 M E P 3 L S T F I L P
0000760 2 S T R E A M P 1 S P E
0001000 C V A R S P 0 L O C A L V
0001020 A R S F 1 1 Q R E S E T V
0001040 A R S L S T F 1 2 Q O U T
0001060 P U T - F I L E F 1 3 Q F
0001100 I L E N A M E F 1 4 Q F I
0001120 L E R D T B L F 1 5 Q P R
0001140 O C E S S . E N T I R E . F I L
0001160 E F 1 6 Q N L A M L F
0001200 1 7 Q N L A M A F 2 0 Q
0001220 M A K E S Y S D A T E F 2 1
0001240 Q L A M S F 2 2 Q L A M
0001260 A F 2 3 Q R E S E T Y F
0001300 2 4 Q C O M P I L E R - O U
0001320 T P U T F 2 5 Q S A V E -
0001340 E X P R S F 2 6 Q C O M P
0001360 I L E . F I L E . V A L U E F
0001400 2 7 Q S Y S L O C A L V A R
0001420 S F 3 0 Q L A P F 3 1
0001440 Q H E R A L D S T R I N G F
0001460 3 2 Q C O U T F I L E F
0001500 3 3 Q C O M P V E R S I O N
0001520 F 3 4 Q C O M P I L E . E X
0001540 T F 3 5 Q C O M P I L E H
0001560 E A D E R ) 001 256 \t 025 002 \0 g \0 \0
0001600 h 032 h h 032 032 W 022 032 c 022 277 g \0 \0 d
0001620 \t \0 \0 032 g \0 \0 W 034 \n \0 \0 277 W 022 032
0001640 c 022 277 g \0 \0 d \t \0 \0 032 g \0 \0 W 036
0001660 \n \0 \0 277 W 022 032 c 022 277 g \0 \0 d \t \0
0001700 \0 032 g \0 \0 W " \n \0 \0 277 W 022 032 c 022
0001720 277 g \0 \0 d \t \0 \0 032 g \0 \0 W $ \n \0
0001740 \0 277 W 022 032 c 022 277 g \0 \0 d \t \0 \0 032
0001760 g \0 \0 \t \0 \0 277 W 022 032 c 022 277 g \0 \0
0002000 d \t \0 \0 032 g \0 \0 W ( \n \0 \0 277 W 022
0002020 032 c 022 277 g \0 \0 d \t \0 \0 032 g \0 \0 W
0002040 * 264 005 g \0 \0 \n \0 \0 277 W 022 032 c 022 277
0002060 W . i 021 B 005 g \0 \0 W 026 g \0 \0 \n \0
0002100 \0 Z h 032 032 h h 032 032 W 022 032 c 022 277 W
0002120 0 222 W 4 273 J \t \0 \0 c 026 277 g \0 \0 W
0002140 024 265 024 g \0 \0 h g \0 \0 W 8 g \0 \0 W
0002160 026 \r 006 \0 \0 g \0 \0 g \0 \0 o \0 \0 \0 \f
0002200 \0 \0 c 024 J W 026 \t \0 \0 h 032 032 032 032 h
0002220 h 032 032 W 022 032 c 022 277 W 024 262 / g \0 \0
0002240 \b \0 \0 W : W 026 032 W 6 o \0 \0 \0 g \0
0002260 \0 W 2 g \0 \0 W h 032 032 032 032 032 032 032
0002300 032 032 W 024 W 030 \v \0 \0 277 021 \a J W 030
0002320 \n \0 \0 ^ 230 N d g \0 \0 360 262 B 277 W 032
0002340 262 # O 016 \t \0 \0 260 031 d 001 021 001 \b O 020
0002360 001 275 O 020 002 W 024 W 030 l 003 M 017 016 023 002
0002400 003 265 350 J \t \0 \0 023 g \0 \0 W 024 \n \0 \0
0002420 277 W 024 \t \0 \0 c , 022 c & i 020 W 024 h
0002440 d W 032 \r 005 \0 \0 277 260 245 \0 ( 6 5 1 Q
0002460 C O M P I L E - F I L E - E X
0002500 P R E S S I O N 6 3 0 Q C L
0002520 O S E F 6 2 2 Q P R I N T
0002540 6 1 1 Q C L O S E F 5 5 1 Q
0002560 R E V E R S E 5 2 5 Q R E
0002600 A D 5 1 3 Q P R I N T 4 4
0002620 5 Q D A T E 4 1 4 Q R O O
0002640 T F I L E N A M E 4 0 4 Q O
0002660 P E N S T R E A M 3 6 7 Q P
0002700 A C K F I L E N A M E . S T R I
0002720 N G 3 3 3 Q F U L L N A M E
0002740 3 0 3 Q O P E N S T R E A M
0002760 2 5 3 Q S E T T O P V A L
0003000 2 3 5 Q G E T T O P V A L 2
0003020 1 7 Q S E T T O P V A L 2 0
0003040 6 Q G E T T O P V A L 1 7 0
0003060 Q S E T T O P V A L 1 6 1 Q
0003100 G E T T O P V A L 1 4 3 Q
0003120 S E T T O P V A L 1 3 2 Q G
0003140 E T T O P V A L 1 1 4 Q S E
0003160 T T O P V A L 1 0 3 Q G E T
0003200 T O P V A L 6 5 Q S E T T O
0003220 P V A L 5 4 Q G E T T O P V
0003240 A L 3 6 Q S E T T O P V A L
0003260 2 5 Q G E T T O P V A L ) \r
0003300 ( 6 1 5 Q S T O P 5 3 4 Q
0003320 S T O P 4 7 0 Q d a t e d
0003340 4 6 3 Q i n 4 4 2 Q F I L
0003360 E C R E A T E D 3 7 5 Q N E
0003400 W 3 7 2 Q O U T P U T 3 6
0003420 1 Q B O D Y 3 5 4 Q E X T
0003440 E N S I O N 3 5 0 Q V E R S
0003460 I O N 3 4 1 Q C O M P I L E
0003500 . F I L E . R E S E T 3 0 0 Q
0003520 I N P U T 2 7 3 Q C L O S
0003540 E F ? 2 5 0 Q D E F E R 2
0003560 4 1 Q S V F L G 2 3 1 Q S
0003600 V F L G 2 1 2 Q C O U T F I
0003620 L E 2 0 2 Q C O U T F I L E
0003640 1 6 5 Q D F N F L G 1 5 5
0003660 Q D F N F L G 1 3 6 Q L A
0003700 M A 1 2 6 Q L A M A 1 0 7
0003720 Q L A M S 7 7 Q L A M S
0003740 6 0 Q N L A M A 5 0 Q N L
0003760 A M A 3 1 Q N L A M L 2 1
0004000 Q N L A M L 2 R E S E T U
0004020 N D O ) \r ( 4 6 0 Q " C O M
0004040 P I L E . F I L E d " 4 0 1 Q
0004060 ( ( T Y P E B I N A R Y ) )
0004100 ) \r C O M P I L E - F I L E D
0004120 1 \r ( L ( 0 \ C L : L A M B
0004140 D A . A R G C N T ) P 3 1 Q
0004160 R E S E T Z P 3 0 Q R E
0004200 S E T Y P 2 7 Q L I S P X
0004220 H I S T P 2 6 Q C O M P I
0004240 L E . F I L E . V A L U E P
0004260 2 5 Q V A L U E P 2 4 Q
0004300 C O M P I L E . F I L E . A F T
0004320 E R P 2 3 Q P R O C E S S
0004340 - E N T I R E - F I L E P 2
0004360 0 Q C O M P I L E R - O U T P
0004400 U T P 1 5 Q S A V E - E X
0004420 P R S P 1 2 Q O U T P U T
0004440 - F I L E P 7 R E D E F I
0004460 N E P 4 L A P P 1 F
0004500 I L E N A M E F 3 2 Q L I
0004520 S P X H I S T F 3 3 Q R E
0004540 S E T V A R S L S T ) 001 S 032 002
0004560 002 \0 e 021 001 \0 @ 021 361 020 021 0 023 H l 002
0004600 273 272 K d J 363 226 277 h d 263 026 260 025 a g
0004620 \0 \0 360 224 K k 330 260 362 K l 002 324 [ 260 345
0004640 a 274 H l 002 276 275 N d M 363 226 277 h d 263
0004660 026 260 025 a g \0 \0 360 224 N k 330 260 362 N l
0004700 002 324 ^ 260 345 a _ 016 277 H l 002 _ 022 277 _
0004720 020 277 O 022 d O 020 363 226 277 h d 263 031 260 030
0004740 a g \0 \0 360 225 O 022 k 330 260 361 O 022 l 002
0004760 324 _ 022 260 341 a _ 024 277 H l 002 _ 030 277 _
0005000 026 277 O 030 d O 026 363 226 277 h 265 032 i 260 030
0005020 a g \0 \0 360 225 O 030 k 330 260 361 O 030 l 002
0005040 324 _ 030 260 341 a _ 032 277 H l 002 _ 036 277 _
0005060 034 277 O 036 d O 034 363 226 277 h 265 032 i 260 030
0005100 a g \0 \0 360 225 O 036 k 330 260 361 O 036 l 002
0005120 324 _ 036 260 341 a _ 277 H l 002 _ $ 277 _
0005140 " 277 O $ d O " 363 226 277 h d 263 031 260 030
0005160 a g \0 \0 360 225 O $ k 330 260 361 O $ l 002
0005200 324 _ $ 260 341 a _ & 277 021 0 026 W 4 021 !
0005220 031 W 6 o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202
0005240 g \0 \0 _ 2 \n \0 \0 277 O 2 223 \b \0 \0 277
0005260 023 O ( \t \0 \0 206 d 001 \t \0 \0 277 002 003 265
0005300 370 O , 020 \0 ( 5 1 1 Q E V A L
0005320 5 0 3 Q R E V E R S E 4 7 4
0005340 Q E R R O R ! 4 6 5 Q R E
0005360 S E T R E S T O R E 4 5 2 Q
0005400 C O M P I L E - F I L E A 0 0 0
0005420 1 ) \r ( 4 6 0 Q E R R O R 4
0005440 4 7 Q I N T E R N A L 4 0 1
0005460 Q : P R O C E S S - E N T I R
0005500 E - F I L E 3 2 1 Q : C O M
0005520 P I L E R - O U T P U T 2 4 1
0005540 Q : S A V E - E X P R S 1 6
0005560 1 Q : O U T P U T - F I L E
0005600 1 0 4 Q : R E D E F I N E 3
0005620 7 Q : L A P ) \r ( 4 4 4 Q
0005640 ( C O M P I L E - F I L E A 0 0
0005660 0 1 ) ) \r C O M P I L E - F I L
0005700 E - E X P R E S S I O N D 1 \r
0005720 ( P 6 P R O P P 5 X
0005740 P 4 C O M P T I M E P 3
0005760 C O N D I T I O N S P 2
0006000 F O R M P 1 O R I G . D O
0006020 N T . C O P Y P 0 O R I G
0006040 . C O M P I L E . T I M E . T O
0006060 O I 4 D E F E R I 3
0006100 D O N T . C O P Y I 2 C O
0006120 M P I L E . T I M E . T O O I
0006140 1 C O M P I L E D . F I L E
0006160 I 0 F O R M F 7 C O
0006200 U T F I L E F 1 0 Q C O M
0006220 P I L E R M A C R O P R O P S )
0006240 001 260 \a 002 \0 005 @ 003 001 d g \0 \0 360 242
0006260 261 \0 346 277 B C @ 002 021 003 002 J 003 265 004 h
0006300 020 001 003 222 261 \0 301 J 001 d g \0 \0 360 226 277
0006320 i b 006 261 \0 274 d g \0 \0 360 245 d g \0 \0
0006340 360 226 277 h b 006 261 \0 251 d g \0 \0 360 236 277
0006360 J 002 Z 001 \t \0 \0 h 360 b 006 261 \0 224 d g
0006400 \0 \0 360 262 035 277 o \0 \0 \0 W 016 \n \0 \0 277
0006420 J 002 001 W 016 \n \0 \0 277 W 016 \t \0 \0 260 q
0006440 d g \0 \0 360 263 j d g \0 \0 360 225 277 h b
0006460 004 260 ^ d g \0 \0 360 245 d g \0 \0 360 225 277
0006500 i b 004 260 L d g \0 \0 360 233 277 J 002 Z 001
0006520 \t \0 \0 b 004 260 : d g \0 \0 360 224 277 J 002
0006540 260 1 d g \0 \0 360 263 ( d g \0 \0 360 263 !
0006560 d g \0 \0 360 263 032 277 J 001 o \0 \0 \0 032 W
0006600 016 \n \0 \0 211 J 001 A B C D \r 005 \0 \0 277
0006620 J 002 Z 261 377 ) d g \0 \0 360 262 J 277 @ 002
0006640 001 021 021 004 g \0 \0 K 034 265 \n B 264 \a g \0
0006660 \0 K 034 274 g \0 \0 K 034 262 032 @ 002 216 d 001
0006700 021 001 005 M A L C D \r 005 \0 \0 023 002 003 265
0006720 357 h 020 L 264 l @ 002 205 d 001 \t \0 \0 277 002
0006740 003 265 370 h 020 g \0 \0 360 262 031 @ 216 d 001 021
0006760 001 005 M A B C D \r 005 \0 \0 023 002 003 265 357
0007000 h 020 B 224 @ \t \0 \0 277 C 265 6 @ 001 g \0
0007020 \0 033 265 \b @ 001 g \0 \0 033 021 001 006 N 265 #
0007040 @ 001 W 020 \n \0 \0 ^ 262 " @ d N 002 001 \n
0007060 \0 \0 b \0 364 263 025 @ A B C D \r 005 \0 \0
0007100 020 @ B C D \r 005 \0 \0 020 g \0 \0 @ B C
0007120 D \r 005 \0 \0 020 \0 ( 6 5 5 Q C O M
0007140 P I L E . F I L E . A P P L Y
0007160 6 4 1 Q C O M P I L E . F I L
0007200 E . A P P L Y 6 3 0 Q C O M
0007220 P I L E - F I L E - E X P R E S
0007240 S I O N 6 1 2 Q M A C R O E
0007260 X P A N S I O N 5 7 7 Q G E
0007300 T L I S 5 4 0 Q E V A L 5
0007320 2 3 Q C O M P I L E - F I L E
0007340 - E X P R E S S I O N 4 6 6 Q
0007360 E V A L 4 4 4 Q C O M P I
0007400 L E - F I L E - E X P R E S S I
0007420 O N 3 4 7 Q C O M P I L E -
0007440 F I L E - E X P R E S S I O N
0007460 3 3 4 Q P R I N T 2 5 3 Q
0007500 E V A L 1 6 6 Q T E R P R I
0007520 1 6 0 Q P R I N 1 1 4 7 Q
0007540 P R I N 1 1 1 7 Q E V A L
0007560 ) \r ( 6 4 5 Q P R I N T 5 6
0007600 1 Q C O M P I L E . F I L E .
0007620 E X P R E S S I O N 5 5 1 Q
0007640 C O M P I L E - F I L E - E X P
0007660 R E S S I O N 5 0 0 Q P R O
0007700 G N 4 1 7 Q L O A D 4 1 1
0007720 Q E V A L 3 7 7 Q C O M P
0007740 I L E 3 6 2 Q E V A L . W H
0007760 E N 3 1 4 Q E V A L @ L O A
0010000 D 3 0 5 Q D O E V A L @ L O
0010020 A D 2 7 6 Q D O N T E V A L
0010040 @ L O A D 2 6 3 Q E V A L @
0010060 L O A D W H E N 2 4 1 Q E V
0010100 A L @ C O M P I L E W H E N 2
0010120 2 5 Q E V A L @ C O M P I L E
0010140 2 1 7 Q D O E V A L @ C O M
0010160 P I L E 2 0 3 Q D O N T E V
0010200 A L @ C O M P I L E 1 7 4 Q
0010220 N O T F I R S T 1 3 2 Q F I
0010240 R S T 1 0 5 Q C O P Y W H E
0010260 N 7 0 Q C O P Y 6 2 Q D
0010300 O C O P Y 4 5 Q D O N T C O
0010320 P Y 6 D E C L A R E : ) \r (
0010340 3 2 6 Q ( U N R E C O G N I
0010360 Z E D D E C L A R E T A G )
0010400 1 4 2 Q " W a r n i n g :
0010420 ( D E C L A R E : - - F I R
0010440 S T - - - - ) n o t i m
0010460 p l e m e n t e d i n C O M
0010500 P I L E . F I L E : " ) \r C O
0010520 M P I L E . F I L E . E X P R E
0010540 S S I O N D 1 \r ( I 4 D E
0010560 F E R I 3 D O N T . C O P
0010600 Y I 2 C O M P I L E . T I
0010620 M E . T O O I 1 C O M P I
0010640 L E D . F I L E I 0 F O R
0010660 M ) \0 \v \0 \0 \0 005 @ A B C D \r 005
0010700 \0 \0 020 \0 ( 1 0 Q C O M P I L E
0010720 - F I L E - E X P R E S S I O N
0010740 ) \r N I L \r ( ) \r C O M P I L E
0010760 . F I L E . P U T D E F D 1 \r
0011000 ( P 0 F N I 2 R D T B
0011020 L I 1 L C F I L I 0
0011040 F O R M ) \0 034 001 \0 \0 003 021 020 \0 @
0011060 002 001 \t \0 \0 X d @ 002 002 002 001 \t \0 \0 \n
0011100 \0 \0 \n \0 \0 h 020 \0 ( 3 0 Q B Y T
0011120 E C O M P I L E 2 2 5 Q C O
0011140 M P I L E 1 A 2 2 Q E V A L
0011160 1 0 Q E V A L ) \r N I L \r (
0011200 ) \r A R G T Y P E . S T A T E
0011220 D 1 \r ( P 0 X F 1 A R
0011240 G T Y P E . V A R S ) \0 + 001 001
0011260 \0 \0 Q 260 $ d 001 021 001 \0 H i \n \0 \0 277
0011300 k i \n \0 \0 277 H 002 001 \t \0 \0 i \n \0 \0
0011320 277 i \t \0 \0 023 002 003 265 335 h 020 \0 ( 4 2
0011340 Q T E R P R I 3 5 Q P R I
0011360 N 1 3 1 Q E V A L 2 2 Q
0011400 S P A C E S 1 4 Q P R I N 1
0011420 ) \r N I L \r ( ) \r C O M P I L E
0011440 . C H E C K . A R G T Y P E D
0011460 1 \r ( P 2 V A L P 1 A
0011500 T Y P E P A I R P 0 B L K
0011520 F L G I 1 A T I 0 X
0011540 F 3 C O U T F I L E F
0011560 4 A R G T Y P E . V A R S )
0011600 \0 344 003 002 \0 002 A 021 020 \0 @ \t \0 \0 022 360
0011620 222 261 \0 326 T 261 \0 313 d 001 021 001 001 @ I 002
0011640 001 - 034 021 001 002 A I 001 360 262 D J 262 4 o
0011660 \0 \0 \0 S \n \0 \0 277 @ S \n \0 \0 277 o \0
0011700 \0 \0 S \n \0 \0 277 I 002 001 S \n \0 \0 277 o
0011720 \0 \0 \0 S \n \0 \0 277 I 002 002 001 S \n \0 \0
0011740 277 I 002 001 @ I 002 001 \t \0 \0 032 260 m J 262
0011760 n o \0 \0 \0 S \n \0 \0 277 @ S \n \0 \0 277
0012000 o \0 \0 \0 S \n \0 \0 277 g \0 \0 A T 026 002
0012020 002 001 265 006 o \0 \0 \0 g \0 \0 h 032 032 032 S
0012040 \n \0 \0 277 o \0 \0 \0 S \n \0 \0 277 I 002 002
0012060 001 S \n \0 \0 277 o \0 \0 \0 S \n \0 \0 277 I
0012100 002 001 S \n \0 \0 277 S \t \0 \0 277 I 002 001 @
0012120 I 002 001 \t \0 \0 \n \0 \0 \n \0 \0 277 023 023 002
0012140 003 265 003 202 261 377 4 h 020 \0 ( 3 2 5 Q
0012160 / S E T T O P V A L 3 2 2 Q
0012200 R E M O V E 3 1 7 Q G E T T
0012220 O P V A L 3 0 4 Q T E R P R
0012240 I 2 7 7 Q P R I N 1 2 6 7
0012260 Q P R I N 1 2 5 6 Q P R I
0012300 N 1 2 4 5 Q P R I N 1 2 3
0012320 4 Q P R I N 1 2 0 1 Q P R
0012340 I N 1 1 7 0 Q P R I N 1 1
0012360 6 2 Q P R I N 1 1 4 4 Q G
0012400 E T T O P V A L 1 3 1 Q P R
0012420 I N 1 1 2 0 Q P R I N 1 1
0012440 0 7 Q P R I N 1 7 7 Q P R
0012460 I N 1 6 6 Q P R I N 1 6 0
0012500 Q P R I N 1 7 C O M P . A
0012520 R G T Y P E ) \r ( 2 2 4 Q f u
0012540 n c t i o n 2 0 5 Q a ) \r (
0012560 2 6 3 Q " b e c a u s e
0012600 i t w a s i n c o r r e c t
0012620 l y o n " 2 4 1 Q " w
0012640 a s a " 2 2 1 Q " L A M
0012660 B D A s p r e a d " 1 7 5 Q
0012700 " " 1 5 6 Q " W a r n i
0012720 n g : c o m p i l e r t h o
0012740 u g h t " 1 1 4 Q " b u
0012760 t c o m p i l e r d o e s n
0013000 ' t t h i n k i t s a "
0013020 7 3 Q " o n " 5 4 Q
0013040 " C o m p i l e r c o n f u s
0013060 e d : " ) \r C O M P I L E . F
0013100 I L E . D E F I N E Q D 1 \r (
0013120 P 0 D E F I 2 R D T B
0013140 L I 1 L C F I L I 0
0013160 F O R M ) \0 ) 001 \0 \0 003 @ 260 ! d
0013200 001 021 001 \0 H 001 H 002 001 \t \0 \0 \n \0 \0 277
0013220 H 001 H 001 H 002 001 \n \0 \0 \n \0 \0 023 002 003
0013240 265 337 h 020 \0 ( 4 0 Q B Y T E C O
0013260 M P I L E 2 3 5 Q C O M P I
0013300 L E 1 A 2 2 Q C O M P I L E
0013320 . C H E C K . A R G T Y P E 1
0013340 7 Q A R G T Y P E ) \r N I L \r
0013360 ( ) \r C O M P I L E . F I L E .
0013400 D E F U N D 1 \r ( I 2 R D
0013420 T B L I 1 L C F I L I
0013440 0 F O R M F 0 D E F )
0013460 \0 021 \0 001 \0 003 P 002 001 P 002 001 P 002 001 \n
0013500 \0 \0 \n \0 \0 020 \0 ( 1 6 Q B Y T E
0013520 C O M P I L E 2 1 3 Q C O M
0013540 P I L E 1 A ) \r N I L \r ( ) \r C
0013560 O M P I L E . F I L E . E X P R
0013600 E S S I O N D 1 \r ( I 4 D
0013620 E F E R I 3 D O N T . C O
0013640 P Y I 2 C O M P I L E . T
0013660 I M E . T O O I 1 C O M P
0013700 I L E D . F I L E I 0 F O
0013720 R M ) \0 \v \0 \0 \0 005 @ A B C D \r
0013740 005 \0 \0 020 \0 ( 1 0 Q C O M P I L
0013760 E - F I L E - E X P R E S S I O
0014000 N ) \r N I L \r ( ) \r C O M P I L
0014020 E . F I L E . A P P L Y D 1 \r
0014040 ( I 4 D E F E R I 3 D
0014060 O N T . C O P Y I 2 C O M
0014100 P I L E . T I M E . T O O I
0014120 1 F O R M I 0 P R O P
0014140 F 0 D E F E R R E D . E X P
0014160 R E S S I O N S F 1 C O M
0014200 P I L E D . F I L E ) \0 \0 002
0014220 \0 005 B 224 A \t \0 \0 277 C 265 \v D 227 @ A
0014240 032 P 032 c \0 020 A Q ` \0 \0 l 003 @ 017 016
0014260 020 \0 ( 5 E V A L ) \r ( 3 0 Q
0014300 F I L E R D T B L ) \r ( ) \r C O
0014320 M P I L E . F I L E . R E S E T
0014340 D 1 \r ( I 2 R O O T N A M
0014360 E I 1 S O U R C E F I L E
0014400 I 0 C O M P I L E D . F I
0014420 L E F 0 R E S E T S T A T
0014440 E ) \0 1 \0 001 \0 003 @ 265 037 A 265 026 P
0014460 263 ' g \0 \0 B ` \0 \0 \n \0 \0 \n \0 \0 g
0014500 \0 \0 020 \t \0 \0 277 260 350 \t \0 \0 277 P 262 336
0014520 @ \t \0 \0 277 260 327 h 020 \0 ( 5 2 Q D
0014540 E L F I L E 4 2 Q C L O S E
0014560 F ? 3 4 Q C L O S E F ? 2
0014600 5 Q / S E T A T O M V A L 2
0014620 2 Q R E M O V E ) \r ( 3 0 Q
0014640 R e m o v e s 1 7 Q N O T C
0014660 O M P I L E D F I L E S 1 3 Q
0014700 N O T C O M P I L E D F I L E
0014720 S ) \r ( ) \r N E W D E F C D 1
0014740 \r ( I 1 D F I 0 N M
0014760 F 0 D F N F L G F 1 C
0015000 O M P I L E . F I L E . A F T E
0015020 R F 2 S V F L G ) \0 202 \0
0015040 003 \0 002 R d g \0 \0 360 262 6 277 g \0 \0 @
0015060 d 236 d i 360 252 3 020 265 \t g \0 \0 @ h 032
0015100 032 A d 236 d i 360 252 3 020 265 \t g \0 \0 A
0015120 h 032 032 i h 032 032 032 032 Q 032 c 002 260 E g
0015140 \0 \0 360 227 @ A i \v \0 \0 260 8 P 224 P i
0015160 360 262 ) @ \t \0 \0 262 034 @ i \n \0 \0 277 P
0015200 263 023 @ o \0 \0 \0 032 i d \v \0 \0 277 @ \t
0015220 \0 \0 277 @ A i \v \0 \0 207 @ g \0 \0 A \v
0015240 \0 \0 A 020 \0 ( 1 7 6 Q / P U T P
0015260 R O P 1 6 5 Q / P U T D 1
0015300 5 6 Q S A V E D E F 1 5 1 Q
0015320 P R I N T 1 3 2 Q V I R G
0015340 I N F N 1 2 3 Q \ D E F I N
0015360 E D P 1 0 6 Q S E L E C T O
0015400 R . P U T D ) \r ( 1 7 2 Q C O
0015420 D E 7 6 Q S E L E C T O R
0015440 5 3 Q Q U O T E 3 1 Q Q U
0015460 O T E 1 3 Q N E W D E F C
0015500 4 D E F E R ) \r ( 1 4 3 Q
0015520 ( r e d e f i n e d ) ) \r ( P R
0015540 E T T Y C O M P R I N T C M L
0015560 C O M P I L E C O M S ) \r ( R P
0015600 A Q Q C M L C O M P I L E C O
0015620 M S ( ( F N S C O M P I L E
0015640 - F I L E C O M P I L E - F I
0015660 L E - E X P R E S S I O N C O
0015700 M P I L E . F I L E . E X P R E
0015720 S S I O N \r C O M P I L E . F
0015740 I L E . P U T D E F A R G T Y
0015760 P E . S T A T E C O M P I L E
0016000 . C H E C K . A R G T Y P E C
0016020 O M P I L E . F I L E . D E F I
0016040 N E Q C O M P I L E . F I L E
0016060 . D E F U N \r C O M P I L E .
0016100 F I L E . E X P R E S S I O N
0016120 C O M P I L E . F I L E . A P P
0016140 L Y C O M P I L E . F I L E .
0016160 R E S E T ) ( V A R S A R G
0016200 T Y P E . V A R S ) ( P R O P
0016220 \r C O M P I L E . F I L E . E
0016240 X P R E S S I O N D E F I N E
0016260 Q * F N S . P U T D E F )
0016300 ( A D D V A R S ( S Y S P R O
0016320 P S C O M P I L E . F I L E .
0016340 E X P R E S S I O N ) ) ( F N
0016360 S \r N E W D E F C ) ( P (
0016400 M O V D ( Q U O T E N E W D
0016420 E F C ) ( Q U O T E D E F C
0016440 ) ) ) ( D E C L A R E : D O
0016460 N T E V A L @ L O A D D O E V
0016500 A L @ C O M P I L E D O N T C
0016520 O P Y \r C O M P I L E R V A R
0016540 S ( A D D V A R S ( N L A M
0016560 A ) ( N L A M L ) ( L A M A
0016600 C O M P I L E - F I L E ) ) )
0016620 ) ) \r ( R P A Q Q A R G T Y P
0016640 E . V A R S ( ( 1 N L A M L
0016660 " N L A M B D A s p r e a d
0016700 " ) ( 2 L A M A " L A M B
0016720 D A n o s p r e a d " ) ( 0
0016740 L A M S " L A M B D A s p
0016760 r e a d " ) ( 3 \r N L A M A
0017000 " N L A M B D A n o - s p r
0017020 e a d " ) ) ) \r ( P U T P R O P
0017040 S D E F I N E Q C O M P I L
0017060 E . F I L E . E X P R E S S I O
0017100 N C O M P I L E . F I L E . D
0017120 E F I N E Q ) \r ( P U T P R O P
0017140 S * C O M P I L E . F I L E
0017160 . E X P R E S S I O N N I L L
0017200 ) \r ( P U T P R O P S F N S .
0017220 P U T D E F C O M P I L E . F
0017240 I L E . E X P R E S S I O N C
0017260 O M P I L E . F I L E . P U T D
0017300 E F ) \r ( A D D T O V A R S Y
0017320 S P R O P S C O M P I L E . F
0017340 I L E . E X P R E S S I O N ) \r
0017360 ( M O V D ( Q U O T E N E W
0017400 D E F C ) ( Q U O T E D E F
0017420 C ) ) \r ( P U T P R O P S C M
0017440 L C O M P I L E C O P Y R I G
0017460 H T ( " X e r o x C o r p o
0017500 r a t i o n " 1 9 8 5 ) ) \r N
0017520 I L \r
0017523