$ od -c -N 50000 [eris]<LispCore>SOURCES>D-ASSEM.DCOM!4
0000000 ( F I L E C R E A T E D " 1 0
0000020 - O c t - 8 6 0 1 : 3 9 : 0 6
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 > D - A S S E
0000120 M . ; 4 ) \r " 1 - O c t - 8
0000140 6 2 0 : 2 3 : 1 5 " " C O M
0000160 P I L E - F I L E d " i n "
0000200 X e r o x L i s p 1 - O c
0000220 t - 8 6 . . . " d a t e d
0000240 " 1 - O c t - 8 6 2 1 : 2 4
0000260 : 4 4 " ) \r ( F I L E C R E A T
0000300 E D " 1 0 - O c t - 8 6 0 1
0000320 : 3 0 : 0 7 " { E R I S } < L
0000340 I S P C O R E > S O U R C E S >
0000360 D - A S S E M . ; 4 9 3 1 4 7
0000400 c h a n g e s t o : ( F U
0000420 N C T I O N S \r S T O R E - D
0000440 I G E S T - I N F O R E F - V
0000460 A R S T O R E - V A R I N T
0000500 E R N - V A R S T A C K - A N
0000520 A L Y Z E S T A C K - A N A L
0000540 Y Z E - C O D E ) p r e v i o
0000560 u s d a t e : \r " 1 0 - O c
0000600 t - 8 6 0 0 : 4 2 : 2 1 " {
0000620 E R I S } < L I S P C O R E > S
0000640 O U R C E S > D - A S S E M . ;
0000660 3 ) \r ( R P A Q Q D - A S S E
0000700 M C O M S ( ( C O M S ( *
0000720 ; ; " D a t a s t r u c t u
0000740 r e s a n d u t i l i t i e
0000760 s " ) ( S T R U C T U R E S
0001000 D C O D E D J U M P D L A M
0001020 B D A D T A G \r D V A R )
0001040 ( P ( D E F P R I N T ( Q U
0001060 O T E D T A G ) N I L ) )
0001100 ( F U N C T I O N S C R E A T
0001120 E - H U N K T Y P E - N A M E
0001140 - F R O M - S I Z E ) ( F U N
0001160 C T I O N S \r R E L E A S E -
0001200 C I R C U L A R I T I E S ) )
0001220 ( C O M S ( * ; ; " H a n
0001240 d y c o n s t a n t s " ) (
0001260 V A R I A B L E S + I V A R -
0001300 C O D E + + P V A R - C O D E
0001320 + + F V A R - C O D E + ) \r
0001340 ( V A R I A B L E S + L A M B
0001360 D A - S P R E A D + + N L A M
0001400 B D A - S P R E A D + + L A M
0001420 B D A - N O - S P R E A D + +
0001440 N L A M B D A - N O - S P R E A
0001460 D + ) ( V A R I A B L E S \r
0001500 + C O N S T A N T - O P C O D E
0001520 S + ) ) ( C O M S ( * ; ;
0001540 " O p c o d e g e n e r a t
0001560 i o n " ) ( V A R I A B L E S
0001600 * B Y T E S * * B Y T E - C
0001620 O U N T * ) ( F U N C T I O N
0001640 S \r S T A R T - B Y T E S E
0001660 M I T - B Y T E E M I T - B Y
0001700 T E - L I S T E N D - B Y T E
0001720 S ) ( F U N C T I O N S C H
0001740 O O S E - O P R E F - V A R
0001760 S T O R E - V A R M A X - A R
0002000 G \r P U S H - I N T E G E R )
0002020 ) ( C O M S ( * ; ; " M
0002040 a i n d r i v i n g " ) ( V
0002060 A R I A B L E S * D T A G - E
0002100 N V * * D V A R - E N V * *
0002120 H U N K - M A P * * D C O D E
0002140 * * L E V E L * \r ) ( F U N
0002160 C T I O N S A S S E M B L E -
0002200 F U N C T I O N D C O D E - F
0002220 R O M - D L A M B D A D L A M
0002240 B D A - F R O M - L A M B D A )
0002260 ) ( C O M S ( * ; ; \r "
0002300 D i g e s t i n g t h e f u
0002320 n c t i o n " ) ( V A R I A B
0002340 L E S * H U N K - S I Z E *
0002360 * P V A R - C O U N T * * F R
0002400 E E - V A R S * * B O U N D -
0002420 S P E C I A L S * ) ( F U N C
0002440 T I O N S \r D I G E S T - F U
0002460 N C T I O N D I G E S T - C O
0002500 D E S T O R E - D I G E S T -
0002520 I N F O ) ( F U N C T I O N S
0002540 D V A R - F R O M - L A P - V
0002560 A R L A P - V A R - I D I N
0002600 S T A L L - L O C A L \r I N S
0002620 T A L L - V A R I N T E R N -
0002640 V A R I N T E R N - T A G ) )
0002660 ( C O M S ( * ; ; " F u
0002700 n c t i o n e n t r y c o d
0002720 e " ) ( F U N C T I O N S E
0002740 A S Y - E N T R Y - P \r G E N
0002760 E R A T E - E A S Y - E N T R Y
0003000 ) ( F U N C T I O N S G E N
0003020 E R A T E - H A R D - E N T R Y
0003040 G E N E R A T E - A R G - C H
0003060 E C K G E N E R A T E - K E Y
0003100 \r G E N E R A T E - O P T - A
0003120 N D - R E S T ) ) ( C O M S
0003140 ( * ; ; " S t a c k a n a
0003160 l y s i s " ) ( V A R I A B L
0003200 E S * E N D I N G - D E P T H
0003220 * * S T A C K - N O T E S * )
0003240 ( \r F U N C T I O N S S T A
0003260 C K - A N A L Y Z E S T A C K
0003300 - A N A L Y Z E - C O D E ) )
0003320 ( C O M S ( * ; ; " T h e
0003340 g u t s o f a s s e m b l
0003360 y " ) ( F U N C T I O N S A
0003400 S S E M B L E \r A S S E M B L
0003420 E - C O D E ) ) ( C O M S (
0003440 * ; ; " J u m p r e s o l
0003460 u t i o n " ) ( V A R I A B L
0003500 E S * J U M P - L I S T * )
0003520 ( V A R I A B L E S + J U M P
0003540 - C H O I C E S + \r + J U M P
0003560 - R A N G E - S I Z E - M A P +
0003600 + J U M P - S I Z E S + ) (
0003620 F U N C T I O N S R E S O L V
0003640 E - J U M P S R E D U C E - U
0003660 N C E R T A I N T Y S P L I C
0003700 E - I N - J U M P S \r C O M P
0003720 U T E - J U M P - S I Z E ) (
0003740 C O M S ( * ; " D e b u g
0003760 g i n g j u m p r e s o l u
0004000 t i o n " ) ( F U N C T I O N
0004020 S P R E T T Y - J U M P S ) )
0004040 ) ( C O M S ( * ; ; \r "
0004060 C o n v e r s i o n t o b i
0004100 n a r y " ) ( F U N C T I O N
0004120 S C O N V E R T - T O - B I N
0004140 A R Y ) ) ( C O M S ( * ;
0004160 ; \r " S e t t i n g u p t
0004200 h e d e b u g g i n g i n f
0004220 o r m a t i o n " ) ( F U N C
0004240 T I O N S C O M P U T E - D E
0004260 B U G G I N G - I N F O ) ) (
0004300 C O M S ( * ; ; \r " F i x
0004320 u p r e s o l u t i o n a n
0004340 d D C O D E i n t e r n i n
0004360 g " ) ( F U N C T I O N S A
0004400 L L O C A T E - C O D E - B L O
0004420 C K F I X U P - P T R F I X
0004440 U P - W O R D \r I N T E R N -
0004460 D C O D E ) ) ( P R O P F I
0004500 L E T Y P E D - A S S E M )
0004520 ( D E C L A R E : E V A L @ C
0004540 O M P I L E D O N T C O P Y
0004560 ( F I L E S ( L O A D C O M P
0004600 ) L L B A S I C \r L L C O D
0004620 E L L G C M O D A R I T H )
0004640 ) ) ) \r D C O D E - C L O S U R
0004660 E - P D 1 \r ( L ( 0 O B J
0004700 E C T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0
0004720 311 030 020 \0 N I L \r ( 3 D C O D E
0004740 ) \r ( ) \r s e t f - D C O D E -
0004760 C L O S U R E - P D 1 \r ( L
0005000 ( 1 V A L U E 0 O B J E C
0005020 T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024
0005040 030 A 020 \0 N I L \r ( 3 D C O D E
0005060 ) \r ( ) \r ( R E M P R O P ( Q
0005100 U O T E D C O D E - C L O S U
0005120 R E - P ) ( Q U O T E S E T
0005140 F - M E T H O D - E X P A N D E
0005160 R ) ) \r ( P U T P R O P S D C
0005200 O D E - C L O S U R E - P S E
0005220 T F - I N V E R S E s e t f -
0005240 D C O D E - C L O S U R E - P )
0005260 \r D C O D E - T Y P E - F I X U
0005300 P S D 1 \r ( L ( 0 O B J E
0005320 C T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311
0005340 026 020 \0 N I L \r ( 3 D C O D E )
0005360 \r ( ) \r s e t f - D C O D E - T
0005400 Y P E - F I X U P S D 1 \r ( L
0005420 ( 1 V A L U E 0 O B J E
0005440 C T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A
0005460 024 026 A 020 \0 N I L \r ( 3 D C O D
0005500 E ) \r ( ) \r ( R E M P R O P (
0005520 Q U O T E D C O D E - T Y P E
0005540 - F I X U P S ) ( Q U O T E
0005560 S E T F - M E T H O D - E X P A
0005600 N D E R ) ) \r ( P U T P R O P S
0005620 D C O D E - T Y P E - F I X U
0005640 P S S E T F - I N V E R S E
0005660 s e t f - D C O D E - T Y P E -
0005700 F I X U P S ) \r D C O D E - L I
0005720 T - F I X U P S D 1 \r ( L (
0005740 0 O B J E C T ) ) \0 \b \0 \0 \0
0005760 001 @ 006 \0 \0 311 024 020 \0 N I L \r ( 3
0006000 D C O D E ) \r ( ) \r s e t f - D
0006020 C O D E - L I T - F I X U P S
0006040 D 1 \r ( L ( 1 V A L U E 0
0006060 O B J E C T ) ) \0 \n \0 \0 \0 002
0006100 @ 006 \0 \0 A 024 024 A 020 \0 N I L \r ( 3
0006120 D C O D E ) \r ( ) \r ( R E M P
0006140 R O P ( Q U O T E D C O D E
0006160 - L I T - F I X U P S ) ( Q U
0006200 O T E S E T F - M E T H O D -
0006220 E X P A N D E R ) ) \r ( P U T P
0006240 R O P S D C O D E - L I T - F
0006260 I X U P S S E T F - I N V E R
0006300 S E s e t f - D C O D E - L I
0006320 T - F I X U P S ) \r D C O D E -
0006340 S Y M - F I X U P S D 1 \r ( L
0006360 ( 0 O B J E C T ) ) \0 \b \0
0006400 \0 \0 001 @ 006 \0 \0 311 022 020 \0 N I L \r (
0006420 3 D C O D E ) \r ( ) \r s e t f
0006440 - D C O D E - S Y M - F I X U P
0006460 S D 1 \r ( L ( 1 V A L U E
0006500 0 O B J E C T ) ) \0 \n \0 \0
0006520 \0 002 @ 006 \0 \0 A 024 022 A 020 \0 N I L \r
0006540 ( 3 D C O D E ) \r ( ) \r ( R E
0006560 M P R O P ( Q U O T E D C O
0006600 D E - S Y M - F I X U P S ) (
0006620 Q U O T E S E T F - M E T H O
0006640 D - E X P A N D E R ) ) \r ( P U
0006660 T P R O P S D C O D E - S Y M
0006700 - F I X U P S S E T F - I N V
0006720 E R S E s e t f - D C O D E -
0006740 S Y M - F I X U P S ) \r D C O D
0006760 E - F N - F I X U P S D 1 \r (
0007000 L ( 0 O B J E C T ) ) \0 \b
0007020 \0 \0 \0 001 @ 006 \0 \0 311 020 020 \0 N I L \r
0007040 ( 3 D C O D E ) \r ( ) \r s e t
0007060 f - D C O D E - F N - F I X U P
0007100 S D 1 \r ( L ( 1 V A L U E
0007120 0 O B J E C T ) ) \0 \n \0 \0
0007140 \0 002 @ 006 \0 \0 A 024 020 A 020 \0 N I L \r
0007160 ( 3 D C O D E ) \r ( ) \r ( R E
0007200 M P R O P ( Q U O T E D C O
0007220 D E - F N - F I X U P S ) ( Q
0007240 U O T E S E T F - M E T H O D
0007260 - E X P A N D E R ) ) \r ( P U T
0007300 P R O P S D C O D E - F N - F
0007320 I X U P S S E T F - I N V E R
0007340 S E s e t f - D C O D E - F N
0007360 - F I X U P S ) \r D C O D E - C
0007400 O D E - A R R A Y D 1 \r ( L
0007420 ( 0 O B J E C T ) ) \0 \b \0 \0
0007440 \0 001 @ 006 \0 \0 311 016 020 \0 N I L \r ( 3
0007460 D C O D E ) \r ( ) \r s e t f -
0007500 D C O D E - C O D E - A R R A Y
0007520 D 1 \r ( L ( 1 V A L U E
0007540 0 O B J E C T ) ) \0 \n \0 \0 \0
0007560 002 @ 006 \0 \0 A 024 016 A 020 \0 N I L \r (
0007600 3 D C O D E ) \r ( ) \r ( R E M
0007620 P R O P ( Q U O T E D C O D
0007640 E - C O D E - A R R A Y ) ( Q
0007660 U O T E S E T F - M E T H O D
0007700 - E X P A N D E R ) ) \r ( P U T
0007720 P R O P S D C O D E - C O D E
0007740 - A R R A Y S E T F - I N V E
0007760 R S E s e t f - D C O D E - C
0010000 O D E - A R R A Y ) \r D C O D E
0010020 - D E B U G G I N G - I N F O
0010040 D 1 \r ( L ( 0 O B J E C T )
0010060 ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 \f 020 \0
0010100 N I L \r ( 3 D C O D E ) \r ( )
0010120 \r s e t f - D C O D E - D E B U
0010140 G G I N G - I N F O D 1 \r ( L
0010160 ( 1 V A L U E 0 O B J E
0010200 C T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A
0010220 024 \f A 020 \0 N I L \r ( 3 D C O D
0010240 E ) \r ( ) \r ( R E M P R O P (
0010260 Q U O T E D C O D E - D E B U
0010300 G G I N G - I N F O ) ( Q U O
0010320 T E S E T F - M E T H O D - E
0010340 X P A N D E R ) ) \r ( P U T P R
0010360 O P S D C O D E - D E B U G G
0010400 I N G - I N F O S E T F - I N
0010420 V E R S E s e t f - D C O D E
0010440 - D E B U G G I N G - I N F O )
0010460 \r D C O D E - N A M E - T A B L
0010500 E D 1 \r ( L ( 0 O B J E C
0010520 T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 \n
0010540 020 \0 N I L \r ( 3 D C O D E ) \r
0010560 ( ) \r s e t f - D C O D E - N A
0010600 M E - T A B L E D 1 \r ( L (
0010620 1 V A L U E 0 O B J E C T
0010640 ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 \n
0010660 A 020 \0 N I L \r ( 3 D C O D E )
0010700 \r ( ) \r ( R E M P R O P ( Q U
0010720 O T E D C O D E - N A M E - T
0010740 A B L E ) ( Q U O T E S E T
0010760 F - M E T H O D - E X P A N D E
0011000 R ) ) \r ( P U T P R O P S D C
0011020 O D E - N A M E - T A B L E S
0011040 E T F - I N V E R S E s e t f
0011060 - D C O D E - N A M E - T A B L
0011100 E ) \r D C O D E - N U M - A R G
0011120 S D 1 \r ( L ( 0 O B J E C
0011140 T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 \b
0011160 020 \0 N I L \r ( 3 D C O D E ) \r
0011200 ( ) \r s e t f - D C O D E - N U
0011220 M - A R G S D 1 \r ( L ( 1
0011240 V A L U E 0 O B J E C T ) )
0011260 \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 \b A 020
0011300 \0 N I L \r ( 3 D C O D E ) \r (
0011320 ) \r ( R E M P R O P ( Q U O T
0011340 E D C O D E - N U M - A R G S
0011360 ) ( Q U O T E S E T F - M E
0011400 T H O D - E X P A N D E R ) ) \r
0011420 ( P U T P R O P S D C O D E -
0011440 N U M - A R G S S E T F - I N
0011460 V E R S E s e t f - D C O D E
0011500 - N U M - A R G S ) \r D C O D E
0011520 - A R G - T Y P E D 1 \r ( L
0011540 ( 0 O B J E C T ) ) \0 \b \0 \0
0011560 \0 001 @ 006 \0 \0 311 006 020 \0 N I L \r ( 3
0011600 D C O D E ) \r ( ) \r s e t f -
0011620 D C O D E - A R G - T Y P E D
0011640 1 \r ( L ( 1 V A L U E 0
0011660 O B J E C T ) ) \0 \n \0 \0 \0 002 @
0011700 006 \0 \0 A 024 006 A 020 \0 N I L \r ( 3
0011720 D C O D E ) \r ( ) \r ( R E M P R
0011740 O P ( Q U O T E D C O D E -
0011760 A R G - T Y P E ) ( Q U O T E
0012000 S E T F - M E T H O D - E X P
0012020 A N D E R ) ) \r ( P U T P R O P
0012040 S D C O D E - A R G - T Y P E
0012060 S E T F - I N V E R S E s e
0012100 t f - D C O D E - A R G - T Y P
0012120 E ) \r D C O D E - N F R E E V A
0012140 R S D 1 \r ( L ( 0 O B J E
0012160 C T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311
0012200 004 020 \0 N I L \r ( 3 D C O D E )
0012220 \r ( ) \r s e t f - D C O D E - N
0012240 F R E E V A R S D 1 \r ( L (
0012260 1 V A L U E 0 O B J E C T
0012300 ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 004
0012320 A 020 \0 N I L \r ( 3 D C O D E )
0012340 \r ( ) \r ( R E M P R O P ( Q U
0012360 O T E D C O D E - N F R E E V
0012400 A R S ) ( Q U O T E S E T F
0012420 - M E T H O D - E X P A N D E R
0012440 ) ) \r ( P U T P R O P S D C O
0012460 D E - N F R E E V A R S S E T
0012500 F - I N V E R S E s e t f - D
0012520 C O D E - N F R E E V A R S ) \r
0012540 D C O D E - N L O C A L S D 1
0012560 \r ( L ( 0 O B J E C T ) )
0012600 \0 \b \0 \0 \0 001 @ 006 \0 \0 311 002 020 \0 N I
0012620 L \r ( 3 D C O D E ) \r ( ) \r s
0012640 e t f - D C O D E - N L O C A L
0012660 S D 1 \r ( L ( 1 V A L U E
0012700 0 O B J E C T ) ) \0 \n \0 \0
0012720 \0 002 @ 006 \0 \0 A 024 002 A 020 \0 N I L \r
0012740 ( 3 D C O D E ) \r ( ) \r ( R E
0012760 M P R O P ( Q U O T E D C O
0013000 D E - N L O C A L S ) ( Q U O
0013020 T E S E T F - M E T H O D - E
0013040 X P A N D E R ) ) \r ( P U T P R
0013060 O P S D C O D E - N L O C A L
0013100 S S E T F - I N V E R S E s
0013120 e t f - D C O D E - N L O C A L
0013140 S ) \r D C O D E - F R A M E - N
0013160 A M E D 1 \r ( L ( 0 O B J
0013200 E C T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0
0013220 311 \0 020 \0 N I L \r ( 3 D C O D E
0013240 ) \r ( ) \r s e t f - D C O D E -
0013260 F R A M E - N A M E D 1 \r ( L
0013300 ( 1 V A L U E 0 O B J E
0013320 C T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A
0013340 024 \0 A 020 \0 N I L \r ( 3 D C O D
0013360 E ) \r ( ) \r ( R E M P R O P (
0013400 Q U O T E D C O D E - F R A M
0013420 E - N A M E ) ( Q U O T E S
0013440 E T F - M E T H O D - E X P A N
0013460 D E R ) ) \r ( P U T P R O P S
0013500 D C O D E - F R A M E - N A M E
0013520 S E T F - I N V E R S E s e
0013540 t f - D C O D E - F R A M E - N
0013560 A M E ) \r D C O D E - P D 1 \r
0013600 ( L ( 0 O B J E C T ) ) \0
0013620 006 \0 \0 \0 001 @ 303 \0 \0 020 \0 N I L \r (
0013640 3 D C O D E ) \r ( ) \r C O P Y
0013660 - D C O D E D 1 \r ( L ( 0
0013700 O B J E C T ) ) \0 \t \0 \0 \0 001 `
0013720 \0 \0 @ \n \0 \0 020 \0 ( 6 N C R E A
0013740 T E 2 ) \r ( 2 004 003 D C O D E T
0013760 Y P E # ) \r ( ) \r ( D E F P R I
0014000 N T ( Q U O T E D C O D E )
0014020 ( F U N C T I O N \ D E F P
0014040 R I N T . D E F S T R U C T . D
0014060 E F A U L T ) ) \r M A K E - D C
0014100 O D E D 1 \r ( L ( 0 - a r
0014120 g s - ) ) 002 247 & \0 002 \0 e 021 001 \0
0014140 H k 021 002 002 J d I 363 242 261 001 i 277 o \0
0014160 \0 \0 022 021 361 020 021 360 037 021 ` % H k 273 272
0014200 K d J 363 242 261 001 c 277 j 274 H k 276 275 N
0014220 d M 363 242 261 001 i 277 j _ 016 277 H k _ 022
0014240 277 _ 020 277 O 022 d O 020 363 242 261 001 g 277 h
0014260 _ 024 277 H k _ 030 277 _ 026 277 O 030 d O 026
0014300 363 242 261 001 h 277 j _ 032 277 H k _ 036 277 _
0014320 034 277 O 036 d O 034 363 242 261 001 i 277 h _
0014340 277 H k _ $ 277 _ " 277 O $ d O " 363 242
0014360 261 001 j 277 h _ & 277 H k _ * 277 _ ( 277
0014400 O * d O ( 363 242 261 001 k 277 h _ , 277 H
0014420 k _ 0 277 _ . 277 O 0 d O . 363 242 261 001
0014440 l 277 h _ 2 277 H k _ 6 277 _ 4 277 O 6
0014460 d O 4 363 242 261 001 m 277 h _ 8 277 H k _
0014500 < 277 _ : 277 O < d O : 363 242 261 001 n 277
0014520 h _ > 277 H k _ B 277 _ @ 277 O B d O
0014540 @ 363 242 261 001 o 277 h _ D 277 H k _ H 277
0014560 _ F 277 O H d O F 363 242 261 001 p 277 h _
0014600 J 277 ` \0 \0 037 d I 024 \0 277 d L 024 002 277
0014620 d O 016 024 004 277 d O 024 024 006 277 d O 032 024
0014640 \b 277 d O 024 \n 277 d O & 024 \f 277 d O
0014660 , 024 016 277 d O 2 024 020 277 d O 8 024 022 277
0014700 d O > 024 024 277 d O D 024 026 277 d O J 024
0014720 030 277 020 a g \0 \0 360 226 J k 330 a 261 376 225
0014740 J l 002 324 Z 261 376 201 a g \0 \0 360 226 K k
0014760 330 a 261 376 230 K l 002 324 [ 261 376 207 a g \0
0015000 \0 360 226 N k 330 a 261 376 222 N l 002 324 ^ 261
0015020 376 201 a g \0 \0 360 227 O 022 k 330 a 261 376 223
0015040 O 022 l 002 324 _ 022 261 376 177 a g \0 \0 360 227
0015060 O 030 k 330 a 261 376 222 O 030 l 002 324 _ 030 261
0015100 376 ~ a g \0 \0 360 227 O 036 k 330 a 261 376 221
0015120 O 036 l 002 324 _ 036 261 376 } a g \0 \0 360 227
0015140 O $ k 330 a 261 376 220 O $ l 002 324 _ $ 261
0015160 376 | a g \0 \0 360 227 O * k 330 a 261 376 217
0015200 O * l 002 324 _ * 261 376 { a g \0 \0 360 227
0015220 O 0 k 330 a 261 376 216 O 0 l 002 324 _ 0 261
0015240 376 z a g \0 \0 360 227 O 6 k 330 a 261 376 215
0015260 O 6 l 002 324 _ 6 261 376 y a g \0 \0 360 227
0015300 O < k 330 a 261 376 214 O < l 002 324 _ < 261
0015320 376 x a g \0 \0 360 227 O B k 330 a 261 376 213
0015340 O B l 002 324 _ B 261 376 w a g \0 \0 360 227
0015360 O H k 330 a 261 376 212 O H l 002 324 _ H 261
0015400 376 v \0 N I L \r ( 1 2 2 1 Q : C
0015420 L O S U R E - P 1 1 7 1 Q :
0015440 T Y P E - F I X U P S 1 1 4 1
0015460 Q : L I T - F I X U P S 1 1
0015500 1 1 Q : S Y M - F I X U P S
0015520 1 0 6 1 Q : F N - F I X U P S
0015540 1 0 3 1 Q : C O D E - A R R
0015560 A Y 1 0 0 1 Q : D E B U G G
0015600 I N G - I N F O 7 5 1 Q : N
0015620 A M E - T A B L E 7 2 1 Q :
0015640 N U M - A R G S 6 7 1 Q : A
0015660 R G - T Y P E 6 4 4 Q : N F
0015700 R E E V A R S 6 1 7 Q : N L
0015720 O C A L S 5 7 2 Q : F R A M
0015740 E - N A M E 4 5 0 Q 004 003 D C
0015760 O D E T Y P E # ) \r ( 2 5 Q
0016000 " N o n a m e " ) \r ( P U T P
0016020 R O P ( Q U O T E D C O D E
0016040 ) ( Q U O T E S T R U C T U
0016060 R E - C O N S T R U C T O R )
0016100 ( Q U O T E M A K E - D C O D
0016120 E ) ) \r ( P U T P R O P ( Q U
0016140 O T E D C O D E ) ( Q U O T
0016160 E % % S T R U C T U R E - C L
0016200 A S S ) ( Q U O T E S T R U
0016220 C T U R E - C L A S S ) ) \r ( P
0016240 U T P R O P ( Q U O T E D C
0016260 O D E ) ( Q U O T E % % S L
0016300 O T - D E S C R I P T I O N S )
0016320 ( Q U O T E ( ( F R A M E -
0016340 N A M E " N o n a m e " )
0016360 ( N L O C A L S 0 ) ( \r N F
0016400 R E E V A R S 0 ) A R G - T
0016420 Y P E ( N U M - A R G S 0 )
0016440 ( N A M E - T A B L E N I L
0016460 ) D E B U G G I N G - I N F O
0016500 C O D E - A R R A Y ( F N -
0016520 F I X U P S N I L ) ( \r S Y
0016540 M - F I X U P S N I L ) ( L
0016560 I T - F I X U P S N I L ) (
0016600 T Y P E - F I X U P S N I L )
0016620 ( C L O S U R E - P N I L )
0016640 ) ) ) \r ( P U T P R O P ( Q U
0016660 O T E D C O D E ) ( Q U O T
0016700 E % % L O C A L - S L O T - N
0016720 A M E S ) ( Q U O T E ( C L
0016740 O S U R E - P T Y P E - F I X
0016760 U P S L I T - F I X U P S S
0017000 Y M - F I X U P S \r F N - F I
0017020 X U P S C O D E - A R R A Y
0017040 D E B U G G I N G - I N F O N
0017060 A M E - T A B L E N U M - A R
0017100 G S A R G - T Y P E N F R E
0017120 E V A R S N L O C A L S F R
0017140 A M E - N A M E ) ) ) \r ( / D E
0017160 C L A R E D A T A T Y P E ( Q
0017200 U O T E D C O D E ) ( Q U O
0017220 T E ( P O I N T E R P O I N
0017240 T E R P O I N T E R P O I N
*
0017300 T E R P O I N T E R \r P O I
0017320 N T E R P O I N T E R P O I
*
0017360 N T E R P O I N T E R ) ) (
0017400 Q U O T E ( ( D C O D E 0
0017420 P O I N T E R ) ( D C O D E
0017440 2 P O I N T E R ) ( D C O D
0017460 E 4 \r P O I N T E R ) ( D
0017500 C O D E 6 P O I N T E R )
0017520 ( D C O D E 8 P O I N T E R
0017540 ) ( D C O D E 1 0 P O I N
0017560 T E R ) ( D C O D E 1 2 P
0017600 O I N T E R ) ( D C O D E 1
0017620 4 P O I N T E R ) \r ( D C O
0017640 D E 1 6 P O I N T E R ) (
0017660 D C O D E 1 8 P O I N T E R
0017700 ) ( D C O D E 2 0 P O I N
0017720 T E R ) ( D C O D E 2 2 P
0017740 O I N T E R ) ( D C O D E 2
0017760 4 P O I N T E R ) ) ) ( \r Q
0020000 U O T E 2 6 ) ) \r D J U M P -
0020020 S I Z E - U N C E R T A I N T Y
0020040 D 1 \r ( L ( 0 O B J E C T
0020060 ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 \f 020
0020100 \0 N I L \r ( 3 D J U M P ) \r (
0020120 ) \r s e t f - D J U M P - S I Z
0020140 E - U N C E R T A I N T Y D 1
0020160 \r ( L ( 1 V A L U E 0 O
0020200 B J E C T ) ) \0 \n \0 \0 \0 002 @ 006
0020220 \0 \0 A 024 \f A 020 \0 N I L \r ( 3 D
0020240 J U M P ) \r ( ) \r ( R E M P R O
0020260 P ( Q U O T E D J U M P - S
0020300 I Z E - U N C E R T A I N T Y )
0020320 ( Q U O T E S E T F - M E T
0020340 H O D - E X P A N D E R ) ) \r (
0020360 P U T P R O P S D J U M P - S
0020400 I Z E - U N C E R T A I N T Y
0020420 S E T F - I N V E R S E s e t
0020440 f - D J U M P - S I Z E - U N C
0020460 E R T A I N T Y ) \r D J U M P -
0020500 F O R W A R D - P D 1 \r ( L
0020520 ( 0 O B J E C T ) ) \0 \b \0 \0
0020540 \0 001 @ 006 \0 \0 311 \n 020 \0 N I L \r ( 3
0020560 D J U M P ) \r ( ) \r s e t f -
0020600 D J U M P - F O R W A R D - P
0020620 D 1 \r ( L ( 1 V A L U E 0
0020640 O B J E C T ) ) \0 \n \0 \0 \0 002
0020660 @ 006 \0 \0 A 024 \n A 020 \0 N I L \r ( 3
0020700 D J U M P ) \r ( ) \r ( R E M P
0020720 R O P ( Q U O T E D J U M P
0020740 - F O R W A R D - P ) ( Q U O
0020760 T E S E T F - M E T H O D - E
0021000 X P A N D E R ) ) \r ( P U T P R
0021020 O P S D J U M P - F O R W A R
0021040 D - P S E T F - I N V E R S E
0021060 s e t f - D J U M P - F O R W
0021100 A R D - P ) \r D J U M P - M I N
0021120 - S I Z E D 1 \r ( L ( 0 O
0021140 B J E C T ) ) \0 \b \0 \0 \0 001 @ 006
0021160 \0 \0 311 \b 020 \0 N I L \r ( 3 D J U
0021200 M P ) \r ( ) \r s e t f - D J U M
0021220 P - M I N - S I Z E D 1 \r ( L
0021240 ( 1 V A L U E 0 O B J E
0021260 C T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A
0021300 024 \b A 020 \0 N I L \r ( 3 D J U M
0021320 P ) \r ( ) \r ( R E M P R O P (
0021340 Q U O T E D J U M P - M I N -
0021360 S I Z E ) ( Q U O T E S E T
0021400 F - M E T H O D - E X P A N D E
0021420 R ) ) \r ( P U T P R O P S D J
0021440 U M P - M I N - S I Z E S E T
0021460 F - I N V E R S E s e t f - D
0021500 J U M P - M I N - S I Z E ) \r D
0021520 J U M P - M I N - P C D 1 \r (
0021540 L ( 0 O B J E C T ) ) \0 \b
0021560 \0 \0 \0 001 @ 006 \0 \0 311 006 020 \0 N I L \r
0021600 ( 3 D J U M P ) \r ( ) \r s e t
0021620 f - D J U M P - M I N - P C D
0021640 1 \r ( L ( 1 V A L U E 0
0021660 O B J E C T ) ) \0 \n \0 \0 \0 002 @
0021700 006 \0 \0 A 024 006 A 020 \0 N I L \r ( 3
0021720 D J U M P ) \r ( ) \r ( R E M P R
0021740 O P ( Q U O T E D J U M P -
0021760 M I N - P C ) ( Q U O T E S
0022000 E T F - M E T H O D - E X P A N
0022020 D E R ) ) \r ( P U T P R O P S
0022040 D J U M P - M I N - P C S E T
0022060 F - I N V E R S E s e t f - D
0022100 J U M P - M I N - P C ) \r D J U
0022120 M P - P T R D 1 \r ( L ( 0
0022140 O B J E C T ) ) \0 \b \0 \0 \0 001 @
0022160 006 \0 \0 311 004 020 \0 N I L \r ( 3 D J
0022200 U M P ) \r ( ) \r s e t f - D J U
0022220 M P - P T R D 1 \r ( L ( 1
0022240 V A L U E 0 O B J E C T ) )
0022260 \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 004 A 020
0022300 \0 N I L \r ( 3 D J U M P ) \r (
0022320 ) \r ( R E M P R O P ( Q U O T
0022340 E D J U M P - P T R ) ( Q U
0022360 O T E S E T F - M E T H O D -
0022400 E X P A N D E R ) ) \r ( P U T P
0022420 R O P S D J U M P - P T R S
0022440 E T F - I N V E R S E s e t f
0022460 - D J U M P - P T R ) \r D J U M
0022500 P - T A G D 1 \r ( L ( 0 O
0022520 B J E C T ) ) \0 \b \0 \0 \0 001 @ 006
0022540 \0 \0 311 002 020 \0 N I L \r ( 3 D J U
0022560 M P ) \r ( ) \r s e t f - D J U M
0022600 P - T A G D 1 \r ( L ( 1 V
0022620 A L U E 0 O B J E C T ) )
0022640 \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 002 A 020 \0
0022660 N I L \r ( 3 D J U M P ) \r ( )
0022700 \r ( R E M P R O P ( Q U O T E
0022720 D J U M P - T A G ) ( Q U O
0022740 T E S E T F - M E T H O D - E
0022760 X P A N D E R ) ) \r ( P U T P R
0023000 O P S D J U M P - T A G S E
0023020 T F - I N V E R S E s e t f -
0023040 D J U M P - T A G ) \r D J U M P
0023060 - K I N D D 1 \r ( L ( 0 O
0023100 B J E C T ) ) \0 \b \0 \0 \0 001 @ 006
0023120 \0 \0 311 \0 020 \0 N I L \r ( 3 D J U
0023140 M P ) \r ( ) \r s e t f - D J U M
0023160 P - K I N D D 1 \r ( L ( 1
0023200 V A L U E 0 O B J E C T ) )
0023220 \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 \0 A 020
0023240 \0 N I L \r ( 3 D J U M P ) \r (
0023260 ) \r ( R E M P R O P ( Q U O T
0023300 E D J U M P - K I N D ) ( Q
0023320 U O T E S E T F - M E T H O D
0023340 - E X P A N D E R ) ) \r ( P U T
0023360 P R O P S D J U M P - K I N D
0023400 S E T F - I N V E R S E s e
0023420 t f - D J U M P - K I N D ) \r D
0023440 J U M P - P D 1 \r ( L ( 0
0023460 O B J E C T ) ) \0 006 \0 \0 \0 001 @
0023500 303 \0 \0 020 \0 N I L \r ( 3 D J U M
0023520 P ) \r ( ) \r C O P Y - D J U M P
0023540 D 1 \r ( L ( 0 O B J E C T
0023560 ) ) \0 \t \0 \0 \0 001 ` \0 \0 @ \n \0 \0
0023600 020 \0 ( 6 N C R E A T E 2 ) \r (
0023620 2 004 003 D J U M P T Y P E # ) \r
0023640 ( ) \r ( D E F P R I N T ( Q U
0023660 O T E D J U M P ) ( F U N C
0023700 T I O N \ D E F P R I N T . D
0023720 E F S T R U C T . D E F A U L T
0023740 ) ) \r M A K E - D J U M P D 1
0023760 \r ( L ( 0 - a r g s - ) )
0024000 001 c 024 \0 002 \0 e 021 001 \0 H k 021 002 002 J
0024020 d I 363 242 261 \0 265 277 h 022 021 361 020 021 0 023
0024040 H k 273 272 K d J 363 242 261 \0 265 277 h 274 H
0024060 k 276 275 N d M 363 242 261 \0 273 277 h _ 016 277
0024100 H k _ 022 277 _ 020 277 O 022 d O 020 363 242 261
0024120 \0 271 277 h _ 024 277 H k _ 030 277 _ 026 277 O
0024140 030 d O 026 363 242 261 \0 272 277 h _ 032 277 H k
0024160 _ 036 277 _ 034 277 O 036 d O 034 363 242 261 \0 273
0024200 277 h _ 277 H k _ $ 277 _ " 277 O $ d
0024220 O " 363 242 261 \0 274 277 h _ & 277 ` \0 \0 037
0024240 d I 024 \0 277 d L 024 002 277 d O 016 024 004 277
0024260 d O 024 024 006 277 d O 032 024 \b 277 d O 024
0024300 \n 277 d O & 024 \f 277 020 a g \0 \0 360 226 J
0024320 k 330 a 261 377 F J l 002 324 Z 261 377 5 a g
0024340 \0 \0 360 226 K k 330 a 261 377 F K l 002 324 [
0024360 261 377 5 a g \0 \0 360 226 N k 330 a 261 377 @
0024400 N l 002 324 ^ 261 377 / a g \0 \0 360 227 O 022
0024420 k 330 a 261 377 A O 022 l 002 324 _ 022 261 377 -
0024440 a g \0 \0 360 227 O 030 k 330 a 261 377 @ O 030
0024460 l 002 324 _ 030 261 377 , a g \0 \0 360 227 O 036
0024500 k 330 a 261 377 ? O 036 l 002 324 _ 036 261 377 +
0024520 a g \0 \0 360 227 O $ k 330 a 261 377 > O $
0024540 l 002 324 _ $ 261 377 * \0 N I L \r ( 5 1
0024560 5 Q : S I Z E - U N C E R T A
0024600 I N T Y 4 6 5 Q : F O R W A
0024620 R D - P 4 3 5 Q : M I N - S
0024640 I Z E 4 0 5 Q : M I N - P C
0024660 3 6 0 Q : P T R 3 3 3 Q
0024700 : T A G 3 0 6 Q : K I N D
0024720 2 3 0 Q 004 003 D J U M P T Y P E
0024740 # ) \r ( ) \r ( P U T P R O P (
0024760 Q U O T E D J U M P ) ( Q U
0025000 O T E S T R U C T U R E - C O
0025020 N S T R U C T O R ) ( Q U O T
0025040 E M A K E - D J U M P ) ) \r (
0025060 P U T P R O P ( Q U O T E D
0025100 J U M P ) ( Q U O T E % % S
0025120 T R U C T U R E - C L A S S )
0025140 ( Q U O T E S T R U C T U R E
0025160 - C L A S S ) ) \r ( P U T P R O
0025200 P ( Q U O T E D J U M P )
0025220 ( Q U O T E % % S L O T - D E
0025240 S C R I P T I O N S ) ( Q U O
0025260 T E ( K I N D T A G P T R
0025300 M I N - P C M I N - S I Z E
0025320 F O R W A R D - P \r S I Z E
0025340 - U N C E R T A I N T Y ) ) ) \r
0025360 ( P U T P R O P ( Q U O T E
0025400 D J U M P ) ( Q U O T E % %
0025420 L O C A L - S L O T - N A M E S
0025440 ) ( Q U O T E ( S I Z E - U
0025460 N C E R T A I N T Y F O R W A
0025500 R D - P M I N - S I Z E M I
0025520 N - P C \r P T R T A G K I
0025540 N D ) ) ) \r ( / D E C L A R E D
0025560 A T A T Y P E ( Q U O T E D
0025600 J U M P ) ( Q U O T E ( P O
0025620 I N T E R P O I N T E R P O
*
0025700 I N T E R ) ) ( \r Q U O T E
0025720 ( ( D J U M P 0 P O I N T E
0025740 R ) ( D J U M P 2 P O I N
0025760 T E R ) ( D J U M P 4 P O
0026000 I N T E R ) ( D J U M P 6
0026020 P O I N T E R ) ( D J U M P
0026040 8 P O I N T E R ) ( \r D J U
0026060 M P 1 0 P O I N T E R ) (
0026100 D J U M P 1 2 P O I N T E R
0026120 ) ) ) ( Q U O T E 1 4 ) ) \r
0026140 D L A M B D A - B O D Y D 1 \r
0026160 ( L ( 0 O B J E C T ) ) \0
0026200 \b \0 \0 \0 001 @ 006 \0 \0 311 024 020 \0 N I L
0026220 \r ( 3 D L A M B D A ) \r ( ) \r
0026240 s e t f - D L A M B D A - B O D
0026260 Y D 1 \r ( L ( 1 V A L U E
0026300 0 O B J E C T ) ) \0 \n \0 \0
0026320 \0 002 @ 006 \0 \0 A 024 024 A 020 \0 N I L \r
0026340 ( 3 D L A M B D A ) \r ( ) \r (
0026360 R E M P R O P ( Q U O T E D
0026400 L A M B D A - B O D Y ) ( Q U
0026420 O T E S E T F - M E T H O D -
0026440 E X P A N D E R ) ) \r ( P U T P
0026460 R O P S D L A M B D A - B O D
0026500 Y S E T F - I N V E R S E s
0026520 e t f - D L A M B D A - B O D Y
0026540 ) \r D L A M B D A - N O N - L O
0026560 C A L D 1 \r ( L ( 0 O B J
0026600 E C T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0
0026620 311 022 020 \0 N I L \r ( 3 D L A M B
0026640 D A ) \r ( ) \r s e t f - D L A M
0026660 B D A - N O N - L O C A L D 1
0026700 \r ( L ( 1 V A L U E 0 O
0026720 B J E C T ) ) \0 \n \0 \0 \0 002 @ 006
0026740 \0 \0 A 024 022 A 020 \0 N I L \r ( 3 D
0026760 L A M B D A ) \r ( ) \r ( R E M P
0027000 R O P ( Q U O T E D L A M B
0027020 D A - N O N - L O C A L ) ( Q
0027040 U O T E S E T F - M E T H O D
0027060 - E X P A N D E R ) ) \r ( P U T
0027100 P R O P S D L A M B D A - N O
0027120 N - L O C A L S E T F - I N V
0027140 E R S E s e t f - D L A M B D
0027160 A - N O N - L O C A L ) \r D L A
0027200 M B D A - C L O S E D - O V E R
0027220 D 1 \r ( L ( 0 O B J E C T
0027240 ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 020 020
0027260 \0 N I L \r ( 3 D L A M B D A )
0027300 \r ( ) \r s e t f - D L A M B D A
0027320 - C L O S E D - O V E R D 1 \r
0027340 ( L ( 1 V A L U E 0 O B
0027360 J E C T ) ) \0 \n \0 \0 \0 002 @ 006 \0
0027400 \0 A 024 020 A 020 \0 N I L \r ( 3 D L
0027420 A M B D A ) \r ( ) \r ( R E M P R
0027440 O P ( Q U O T E D L A M B D
0027460 A - C L O S E D - O V E R ) (
0027500 Q U O T E S E T F - M E T H O
0027520 D - E X P A N D E R ) ) \r ( P U
0027540 T P R O P S D L A M B D A - C
0027560 L O S E D - O V E R S E T F -
0027600 I N V E R S E s e t f - D L A
0027620 M B D A - C L O S E D - O V E R
0027640 ) \r D L A M B D A - B L I P D
0027660 1 \r ( L ( 0 O B J E C T ) )
0027700 \0 \b \0 \0 \0 001 @ 006 \0 \0 311 016 020 \0 N
0027720 I L \r ( 3 D L A M B D A ) \r (
0027740 ) \r s e t f - D L A M B D A - B
0027760 L I P D 1 \r ( L ( 1 V A L
0030000 U E 0 O B J E C T ) ) \0 \n
0030020 \0 \0 \0 002 @ 006 \0 \0 A 024 016 A 020 \0 N I
0030040 L \r ( 3 D L A M B D A ) \r ( )
0030060 \r ( R E M P R O P ( Q U O T E
0030100 D L A M B D A - B L I P ) (
0030120 Q U O T E S E T F - M E T H O
0030140 D - E X P A N D E R ) ) \r ( P U
0030160 T P R O P S D L A M B D A - B
0030200 L I P S E T F - I N V E R S E
0030220 s e t f - D L A M B D A - B L
0030240 I P ) \r D L A M B D A - N A M E
0030260 D 1 \r ( L ( 0 O B J E C T
0030300 ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 \f 020
0030320 \0 N I L \r ( 3 D L A M B D A )
0030340 \r ( ) \r s e t f - D L A M B D A
0030360 - N A M E D 1 \r ( L ( 1 V
0030400 A L U E 0 O B J E C T ) )
0030420 \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 \f A 020 \0
0030440 N I L \r ( 3 D L A M B D A ) \r
0030460 ( ) \r ( R E M P R O P ( Q U O
0030500 T E D L A M B D A - N A M E )
0030520 ( Q U O T E S E T F - M E T
0030540 H O D - E X P A N D E R ) ) \r (
0030560 P U T P R O P S D L A M B D A
0030600 - N A M E S E T F - I N V E R
0030620 S E s e t f - D L A M B D A -
0030640 N A M E ) \r D L A M B D A - O T
0030660 H E R S D 1 \r ( L ( 0 O B
0030700 J E C T ) ) \0 \b \0 \0 \0 001 @ 006 \0
0030720 \0 311 \n 020 \0 N I L \r ( 3 D L A M
0030740 B D A ) \r ( ) \r s e t f - D L A
0030760 M B D A - O T H E R S D 1 \r (
0031000 L ( 1 V A L U E 0 O B J
0031020 E C T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0
0031040 A 024 \n A 020 \0 N I L \r ( 3 D L A
0031060 M B D A ) \r ( ) \r ( R E M P R O
0031100 P ( Q U O T E D L A M B D A
0031120 - O T H E R S ) ( Q U O T E
0031140 S E T F - M E T H O D - E X P A
0031160 N D E R ) ) \r ( P U T P R O P S
0031200 D L A M B D A - O T H E R S
0031220 S E T F - I N V E R S E s e t
0031240 f - D L A M B D A - O T H E R S
0031260 ) \r D L A M B D A - A L L O W -
0031300 O T H E R - K E Y S D 1 \r ( L
0031320 ( 0 O B J E C T ) ) \0 \b \0
0031340 \0 \0 001 @ 006 \0 \0 311 \b 020 \0 N I L \r (
0031360 3 D L A M B D A ) \r ( ) \r s e
0031400 t f - D L A M B D A - A L L O W
0031420 - O T H E R - K E Y S D 1 \r (
0031440 L ( 1 V A L U E 0 O B J
0031460 E C T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0
0031500 A 024 \b A 020 \0 N I L \r ( 3 D L A
0031520 M B D A ) \r ( ) \r ( R E M P R O
0031540 P ( Q U O T E D L A M B D A
0031560 - A L L O W - O T H E R - K E Y
0031600 S ) ( Q U O T E S E T F - M
0031620 E T H O D - E X P A N D E R ) )
0031640 \r ( P U T P R O P S D L A M B
0031660 D A - A L L O W - O T H E R - K
0031700 E Y S S E T F - I N V E R S E
0031720 s e t f - D L A M B D A - A L
0031740 L O W - O T H E R - K E Y S ) \r
0031760 D L A M B D A - K E Y D 1 \r (
0032000 L ( 0 O B J E C T ) ) \0 \b
0032020 \0 \0 \0 001 @ 006 \0 \0 311 006 020 \0 N I L \r
0032040 ( 3 D L A M B D A ) \r ( ) \r s
0032060 e t f - D L A M B D A - K E Y
0032100 D 1 \r ( L ( 1 V A L U E 0
0032120 O B J E C T ) ) \0 \n \0 \0 \0 002
0032140 @ 006 \0 \0 A 024 006 A 020 \0 N I L \r ( 3
0032160 D L A M B D A ) \r ( ) \r ( R E
0032200 M P R O P ( Q U O T E D L A
0032220 M B D A - K E Y ) ( Q U O T E
0032240 S E T F - M E T H O D - E X P
0032260 A N D E R ) ) \r ( P U T P R O P
0032300 S D L A M B D A - K E Y S E
0032320 T F - I N V E R S E s e t f -
0032340 D L A M B D A - K E Y ) \r D L A
0032360 M B D A - R E S T D 1 \r ( L
0032400 ( 0 O B J E C T ) ) \0 \b \0 \0
0032420 \0 001 @ 006 \0 \0 311 004 020 \0 N I L \r ( 3
0032440 D L A M B D A ) \r ( ) \r s e t
0032460 f - D L A M B D A - R E S T D
0032500 1 \r ( L ( 1 V A L U E 0
0032520 O B J E C T ) ) \0 \n \0 \0 \0 002 @
0032540 006 \0 \0 A 024 004 A 020 \0 N I L \r ( 3
0032560 D L A M B D A ) \r ( ) \r ( R E M
0032600 P R O P ( Q U O T E D L A M
0032620 B D A - R E S T ) ( Q U O T E
0032640 S E T F - M E T H O D - E X P
0032660 A N D E R ) ) \r ( P U T P R O P
0032700 S D L A M B D A - R E S T S
0032720 E T F - I N V E R S E s e t f
0032740 - D L A M B D A - R E S T ) \r D
0032760 L A M B D A - O P T I O N A L
0033000 D 1 \r ( L ( 0 O B J E C T )
0033020 ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 002 020 \0
0033040 N I L \r ( 3 D L A M B D A ) \r
0033060 ( ) \r s e t f - D L A M B D A -
0033100 O P T I O N A L D 1 \r ( L (
0033120 1 V A L U E 0 O B J E C T
0033140 ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 002
0033160 A 020 \0 N I L \r ( 3 D L A M B D
0033200 A ) \r ( ) \r ( R E M P R O P (
0033220 Q U O T E D L A M B D A - O P
0033240 T I O N A L ) ( Q U O T E S
0033260 E T F - M E T H O D - E X P A N
0033300 D E R ) ) \r ( P U T P R O P S
0033320 D L A M B D A - O P T I O N A L
0033340 S E T F - I N V E R S E s e
0033360 t f - D L A M B D A - O P T I O
0033400 N A L ) \r D L A M B D A - R E Q
0033420 U I R E D D 1 \r ( L ( 0 O
0033440 B J E C T ) ) \0 \b \0 \0 \0 001 @ 006
0033460 \0 \0 311 \0 020 \0 N I L \r ( 3 D L A
0033500 M B D A ) \r ( ) \r s e t f - D L
0033520 A M B D A - R E Q U I R E D D
0033540 1 \r ( L ( 1 V A L U E 0
0033560 O B J E C T ) ) \0 \n \0 \0 \0 002 @
0033600 006 \0 \0 A 024 \0 A 020 \0 N I L \r ( 3
0033620 D L A M B D A ) \r ( ) \r ( R E M
0033640 P R O P ( Q U O T E D L A M
0033660 B D A - R E Q U I R E D ) ( Q
0033700 U O T E S E T F - M E T H O D
0033720 - E X P A N D E R ) ) \r ( P U T
0033740 P R O P S D L A M B D A - R E
0033760 Q U I R E D S E T F - I N V E
0034000 R S E s e t f - D L A M B D A
0034020 - R E Q U I R E D ) \r D L A M B
0034040 D A - P D 1 \r ( L ( 0 O B
0034060 J E C T ) ) \0 006 \0 \0 \0 001 @ 303 \0
0034100 \0 020 \0 N I L \r ( 3 D L A M B D
0034120 A ) \r ( ) \r C O P Y - D L A M B
0034140 D A D 1 \r ( L ( 0 O B J E
0034160 C T ) ) \0 \t \0 \0 \0 001 ` \0 \0 @ \n
0034200 \0 \0 020 \0 ( 6 N C R E A T E 2 )
0034220 \r ( 2 004 003 D L A M B D A T Y P
0034240 E # ) \r ( ) \r ( D E F P R I N T
0034260 ( Q U O T E D L A M B D A )
0034300 ( F U N C T I O N \ D E F P
0034320 R I N T . D E F S T R U C T . D
0034340 E F A U L T ) ) \r % % i n t e r
0034360 n a l - m a k e - D L A M B D A
0034400 D 1 \r ( L ( 0 - a r g s -
0034420 ) ) 002 7 \0 002 \0 e 021 001 \0 H k 021
0034440 002 002 J d I 363 242 261 001 ) 277 h 022 021 361 020
0034460 021 360 037 H k 273 272 K d J 363 242 261 001 ) 277
0034500 h 274 H k 276 275 N d M 363 242 261 001 / 277 h
0034520 _ 016 277 H k _ 022 277 _ 020 277 O 022 d O 020
0034540 363 242 261 001 - 277 h _ 024 277 H k _ 030 277 _
0034560 026 277 O 030 d O 026 363 242 261 001 . 277 h _ 032
0034600 277 H k _ 036 277 _ 034 277 O 036 d O 034 363 242
0034620 261 001 / 277 h _ 277 H k _ $ 277 _ " 277
0034640 O $ d O " 363 242 261 001 0 277 h _ & 277 H
0034660 k _ * 277 _ ( 277 O * d O ( 363 242 261 001
0034700 1 277 h _ , 277 H k _ 0 277 _ . 277 O 0
0034720 d O . 363 242 261 001 2 277 h _ 2 277 H k _
0034740 6 277 _ 4 277 O 6 d O 4 363 242 261 001 3 277
0034760 h _ 8 277 H k _ < 277 _ : 277 O < d O
0035000 : 363 242 261 001 4 277 h _ > 277 ` \0 \0 037 d
0035020 I 024 \0 277 d L 024 002 277 d O 016 024 004 277 d
0035040 O 024 024 006 277 d O 032 024 \b 277 d O 024 \n
0035060 277 d O & 024 \f 277 d O , 024 016 277 d O 2
0035100 024 020 277 d O 8 024 022 277 d O > 024 024 277 020
0035120 a g \0 \0 360 226 J k 330 a 261 376 322 J l 002
0035140 324 Z 261 376 301 a g \0 \0 360 226 K k 330 a 261
0035160 376 322 K l 002 324 [ 261 376 301 a g \0 \0 360 226
0035200 N k 330 a 261 376 314 N l 002 324 ^ 261 376 273 a
0035220 g \0 \0 360 227 O 022 k 330 a 261 376 315 O 022 l
0035240 002 324 _ 022 261 376 271 a g \0 \0 360 227 O 030 k
0035260 330 a 261 376 314 O 030 l 002 324 _ 030 261 376 270 a
0035300 g \0 \0 360 227 O 036 k 330 a 261 376 313 O 036 l
0035320 002 324 _ 036 261 376 267 a g \0 \0 360 227 O $ k
0035340 330 a 261 376 312 O $ l 002 324 _ $ 261 376 266 a
0035360 g \0 \0 360 227 O * k 330 a 261 376 311 O * l
0035400 002 324 _ * 261 376 265 a g \0 \0 360 227 O 0 k
0035420 330 a 261 376 310 O 0 l 002 324 _ 0 261 376 264 a
0035440 g \0 \0 360 227 O 6 k 330 a 261 376 307 O 6 l
0035460 002 324 _ 6 261 376 263 a g \0 \0 360 227 O < k
0035500 330 a 261 376 306 O < l 002 324 _ < 261 376 262 \0
0035520 N I L \r ( 1 0 4 1 Q : B O D Y
0035540 1 0 1 1 Q : N O N - L O C A
0035560 L 7 6 1 Q : C L O S E D - O
0035600 V E R 7 3 1 Q : B L I P 7
0035620 0 1 Q : N A M E 6 5 1 Q :
0035640 O T H E R S 6 2 1 Q : A L L
0035660 O W - O T H E R - K E Y S 5 7
0035700 1 Q : K E Y 5 4 4 Q : R E
0035720 S T 5 1 7 Q : O P T I O N A
0035740 L 4 7 2 Q : R E Q U I R E D
0035760 3 6 4 Q 004 003 D L A M B D A T
0036000 Y P E # ) \r ( ) \r M A K E - D L
0036020 A M B D A D 1 \r ( L ( 1 2 Q
0036040 B O D Y 1 1 Q N O N - L O
0036060 C A L 1 0 Q C L O S E D - O
0036100 V E R 7 B L I P 6 N A M
0036120 E 5 O T H E R S 4 A L L
0036140 O W - O T H E R - K E Y S 3
0036160 K E Y 2 R E S T 1 O P T
0036200 I O N A L 0 R E Q U I R E D
0036220 ) ) \0 A \0 \0 \0 \v ` \0 \0 037 d @ 024
0036240 \0 277 d A 024 002 277 d B 024 004 277 d C 024 006
0036260 277 d D 024 \b 277 d E 024 \n 277 d F 024 \f 277
0036300 d G 016 024 016 277 d G 020 024 020 277 d G 022 024
0036320 022 277 d G 024 024 024 277 020 \0 N I L \r ( 2
0036340 004 003 D L A M B D A T Y P E # )
0036360 \r ( ) \r ( P U T P R O P ( Q U
0036400 O T E D L A M B D A ) ( Q U
0036420 O T E S T R U C T U R E - C O
0036440 N S T R U C T O R ) ( Q U O T
0036460 E % % i n t e r n a l - m a k
0036500 e - D L A M B D A ) ) \r ( P U T
0036520 P R O P ( Q U O T E D L A M
0036540 B D A ) ( Q U O T E % % S T
0036560 R U C T U R E - C L A S S ) (
0036600 Q U O T E S T R U C T U R E -
0036620 C L A S S ) ) \r ( P U T P R O P
0036640 ( Q U O T E D L A M B D A )
0036660 ( Q U O T E % % S L O T - D
0036700 E S C R I P T I O N S ) ( Q U
0036720 O T E ( R E Q U I R E D O P
0036740 T I O N A L R E S T K E Y
0036760 \r A L L O W - O T H E R - K E Y
0037000 S O T H E R S N A M E B L
0037020 I P C L O S E D - O V E R N
0037040 O N - L O C A L B O D Y ) ) )
0037060 \r ( P U T P R O P ( Q U O T E
0037100 D L A M B D A ) ( Q U O T E
0037120 % % L O C A L - S L O T - N A
0037140 M E S ) ( Q U O T E ( B O D
0037160 Y N O N - L O C A L C L O S
0037200 E D - O V E R B L I P N A M
0037220 E \r O T H E R S A L L O W -
0037240 O T H E R - K E Y S K E Y R
0037260 E S T O P T I O N A L R E Q
0037300 U I R E D ) ) ) \r ( / D E C L A
0037320 R E D A T A T Y P E ( Q U O T
0037340 E D L A M B D A ) ( Q U O T
0037360 E ( P O I N T E R P O I N T
0037400 E R P O I N T E R P O I N T
*
0037440 E R P O I N T E R \r P O I N
0037460 T E R P O I N T E R P O I N
0037500 T E R P O I N T E R ) ) ( Q
0037520 U O T E ( ( D L A M B D A 0
0037540 P O I N T E R ) ( D L A M B
0037560 D A 2 P O I N T E R ) ( D
0037600 L A M B D A 4 P O I N T E R
0037620 ) \r ( D L A M B D A 6 P O
0037640 I N T E R ) ( D L A M B D A
0037660 8 P O I N T E R ) ( D L A M
0037700 B D A 1 0 P O I N T E R )
0037720 ( D L A M B D A 1 2 P O I N
0037740 T E R ) ( D L A M B D A 1 4
0037760 P O I N T E R ) \r ( D L A M
0040000 B D A 1 6 P O I N T E R )
0040020 ( D L A M B D A 1 8 P O I N
0040040 T E R ) ( D L A M B D A 2 0
0040060 P O I N T E R ) ) ) ( Q U O
0040100 T E 2 2 ) ) \r D T A G - P C -
0040120 U N C E R T A I N T Y D 1 \r (
0040140 L ( 0 O B J E C T ) ) \0 \b
0040160 \0 \0 \0 001 @ 006 \0 \0 311 \n 020 \0 N I L \r
0040200 ( 3 D T A G ) \r ( ) \r s e t f
0040220 - D T A G - P C - U N C E R T A
0040240 I N T Y D 1 \r ( L ( 1 V A
0040260 L U E 0 O B J E C T ) ) \0
0040300 \n \0 \0 \0 002 @ 006 \0 \0 A 024 \n A 020 \0 N
0040320 I L \r ( 3 D T A G ) \r ( ) \r (
0040340 R E M P R O P ( Q U O T E D
0040360 T A G - P C - U N C E R T A I N
0040400 T Y ) ( Q U O T E S E T F -
0040420 M E T H O D - E X P A N D E R )
0040440 ) \r ( P U T P R O P S D T A G
0040460 - P C - U N C E R T A I N T Y
0040500 S E T F - I N V E R S E s e t
0040520 f - D T A G - P C - U N C E R T
0040540 A I N T Y ) \r D T A G - M I N -
0040560 P C D 1 \r ( L ( 0 O B J E
0040600 C T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311
0040620 \b 020 \0 N I L \r ( 3 D T A G ) \r
0040640 ( ) \r s e t f - D T A G - M I N
0040660 - P C D 1 \r ( L ( 1 V A L
0040700 U E 0 O B J E C T ) ) \0 \n
0040720 \0 \0 \0 002 @ 006 \0 \0 A 024 \b A 020 \0 N I
0040740 L \r ( 3 D T A G ) \r ( ) \r ( R
0040760 E M P R O P ( Q U O T E D T
0041000 A G - M I N - P C ) ( Q U O T
0041020 E S E T F - M E T H O D - E X
0041040 P A N D E R ) ) \r ( P U T P R O
0041060 P S D T A G - M I N - P C S
0041100 E T F - I N V E R S E s e t f
0041120 - D T A G - M I N - P C ) \r D T
0041140 A G - P C D 1 \r ( L ( 0 O
0041160 B J E C T ) ) \0 \b \0 \0 \0 001 @ 006
0041200 \0 \0 311 006 020 \0 N I L \r ( 3 D T A
0041220 G ) \r ( ) \r s e t f - D T A G -
0041240 P C D 1 \r ( L ( 1 V A L U
0041260 E 0 O B J E C T ) ) \0 \n \0
0041300 \0 \0 002 @ 006 \0 \0 A 024 006 A 020 \0 N I L
0041320 \r ( 3 D T A G ) \r ( ) \r ( R E
0041340 M P R O P ( Q U O T E D T A
0041360 G - P C ) ( Q U O T E S E T
0041400 F - M E T H O D - E X P A N D E
0041420 R ) ) \r ( P U T P R O P S D T
0041440 A G - P C S E T F - I N V E R
0041460 S E s e t f - D T A G - P C )
0041500 \r D T A G - P T R D 1 \r ( L
0041520 ( 0 O B J E C T ) ) \0 \b \0 \0
0041540 \0 001 @ 006 \0 \0 311 004 020 \0 N I L \r ( 3
0041560 D T A G ) \r ( ) \r s e t f - D
0041600 T A G - P T R D 1 \r ( L ( 1
0041620 V A L U E 0 O B J E C T )
0041640 ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 004 A
0041660 020 \0 N I L \r ( 3 D T A G ) \r (
0041700 ) \r ( R E M P R O P ( Q U O T
0041720 E D T A G - P T R ) ( Q U O
0041740 T E S E T F - M E T H O D - E
0041760 X P A N D E R ) ) \r ( P U T P R
0042000 O P S D T A G - P T R S E T
0042020 F - I N V E R S E s e t f - D
0042040 T A G - P T R ) \r D T A G - S T
0042060 A C K - D E P T H D 1 \r ( L
0042100 ( 0 O B J E C T ) ) \0 \b \0 \0
0042120 \0 001 @ 006 \0 \0 311 002 020 \0 N I L \r ( 3
0042140 D T A G ) \r ( ) \r s e t f - D
0042160 T A G - S T A C K - D E P T H
0042200 D 1 \r ( L ( 1 V A L U E 0
0042220 O B J E C T ) ) \0 \n \0 \0 \0 002
0042240 @ 006 \0 \0 A 024 002 A 020 \0 N I L \r ( 3
0042260 D T A G ) \r ( ) \r ( R E M P R
0042300 O P ( Q U O T E D T A G - S
0042320 T A C K - D E P T H ) ( Q U O
0042340 T E S E T F - M E T H O D - E
0042360 X P A N D E R ) ) \r ( P U T P R
0042400 O P S D T A G - S T A C K - D
0042420 E P T H S E T F - I N V E R S
0042440 E s e t f - D T A G - S T A C
0042460 K - D E P T H ) \r D T A G - L E
0042500 V E L D 1 \r ( L ( 0 O B J
0042520 E C T ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0
0042540 311 \0 020 \0 N I L \r ( 3 D T A G )
0042560 \r ( ) \r s e t f - D T A G - L E
0042600 V E L D 1 \r ( L ( 1 V A L
0042620 U E 0 O B J E C T ) ) \0 \n
0042640 \0 \0 \0 002 @ 006 \0 \0 A 024 \0 A 020 \0 N I
0042660 L \r ( 3 D T A G ) \r ( ) \r ( R
0042700 E M P R O P ( Q U O T E D T
0042720 A G - L E V E L ) ( Q U O T E
0042740 S E T F - M E T H O D - E X P
0042760 A N D E R ) ) \r ( P U T P R O P
0043000 S D T A G - L E V E L S E T
0043020 F - I N V E R S E s e t f - D
0043040 T A G - L E V E L ) \r D T A G -
0043060 P D 1 \r ( L ( 0 O B J E C
0043100 T ) ) \0 006 \0 \0 \0 001 @ 303 \0 \0 020 \0
0043120 N I L \r ( 3 D T A G ) \r ( ) \r
0043140 C O P Y - D T A G D 1 \r ( L
0043160 ( 0 O B J E C T ) ) \0 \t \0 \0
0043200 \0 001 ` \0 \0 @ \n \0 \0 020 \0 ( 6 N C
0043220 R E A T E 2 ) \r ( 2 004 003 D T A
0043240 G T Y P E # ) \r ( ) \r ( D E F P
0043260 R I N T ( Q U O T E D T A G
0043300 ) ( F U N C T I O N \ D E F
0043320 P R I N T . D E F S T R U C T .
0043340 D E F A U L T ) ) \r M A K E - D
0043360 T A G D 1 \r ( L ( 0 - a r
0043400 g s - ) ) 001 + 021 \0 002 \0 e 021 001 \0
0043420 H k 021 002 002 J d I 363 242 261 \0 225 277 h 022
0043440 021 361 020 H k 273 272 K d J 363 242 261 \0 230 277
0043460 h 274 H k 276 275 N d M 363 242 261 \0 236 277 h
0043500 _ 016 277 H k _ 022 277 _ 020 277 O 022 d O 020
0043520 363 242 261 \0 234 277 h _ 024 277 H k _ 030 277 _
0043540 026 277 O 030 d O 026 363 242 261 \0 235 277 h _ 032
0043560 277 H k _ 036 277 _ 034 277 O 036 d O 034 363 242
0043600 261 \0 236 277 h _ 277 ` \0 \0 037 d I 024 \0
0043620 277 d L 024 002 277 d O 016 024 004 277 d O 024 024
0043640 006 277 d O 032 024 \b 277 d O 024 \n 277 020 a
0043660 g \0 \0 360 226 J k 330 a 261 377 f J l 002 324
0043700 Z 261 377 U a g \0 \0 360 226 K k 330 a 261 377
0043720 c K l 002 324 [ 261 377 R a g \0 \0 360 226 N
0043740 k 330 a 261 377 ] N l 002 324 ^ 261 377 L a g
0043760 \0 \0 360 227 O 022 k 330 a 261 377 ^ O 022 l 002
0044000 324 _ 022 261 377 J a g \0 \0 360 227 O 030 k 330
0044020 a 261 377 ] O 030 l 002 324 _ 030 261 377 I a g
0044040 \0 \0 360 227 O 036 k 330 a 261 377 \ O 036 l 002
0044060 324 _ 036 261 377 H \0 N I L \r ( 4 2 5 Q
0044100 : P C - U N C E R T A I N T Y
0044120 3 7 5 Q : M I N - P C 3 4
0044140 5 Q : P C 3 2 0 Q : P T R
0044160 2 7 3 Q : S T A C K - D E P
0044200 T H 2 4 6 Q : L E V E L 1
0044220 7 6 Q 004 003 D T A G T Y P E # )
0044240 \r ( ) \r ( P U T P R O P ( Q U
0044260 O T E D T A G ) ( Q U O T E
0044300 S T R U C T U R E - C O N S T
0044320 R U C T O R ) ( Q U O T E M
0044340 A K E - D T A G ) ) \r ( P U T P
0044360 R O P ( Q U O T E D T A G )
0044400 ( Q U O T E % % S T R U C T
0044420 U R E - C L A S S ) ( Q U O T
0044440 E S T R U C T U R E - C L A S
0044460 S ) ) \r ( P U T P R O P ( Q U
0044500 O T E D T A G ) ( Q U O T E
0044520 % % S L O T - D E S C R I P T
0044540 I O N S ) ( Q U O T E ( L E
0044560 V E L S T A C K - D E P T H
0044600 P T R P C M I N - P C \r P
0044620 C - U N C E R T A I N T Y ) ) )
0044640 \r ( P U T P R O P ( Q U O T E
0044660 D T A G ) ( Q U O T E % %
0044700 L O C A L - S L O T - N A M E S
0044720 ) ( Q U O T E ( P C - U N C
0044740 E R T A I N T Y M I N - P C
0044760 P C P T R S T A C K - D E P
0045000 T H \r L E V E L ) ) ) \r ( / D
0045020 E C L A R E D A T A T Y P E (
0045040 Q U O T E D T A G ) ( Q U O
0045060 T E ( P O I N T E R P O I N
0045100 T E R P O I N T E R P O I N
*
0045140 T E R ) ) ( Q U O T E ( ( D
0045160 T A G \r 0 P O I N T E R )
0045200 ( D T A G 2 P O I N T E R )
0045220 ( D T A G 4 P O I N T E R
0045240 ) ( D T A G 6 P O I N T E
0045260 R ) ( D T A G 8 P O I N T
0045300 E R ) ( D T A G 1 0 P O I
0045320 N T E R ) ) ) ( \r Q U O T E
0045340 1 2 ) ) \r D V A R - N A M E D
0045360 1 \r ( L ( 0 O B J E C T ) )
0045400 \0 \b \0 \0 \0 001 @ 006 \0 \0 311 006 020 \0 N
0045420 I L \r ( 3 D V A R ) \r ( ) \r s
0045440 e t f - D V A R - N A M E D 1
0045460 \r ( L ( 1 V A L U E 0 O
0045500 B J E C T ) ) \0 \n \0 \0 \0 002 @ 006
0045520 \0 \0 A 024 006 A 020 \0 N I L \r ( 3 D
0045540 V A R ) \r ( ) \r ( R E M P R O P
0045560 ( Q U O T E D V A R - N A M
0045600 E ) ( Q U O T E S E T F - M
0045620 E T H O D - E X P A N D E R ) )
0045640 \r ( P U T P R O P S D V A R -
0045660 N A M E S E T F - I N V E R S
0045700 E s e t f - D V A R - N A M E
0045720 ) \r D V A R - S L O T D 1 \r (
0045740 L ( 0 O B J E C T ) ) \0 \b
0045760 \0 \0 \0 001 @ 006 \0 \0 311 004 020 \0 N I L \r
0046000 ( 3 D V A R ) \r ( ) \r s e t f
0046020 - D V A R - S L O T D 1 \r ( L
0046040 ( 1 V A L U E 0 O B J E
0046060 C T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A
0046100 024 004 A 020 \0 N I L \r ( 3 D V A R
0046120 ) \r ( ) \r ( R E M P R O P ( Q
0046140 U O T E D V A R - S L O T )
0046160 ( Q U O T E S E T F - M E T H
0046200 O D - E X P A N D E R ) ) \r ( P
0046220 U T P R O P S D V A R - S L O
0046240 T S E T F - I N V E R S E s
0046260 e t f - D V A R - S L O T ) \r D
0046300 V A R - L E V E L D 1 \r ( L
0046320 ( 0 O B J E C T ) ) \0 \b \0 \0
0046340 \0 001 @ 006 \0 \0 311 002 020 \0 N I L \r ( 3
0046360 D V A R ) \r ( ) \r s e t f - D
0046400 V A R - L E V E L D 1 \r ( L
0046420 ( 1 V A L U E 0 O B J E C
0046440 T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024
0046460 002 A 020 \0 N I L \r ( 3 D V A R )
0046500 \r ( ) \r ( R E M P R O P ( Q U
0046520 O T E D V A R - L E V E L )
0046540 ( Q U O T E S E T F - M E T H
0046560 O D - E X P A N D E R ) ) \r ( P
0046600 U T P R O P S D V A R - L E V
0046620 E L S E T F - I N V E R S E
0046640 s e t f - D V A R - L E V E L )
0046660 \r D V A R - K I N D D 1 \r ( L
0046700 ( 0 O B J E C T ) ) \0 \b \0
0046720 \0 \0 001 @ 006 \0 \0 311 \0 020 \0 N I L \r (
0046740 3 D V A R ) \r ( ) \r s e t f -
0046760 D V A R - K I N D D 1 \r ( L
0047000 ( 1 V A L U E 0 O B J E C
0047020 T ) ) \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024
0047040 \0 A 020 \0 N I L \r ( 3 D V A R )
0047060 \r ( ) \r ( R E M P R O P ( Q U
0047100 O T E D V A R - K I N D ) (
0047120 Q U O T E S E T F - M E T H O
0047140 D - E X P A N D E R ) ) \r ( P U
0047160 T P R O P S D V A R - K I N D
0047200 S E T F - I N V E R S E s e
0047220 t f - D V A R - K I N D ) \r D V
0047240 A R - P D 1 \r ( L ( 0 O B
0047260 J E C T ) ) \0 006 \0 \0 \0 001 @ 303 \0
0047300 \0 020 \0 N I L \r ( 3 D V A R ) \r
0047320 ( ) \r C O P Y - D V A R D 1 \r
0047340 ( L ( 0 O B J E C T ) ) \0
0047360 \t \0 \0 \0 001 ` \0 \0 @ \n \0 \0 020 \0 ( 6
0047400 N C R E A T E 2 ) \r ( 2 004 003
0047420 D V A R T Y P E # ) \r ( ) \r ( D
0047440 E F P R I N T ( Q U O T E D
0047460 V A R ) ( F U N C T I O N \
0047500 D E F P R I N T . D E F S T R U
0047520 C T . D E F A U L T ) ) \r M A K
0047540 E - D V A R D 1 \r ( L ( 0
0047560 - a r g s - ) ) \0 261 \v \0 002 \0 e
0047600 021 001 \0 H k 021 002 002 J d I 363 262 T 277 h
0047620 022 021 221 \n H k 273 272 K d J 363 262 W 277 h
0047640 274 H k 276 275 N d M 363 262 ] 277 h _ 016 277
0047660 H k _ 022 277 _ 020 277 O 022 d O 020 363 262 [
0047700 277 h _ 024 277 ` \0 \0 037 d I 024 \0 277 d L
0047720 024 002 277 d O 016 024 004 277 d O 024 024 006 277 020
0047740 a g \0 \0 360 225 J k 330 a 260 246 J l 002 324
0047760 Z 260 230 a g \0 \0 360 225 K k 330 a 260 243 K
0050000 l 002 324 [ 260 225 a g \0 \0 360 225 N k 330 a
0050020 260 235 N l 002 324 ^ 260 217 a g \0 \0 360 226 O
0050040 022 k 330 a 260 236 O 022 l 002 324 _ 022 260 215 \0
0050060 N I L \r ( 2 3 5 Q : N A M E
0050100 2 1 2 Q : S L O T 1 6 7 Q
0050120 : L E V E L 1 4 4 Q : K I N
0050140 D 1 1 0 Q 004 003 D V A R T Y P
0050160 E # ) \r ( ) \r ( P U T P R O P
0050200 ( Q U O T E D V A R ) ( Q U
0050220 O T E S T R U C T U R E - C O
0050240 N S T R U C T O R ) ( Q U O T
0050260 E M A K E - D V A R ) ) \r ( P
0050300 U T P R O P ( Q U O T E D V
0050320 A R ) ( Q U O T E % % S T R
0050340 U C T U R E - C L A S S ) ( Q
0050360 U O T E S T R U C T U R E - C
0050400 L A S S ) ) \r ( P U T P R O P
0050420 ( Q U O T E D V A R ) ( Q U
0050440 O T E % % S L O T - D E S C R
0050460 I P T I O N S ) ( Q U O T E
0050500 ( K I N D L E V E L S L O T
0050520 N A M E ) ) ) \r ( P U T P R O
0050540 P ( Q U O T E D V A R ) (
0050560 Q U O T E % % L O C A L - S L
0050600 O T - N A M E S ) ( Q U O T E
0050620 ( N A M E S L O T L E V E
0050640 L K I N D ) ) ) \r ( / D E C L
0050660 A R E D A T A T Y P E ( Q U O
0050700 T E D V A R ) ( Q U O T E
0050720 ( P O I N T E R P O I N T E R
0050740 P O I N T E R P O I N T E R
0050760 ) ) ( Q U O T E ( ( D V A R
0051000 0 P O I N T E R ) ( \r D V
0051020 A R 2 P O I N T E R ) ( D
0051040 V A R 4 P O I N T E R ) (
0051060 D V A R 6 P O I N T E R ) )
0051100 ) ( Q U O T E 8 ) ) \r ( D E
0051120 F P R I N T ( Q U O T E D T
0051140 A G ) N I L ) \r C R E A T E -
0051160 H U N K D 1 \r ( L ( 3 P O
0051200 P - P 2 P R E V - S L O T
0051220 1 M Y - S L O T 0 H U N K
0051240 - S I Z E ) ) \0 2 \0 \0 \0 004 g \0
0051260 \0 g \0 \0 @ \t \0 \0 h 032 032 g \0 \0 B 264
0051300 021 o \0 \0 \0 B \n \0 \0 o \0 \0 \0 \n \0 \0
0051320 A C \n \0 \0 \n \0 \0 032 032 032 \t \0 \0 020 \0
0051340 ( 5 7 Q E M I T - B Y T E - L
0051360 I S T 5 1 Q \ A P P E N D 2
0051400 4 6 Q S T O R E - V A R 4
0051420 1 Q \ A P P E N D 2 3 2 Q
0051440 C H O O S E - O P 1 1 Q T Y
0051460 P E - N A M E - F R O M - S I Z
0051500 E ) \r ( 1 7 Q C R E A T E C E
0051520 L L 5 T Y P E 2 S I C X
0051540 ) \r ( 3 6 Q ( R P L P T R .
0051560 N 0 ) 2 6 Q ( P V A R .
0051600 P V A R X ) ) \r ( L E T * (
0051620 ( A 0 2 4 0 ( Q U O T E C R
0051640 E A T E - H U N K ) ) ( A 0 2
0051660 4 1 ( Q U O T E C L : F U N
0051700 C T I O N ) ) ( A 0 2 4 2 \r
0051720 " E m i t c o d e t o c r
0051740 e a t e a h u n k o f t
0051760 h e g i v e n s i z e a n
0052000 d s t o r e i t i n t o
0052020 P V A R m y - s l o t . I
0052040 f p r e v - s l o t i s n
0052060 o n - N I L , a l s o e m i
0052100 t c o d e t o l i n k t
0052120 h e n e w h u n k t o t
0052140 h e o n e i n t h a t s
0052160 l o t . I f p o p - p i
0052200 s n o n - N I L t h e n d
0052220 o n ' t l e a v e t h e h
0052240 u n k o n t h e s t a c k
0052260 . " \r ) ) ( P R O G N ( C O
0052300 N D ( ( F B O U N D P ( Q U
0052320 O T E S E T - D O C U M E N T
0052340 A T I O N ) ) ( S E T - D O C
0052360 U M E N T A T I O N A 0 2 4 0
0052400 A 0 2 4 1 A 0 2 4 2 ) ) )
0052420 A 0 2 4 2 ) ) \r T Y P E - N A M
0052440 E - F R O M - S I Z E D 1 \r (
0052460 L ( 0 L E N ) F 2 \ H
0052500 U N K . P T R S I Z E S ) \0 -
0052520 002 001 \0 001 g \0 \0 R 021 021 001 H 003 265 021 o
0052540 \0 \0 \0 @ \n \0 \0 277 h 022 \n \0 \0 020 001 271
0052560 @ I 363 221 h 200 i 222 I 260 360 H 002 X 260 336
0052600 \0 ( 3 0 Q P A C K * 2 2 Q
0052620 C L : E R R O R ) \r ( 2 \ P T
0052640 R H U N K ) \r ( 1 6 Q " C a
0052660 n ' t m a k e a h u n k
0052700 t h a t b i g : ~ S " ) \r R
0052720 E L E A S E - C I R C U L A R I
0052740 T I E S D 1 \r ( L ( 0 C O
0052760 D E ) ) \0 036 001 \0 \0 001 @ 260 027 d 001
0053000 021 001 \0 H 001 g \0 \0 360 226 H 002 001 \t \0 \0
0053020 277 023 002 003 265 352 h 020 \0 ( 2 4 Q s e
0053040 t f - D T A G - P T R ) \r ( 1 4
0053060 Q T A G ) \r ( ) \r ( L E T *
0053100 ( ( A 0 2 4 3 ( Q U O T E R
0053120 E L E A S E - C I R C U L A R I
0053140 T I E S ) ) ( A 0 2 4 4 ( Q
0053160 U O T E C L : F U N C T I O N
0053200 ) ) ( A 0 2 4 5 \r " N I L
0053220 o u t a n y c i r c u l a r
0053240 i t i e s i n t h e L A P
0053260 c o d e g i v e n . " ) )
0053300 ( P R O G N ( C O N D ( ( F
0053320 B O U N D P ( Q U O T E S E
0053340 T - D O C U M E N T A T I O N )
0053360 ) \r ( S E T - D O C U M E N T
0053400 A T I O N A 0 2 4 3 A 0 2 4
0053420 4 A 0 2 4 5 ) ) ) A 0 2 4 5
0053440 ) ) \r ( S E T Q + I V A R - C
0053460 O D E + 0 ) \r ( P U T H A S H
0053500 ( Q U O T E + I V A R - C O
0053520 D E + ) ( Q U O T E ( C O N
0053540 S T A N T + I V A R - C O D E
0053560 + ) ) C O M P V A R M A C R O
0053600 H A S H ) \r ( L E T * ( ( A 0
0053620 2 4 6 ( Q U O T E + I V A R
0053640 - C O D E + ) ) ( A 0 2 4 7
0053660 ( Q U O T E V A R I A B L E )
0053700 ) ( A 0 2 4 8 " C o d e i
0053720 n n a m e - t a b l e f o r
0053740 I V A R s " ) ) ( \r P R O G
0053760 N ( C O N D ( ( F B O U N D
0054000 P ( Q U O T E S E T - D O C
0054020 U M E N T A T I O N ) ) ( S E
0054040 T - D O C U M E N T A T I O N
0054060 A 0 2 4 6 A 0 2 4 7 A 0 2 4
0054100 8 ) ) ) A 0 2 4 8 ) ) \r ( S E
0054120 T Q + P V A R - C O D E + 2
0054140 ) \r ( P U T H A S H ( Q U O T
0054160 E + P V A R - C O D E + ) (
0054200 Q U O T E ( C O N S T A N T
0054220 + P V A R - C O D E + ) ) C O
0054240 M P V A R M A C R O H A S H ) \r
0054260 ( L E T * ( ( A 0 2 4 9 ( Q
0054300 U O T E + P V A R - C O D E +
0054320 ) ) ( A 0 2 5 0 ( Q U O T E
0054340 V A R I A B L E ) ) ( A 0 2
0054360 5 1 " C o d e i n n a m e
0054400 - t a b l e f o r P V A R s
0054420 " ) ) ( \r P R O G N ( C O N
0054440 D ( ( F B O U N D P ( Q U O
0054460 T E S E T - D O C U M E N T A
0054500 T I O N ) ) ( S E T - D O C U
0054520 M E N T A T I O N A 0 2 4 9
0054540 A 0 2 5 0 A 0 2 5 1 ) ) ) A
0054560 0 2 5 1 ) ) \r ( S E T Q + F V
0054600 A R - C O D E + 3 ) \r ( P U T
0054620 H A S H ( Q U O T E + F V A
0054640 R - C O D E + ) ( Q U O T E
0054660 ( C O N S T A N T + F V A R -
0054700 C O D E + ) ) C O M P V A R M
0054720 A C R O H A S H ) \r ( L E T *
0054740 ( ( A 0 2 5 2 ( Q U O T E +
0054760 F V A R - C O D E + ) ) ( A 0
0055000 2 5 3 ( Q U O T E V A R I A
0055020 B L E ) ) ( A 0 2 5 4 " C o
0055040 d e i n n a m e - t a b l e
0055060 f o r F V A R s " ) ) ( \r
0055100 P R O G N ( C O N D ( ( F B
0055120 O U N D P ( Q U O T E S E T
0055140 - D O C U M E N T A T I O N ) )
0055160 ( S E T - D O C U M E N T A T
0055200 I O N A 0 2 5 2 A 0 2 5 3
0055220 A 0 2 5 4 ) ) ) A 0 2 5 4 ) )
0055240 \r ( S E T Q + L A M B D A - S
0055260 P R E A D + 0 ) \r ( P U T H A
0055300 S H ( Q U O T E + L A M B D
0055320 A - S P R E A D + ) ( Q U O T
0055340 E ( C O N S T A N T + L A M
0055360 B D A - S P R E A D + ) ) C O
0055400 M P V A R M A C R O H A S H ) \r
0055420 ( L E T * ( ( A 0 2 5 5 ( Q
0055440 U O T E + L A M B D A - S P R
0055460 E A D + ) ) ( A 0 2 5 6 ( Q
0055500 U O T E V A R I A B L E ) )
0055520 ( A 0 2 5 7 \r " A R G T Y P E
0055540 v a l u e f o r l a m b d
0055560 a s p r e a d f u n c t i o
0055600 n s " ) ) ( P R O G N ( C O
0055620 N D ( ( F B O U N D P ( Q U
0055640 O T E S E T - D O C U M E N T
0055660 A T I O N ) ) ( \r S E T - D O
0055700 C U M E N T A T I O N A 0 2 5
0055720 5 A 0 2 5 6 A 0 2 5 7 ) ) )
0055740 A 0 2 5 7 ) ) \r ( S E T Q +
0055760 N L A M B D A - S P R E A D +
0056000 1 ) \r ( P U T H A S H ( Q U O
0056020 T E + N L A M B D A - S P R E
0056040 A D + ) ( Q U O T E ( C O N
0056060 S T A N T + N L A M B D A - S
0056100 P R E A D + ) ) C O M P V A R
0056120 M A C R O H A S H ) \r ( L E T *
0056140 ( ( A 0 2 5 8 ( Q U O T E
0056160 + N L A M B D A - S P R E A D +
0056200 ) ) ( A 0 2 5 9 ( Q U O T E
0056220 V A R I A B L E ) ) ( A 0 2
0056240 6 0 \r " A R G T Y P E v a l
0056260 u e f o r n l a m b d a s
0056300 p r e a d f u n c t i o n s "
0056320 ) ) ( P R O G N ( C O N D
0056340 ( ( F B O U N D P ( Q U O T E
0056360 S E T - D O C U M E N T A T I
0056400 O N ) ) ( \r S E T - D O C U M
0056420 E N T A T I O N A 0 2 5 8 A
0056440 0 2 5 9 A 0 2 6 0 ) ) ) A 0
0056460 2 6 0 ) ) \r ( S E T Q + L A M
0056500 B D A - N O - S P R E A D + 2
0056520 ) \r ( P U T H A S H ( Q U O T
0056540 E + L A M B D A - N O - S P R
0056560 E A D + ) ( Q U O T E ( C O
0056600 N S T A N T + L A M B D A - N
0056620 O - S P R E A D + ) ) C O M P
0056640 V A R M A C R O H A S H ) \r ( L
0056660 E T * ( ( A 0 2 6 1 ( Q U O
0056700 T E + L A M B D A - N O - S P
0056720 R E A D + ) ) ( A 0 2 6 2 (
0056740 Q U O T E V A R I A B L E ) )
0056760 ( A 0 2 6 3 \r " A R G T Y P
0057000 E v a l u e f o r l a m b
0057020 d a n o - s p r e a d f u n
0057040 c t i o n s " ) ) ( P R O G N
0057060 ( C O N D ( ( F B O U N D P
0057100 ( Q U O T E S E T - D O C U
0057120 M E N T A T I O N ) ) ( \r S E
0057140 T - D O C U M E N T A T I O N
0057160 A 0 2 6 1 A 0 2 6 2 A 0 2 6
0057200 3 ) ) ) A 0 2 6 3 ) ) \r ( S E
0057220 T Q + N L A M B D A - N O - S
0057240 P R E A D + 3 ) \r ( P U T H A
0057260 S H ( Q U O T E + N L A M B
0057300 D A - N O - S P R E A D + ) (
0057320 Q U O T E ( C O N S T A N T
0057340 + N L A M B D A - N O - S P R E
0057360 A D + ) ) C O M P V A R M A C
0057400 R O H A S H ) \r ( L E T * ( (
0057420 A 0 2 6 4 ( Q U O T E + N L
0057440 A M B D A - N O - S P R E A D +
0057460 ) ) ( A 0 2 6 5 ( Q U O T E
0057500 V A R I A B L E ) ) ( A 0 2
0057520 6 6 \r " A R G T Y P E v a l
0057540 u e f o r n l a m b d a n
0057560 o - s p r e a d f u n c t i o
0057600 n s " ) ) ( P R O G N ( C O
0057620 N D ( ( F B O U N D P ( Q U
0057640 O T E S E T - D O C U M E N T
0057660 A T I O N ) ) ( \r S E T - D O
0057700 C U M E N T A T I O N A 0 2 6
0057720 4 A 0 2 6 5 A 0 2 6 6 ) ) )
0057740 A 0 2 6 6 ) ) \r ( S E T Q +
0057760 C O N S T A N T - O P C O D E S
0060000 + ( Q U O T E ( ( 0 . '
0060020 0 ) ( 1 . ' 1 ) ( N I L
0060040 . ' N I L ) ( T . ' T
0060060 ) ) ) ) \r ( P U T H A S H ( Q
0060100 U O T E + C O N S T A N T - O
0060120 P C O D E S + ) ( Q U O T E
0060140 ( C O N S T A N T + C O N S T
0060160 A N T - O P C O D E S + ) ) C
0060200 O M P V A R M A C R O H A S H )
0060220 \r ( L E T * ( ( A 0 2 6 7 (
0060240 Q U O T E + C O N S T A N T -
0060260 O P C O D E S + ) ) ( A 0 2 6
0060300 8 ( Q U O T E V A R I A B L
0060320 E ) ) ( A 0 2 6 9 \r " A n
0060340 A L i s t o f a l l c o n
0060360 s t a n t s w i t h d e d i
0060400 c a t e d o p c o d e s . " )
0060420 ) ( P R O G N ( C O N D (
0060440 ( F B O U N D P ( Q U O T E
0060460 S E T - D O C U M E N T A T I O
0060500 N ) \r ) ( S E T - D O C U M E
0060520 N T A T I O N A 0 2 6 7 A 0
0060540 2 6 8 A 0 2 6 9 ) ) ) A 0 2
0060560 6 9 ) ) \r ( P R O C L A I M (
0060600 Q U O T E ( S P E C I A L *
0060620 B Y T E S * ) ) ) \r ( O R ( B
0060640 O U N D P ( Q U O T E * B Y
0060660 T E S * ) ) ( S E T Q * B Y
0060700 T E S * N I L ) ) \r ( L E T *
0060720 ( ( A 0 2 7 0 ( Q U O T E
0060740 * B Y T E S * ) ) ( A 0 2 7 1
0060760 ( Q U O T E V A R I A B L E
0061000 ) ) ( A 0 2 7 2 \r " T h e
0061020 d a t a - s t r u c t u r e h
0061040 o l d i n g t h e b y t e s
0061060 o f t h e c u r r e n t
0061100 f u n c t i o n . U s e (
0061120 s t a r t - b y t e s ) t o
0061140 c r e a t e a n e m p t y
0061160 o n e , ( e m i t - b y t e )
0061200 o r ( e m i t - o p ) t o
0061220 a d d m o r e b y t e s
0061240 o n t h e e n d , a n d
0061260 ( e n d - b y t e s ) t o c
0061300 l o s e i t o f f a n d
0061320 g e t a n a r r a y o f
0061340 t h e b y t e s . " \r ) ) (
0061360 P R O G N ( C O N D ( ( F B
0061400 O U N D P ( Q U O T E S E T
0061420 - D O C U M E N T A T I O N ) )
0061440 ( S E T - D O C U M E N T A T
0061460 I O N A 0 2 7 0 A 0 2 7 1
0061500 A 0 2 7 2 ) ) ) A 0 2 7 2 ) )
0061520 \r ( P R O C L A I M ( Q U O T
0061540 E ( S P E C I A L * B Y T E
0061560 - C O U N T * ) ) ) \r ( O R (
0061600 B O U N D P ( Q U O T E * B
0061620 Y T E - C O U N T * ) ) ( S E
0061640 T Q * B Y T E - C O U N T *
0061660 0 ) ) \r ( L E T * ( ( A 0 2 7
0061700 3 ( Q U O T E * B Y T E - C
0061720 O U N T * ) ) ( A 0 2 7 4 (
0061740 Q U O T E V A R I A B L E ) )
0061760 ( A 0 2 7 5 \r " T h e n u
0062000 m b e r o f b y t e s p u
0062020 t o n * b y t e s * s o
0062040 f a r . " ) ) ( P R O G N (
0062060 C O N D ( ( F B O U N D P (
0062100 Q U O T E S E T - D O C U M E
0062120 N T A T I O N ) ) ( \r S E T -
0062140 D O C U M E N T A T I O N A 0
0062160 2 7 3 A 0 2 7 4 A 0 2 7 5 )
0062200 ) ) A 0 2 7 5 ) ) \r S T A R T
0062220 - B Y T E S D 1 \r N I L \0 003
0062240 \0 \0 \0 \0 h 020 \0 N I L \r N I L \r (
0062260 ) \r E M I T - B Y T E D 1 \r (
0062300 L ( 0 B Y T E ) F 1 *
0062320 B Y T E S * F 2 * B Y T E
0062340 - C O U N T * F 3 * J U M
0062360 P - L I S T * ) 001 037 001 003 \0 001 @
0062400 d 003 242 261 001 020 001 021 001 \0 H d g \0 \0 360
0062420 237 277 @ 002 001 R \n \0 \0 @ 002 001 S 032 c 006
0062440 020 g \0 \0 360 263 036 H g \0 \0 360 263 027 H g
0062460 \0 \0 360 256 H g \0 \0 360 250 H d g \0 \0 360
0062500 262 3 277 @ Q 032 c 002 g \0 \0 @ 001 g \0 \0
0062520 @ 002 001 g \0 \0 Q g \0 \0 R \r \b \0 \0 S
0062540 032 c 006 R @ 001 o \0 \0 \0 \n \0 \0 002 001 324
0062560 c 004 020 g \0 \0 360 256 H g \0 \0 360 250 H d
0062600 g \0 \0 360 262 024 277 @ Q 032 c 002 j Q 032 c
0062620 002 R l 002 324 c 004 020 g \0 \0 360 250 H d g
0062640 \0 \0 360 262 031 277 @ Q 032 c 002 j Q 032 c 002
0062660 j Q 032 c 002 R l 003 324 c 004 020 g \0 \0 360
0062700 262 035 Q 002 c 002 g \0 \0 @ 002 h 032 032 Q 032
0062720 c 002 j Q 032 c 002 R k 324 c 004 020 H g \0
0062740 \0 360 262 & Q 002 c 002 d 002 c 002 g \0 \0 @
0062760 002 h 032 032 Q 032 c 002 j Q 032 c 002 j Q 032
0063000 c 002 R k 324 c 004 020 @ Q 032 c 002 R k 324
0063020 c 004 020 Q 032 c 002 R k 324 c 004 020 \0 ( 1
0063040 5 5 Q C L : A S S O C 1 3 7
0063060 Q M A K E - D J U M P 3 1 Q
0063100 s e t f - D T A G - M I N - P
0063120 C ) \r ( 3 5 7 Q L I T 3 4 1
0063140 Q P T R 3 1 1 Q S Y M 2
0063160 7 7 Q A T O M 2 4 2 Q L I
0063200 T 2 3 3 Q L A M B D A 2 0
0063220 3 Q T Y P E 1 7 4 Q F N
0063240 1 6 6 Q S Y M 1 3 2 Q : M
0063260 I N - P C 1 2 6 Q : P T R
0063300 1 2 0 Q : T A G 1 1 3 Q :
0063320 K I N D 7 7 Q N T J U M P
0063340 7 0 Q N F J U M P 6 2 Q T
0063360 J U M P 5 3 Q F J U M P 4
0063400 4 Q J U M P 1 7 Q T A G )
0063420 \r ( 1 5 2 Q ( ( J U M P 1
0063440 3 ) ( F J U M P 1 4 )
0063460 ( T J U M P 1 4 ) ( N F J
0063500 U M P 2 6 ) ( N T J U M P
0063520 2 6 ) ) ) \r E M I T - B Y T
0063540 E - L I S T D 1 \r ( L ( 0
0063560 L ) ) \0 017 \0 \0 \0 001 @ 206 d 001 \t \0
0063600 \0 277 002 003 265 370 h 020 \0 ( 6 E M I T
0063620 - B Y T E ) \r N I L \r ( ) \r E N
0063640 D - B Y T E S D 1 \r ( F 0
0063660 * B Y T E S * ) \0 006 \0 001 \0 \0 P
0063700 \t \0 \0 020 \0 ( 3 C L : N R E V E
0063720 R S E ) \r N I L \r ( ) \r C H O O
0063740 S E - O P D 1 \r ( L ( 1 A
0063760 R G 0 C H O I C E S ) ) \0
0064000 036 \0 \0 \0 002 A @ 001 \t \0 \0 363 221 h 200 i
0064020 230 @ 001 A h 032 032 h 032 020 @ 002 A 340 h 032
0064040 032 020 \0 ( 5 M A X - A R G ) \r N
0064060 I L \r ( ) \r R E F - V A R D 1
0064100 \r ( L ( 0 V A R ) F 1 2
0064120 Q * H U N K - M A P * ) \0 357
0064140 \n 001 \0 001 @ d \t \0 \0 242 261 \0 305 277 @ \t
0064160 \0 \0 021 a 006 H d g \0 \0 360 234 277 o \0 \0
0064200 \0 @ \t \0 \0 \n \0 \0 020 g \0 \0 360 233 o \0
0064220 \0 \0 @ \t \0 \0 \n \0 \0 020 H d g \0 \0 360
0064240 234 277 o \0 \0 \0 @ \t \0 \0 \n \0 \0 020 g \0
0064260 \0 360 264 p @ \t \0 \0 271 W 024 \t \0 \0 h 273
0064300 Z 003 265 6 h \ 001 275 L 002 276 o \0 \0 \0 N
0064320 \n \0 \0 M I 325 k 021 022 \t O 020 O 016 363 263
0064340 . O 022 g \0 \0 j h 032 032 \n \0 \0 _ 022 277
0064360 O 020 k 324 _ 020 260 346 001 273 I K 001 363 221 h
0064400 200 i 225 K 265 301 i 260 276 J 002 260 265 O 022 022
0064420 g \0 \0 @ \t \0 \0 340 h 032 032 \n \0 \0 \n \0
0064440 \0 020 o \0 \0 \0 H o \0 \0 \0 \f \0 \0 020 003
0064460 262 031 @ 001 g \0 \0 360 237 g \0 \0 g \0 \0 @
0064500 002 001 h 032 032 h 032 032 020 o \0 \0 \0 @ \n \0
0064520 \0 020 \0 ( 3 5 4 Q C L : E R R O
0064540 R 3 1 1 Q E C A S E - F A I
0064560 L 2 7 4 Q \ A P P E N D 2
0064600 2 7 1 Q \ A P P E N D 2 2 6
0064620 2 Q D V A R - S L O T 2 1 0
0064640 Q \ N C O N C 2 1 5 6 Q C
0064660 H O O S E - O P 1 3 1 Q C L
0064700 : R E V E R S E 1 2 3 Q D V
0064720 A R - L E V E L 1 1 0 Q C H
0064740 O O S E - O P 1 0 5 Q D V A
0064760 R - S L O T 6 4 Q C H O O S
0065000 E - O P 6 1 Q D V A R - S L
0065020 O T 4 3 Q C H O O S E - O P
0065040 4 0 Q D V A R - S L O T 1
0065060 5 Q D V A R - K I N D 4 D
0065100 V A R - P ) \r ( 3 3 2 Q S Y M
0065120 3 2 7 Q G V A R 3 2 2 Q
0065140 G 2 5 6 Q G E T B A S E P T
0065160 R . N 2 0 1 Q G E T B A S E
0065200 P T R . N 1 1 4 Q : C L O S
0065220 E D 7 2 Q : F R E E 4 7 Q
0065240 : A R G U M E N T 2 5 Q :
0065260 L O C A L ) \r ( 3 5 0 Q " B
0065300 U G : T h i s v a r i a b l
0065320 e i s n e i t h e r g l o
0065340 b a l n o r a D V A R :
0065360 ~ S " 3 0 6 Q ( : L O C A L
0065400 : A R G U M E N T : F R E E
0065420 : C L O S E D ) 3 0 1 Q \r
0065440 ( D V A R - K I N D V A R )
0065460 1 5 2 Q ( P V A R . P V A
0065500 R X ) 1 0 1 Q ( F V A R .
0065520 F V A R X ) 5 5 Q ( I V A
0065540 R . I V A R X ) 3 4 Q (
0065560 P V A R . P V A R X ) ) \r (
0065600 L E T * ( ( A 0 2 7 6 ( Q U
0065620 O T E R E F - V A R ) ) ( A
0065640 0 2 7 7 ( Q U O T E C L : F
0065660 U N C T I O N ) ) ( A 0 2 7 8
0065700 \r " R e t u r n a l i s t
0065720 o f i n s t r u c t i o n s
0065740 t o p u s h t h e g i v
0065760 e n v a r i a b l e ' s v a
0066000 l u e o n t o t h e s t a
0066020 c k . " ) ) ( P R O G N ( C
0066040 O N D ( ( \r F B O U N D P (
0066060 Q U O T E S E T - D O C U M E
0066100 N T A T I O N ) ) ( S E T - D
0066120 O C U M E N T A T I O N A 0 2
0066140 7 6 A 0 2 7 7 A 0 2 7 8 ) )
0066160 ) A 0 2 7 8 ) ) \r S T O R E -
0066200 V A R D 1 \r ( L ( 1 P O P
0066220 - P 0 V A R - O R - S L O T
0066240 ) F 1 6 Q * H U N K - M A
0066260 P * ) 001 q 016 001 \0 002 021 260 \n @ [ Z
0066300 d 303 \0 \0 230 277 @ 271 g \0 \0 X 260 = 303 \0
0066320 \0 262 034 @ 001 g \0 \0 360 250 o \0 \0 \0 @ \n
0066340 \0 \0 277 g \0 \0 270 @ 002 001 Y 260 036 J 303 \0
0066360 \0 264 \r @ \t \0 \0 271 @ \t \0 \0 X 212 g \0
0066400 \0 K o \0 \0 \0 \f \0 \0 277 H \ d g \0 \0
0066420 360 262 6 277 A 262 ) I g \0 \0 \t \0 \0 363 221
0066440 h 200 i 231 g \0 \0 I h 032 032 h 032 020 o \0
0066460 \0 \0 I \n \0 \0 o \0 \0 \0 \n \0 \0 020 o \0
0066500 \0 \0 I \n \0 \0 020 g \0 \0 360 236 g \0 \0 I
0066520 340 A 264 006 o \0 \0 \0 032 032 020 L d g \0 \0
0066540 360 237 277 g \0 \0 I 340 A 264 006 o \0 \0 \0 032
0066560 032 020 g \0 \0 360 242 261 \0 222 @ \t \0 \0 275 W
0066600 034 \t \0 \0 h _ 016 277 ^ 003 265 025 h _ 020 001
0066620 _ 022 277 O 020 002 _ 024 277 A 262 036 h 260 034 001
0066640 _ 016 277 M O 016 001 363 221 h 200 i 226 O 016 265
0066660 336 i 260 333 N 002 260 322 i 264 005 g \0 \0 o \0
0066700 \0 \0 O 024 \n \0 \0 O 022 M 325 k 021 022 \r O
0066720 030 O 026 363 263 031 O 032 g \0 \0 j h 032 032 \n
0066740 \0 \0 _ 032 277 O 030 k 324 _ 030 260 346 O 032 022
0066760 g \0 \0 g \0 \0 I 340 o \0 \0 \0 032 032 032 \n
0067000 \0 \0 \n \0 \0 \n \0 \0 020 L g \0 \0 360 264 020
0067020 g \0 \0 g \0 \0 I h 032 032 h 032 032 020 g \0
0067040 \0 L o \0 \0 \0 \f \0 \0 020 \0 ( 5 5 6 Q
0067060 E C A S E - F A I L 5 1 5 Q
0067100 \ A P P E N D 2 5 1 2 Q \
0067120 A P P E N D 2 5 0 7 Q \ A P
0067140 P E N D 2 4 4 7 Q \ N C O N
0067160 C 2 4 1 4 Q C H O O S E - O
0067200 P 3 1 1 Q C L : R E V E R S
0067220 E 3 0 3 Q D V A R - L E V E
0067240 L 2 1 3 Q C H O O S E - O P
0067260 2 0 2 Q \ A P P E N D 2 1
0067300 7 3 Q C H O O S E - O P 1 4
0067320 3 Q M A X - A R G 1 1 6 Q
0067340 C H E C K - T Y P E - F A I L
0067360 1 0 1 Q D V A R - K I N D 7
0067400 4 Q D V A R - S L O T 4 7 Q
0067420 C L : E R R O R ) \r ( 5 4 6 Q
0067440 K I N D 5 3 3 Q S Y M 5
0067460 3 0 Q G V A R _ 5 2 2 Q :
0067500 G L O B A L 4 7 3 Q R P L P
0067520 T R . N 4 7 0 Q S W A P 4
0067540 4 0 Q G E T B A S E P T R . N
0067560 4 0 3 Q C O P Y 2 7 2 Q
0067600 : C L O S E D 2 5 3 Q F V A
0067620 R X _ 2 4 5 Q : F R E E 2
0067640 2 4 Q I V A R X _ 2 1 7 Q
0067660 : A R G U M E N T 1 5 4 Q P
0067700 V A R _ ^ 1 4 0 Q P V A R _
0067720 ^ 1 2 5 Q : L O C A L 1 0
0067740 6 Q V A R - O R - S L O T 6
0067760 6 Q D V A R 5 3 Q : G L O
0070000 B A L 3 5 Q G 2 6 Q L I
0070020 S T P 2 0 Q : L O C A L 1
0070040 1 Q S M A L L P ) \r ( 5 5 3
0070060 Q ( : L O C A L : A R G U M
0070100 E N T : F R E E : C L O S E
0070120 D : G L O B A L ) 5 0 1 Q
0070140 ( P O P ) 4 0 7 Q ( P V A R
0070160 . P V A R X ) 2 6 4 Q (
0070200 P O P ) 2 3 5 Q ( P O P )
0070220 2 0 7 Q \r ( P V A R _ . P
0070240 V A R X _ ) 1 7 7 Q ( P O P
0070260 ) 1 6 7 Q ( P V A R _ .
0070300 P V A R X _ ) 1 1 3 Q ( O R
0070320 F I X N U M C O N S D V A
0070340 R ) 4 3 Q " B U G : T h i
0070360 s v a r i a b l e i s n e
0070400 i t h e r a g l o b a l n
0070420 o r a D V A R : ~ S " ) \r
0070440 ( L E T * ( ( A 0 2 7 9 ( Q
0070460 U O T E S T O R E - V A R ) )
0070500 ( A 0 2 8 0 ( Q U O T E C
0070520 L : F U N C T I O N ) ) ( A 0
0070540 2 8 1 \r " R e t u r n a l
0070560 i s t o f i n s t r u c t i
0070600 o n s t o s t o r e t h e
0070620 v a l u e o n t h e t o
0070640 p o f s t a c k i n t o
0070660 t h e g i v e n v a r i a b
0070700 l e . I f a s l o t n
0070720 u m b e r i s g i v e n i
0070740 n s t e a d , i t i s a s
0070760 s u m e d t o r e f e r t
0071000 o a P V A R . I f P O
0071020 P - P i s n o n - N I L ,
0071040 d o n ' t l e a v e t h e
0071060 v a l u e o n t h e s t a
0071100 c k . " \r ) ) ( P R O G N (
0071120 C O N D ( ( F B O U N D P (
0071140 Q U O T E S E T - D O C U M E
0071160 N T A T I O N ) ) ( S E T - D
0071200 O C U M E N T A T I O N A 0 2
0071220 7 9 A 0 2 8 0 A 0 2 8 1 ) )
0071240 ) A 0 2 8 1 ) ) \r M A X - A R
0071260 G D 1 \r ( L ( 0 O P C O D
0071300 E ) ) \0 020 001 \0 \0 001 @ \t \0 \0 001 021
0071320 001 \0 H 002 001 H 001 325 020 \0 ( 3 \ F I
0071340 N D O P ) \r N I L \r ( ) \r P U S
0071360 H - I N T E G E R D 1 \r ( L
0071400 ( 0 N ) ) \0 177 \0 \0 \0 001 @ d \t
0071420 \0 \0 224 o \0 \0 \0 020 k \n \0 \0 224 o \0 \0
0071440 \0 020 m \0 @ 363 221 h 200 i 262 027 @ m 377 363
0071460 221 h 200 i 233 g \0 \0 @ n 001 \0 324 h 032 032
0071500 020 j @ 363 221 h 200 i 262 023 @ l 377 363 221 h
0071520 200 i 227 g \0 \0 @ h 032 032 020 l 377 @ 363 221
0071540 h 200 i 262 032 @ n 377 377 363 221 h 200 i 235 g
0071560 \0 \0 @ 343 @ l 377 345 h 032 032 032 020 g \0 \0
0071600 g \0 \0 @ h 032 032 h 032 032 020 \0 ( 1 6 Q
0071620 % % = 4 C L : Z E R O P )
0071640 \r ( 1 6 5 Q L I T 1 6 2 Q
0071660 G C O N S T 1 4 4 Q S I C X
0071700 1 1 0 Q S I C 5 2 Q S N
0071720 I C ) \r ( 2 3 Q ( ' 1 ) 1
0071740 1 Q ( ' 0 ) ) \r ( P R O C L A
0071760 I M ( Q U O T E ( S P E C I
0072000 A L * D T A G - E N V * ) ) )
0072020 \r ( O R ( B O U N D P ( Q U
0072040 O T E * D T A G - E N V * ) )
0072060 ( S E T Q * D T A G - E N V
0072100 * N I L ) ) \r ( L E T * ( (
0072120 A 0 2 8 2 ( Q U O T E * D T
0072140 A G - E N V * ) ) ( A 0 2 8 3
0072160 ( Q U O T E V A R I A B L E
0072200 ) ) ( A 0 2 8 4 \r " A h a
0072220 s h - t a b l e m a p p i n g
0072240 t h e E Q L - u n i q u e
0072260 I D o f a L A P t a g
0072300 i n t o t h e D T A G s t
0072320 r u c t u r e u s e d b y
0072340 D - A S S E M . " ) ) ( \r P R
0072360 O G N ( C O N D ( ( F B O U
0072400 N D P ( Q U O T E S E T - D
0072420 O C U M E N T A T I O N ) ) (
0072440 S E T - D O C U M E N T A T I O
0072460 N A 0 2 8 2 A 0 2 8 3 A 0
0072500 2 8 4 ) ) ) A 0 2 8 4 ) ) \r (
0072520 P R O C L A I M ( Q U O T E
0072540 ( S P E C I A L * D V A R - E
0072560 N V * ) ) ) \r ( O R ( B O U N
0072600 D P ( Q U O T E * D V A R -
0072620 E N V * ) ) ( S E T Q * D V
0072640 A R - E N V * N I L ) ) \r ( L
0072660 E T * ( ( A 0 2 8 5 ( Q U O
0072700 T E * D V A R - E N V * ) )
0072720 ( A 0 2 8 6 ( Q U O T E V A
0072740 R I A B L E ) ) ( A 0 2 8 7
0072760 \r " A h a s h - t a b l e m
0073000 a p p i n g t h e E Q L - u
0073020 n i q u e I D o f a L A
0073040 P v a r i a b l e i n t o
0073060 t h e D V A R s t r u c t u
0073100 r e u s e d b y D - A S S
0073120 E M . " ) ) \r ( P R O G N (
0073140 C O N D ( ( F B O U N D P (
0073160 Q U O T E S E T - D O C U M E
0073200 N T A T I O N ) ) ( S E T - D
0073220 O C U M E N T A T I O N A 0 2
0073240 8 5 A 0 2 8 6 A 0 2 8 7 ) )
0073260 ) A 0 2 8 7 ) ) \r ( P R O C L
0073300 A I M ( Q U O T E ( S P E C
0073320 I A L * H U N K - M A P * ) )
0073340 ) \r ( O R ( B O U N D P ( Q
0073360 U O T E * H U N K - M A P * )
0073400 ) ( S E T Q * H U N K - M A
0073420 P * N I L ) ) \r ( L E T * (
0073440 ( A 0 2 8 8 ( Q U O T E * H
0073460 U N K - M A P * ) ) ( A 0 2 8
0073500 9 ( Q U O T E V A R I A B L
0073520 E ) ) ( A 0 2 9 0 \r " A n
0073540 A L i s t m a p p i n g l e
0073560 x i c a l l e v e l n u m b
0073600 e r s i n t o t h e P V A
0073620 R n u m b e r o f a s l
0073640 o t i n t h e c u r r e n
0073660 t f r a m e h o l d i n g
0073700 t h e h u n k f o r t h a
0073720 t l e v e l . " \r ) ) ( P R
0073740 O G N ( C O N D ( ( F B O U
0073760 N D P ( Q U O T E S E T - D
0074000 O C U M E N T A T I O N ) ) (
0074020 S E T - D O C U M E N T A T I O
0074040 N A 0 2 8 8 A 0 2 8 9 A 0
0074060 2 9 0 ) ) ) A 0 2 9 0 ) ) \r (
0074100 P R O C L A I M ( Q U O T E
0074120 ( S P E C I A L * D C O D E *
0074140 ) ) ) \r ( O R ( B O U N D P
0074160 ( Q U O T E * D C O D E * ) )
0074200 ( S E T Q * D C O D E * 0
0074220 ) ) \r ( L E T * ( ( A 0 2 9 1
0074240 ( Q U O T E * D C O D E * )
0074260 ) ( A 0 2 9 2 ( Q U O T E
0074300 V A R I A B L E ) ) ( A 0 2 9
0074320 3 \r " T h e c u r r e n t l
0074340 y - u n d e r - c o n s t r u c
0074360 t i o n D C O D E s t r u c
0074400 t u r e . " ) ) ( P R O G N
0074420 ( C O N D ( ( F B O U N D P
0074440 ( Q U O T E S E T - D O C U M
0074460 E N T A T I O N ) \r ) ( S E T
0074500 - D O C U M E N T A T I O N A
0074520 0 2 9 1 A 0 2 9 2 A 0 2 9 3
0074540 ) ) ) A 0 2 9 3 ) ) \r ( P R O
0074560 C L A I M ( Q U O T E ( S P
0074600 E C I A L * L E V E L * ) ) )
0074620 \r ( O R ( B O U N D P ( Q U
0074640 O T E * L E V E L * ) ) ( S
0074660 E T Q * L E V E L * 0 ) ) \r
0074700 ( L E T * ( ( A 0 2 9 4 ( Q
0074720 U O T E * L E V E L * ) ) (
0074740 A 0 2 9 5 ( Q U O T E V A R
0074760 I A B L E ) ) ( A 0 2 9 6 "
0075000 T h e c u r r e n t l e x i
0075020 c a l n e s t i n g l e v e
0075040 l . " ) ) \r ( P R O G N ( C
0075060 O N D ( ( F B O U N D P ( Q
0075100 U O T E S E T - D O C U M E N
0075120 T A T I O N ) ) ( S E T - D O
0075140 C U M E N T A T I O N A 0 2 9
0075160 4 A 0 2 9 5 A 0 2 9 6 ) ) )
0075200 A 0 2 9 6 ) ) \r A S S E M B L
0075220 E - F U N C T I O N D 1 \r ( L
0075240 ( 0 L A P - F N ) P 1
0075260 * D T A G - E N V * P 0 *
0075300 D V A R - E N V * ) \0 " 002 \0 \0
0075320 001 g \0 \0 g \0 \0 \n \0 \0 g \0 \0 g \0 \0
0075340 \n \0 \0 021 002 001 @ \t \0 \0 \t \0 \0 j \n \0
0075360 \0 020 \0 ( 3 7 Q D C O D E - F R
0075400 O M - D L A M B D A 3 3 Q D
0075420 L A M B D A - F R O M - L A M B
0075440 D A 3 0 Q C O P Y - T R E E
0075460 2 1 Q M A K E - H A S H - T
0075500 A B L E 1 0 Q M A K E - H A
0075520 S H - T A B L E ) \r ( 1 6 Q E
0075540 Q L 1 3 Q : T E S T 5 E
0075560 Q L 2 : T E S T ) \r ( ) \r (
0075600 L E T * ( ( A 0 2 9 7 ( Q U
0075620 O T E A S S E M B L E - F U N
0075640 C T I O N ) ) ( A 0 2 9 8 (
0075660 Q U O T E C L : F U N C T I O
0075700 N ) ) ( A 0 2 9 9 \r " L A P
0075720 - F N i s a L A P - f o r
0075740 m a t f u n c t i o n d e s
0075760 c r i p t i o n ( a L A M B
0076000 D A ) . R e t u r n t h e
0076020 D C O D E s t r u c t u r e
0076040 t h a t r e s u l t s f r
0076060 o m a s s e m b l i n g i t
0076100 i n t o D - m a c h i n e
0076120 b y t e c o d e s . " \r ) ) (
0076140 P R O G N ( C O N D ( ( F B
0076160 O U N D P ( Q U O T E S E T
0076200 - D O C U M E N T A T I O N ) )
0076220 ( S E T - D O C U M E N T A T
0076240 I O N A 0 2 9 7 A 0 2 9 8
0076260 A 0 2 9 9 ) ) ) A 0 2 9 9 ) )
0076300 \r D C O D E - F R O M - D L A M
0076320 B D A D 1 \r ( L ( 1 L E V
0076340 E L 0 D L A M B D A ) P
0076360 1 0 Q * J U M P - L I S T *
0076400 P 6 * L E V E L * P 5
0076420 * P V A R - C O U N T * P 4
0076440 * B Y T E - C O U N T * P
0076460 3 * B Y T E S * P 2 * H
0076500 U N K - S I Z E * P 1 * H
0076520 U N K - M A P * P 0 * D C
0076540 O D E * ) \0 210 \t \0 \0 002 g \0 \0 @
0076560 \t \0 \0 \n \0 \0 A j 363 264 \a A j 032 h 032
0076600 A j 363 221 k 200 j \b \0 \0 j A j 363 221 k
0076620 200 j A @ \t \0 \0 021 030 \b @ O 016 \n \0 \0
0076640 O 016 224 @ \t \0 \0 203 @ \t \0 \0 277 @ \t \0
0076660 \0 \t \0 \0 @ \t \0 \0 \t \0 \0 @ \t \0 \0 \t
0076700 \0 \0 g \0 \0 \t \0 \0 \b \0 \0 [ O 020 265 024
0076720 K \t \0 \0 @ \t \0 \0 H @ \t \0 \0 254 g \0
0076740 \0 213 \t \0 \0 \t \0 \0 277 260 347 g \0 \0 \n \0
0076760 \0 H 020 \0 ( 2 0 4 Q s e t f - D
0077000 C O D E - C L O S U R E - P 1
0077020 7 3 Q R E S O L V E - J U M P
0077040 S 1 7 0 Q C L : R E V E R S
0077060 E 1 6 0 Q D L A M B D A - N
0077100 O N - L O C A L 1 5 3 Q C O
0077120 M P U T E - D E B U G G I N G -
0077140 I N F O 1 4 7 Q C O N V E R
0077160 T - T O - B I N A R Y 1 3 6 Q
0077200 E N D - B Y T E S 1 3 3 Q
0077220 E M I T - B Y T E 1 2 5 Q R
0077240 E L E A S E - C I R C U L A R I
0077260 T I E S 1 2 2 Q D L A M B D
0077300 A - B O D Y 1 1 6 Q A S S E
0077320 M B L E 1 1 3 Q D L A M B D
0077340 A - B O D Y 1 0 7 Q S T A C
0077360 K - A N A L Y Z E 1 0 4 Q D
0077400 L A M B D A - B O D Y 7 7 Q
0077420 G E N E R A T E - H A R D - E N
0077440 T R Y 7 2 Q G E N E R A T E
0077460 - E A S Y - E N T R Y 6 3 Q
0077500 D I G E S T - F U N C T I O N
0077520 5 2 Q E A S Y - E N T R Y - P
0077540 3 5 Q S T A R T - B Y T E S
0077560 1 1 Q M A K E - D C O D E
0077600 6 D L A M B D A - N A M E ) \r
0077620 ( 2 0 1 Q : C L O S U R E 1
0077640 6 4 Q : F U N C T I O N 1 3
0077660 0 Q - X - 2 : F R A M E -
0077700 N A M E ) \r ( ) \r ( L E T * (
0077720 ( A 0 3 0 0 ( Q U O T E D C
0077740 O D E - F R O M - D L A M B D A
0077760 ) ) ( A 0 3 0 1 ( Q U O T E
0100000 C L : F U N C T I O N ) ) (
0100020 A 0 3 0 2 \r " L E V E L i s
0100040 t h e l e n g t h o f t
0100060 h e c h a i n o f h u n k
0100100 s t h a t w i l l b e p
0100120 a s s e d t o t h e r e s
0100140 u l t o f a s s e m b l i n
0100160 g D L A M B D A a t r u n
0100200 t i m e . " \r ) ) ( P R O G N
0100220 ( C O N D ( ( F B O U N D P
0100240 ( Q U O T E S E T - D O C U
0100260 M E N T A T I O N ) ) ( S E T
0100300 - D O C U M E N T A T I O N A
0100320 0 3 0 0 A 0 3 0 1 A 0 3 0 2
0100340 ) ) ) A 0 3 0 2 ) ) \r D L A M
0100360 B D A - F R O M - L A M B D A
0100400 D 1 \r ( L ( 0 L A P - F N )
0100420 ) \0 252 016 \0 \0 001 @ 002 021 321 \r H 001 Y
0100440 001 272 I 002 273 g \0 \0 K \n \0 \0 d 220 001 274
0100460 g \0 \0 K \n \0 \0 d 220 001 275 g \0 \0 K \n
0100500 \0 \0 d 220 001 276 g \0 \0 K \n \0 \0 d 220 001
0100520 _ 016 277 g \0 \0 K \n \0 \0 d 220 001 _ 020 277
0100540 g \0 \0 K \n \0 \0 d 220 001 _ 022 277 g \0 \0
0100560 K \n \0 \0 d 220 001 _ 024 277 g \0 \0 K \n \0
0100600 \0 d 220 001 _ 026 277 g \0 \0 K \n \0 \0 d 220
0100620 001 _ 030 277 H 002 _ 032 277 K o \0 \0 \0 \n \0
0100640 \0 J L M N O 016 O 020 O 022 O 024 O 026 g
0100660 \0 \0 \t \0 \0 O 030 \n \0 \0 O 032 \r \v \0 \0
0100700 020 \0 ( 2 4 7 Q M A K E - D L A
0100720 M B D A 2 4 1 Q C L : M A P
0100740 C A R 2 3 4 Q S Y M B O L -
0100760 F U N C T I O N 2 1 0 Q K E
0101000 Y W O R D - T E S T 1 6 5 Q
0101020 F I N D - K E Y W O R D 1 5 0
0101040 Q F I N D - K E Y W O R D 1
0101060 3 3 Q F I N D - K E Y W O R D
0101100 1 1 6 Q F I N D - K E Y W O
0101120 R D 1 0 1 Q F I N D - K E Y
0101140 W O R D 6 4 Q F I N D - K E
0101160 Y W O R D 5 1 Q F I N D - K
0101200 E Y W O R D 3 6 Q F I N D -
0101220 K E Y W O R D 2 3 Q F I N D
0101240 - K E Y W O R D ) \r ( 2 3 1 Q
0101260 L A P - V A R - I D 1 6 1 Q
0101300 : N O N - L O C A L 1 4 4 Q
0101320 : C L O S E D - O V E R 1 2 7
0101340 Q : B L I P 1 1 2 Q : N A
0101360 M E 7 5 Q : O T H E R S 6
0101400 0 Q : A L L O W - O T H E R -
0101420 K E Y S 4 5 Q : K E Y 3 2
0101440 Q : R E S T 1 7 Q : O P T
0101460 I O N A L ) \r ( 2 0 5 Q ( :
0101500 N O N - L O C A L : C L O S E
0101520 D - O V E R : B L I P : N A
0101540 M E : O T H E R S : A L L O
0101560 W - O T H E R - K E Y S : K E
0101600 Y : R E S T : O P T I O N A
0101620 L ) ) \r ( L E T * ( ( A 0 3 0
0101640 9 ( Q U O T E D L A M B D A
0101660 - F R O M - L A M B D A ) ) (
0101700 A 0 3 1 0 ( Q U O T E C L :
0101720 F U N C T I O N ) ) ( A 0 3 1
0101740 1 \r " B r e a k o u t t h
0101760 e f i e l d s o f a L A
0102000 P l a m b d a a n d r e t
0102020 u r n t h e m i n t h e
0102040 f o r m o f a D L A M B D
0102060 A s t r u c t u r e . " ) )
0102100 ( P R O G N ( \r C O N D ( (
0102120 F B O U N D P ( Q U O T E S
0102140 E T - D O C U M E N T A T I O N
0102160 ) ) ( S E T - D O C U M E N T
0102200 A T I O N A 0 3 0 9 A 0 3 1
0102220 0 A 0 3 1 1 ) ) ) A 0 3 1 1
0102240 ) ) \r ( P R O C L A I M ( Q U
0102260 O T E ( S P E C I A L * H U
0102300 N K - S I Z E * ) ) ) \r ( O R
0102320 ( B O U N D P ( Q U O T E *
0102340 H U N K - S I Z E * ) ) ( S E
0102360 T Q * H U N K - S I Z E * 0
0102400 ) ) \r ( L E T * ( ( A 0 3 1 2
0102420 ( Q U O T E * H U N K - S I
0102440 Z E * ) ) ( A 0 3 1 3 ( Q U
0102460 O T E V A R I A B L E ) ) (
0102500 A 0 3 1 4 \r " T h e n u m b
0102520 e r o f h u n k s l o t s
0102540 a l l o c a t e d s o f a
0102560 r . " ) ) ( P R O G N ( C O
0102600 N D ( ( F B O U N D P ( Q U
0102620 O T E S E T - D O C U M E N T
0102640 A T I O N ) ) ( \r S E T - D O
0102660 C U M E N T A T I O N A 0 3 1
0102700 2 A 0 3 1 3 A 0 3 1 4 ) ) )
0102720 A 0 3 1 4 ) ) \r ( P R O C L A
0102740 I M ( Q U O T E ( S P E C I
0102760 A L * P V A R - C O U N T * )
0103000 ) ) \r ( O R ( B O U N D P (
0103020 Q U O T E * P V A R - C O U N
0103040 T * ) ) ( S E T Q * P V A R
0103060 - C O U N T * 0 ) ) \r ( L E T
0103100 * ( ( A 0 3 1 5 ( Q U O T E
0103120 * P V A R - C O U N T * ) )
0103140 ( A 0 3 1 6 ( Q U O T E V A
0103160 R I A B L E ) ) ( A 0 3 1 7
0103200 \r " T h e n u m b e r o f
0103220 P V A R a l l o c a t e d s
0103240 o f a r . " ) ) ( P R O G N
0103260 ( C O N D ( ( F B O U N D P
0103300 ( Q U O T E S E T - D O C U
0103320 M E N T A T I O N ) ) ( \r S E
0103340 T - D O C U M E N T A T I O N
0103360 A 0 3 1 5 A 0 3 1 6 A 0 3 1
0103400 7 ) ) ) A 0 3 1 7 ) ) \r ( P R
0103420 O C L A I M ( Q U O T E ( S
0103440 P E C I A L * F R E E - V A R
0103460 S * ) ) ) \r ( O R ( B O U N D
0103500 P ( Q U O T E * F R E E - V
0103520 A R S * ) ) ( S E T Q * F R
0103540 E E - V A R S * N I L ) ) \r (
0103560 L E T * ( ( A 0 3 1 8 ( Q U
0103600 O T E * F R E E - V A R S * )
0103620 ) ( A 0 3 1 9 ( Q U O T E
0103640 V A R I A B L E ) ) ( A 0 3 2
0103660 0 \r " A n A L i s t m a p
0103700 p i n g D V A R s f o r t
0103720 h e f r e e v a r i a b l e
0103740 s i n a f u n c t i o n
0103760 i n t o t h e n u m b e r
0104000 o f t i m e s t h e y ' r e
0104020 r e f e r e n c e d i n t
0104040 h e f u n c t i o n . " \r ) )
0104060 ( P R O G N ( C O N D ( (
0104100 F B O U N D P ( Q U O T E S
0104120 E T - D O C U M E N T A T I O N
0104140 ) ) ( S E T - D O C U M E N T
0104160 A T I O N A 0 3 1 8 A 0 3 1
0104200 9 A 0 3 2 0 ) ) ) A 0 3 2 0
0104220 ) ) \r ( P R O C L A I M ( Q U
0104240 O T E ( S P E C I A L * B O
0104260 U N D - S P E C I A L S * ) ) )
0104300 \r ( O R ( B O U N D P ( Q U
0104320 O T E * B O U N D - S P E C I
0104340 A L S * ) ) ( S E T Q * B O
0104360 U N D - S P E C I A L S * N I
0104400 L ) ) \r ( L E T * ( ( A 0 3 2
0104420 1 ( Q U O T E * B O U N D -
0104440 S P E C I A L S * ) ) ( A 0 3
0104460 2 2 ( Q U O T E V A R I A B
0104500 L E ) ) ( A 0 3 2 3 \r " A
0104520 l i s t o f t h e s p e c
0104540 i a l v a r i a b l e s b o
0104560 u n d i n t h i s f r a m
0104600 e . " ) ) ( P R O G N ( C O
0104620 N D ( ( F B O U N D P ( Q U
0104640 O T E \r S E T - D O C U M E N
0104660 T A T I O N ) ) ( S E T - D O
0104700 C U M E N T A T I O N A 0 3 2
0104720 1 A 0 3 2 2 A 0 3 2 3 ) ) )
0104740 A 0 3 2 3 ) ) \r D I G E S T -
0104760 F U N C T I O N D 1 \r ( L (
0105000 1 E A S Y - E N T R Y 0 D
0105020 L A M B D A ) P 3 * B O U
0105040 N D - S P E C I A L S * P 2
0105060 * F R E E - V A R S * F 2
0105100 6 Q * P V A R - C O U N T *
0105120 F 2 7 Q * L E V E L * F
0105140 3 0 Q * H U N K - S I Z E *
0105160 F 3 1 Q * H U N K - M A P *
0105200 F 3 2 Q * D V A R - E N V
0105220 * F 3 3 Q * D C O D E * )
0105240 001 224 026 006 \0 002 @ \t \0 \0 021 361 017 021 `
0105260 025 j 271 @ \t \0 \0 241 h 200 i 262 024 @ \t \0
0105300 \0 h g \0 \0 k \f \0 \0 277 l 002 c , 277 H
0105320 241 h 200 i 262 030 W . k 324 c . W , 032 W
0105340 2 032 c 2 277 W , k 324 c , 277 @ \t \0 \0
0105360 260 027 d ] 001 H g \0 \0 I \f \0 \0 274 M L
0105400 030 277 I k 324 271 002 003 265 352 @ \t \0 \0 260 T
0105420 d 001 _ 030 277 A 262 033 O 030 _ 016 001 H g \0
0105440 \0 I \f \0 \0 276 O 016 N 030 277 I k 324 Y 260
0105460 1 O 030 _ 022 001 H \n \0 \0 _ 020 277 O 022 O
0105500 020 030 277 O 030 002 001 \t \0 \0 277 O 030 _ 026 002
0105520 002 001 H \n \0 \0 _ 024 277 O 026 002 002 O 024 030
0105540 277 002 003 265 255 A 232 W 6 I \n \0 \0 277 A 221
0105560 h 200 i 262 g @ \t \0 \0 241 h 200 i 262 034 @
0105600 \t \0 \0 g \0 \0 360 221 h 200 i 234 @ d \t \0
0105620 \0 H \n \0 \0 \n \0 \0 277 @ \t \0 \0 260 : d
0105640 001 _ " _ 034 002 001 H \n \0 \0 _ 032 277 O 034
0105660 002 O 032 030 277 O " 002 002 001 \t \0 \0 277 O "
0105700 _ 002 002 002 001 H \n \0 \0 _ 036 277 O 002
0105720 002 002 O 036 030 277 002 003 265 307 H 207 d 001 _ *
0105740 003 265 021 002 003 265 367 @ \t \0 \0 \t \0 \0 \b \0
0105760 \0 020 002 002 001 W 4 \n \0 \0 263 351 O * 002 002
0106000 001 _ ( 277 W 4 _ & 277 g \0 \0 g \0 \0 g
0106020 \0 \0 W 0 g \0 \0 W . g \0 \0 O * 002 001
0106040 \r \b \0 \0 _ $ 277 O ( O & O $ \v \0 \0
0106060 277 W 0 k 324 c 0 277 260 253 \0 ( 6 1 0 Q
0106100 C L : P U T H A S H 5 7 4 Q
0106120 M A K E - D V A R 5 2 2 Q
0106140 G E T H A S H 5 1 1 Q S T O
0106160 R E - D I G E S T - I N F O 5
0106200 0 6 Q D I G E S T - C O D E
0106220 5 0 3 Q D L A M B D A - B O D
0106240 Y 4 4 2 Q I N S T A L L - L
0106260 O C A L 4 2 5 Q D I G E S T
0106300 - C O D E 4 0 3 Q I N S T A
0106320 L L - L O C A L 3 6 5 Q D L
0106340 A M B D A - K E Y 3 6 0 Q s
0106360 e t f - D L A M B D A - R E S T
0106400 3 5 5 Q I N S T A L L - L O
0106420 C A L 3 5 1 Q D L A M B D A
0106440 - R E S T 3 3 3 Q D L A M B
0106460 D A - R E S T 3 2 1 Q D L A
0106500 M B D A - R E S T 3 0 5 Q s
0106520 e t f - D C O D E - N U M - A R
0106540 G S 2 5 6 Q I N S T A L L -
0106560 L O C A L 2 4 2 Q D I G E S
0106600 T - C O D E 2 2 2 Q I N S T
0106620 A L L - L O C A L 1 7 5 Q I
0106640 N S T A L L - V A R 1 4 6 Q
0106660 D L A M B D A - O P T I O N A L
0106700 1 2 5 Q I N S T A L L - V A
0106720 R 1 1 0 Q D L A M B D A - R
0106740 E Q U I R E D 4 1 Q I N S T
0106760 A L L - V A R 3 1 Q D L A M
0107000 B D A - B L I P 1 7 Q D L A
0107020 M B D A - B L I P 3 D L A M
0107040 B D A - C L O S E D - O V E R )
0107060 \r ( 5 6 4 Q : N A M E 5 5 7
0107100 Q : L E V E L 5 5 2 Q : S
0107120 L O T 5 4 7 Q : C L O S E D
0107140 5 4 4 Q : K I N D 3 3 6 Q
0107160 : I G N O R E D 1 7 1 Q :
0107200 A R G U M E N T 1 2 1 Q : A
0107220 R G U M E N T 3 5 Q : L O C
0107240 A L ) \r ( ) \r D I G E S T - C O
0107260 D E A 0 0 0 1 D 1 \r ( L ( 0
0107300 V A R ) F 0 * D V A R -
0107320 E N V * ) \0 032 \0 001 \0 001 @ d 003 234
0107340 d 002 002 001 P \n \0 \0 243 \t \0 \0 020 002 002 001
0107360 P \n \0 \0 020 \0 ( 2 7 Q G E T H A
0107400 S H 1 7 Q I N S T A L L - L
0107420 O C A L 1 3 Q G E T H A S H
0107440 ) \r N I L \r ( ) \r D I G E S T -
0107460 C O D E D 1 \r ( L ( 0 L A
0107500 P - C O D E ) P 3 3 Q * H
0107520 U N K - S I Z E * P 3 2 Q
0107540 * L E V E L * F 3 7 Q * L
0107560 E V E L * F 4 0 Q * P V A
0107600 R - C O U N T * F 4 1 Q *
0107620 D V A R - E N V * ) 001 336 037 003 \0
0107640 001 @ 261 001 323 d 021 361 017 021 240 031 H 001 _ 2
0107660 001 _ 0 g \0 \0 360 251 O 0 d g \0 \0 360 262
0107700 024 277 O 2 Z 002 001 \t \0 \0 271 J 002 I 030 277
0107720 261 001 242 g \0 \0 360 237 O 2 \ \t \0 \0 h 032
0107740 273 L K 031 277 261 001 215 O 0 d g \0 \0 360 262
0107760 4 277 O 2 276 g \0 \0 O 2 002 001 \n \0 \0 275
0110000 N 002 M 030 277 O 2 _ 020 277 g \0 \0 O 2 002
0110020 002 001 \n \0 \0 _ 016 277 O 020 002 002 O 016 030 277
0110040 261 001 R g \0 \0 360 251 O 0 d g \0 \0 360 262
0110060 . 277 O 2 _ 024 002 001 \t \0 \0 _ 022 277 O 024
0110100 002 O 022 030 277 O 2 _ 030 002 002 001 \t \0 \0 _
0110120 026 277 O 030 002 002 O 026 030 277 261 001 030 g \0 \0
0110140 360 262 + O 2 _ 034 002 001 \t \0 \0 _ 032 277 O
0110160 034 002 O 032 030 277 O 2 002 001 H \n \0 \0 277 O
0110200 2 002 001 W > \n \0 \0 277 261 \0 351 O 0 g \0
0110220 \0 360 263 # O 0 g \0 \0 360 263 033 O 0 g \0
0110240 \0 360 263 023 O 0 g \0 \0 360 251 O 0 d g \0
0110260 \0 360 262 031 277 O 2 _ 002 001 \t \0 \0 _ 036
0110300 277 O 002 O 036 030 277 261 \0 252 g \0 \0 360 242
0110320 261 \0 242 W > k 324 W > j 363 221 k 200 j 021
0110340 002 033 021 0 036 O 2 002 001 260 Y d 001 _ ( 002
0110360 002 001 _ & 277 W B _ $ 277 g \0 \0 g \0 \0
0110400 g \0 \0 O 6 g \0 \0 O 4 g \0 \0 O ( 002
0110420 001 \r \b \0 \0 _ " 277 O & O $ O " \v \0
0110440 \0 277 O 6 k 324 _ 6 _ 8 277 O : 221 h 200
0110460 i 226 O 8 h 032 _ < 204 O : O 8 & _ :
0110500 277 002 003 265 250 O < 022 _ . 277 O 2 _ , 277
0110520 O . W @ O 2 002 002 032 032 _ * 277 O , O
0110540 * 031 277 W @ k 324 c @ 277 O 2 002 002 \t \0
0110560 \0 023 023 023 002 003 265 003 202 261 376 , h 020 \0 (
0110600 7 1 7 Q D I G E S T - C O D E
0110620 5 7 7 Q C L : P U T H A S H
0110640 5 6 3 Q M A K E - D V A R
0110660 4 3 4 Q I N T E R N - T A G
0110700 3 4 6 Q s e t f - D T A G - L
0110720 E V E L 3 3 4 Q s e t f - D
0110740 T A G - P T R 3 1 2 Q I N T
0110760 E R N - T A G 2 5 5 Q C L :
0111000 L E N G T H 2 3 1 Q C L : L
0111020 E N G T H 1 6 3 Q C L : M A
0111040 P C A R 1 3 5 Q C L : M A P
0111060 C A R 7 4 Q D L A M B D A -
0111100 F R O M - L A M B D A 5 0 Q
0111120 I N T E R N - V A R ) \r ( 5 5 3
0111140 Q : N A M E 5 4 6 Q : L E
0111160 V E L 5 4 1 Q : S L O T 5
0111200 3 6 Q : C L O S E D 5 3 3 Q
0111220 : K I N D 4 5 4 Q C L O S
0111240 E 4 1 7 Q N T J U M P 4 0
0111260 7 Q N F J U M P 3 7 7 Q T
0111300 J U M P 3 6 7 Q F J U M P
0111320 3 5 7 Q J U M P 2 7 6 Q T
0111340 A G 2 1 4 Q D U N B I N D
0111360 2 0 4 Q U N B I N D 1 5 3 Q
0111400 D I G E S T - C O D E A 0 0 0
0111420 1 1 2 6 Q D I G E S T - C O
0111440 D E A 0 0 0 1 1 1 4 Q B I N
0111460 D 6 4 Q L A M B D A 3 4 Q
0111500 V A R _ 2 4 Q V A R ) \r (
0111520 ) \r S T O R E - D I G E S T - I
0111540 N F O D 1 \r ( F 1 2 Q * D
0111560 C O D E * F 1 3 Q * P V A
0111600 R - C O U N T * F 1 4 Q *
0111620 F R E E - V A R S * F 1 5 Q
0111640 * B O U N D - S P E C I A L S
0111660 * ) \0 304 \n 004 \0 \0 W 030 g \0 \0 \t \0
0111700 \0 g \0 \0 g \0 \0 \t \0 \0 \f \0 \0 021 a 006
0111720 H d \t \0 \0 W 026 324 k 325 021 022 \t O 016 003
0111740 265 \v 023 W 032 \t \0 \0 261 \0 200 001 _ 022 277 W
0111760 024 272 l 003 O 020 O 022 001 \t \0 \0 h 032 032 032
0112000 J \t \0 \0 032 271 J I \n \0 \0 277 O 022 001 O
0112020 020 \n \0 \0 277 O 016 002 _ 016 277 O 020 m 377 324
0112040 _ 020 277 260 272 d 001 276 W 024 275 N \t \0 \0 [
0112060 d g \0 \0 360 224 277 l 002 260 026 g \0 \0 360 264
0112100 004 j 213 o \0 \0 \0 K o \0 \0 \0 \f \0 \0 N
0112120 \t \0 \0 N \t \0 \0 h 032 032 032 M \t \0 \0 032
0112140 274 M L \n \0 \0 277 002 003 265 274 W 024 W 026 \n
0112160 \0 \0 W 024 H \t \0 \0 \n \0 \0 020 \0 ( 3 0
0112200 1 Q s e t f - D C O D E - N F
0112220 R E E V A R S 2 7 6 Q C L :
0112240 L E N G T H 2 7 0 Q s e t f
0112260 - D C O D E - N L O C A L S 2
0112300 5 4 Q s e t f - D C O D E - N
0112320 A M E - T A B L E 2 4 5 Q D
0112340 C O D E - N A M E - T A B L E
0112360 2 3 5 Q D V A R - N A M E 2
0112400 3 1 Q D V A R - S L O T 2 2
0112420 5 Q E C A S E - F A I L 1 6
0112440 5 Q D V A R - K I N D 1 3 2
0112460 Q s e t f - D V A R - S L O T
0112500 1 2 1 Q s e t f - D C O D E
0112520 - N A M E - T A B L E 1 1 2 Q
0112540 D C O D E - N A M E - T A B L
0112560 E 1 0 2 Q D V A R - N A M E
0112600 5 6 Q C L : N R E V E R S E
0112620 3 3 Q C L : L E N G T H 2
0112640 3 Q C L : S O R T 2 0 Q S
0112660 Y M B O L - F U N C T I O N 7
0112700 S Y M B O L - F U N C T I O N
0112720 ) \r ( 2 0 4 Q : A R G U M E N
0112740 T 1 7 2 Q : L O C A L 1 5
0112760 Q C D R 1 2 Q : K E Y 4
0113000 < ) \r ( 2 2 2 Q ( : L O C
0113020 A L : A R G U M E N T ) 2 1
0113040 5 Q ( D V A R - K I N D D V
0113060 A R ) ) \r D V A R - F R O M - L
0113100 A P - V A R D 1 \r ( L ( 0
0113120 L A P - V A R ) F 0 * D V
0113140 A R - E N V * ) \0 024 \0 001 \0 001 @
0113160 \t \0 \0 P \n \0 \0 265 \n o \0 \0 \0 @ \n \0
0113200 \0 020 \0 ( 2 1 Q C L : E R R O R
0113220 7 G E T H A S H 3 L A P
0113240 - V A R - I D ) \r N I L \r ( 1
0113260 5 Q " T h e L A P v a r
0113300 ~ S s h o u l d h a v e b
0113320 e e n i n t e r n e d b y
0113340 n o w . " ) \r L A P - V A R - I
0113360 D D 1 \r ( L ( 0 V A R ) )
0113400 \0 \t \0 \0 \0 001 @ d 003 222 002 002 001 020 \0
0113420 N I L \r N I L \r ( ) \r I N S T A
0113440 L L - L O C A L D 1 \r ( L (
0113460 1 C L O S E D - O V E R 0
0113500 V A R ) F 1 * P V A R - C
0113520 O U N T * ) \0 " 001 001 \0 002 @ d 262
0113540 036 A g \0 \0 Q \f \0 \0 021 001 \0 H d \t \0
0113560 \0 g \0 \0 360 226 277 Q k 324 c 002 H 020 \0 (
0113600 2 3 Q D V A R - K I N D 1 3
0113620 Q I N S T A L L - V A R ) \r (
0113640 2 6 Q : L O C A L 7 : L O
0113660 C A L ) \r ( ) \r I N S T A L L -
0113700 V A R D 1 \r ( L ( 3 S L O
0113720 T 2 K I N D 1 C L O S E
0113740 D - O V E R 0 V A R ) F
0113760 1 4 Q * H U N K - S I Z E *
0114000 F 1 5 Q * D V A R - E N V *
0114020 F 1 6 Q * B O U N D - S P
0114040 E C I A L S * F 1 7 Q * F
0114060 R E E - V A R S * F 2 0 Q
0114100 * L E V E L * ) \0 250 \f 005 \0 004 @
0114120 d 242 261 \0 243 021 261 \v H 001 271 H 002 Z 001 273
0114140 J 002 001 \ A g \0 \0 g \0 \0 \t \0 \0 \f \0
0114160 \0 262 1 L _ 016 277 W 032 276 g \0 \0 g \0 \0
0114200 g \0 \0 W 030 g \0 \0 W g \0 \0 K \r \b
0114220 \0 \0 275 O 016 N M \v \0 \0 W 030 k 324 c 030
0114240 277 020 L _ 024 277 W 032 _ 022 277 g \0 \0 I g
0114260 \0 \0 360 223 g \0 \0 200 B g \0 \0 C g \0 \0
0114300 K \r 006 \0 \0 _ 020 277 O 024 O 022 O 020 \v \0
0114320 \0 _ 026 277 I d g \0 \0 360 231 277 O 026 W 034
0114340 032 c 034 277 215 g \0 \0 360 230 O 026 k 032 W 036
0114360 032 c 036 O 026 020 \0 ( 2 0 1 Q C L :
0114400 P U T H A S H 1 6 5 Q M A K
0114420 E - D V A R 1 1 2 Q C L : P
0114440 U T H A S H 1 0 2 Q M A K E
0114460 - D V A R 4 1 Q C L : M E M
0114500 B E R 3 6 Q S Y M B O L - F
0114520 U N C T I O N ) \r ( 2 3 0 Q F
0114540 2 1 1 Q S 1 6 0 Q : N A
0114560 M E 1 5 4 Q : S L O T 1 4
0114600 7 Q : F R E E 1 4 2 Q F
0114620 1 3 6 Q : K I N D 7 5 Q :
0114640 N A M E 7 0 Q : L E V E L
0114660 6 3 Q : S L O T 6 0 Q : C
0114700 L O S E D 5 5 Q : K I N D
0114720 3 3 Q L A P - V A R - I D 3
0114740 0 Q : K E Y ) \r ( ) \r I N T E
0114760 R N - V A R D 1 \r ( L ( 0
0115000 V A R ) F 3 * D V A R - E
0115020 N V * F 4 * F R E E - V A
0115040 R S * ) \0 M 003 002 \0 001 @ d 003 262 :
0115060 d 001 g \0 \0 360 263 @ 002 002 001 S \n \0 \0 021
0115100 ! 002 H 241 h 200 i 262 034 H d \t \0 \0 g \0
0115120 \0 360 236 277 H T \n \0 \0 Z 002 k 324 271 J I
0115140 031 H 020 @ \t \0 \0 020 S \n \0 \0 265 \n o \0
0115160 \0 \0 @ \n \0 \0 020 \0 ( 1 1 2 Q C L
0115200 : E R R O R 1 0 0 Q G E T H
0115220 A S H 7 3 Q I N S T A L L -
0115240 L O C A L 5 5 Q C L : A S S
0115260 O C 4 2 Q D V A R - K I N D
0115300 2 3 Q G E T H A S H ) \r ( 4
0115320 5 Q : F R E E 1 1 Q G ) \r
0115340 ( 1 0 6 Q " U n k n o w n
0115360 L A P v a r i a b l e I D :
0115400 ~ S " ) \r I N T E R N - T A G
0115420 D 1 \r ( L ( 0 I D ) F
0115440 3 * D T A G - E N V * ) \0 031
0115460 003 001 \0 001 @ S \n \0 \0 265 022 @ 021 ! 002 S
0115500 271 \b \0 \0 272 H I J \v \0 \0 020 \0 ( 2 6
0115520 Q C L : P U T H A S H 1 7 Q
0115540 M A K E - D T A G 4 G E T
0115560 H A S H ) \r N I L \r ( ) \r E A S
0115600 Y - E N T R Y - P D 1 \r ( L
0115620 ( 0 D L A M B D A ) ) \0 @ 002
0115640 \0 \0 001 @ d \t \0 \0 233 277 @ \t \0 \0 g \0
0115660 \0 360 264 026 @ \t \0 \0 h 360 264 016 @ \t \0 \0
0115700 021 021 001 H 003 265 004 i 020 001 Y 002 001 o \0 \0
0115720 \0 \n \0 \0 264 \b I 002 002 001 221 h 020 H 002 X
0115740 260 344 \0 ( 6 0 Q C L : E Q U A L
0115760 3 4 Q D L A M B D A - O P T
0116000 I O N A L 2 4 Q D L A M B D
0116020 A - K E Y 1 2 Q D L A M B D
0116040 A - R E S T 4 D L A M B D A
0116060 - R E S T ) \r ( 1 5 Q : I G N
0116100 O R E D ) \r ( 5 5 Q ( ( C O
0116120 N S T N I L ) ) ) \r G E N E R
0116140 A T E - E A S Y - E N T R Y D
0116160 1 \r ( L ( 0 D L A M B D A )
0116200 F 3 * H U N K - S I Z E *
0116220 F 4 * H U N K - M A P *
0116240 F 5 * L E V E L * F 6
0116260 * D C O D E * ) \0 i 003 004 \0 001 @
0116300 \t \0 \0 241 h 200 i 235 S T 001 002 U k 363 264
0116320 003 j \v \0 \0 277 @ \t \0 \0 g \0 \0 \t \0 \0
0116340 @ \t \0 \0 \n \0 \0 \n \0 \0 j 021 022 002 H 003
0116360 265 \t 023 V j \n \0 \0 020 001 Z \t \0 \0 g \0
0116400 \0 360 262 034 o \0 \0 \0 I \n \0 \0 g \0 \0 J
0116420 \t \0 \0 340 h 032 032 \n \0 \0 \t \0 \0 277 H 002
0116440 270 I k 324 271 260 311 \0 ( 1 3 5 Q E M
0116460 I T - B Y T E - L I S T 1 3 2
0116500 Q \ A P P E N D 2 1 2 3 Q
0116520 D V A R - S L O T 1 1 4 Q C
0116540 H O O S E - O P 7 6 Q D V A
0116560 R - K I N D 7 0 Q s e t f -
0116600 D C O D E - A R G - T Y P E 5
0116620 2 Q \ A P P E N D 2 4 7 Q
0116640 C L : M A P C A R 4 4 Q D L
0116660 A M B D A - O P T I O N A L 4
0116700 0 Q S Y M B O L - F U N C T I
0116720 O N 3 2 Q D L A M B D A - R
0116740 E Q U I R E D 2 5 Q C R E A
0116760 T E - H U N K 3 D L A M B D
0117000 A - C L O S E D - O V E R ) \r (
0117020 1 1 7 Q R P L P T R . N 1 0
0117040 1 Q : C L O S E D 3 5 Q C
0117060 L : F I R S T ) \r ( 1 1 0 Q
0117100 ( I V A R . I V A R X ) ) \r
0117120 G E N E R A T E - H A R D - E N
0117140 T R Y D 1 \r ( L ( 0 D L A
0117160 M B D A ) F 4 * H U N K -
0117200 S I Z E * F 5 * H U N K -
0117220 M A P * F 6 * D C O D E *
0117240 F 7 * L E V E L * ) \0 265
0117260 004 004 \0 001 @ \t \0 \0 \t \0 \0 @ \t \0 \0 \t
0117300 \0 \0 021 " 003 @ \t \0 \0 241 h 200 i 237 T U
0117320 001 002 W 016 k 363 264 003 j i \f \0 \0 277 H \t
0117340 \0 \0 221 h 200 i 263 037 @ \t \0 \0 221 h 200 i
0117360 252 @ d \t \0 \0 g \0 \0 360 237 277 @ \t \0 \0
0117400 221 h 200 i 224 @ \t \0 \0 277 @ \t \0 \0 j 273
0117420 272 J 003 265 033 @ H I \v \0 \0 @ H I \v \0
0117440 \0 V l 002 \n \0 \0 V m 377 \n \0 \0 020 001 \t
0117460 \0 \0 g \0 \0 360 262 ) o \0 \0 \0 U 001 002 \n
0117500 \0 \0 o \0 \0 \0 K \n \0 \0 g \0 \0 T 340 o
0117520 \0 \0 \0 032 032 \n \0 \0 \n \0 \0 \t \0 \0 277 J
0117540 002 272 K k 324 273 260 253 \0 ( 2 5 1 Q E
0117560 M I T - B Y T E - L I S T 2 4
0117600 6 Q \ A P P E N D 2 2 4 3 Q
0117620 \ A P P E N D 2 2 2 5 Q C
0117640 H O O S E - O P 2 1 5 Q C H
0117660 O O S E - O P 1 7 5 Q D V A
0117700 R - K I N D 1 7 0 Q s e t f
0117720 - D C O D E - N U M - A R G S
0117740 1 6 2 Q s e t f - D C O D E -
0117760 A R G - T Y P E 1 5 4 Q G E
0120000 N E R A T E - K E Y 1 4 6 Q
0120020 G E N E R A T E - O P T - A N D
0120040 - R E S T 1 3 1 Q D L A M B
0120060 D A - R E Q U I R E D 1 2 4 Q
0120100 G E N E R A T E - A R G - C H
0120120 E C K 1 1 3 Q D L A M B D A
0120140 - K E Y 1 0 1 Q D L A M B D
0120160 A - R E S T 6 7 Q D L A M B
0120200 D A - R E S T 5 5 Q C L : Z
0120220 E R O P 5 0 Q C R E A T E -
0120240 H U N K 2 4 Q D L A M B D A
0120260 - C L O S E D - O V E R 1 5 Q
0120300 C L : L E N G T H 1 2 Q D
0120320 L A M B D A - O P T I O N A L
0120340 6 C L : L E N G T H 3 D L
0120360 A M B D A - R E Q U I R E D ) \r
0120400 ( 2 3 0 Q R P L P T R . N 2
0120420 0 0 Q : C L O S E D 1 0 4 Q
0120440 : I G N O R E D ) \r ( 2 3 6
0120460 Q ( P O P ) 2 2 1 Q ( I V
0120500 A R . I V A R X ) 2 0 7 Q
0120520 ( P V A R . P V A R X ) )
0120540 \r G E N E R A T E - A R G - C H
0120560 E C K D 1 \r ( L ( 0 D L A
0120600 M B D A ) ) \0 316 004 \0 \0 001 @ \t \0
0120620 \0 \t \0 \0 021 1 003 @ \t \0 \0 h 360 264 023 @
0120640 \t \0 \0 h 360 264 \v H @ \t \0 \0 \t \0 \0 324
0120660 271 \b \0 \0 272 \b \0 \0 273 I 263 @ g \0 \0 H
0120700 k 325 \t \0 \0 g \0 \0 g \0 \0 J h 032 032 H
0120720 \t \0 \0 g \0 \0 g \0 \0 o \0 \0 \0 g \0 \0
0120740 g \0 \0 J h 032 032 h 032 032 032 032 032 \n \0 \0
0120760 032 032 \n \0 \0 032 \t \0 \0 020 g \0 \0 H k 325
0121000 \t \0 \0 g \0 \0 g \0 \0 K h 032 032 g \0 \0
0121020 I \t \0 \0 g \0 \0 g \0 \0 J h 032 032 g \0
0121040 \0 K h 032 032 H \t \0 \0 I \t \0 \0 g \0 \0
0121060 o \0 \0 \0 g \0 \0 g \0 \0 J h 032 032 h 032
0121100 032 032 032 \n \0 \0 \n \0 \0 032 032 032 \n \0 \0 032
0121120 032 032 \n \0 \0 032 \t \0 \0 020 \0 ( 3 1 3 Q
0121140 E M I T - B Y T E - L I S T
0121160 3 0 7 Q \ A P P E N D 2 3 0
0121200 1 Q \ A P P E N D 2 2 7 3 Q
0121220 \ A P P E N D 2 2 7 0 Q \
0121240 A P P E N D 2 2 3 7 Q P U S
0121260 H - I N T E G E R 2 3 3 Q P
0121300 U S H - I N T E G E R 2 0 6 Q
0121320 P U S H - I N T E G E R 1 6
0121340 5 Q P U S H - I N T E G E R
0121360 1 5 3 Q E M I T - B Y T E - L
0121400 I S T 1 4 7 Q \ A P P E N D
0121420 2 1 4 2 Q \ A P P E N D 2
0121440 1 0 5 Q P U S H - I N T E G E
0121460 R 6 7 Q P U S H - I N T E G
0121500 E R 5 2 Q M A K E - D T A G
0121520 4 6 Q M A K E - D T A G 4
0121540 1 Q C L : L E N G T H 3 6 Q
0121560 D L A M B D A - O P T I O N A
0121600 L 2 5 Q D L A M B D A - K E
0121620 Y 1 5 Q D L A M B D A - R E
0121640 S T 6 C L : L E N G T H 3
0121660 D L A M B D A - R E Q U I R E
0121700 D ) \r ( 2 5 4 Q T A G 2 5 1
0121720 Q P O P 2 4 2 Q F N 2 2
0121740 2 3 Q T A G 2 1 4 Q F J U
0121760 M P 2 1 1 Q G R E A T E R P
0122000 2 0 2 Q M Y A R G C O U N T
0122020 1 7 3 Q F J U M P 1 7 0 Q
0122040 G R E A T E R P 1 5 7 Q M
0122060 Y A R G C O U N T 1 2 5 Q T
0122100 A G 1 2 2 Q P O P 1 1 3 Q
0122120 F N 2 1 1 0 Q ' N I L 7
0122140 5 Q T J U M P 7 2 Q G R E
0122160 A T E R P 6 1 Q M Y A R G C
0122200 O U N T ) \r ( 2 4 6 Q ( F N
0122220 S I : : A R G U M E N T - E R
0122240 R O R ) 1 1 7 Q ( F N S I
0122260 : : A R G U M E N T - E R R O R
0122300 ) ) \r G E N E R A T E - K E Y
0122320 D 1 \r ( L ( 2 N U M - O P T
0122340 I O N A L 1 N U M - R E Q U
0122360 I R E D 0 D L A M B D A ) )
0122400 \0 265 \n \0 \0 003 A B k 324 324 021 221 \t @
0122420 \t \0 \0 261 \0 237 d 001 _ 022 001 _ 020 277 O 022
0122440 002 _ 016 001 276 O 016 002 ] 001 274 M 002 001 273 \b
0122460 \0 \0 \b \0 \0 272 271 g \0 \0 g \0 \0 O 020 h
0122500 032 032 g \0 \0 H g \0 \0 I h 032 032 h 032 032
0122520 032 032 032 \t \0 \0 277 L k \n \0 \0 277 L \t \0
0122540 \0 277 N i \n \0 \0 K 264 \v g \0 \0 K i \n
0122560 \0 \0 032 g \0 \0 J h 032 032 g \0 \0 I h 032
0122600 032 g \0 \0 N i \n \0 \0 K 264 \v g \0 \0 K
0122620 i \n \0 \0 032 g \0 \0 J h 032 032 h 032 \n \0
0122640 \0 \n \0 \0 032 032 032 \n \0 \0 \n \0 \0 \t \0 \0
0122660 277 002 003 265 003 202 261 377 ` h 020 \0 ( 2 5 0
0122700 Q E M I T - B Y T E - L I S T
0122720 2 4 5 Q \ A P P E N D 2 2
0122740 4 2 Q \ A P P E N D 2 2 3 4
0122760 Q \ A P P E N D 2 2 3 1 Q
0123000 \ A P P E N D 2 2 1 4 Q S T
0123020 O R E - V A R 2 0 1 Q S T O
0123040 R E - V A R 1 5 2 Q S T O R
0123060 E - V A R 1 3 7 Q S T O R E
0123100 - V A R 1 3 1 Q A S S E M B
0123120 L E 1 2 4 Q S T A C K - A N
0123140 A L Y Z E 1 1 6 Q E M I T -
0123160 B Y T E - L I S T 5 5 Q M A
0123200 K E - D T A G 5 2 Q M A K E
0123220 - D T A G 1 3 Q D L A M B D
0123240 A - K E Y ) \r ( 2 2 0 Q T A G
0123260 2 0 7 Q ' T 1 7 4 Q A R
0123300 G 0 1 6 5 Q T A G 1 5 6 Q
0123320 J U M P 1 4 5 Q ' N I L
0123340 1 0 1 Q N T J U M P 7 5 Q
0123360 F I N D K E Y 6 5 Q S Y M
0123400 6 2 Q A C O N S T ) \r ( ) \r (
0123420 L E T * ( ( A 0 3 2 4 ( Q U
0123440 O T E G E N E R A T E - K E Y
0123460 ) ) ( A 0 3 2 5 ( Q U O T E
0123500 C L : F U N C T I O N ) ) (
0123520 A 0 3 2 6 \r " G e n e r a t e
0123540 c o d e t o c h e c k f
0123560 o r a n d d e f a u l t t
0123600 h e k e y w o r d a r g u m
0123620 e n t s . " ) ) ( P R O G N
0123640 ( C O N D ( ( F B O U N D P
0123660 ( Q U O T E \r S E T - D O C U
0123700 M E N T A T I O N ) ) ( S E T
0123720 - D O C U M E N T A T I O N A
0123740 0 3 2 4 A 0 3 2 5 A 0 3 2 6
0123760 ) ) ) A 0 3 2 6 ) ) \r G E N E
0124000 R A T E - O P T - A N D - R E S
0124020 T D 1 \r ( L ( 2 N U M - O
0124040 P T I O N A L 1 N U M - R E
0124060 Q U I R E D 0 D L A M B D A
0124100 ) ) 001 212 \f \0 \0 003 \b \0 \0 021 201 \b B
0124120 \t \0 \0 221 h 200 i 242 261 \0 261 g \0 \0 A \t
0124140 \0 \0 221 h 200 i 264 \r A \t \0 \0 o \0 \0 \0
0124160 \n \0 \0 032 \t \0 \0 277 @ \t \0 \0 A k 324 021
0124200 022 \v O 022 _ 026 277 O 026 003 262 ~ \b \0 \0 _
0124220 016 277 O 026 001 ^ 001 275 N 002 \ 001 273 L 002 001
0124240 272 O 026 002 264 006 o \0 \0 \0 g \0 \0 g \0 \0
0124260 g \0 \0 O 016 h 032 032 O 024 \t \0 \0 g \0 \0
0124300 M i \n \0 \0 J 264 \v g \0 \0 J i \n \0 \0
0124320 032 O 026 002 264 006 o \0 \0 \0 \n \0 \0 \n \0 \0
0124340 032 \n \0 \0 032 032 032 \n \0 \0 \t \0 \0 277 M J
0124360 O 016 K 032 032 032 I 032 271 O 026 002 _ 026 277 O
0124400 024 k 324 _ 024 277 260 201 023 @ \t \0 \0 262 . @
0124420 \t \0 \0 g \0 \0 360 221 h 200 i 262 g \0 \0
0124440 g \0 \0 g \0 \0 A B k 324 324 @ \t \0 \0 i
0124460 \n \0 \0 032 032 032 032 \t \0 \0 277 B \t \0 \0 221
0124500 h 200 i 264 003 202 261 \0 213 g \0 \0 H h 032 032
0124520 \t \0 \0 I \t \0 \0 260 J d 001 _ 020 277 g \0
0124540 \0 O 020 002 002 001 h 032 032 \t \0 \0 277 O 020 002
0124560 002 002 k \n \0 \0 277 O 020 002 002 002 \t \0 \0 277
0124600 O 020 001 i \n \0 \0 \t \0 \0 277 O 020 002 001 237
0124620 g \0 \0 O 020 002 001 i \n \0 \0 032 \t \0 \0 277
0124640 002 003 265 267 @ \t \0 \0 262 037 @ \t \0 \0 g \0
0124660 \0 360 221 h 200 i 237 g \0 \0 @ \t \0 \0 i \n
0124700 \0 \0 032 \t \0 \0 277 g \0 \0 H h 032 032 \t \0
0124720 \0 020 \0 ( 6 0 7 Q E M I T - B Y
0124740 T E 5 7 4 Q E M I T - B Y T
0124760 E - L I S T 5 7 0 Q S T O R
0125000 E - V A R 5 6 4 Q D L A M B
0125020 D A - R E S T 5 4 4 Q D L A
0125040 M B D A - R E S T 5 3 6 Q D
0125060 L A M B D A - R E S T 5 2 5 Q
0125100 E M I T - B Y T E - L I S T
0125120 5 2 1 Q S T O R E - V A R 5
0125140 0 0 Q E M I T - B Y T E - L I
0125160 S T 4 7 5 Q S T O R E - V A
0125200 R 4 6 5 Q A S S E M B L E
0125220 4 5 4 Q S T A C K - A N A L Y
0125240 Z E 4 4 2 Q E M I T - B Y T
0125260 E 4 1 5 Q C L : N R E V E R
0125300 S E 4 1 1 Q E M I T - B Y T
0125320 E 3 6 5 Q C L : Z E R O P
0125340 3 6 0 Q E M I T - B Y T E - L
0125360 I S T 3 5 1 Q S T O R E - V
0125400 A R 3 4 5 Q D L A M B D A -
0125420 R E S T 3 1 1 Q D L A M B D
0125440 A - R E S T 3 0 3 Q D L A M
0125460 B D A - R E S T 2 4 3 Q E M
0125500 I T - B Y T E - L I S T 2 4 0
0125520 Q \ A P P E N D 2 2 3 2 Q
0125540 \ A P P E N D 2 2 2 6 Q \ A
0125560 P P E N D 2 2 2 3 Q \ A P P
0125600 E N D 2 2 0 6 Q S T O R E -
0125620 V A R 1 7 3 Q S T O R E - V
0125640 A R 1 6 3 Q P U S H - I N T
0125660 E G E R 1 0 5 Q M A K E - D
0125700 T A G 6 2 Q D L A M B D A -
0125720 O P T I O N A L 5 5 Q E M I
0125740 T - B Y T E - L I S T 5 1 Q
0125760 \ A P P E N D 2 4 2 Q P U S
0126000 H - I N T E G E R 3 0 Q C L
0126020 : Z E R O P 1 1 Q C L : Z E
0126040 R O P 2 M A K E - D T A G )
0126060 \r ( 6 0 0 Q T A G 5 6 0 Q
0126100 ' N I L 5 4 7 Q : I G N O R
0126120 E D 5 1 1 Q ' N I L 4 2 7
0126140 Q T A G 4 0 2 Q J U M P
0126160 3 3 4 Q R E S T L I S T 3 3
0126200 1 Q M Y A R G C O U N T 3 2
0126220 6 Q ' N I L 3 1 4 Q : I G
0126240 N O R E D 2 0 1 Q ' T 1 6
0126260 6 Q A R G 0 1 5 1 Q T J U
0126300 M P 1 4 6 Q E Q 1 4 3 Q
0126320 ' 0 2 4 Q M Y A R G C O U N
0126340 T ) \r ( 2 2 0 Q ( ' 1 I D
0126360 I F F E R E N C E ) 1 4 0 Q
0126400 ( C O P Y ) 4 6 Q ( I D I F
0126420 F E R E N C E ) ) \r ( P R O C L
0126440 A I M ( Q U O T E ( S P E C
0126460 I A L * E N D I N G - D E P T
0126500 H * ) ) ) \r ( O R ( B O U N D
0126520 P ( Q U O T E * E N D I N G
0126540 - D E P T H * ) ) ( S E T Q
0126560 * E N D I N G - D E P T H * N
0126600 I L ) ) \r ( L E T * ( ( A 0 3
0126620 2 7 ( Q U O T E * E N D I N
0126640 G - D E P T H * ) ) ( A 0 3 2
0126660 8 ( Q U O T E V A R I A B L
0126700 E ) ) ( A 0 3 2 9 \r " A n
0126720 A L i s t m a p p i n g l e
0126740 x i c a l l e v e l t o t
0126760 h e s t a c k d e p t h a
0127000 t e x i t f r o m t h a t
0127020 l e v e l . " ) ) ( P R O G
0127040 N ( C O N D ( ( F B O U N D
0127060 P \r ( Q U O T E S E T - D O
0127100 C U M E N T A T I O N ) ) ( S
0127120 E T - D O C U M E N T A T I O N
0127140 A 0 3 2 7 A 0 3 2 8 A 0 3
0127160 2 9 ) ) ) A 0 3 2 9 ) ) \r ( P
0127200 R O C L A I M ( Q U O T E (
0127220 S P E C I A L * S T A C K - N
0127240 O T E S * ) ) ) \r ( O R ( B O
0127260 U N D P ( Q U O T E * S T A
0127300 C K - N O T E S * ) ) ( S E T
0127320 Q * S T A C K - N O T E S *
0127340 N I L ) ) \r ( L E T * ( ( A 0
0127360 3 3 0 ( Q U O T E * S T A C
0127400 K - N O T E S * ) ) ( A 0 3 3
0127420 1 ( Q U O T E V A R I A B L
0127440 E ) ) ( A 0 3 3 2 \r " A n
0127460 A L i s t m a p p i n g t h
0127500 e I D s o f N O T E - S T
0127520 A C K d i r e c t i v e s i
0127540 n t o t h e a b s o l u t e
0127560 s t a c k d e p t h a t
0127600 t h a t p o i n t i n t h
0127620 e c o d e . " \r ) ) ( P R O
0127640 G N ( C O N D ( ( F B O U N
0127660 D P ( Q U O T E S E T - D O
0127700 C U M E N T A T I O N ) ) ( S
0127720 E T - D O C U M E N T A T I O N
0127740 A 0 3 3 0 A 0 3 3 1 A 0 3
0127760 3 2 ) ) ) A 0 3 3 2 ) ) \r S T
0130000 A C K - A N A L Y Z E D 1 \r (
0130020 L ( 0 - a r g s - ) P 6
0130040 * S T A C K - N O T E S * P
0130060 5 * E N D I N G - D E P T H
0130100 * P 4 * L E V E L * F
0130120 7 * L E V E L * ) \0 > \a 001 002
0130140 \0 e 021 001 \0 k a 021 ! 003 l 002 H 361 221 j
0130160 202 l 002 a 272 W 016 d h 032 h 032 021 022 006 I
0130200 j \n \0 \0 M 001 002 [ 277 K 225 K J \n \0 \0
0130220 223 \b \0 \0 020 o \0 \0 \0 \t \0 \0 260 354 \0 (
0130240 7 2 Q A S S E R T - F A I L
0130260 6 2 Q V A L U E S 5 6 Q %
0130300 % = 4 2 Q S T A C K - A N A
0130320 L Y Z E - C O D E ) \r N I L \r (
0130340 6 7 Q " C o d e d o e s n
0130360 ' t l e a v e s t a c k e
0130400 m p t y ! " ) \r ( L E T * ( (
0130420 A 0 3 3 3 ( Q U O T E S T A
0130440 C K - A N A L Y Z E ) ) ( A 0
0130460 3 3 4 ( Q U O T E C L : F U
0130500 N C T I O N ) ) ( A 0 3 3 5
0130520 \r " W a l k t h e g i v e n
0130540 c o d e a n n o t a t i n g
0130560 t h e t a g s i n i t
0130600 w i t h i n f o r m a t i o n
0130620 a b o u t t h e s t a c k
0130640 a n d b i n d i n g d e p
0130660 t h o f c o n t r o l a t
0130700 t h a t p o i n t . " \r ) )
0130720 ( P R O G N ( C O N D ( (
0130740 F B O U N D P ( Q U O T E S
0130760 E T - D O C U M E N T A T I O N
0131000 ) ) ( S E T - D O C U M E N T
0131020 A T I O N A 0 3 3 3 A 0 3 3
0131040 4 A 0 3 3 5 ) ) ) A 0 3 3 5
0131060 ) ) \r S T A C K - A N A L Y Z E
0131100 - C O D E D 1 \r ( L ( 2 I
0131120 N I T - B I N D I N G - D E P T
0131140 H 1 I N I T - D E P T H 0
0131160 C O D E ) P 1 4 Q * E N
0131200 D I N G - D E P T H * P 1 3
0131220 Q * L E V E L * F 1 5 Q
0131240 * L E V E L * F 1 6 Q * S
0131260 T A C K - N O T E S * F 1 7
0131300 Q * E N D I N G - D E P T H *
0131320 ) 002 206 \r 003 \0 003 A B 021 222 \n @ ^ 003
0131340 265 027 W 032 W 036 \n \0 \0 _ 020 277 O 020 002 242
0131360 261 002 C h 261 002 @ 001 _ 016 001 ] d g \0 \0
0131400 360 262 W 277 O 016 002 001 \t \0 \0 263 9 O 016 002
0131420 001 I H 032 \n \0 \0 277 W 032 O 016 002 001 \t \0
0131440 \0 \n \0 \0 225 \b \0 \0 261 002 005 o \0 \0 \0 O
0131460 016 002 001 \n \0 \0 260 341 o \0 \0 \0 O 016 002 001
0131500 \n \0 \0 277 I H 032 O 016 002 001 \t \0 \0 \n \0
0131520 \0 262 347 \b \0 \0 h 020 g \0 \0 360 235 O 016 002
0131540 001 \t \0 \0 H I \v \0 \0 h 020 M g \0 \0 360
0131560 250 M d g \0 \0 360 262 026 277 H k 325 270 O 016
0131600 002 001 \t \0 \0 H I \v \0 \0 261 001 243 g \0 \0
0131620 360 250 M d g \0 \0 360 262 027 277 O 016 002 001 \t
0131640 \0 \0 H I \v \0 \0 277 H k 325 X 261 001 201 g
0131660 \0 \0 360 263 035 M g \0 \0 360 263 026 M g \0 \0
0131700 360 255 M g \0 \0 360 247 M d g \0 \0 360 227 277
0131720 H k 324 X 261 001 Y g \0 \0 360 222 261 001 R M
0131740 g \0 \0 360 222 261 001 I M d g \0 \0 360 227 277
0131760 H k 325 X 261 001 9 g \0 \0 360 235 O 016 002 001
0132000 H 032 W 034 032 c 034 261 001 & M g \0 \0 360 250
0132020 M d g \0 \0 360 262 O 277 O 016 002 001 W 034 \n
0132040 \0 \0 \ 247 o \0 \0 \0 \t \0 \0 277 O 016 273 L
0132060 002 272 K 002 J 030 001 270 I 221 h 200 i 263 026 I
0132100 001 002 H 375 363 221 h 200 i 221 h 200 i 244 I 002
0132120 Y 260 350 O 016 001 g \0 \0 360 242 261 \0 323 H k
0132140 324 X 261 \0 313 g \0 \0 360 262 1 H O 016 002 001
0132160 \t \0 \0 325 270 O 016 002 002 002 001 H 032 I 032 271
0132200 H k O 016 002 002 001 \t \0 \0 l 016 324 l 017 \n
0132220 \0 \0 \n \0 \0 324 X 261 \0 226 M g \0 \0 360 250
0132240 M d g \0 \0 360 262 0 277 O 016 002 002 002 001 I
0132260 001 001 : 221 h 200 i 227 o \0 \0 \0 \t \0 \0 277
0132300 I 001 I 002 271 002 270 O 016 001 g \0 \0 360 262 `
0132320 H k 324 X 260 Y g \0 \0 360 233 H O 016 002 002
0132340 001 k 325 325 X 260 H M d g \0 \0 360 222 261 376
0132360 h g \0 \0 360 264 , W 032 k 324 021 001 \v O 026
0132400 h 032 W 036 032 021 001 \f O 016 002 002 002 H I \v
0132420 \0 \0 277 O 030 001 002 X 264 003 202 261 376 < 023 023
0132440 214 o \0 \0 \0 M o \0 \0 \0 \f \0 \0 277 N 002
0132460 261 375 256 i 262 037 \b \0 \0 277 O 020 002 222 261 376
0132500 030 O 020 _ 022 277 H _ 024 277 O 022 d O 024 031
0132520 277 002 020 o \0 \0 \0 \t \0 \0 261 375 221 \0 ( 1
0132540 2 0 1 Q A S S E R T - F A I L
0132560 1 1 4 0 Q V A L U E S 1 1
0132600 2 4 Q E C A S E - F A I L 1
0132620 0 7 1 Q S T A C K - A N A L Y
0132640 Z E - C O D E 7 4 6 Q C L :
0132660 E R R O R 6 7 4 Q M A X 6
0132700 7 1 Q C L : F L O O R 6 6 1
0132720 Q C L : L E N G T H 6 3 2 Q
0132740 C L : L E N G T H 5 2 2 Q
0132760 C L : E R R O R 5 1 1 Q C L
0133000 : A S S O C 3 1 6 Q S T A C
0133020 K - A N A L Y Z E - C O D E 3
0133040 1 1 Q D T A G - P T R 2 6 1
0133060 Q S T A C K - A N A L Y Z E -
0133100 C O D E 2 5 4 Q D T A G - P
0133120 T R 2 2 0 Q S T A C K - A N
0133140 A L Y Z E - C O D E 2 1 3 Q
0133160 D T A G - P T R 1 7 5 Q V A
0133200 L U E S 1 7 0 Q C L : E Q U
0133220 A L 1 6 5 Q D T A G - S T A
0133240 C K - D E P T H 1 5 2 Q A S
0133260 S E R T - F A I L 1 3 5 Q A
0133300 S S E R T - F A I L 1 1 7 Q
0133320 V A L U E S 1 1 3 Q % % =
0133340 1 1 0 Q D T A G - L E V E L
0133360 7 6 Q s e t f - D T A G - S T
0133400 A C K - D E P T H 6 2 Q D T
0133420 A G - S T A C K - D E P T H 2
0133440 0 Q C L : A S S O C ) \r ( 1 0
0133460 3 3 Q C L O S E 1 0 2 3 Q
0133500 R E T U R N 1 0 0 0 Q F N
0133520 7 6 4 Q U N B I N D 7 1 4 Q
0133540 D U N B I N D 7 0 5 Q U N
0133560 B I N D 6 1 7 Q B I N D 6
0133600 0 0 Q S E T - S T A C K 4 7
0133620 4 Q D S E T - S T A C K 4 6
0133640 5 Q S E T - S T A C K 4 4 1
0133660 Q N O T E - S T A C K 4 2 4
0133700 Q P O P 4 1 2 Q S W A P
0133720 4 0 1 Q V A R _ 3 6 4 Q P
0133740 U S H - T A G 3 5 5 Q L A M
0133760 B D A 3 4 7 Q C O N S T 3
0134000 4 0 Q C O P Y 3 3 1 Q V A
0134020 R 2 7 6 Q N T J U M P 2 6
0134040 7 Q N F J U M P 2 3 5 Q T
0134060 J U M P 2 2 6 Q F J U M P
0134100 2 0 2 Q J U M P 4 7 Q T A
0134120 G ) \r ( 1 1 7 6 Q " R a n
0134140 o f f e n d t w i c e " 1
0134160 1 2 1 Q ( T A G J U M P F
0134200 J U M P T J U M P N F J U M
0134220 P N T J U M P V A R C O P
0134240 Y C O N S T L A M B D A P
0134260 U S H - T A G V A R _ S W A
0134300 P P O P N O T E - S T A C K
0134320 S E T - S T A C K D S E T -
0134340 S T A C K B I N D U N B I N
0134360 D D U N B I N D F N R E T
0134400 U R N C L O S E ) \r 1 1 1 4
0134420 Q ( C A R I N S T ) 7 4 3
0134440 Q " M i s m a t c h e d B I
0134460 N D a n d U N B I N D . "
0134500 5 1 7 Q " N O T E - S T A C K
0134520 n o t s e e n b e f o r e
0134540 S E T - S T A C K " 1 4 3 Q
0134560 " I n c o n s i s t e n t s
0134600 t a c k d e p t h s a t t
0134620 a g ~ S " \r 1 2 6 Q " I n
0134640 c o n s i s t e n t l e v e l
0134660 a t t a g ~ S " ) \r ( L E
0134700 T * ( ( A 0 3 3 6 ( Q U O T
0134720 E S T A C K - A N A L Y Z E -
0134740 C O D E ) ) ( A 0 3 3 7 ( Q
0134760 U O T E C L : F U N C T I O N
0135000 ) ) ( A 0 3 3 8 \r " A n n o
0135020 t a t e t h e t a g s i n
0135040 C O D E w i t h t h e s
0135060 t a c k a n d b i n d i n g
0135100 d e p t h a t t h o s e
0135120 p o i n t s i n e x e c u t
0135140 i o n , a s s u m i n g t h
0135160 a t t h e s t a c k d e p
0135200 t h i s I N I T - D E P T H
0135220 a n d t h e b i n d i n g
0135240 d e p t h i s a s i n
0135260 I N I T - B I N D I N G - D E P
0135300 T H o n e n t r y t o t
0135320 h e c o d e . " \r ) ) ( P R
0135340 O G N ( C O N D ( ( F B O U
0135360 N D P ( Q U O T E S E T - D
0135400 O C U M E N T A T I O N ) ) (
0135420 S E T - D O C U M E N T A T I O
0135440 N A 0 3 3 6 A 0 3 3 7 A 0
0135460 3 3 8 ) ) ) A 0 3 3 8 ) ) \r A
0135500 S S E M B L E D 1 \r ( L ( 0
0135520 L A P - C O D E ) ) \0 \a \0 \0
0135540 \0 001 @ j \n \0 \0 020 \0 ( 4 A S S E
0135560 M B L E - C O D E ) \r N I L \r (
0135600 ) \r A S S E M B L E - C O D E A
0135620 0 0 0 1 D 1 \r ( L ( 2 S T
0135640 A R T I N G - S L O T 1 N U
0135660 M - N I L S 0 N U M - V A L
0135700 U E S ) F 0 A 0 5 1 7 F
0135720 1 D E P T H ) \0 M \0 002 \0 003
0135740 @ l 017 363 230 o \0 \0 \0 @ \n \0 \0 020 A l
0135760 017 363 262 032 @ l 017 B l 003 P 016 j A l 017
0136000 325 B @ l 017 324 324 l 003 P 016 020 g \0 \0 A
0136020 340 340 340 340 @ 324 B @ A 324 324 k 325 h 032 032
0136040 032 \t \0 \0 Q d 223 k 324 c 002 020 \0 ( 1 0
0136060 3 Q E M I T - B Y T E - L I S
0136100 T 1 4 Q C L : E R R O R ) \r
0136120 ( 5 6 Q B I N D ) \r ( 1 0 Q
0136140 " T o o m a n y v a l u e
0136160 s b o u n d i n a B I N
0136200 D : ~ S " ) \r A S S E M B L E
0136220 - C O D E D 1 \r ( L ( 2 B
0136240 I N D I N G - D E P T H 0 L
0136260 A P - C O D E ) P 4 0 Q *
0136300 H U N K - M A P * P 3 7 Q
0136320 * L E V E L * P 3 6 Q A 0
0136340 5 1 7 I 1 D E P T H F
0136360 4 1 Q * H U N K - M A P * F
0136400 4 2 Q * L E V E L * ) 005 }
0136420 ! 002 \0 003 @ 021 361 017 021 260 032 H d \t \0 \0
0136440 221 h 020 001 Y 001 _ 4 d g \0 \0 360 262 032 277
0136460 I 002 001 \t \0 \0 \t \0 \0 277 A 242 261 005 N A
0136500 k 324 b 002 261 005 E g \0 \0 360 262 $ I 002 001
0136520 H 002 001 001 g \0 \0 360 264 016 H 002 270 A 225 A
0136540 k 325 b 002 277 i \n \0 \0 \t \0 \0 261 005 035 O
0136560 4 d g \0 \0 360 262 027 277 g \0 \0 \t \0 \0 277
0136600 A 242 261 005 \b A k 324 b 002 261 004 377 g \0 \0
0136620 360 230 g \0 \0 \t \0 \0 261 004 361 O 4 d g \0
0136640 \0 360 262 P 277 I 002 001 [ o \0 \0 \0 \n \0 \0
0136660 Z 241 h 200 i 226 J 002 \t \0 \0 260 ) K d 004
0136700 l 004 360 227 277 g \0 \0 g \0 \0 215 3 224 K
0136720 \t \0 \0 214 g \0 \0 g \0 \0 K h 032 032 h 032
0136740 032 \t \0 \0 277 A 242 261 004 243 A k 324 b 002 261
0136760 004 232 g \0 \0 360 242 261 \0 273 I 002 001 _ 024 \t
0137000 \0 \0 265 023 g \0 \0 g \0 \0 k O 024 h 032 032
0137020 032 h 032 260 W 021 ! 035 O 6 003 265 a O 8 022
0137040 _ 022 277 W B \t \0 \0 h 275 \ 003 265 o h _
0137060 020 001 _ 016 277 O 020 002 276 g \0 \0 o \0 \0 \0
0137100 g \0 \0 g \0 \0 g \0 \0 O 016 O 024 h 032 032
0137120 032 g \0 \0 j o \0 \0 \0 N \n \0 \0 o \0 \0
0137140 \0 \n \0 \0 032 032 032 032 032 032 032 \t \0 \0 277 A
0137160 242 261 004 031 A k 324 b 002 261 004 020 001 \t \0 \0
0137200 \t \0 \0 _ : 277 O 8 225 O : O 8 363 224 O
0137220 : _ 8 277 O 6 002 _ 6 260 201 001 ] 001 O 022
0137240 375 363 221 h 200 i 225 M 265 207 i 260 204 L 002 261
0137260 377 { O 4 d g \0 \0 360 262 027 277 g \0 \0 \t
0137300 \0 \0 277 A 242 261 003 305 A k 325 b 002 261 003 274
0137320 g \0 \0 360 222 261 003 265 O 4 g \0 \0 360 253 O
0137340 4 d g \0 \0 360 242 261 \0 352 277 I 002 001 _ 032
0137360 277 A 263 B g \0 \0 d I 002 001 h 032 032 I 001
0137400 g \0 \0 360 221 k 200 j h 032 032 032 \t \0 \0 277
0137420 B 221 h 200 i 222 261 003 t B 001 O 032 375 363 221
0137440 h 200 i 221 h 200 i 222 261 003 b B 001 B 002 b
0137460 004 277 260 335 I 001 g \0 \0 360 223 g \0 \0 202 g
0137500 \0 \0 _ 030 277 B 221 h 200 i 263 $ B 001 O 032
0137520 375 363 221 h 200 i 221 h 200 i 263 024 O 030 \t \0
0137540 \0 277 B 001 B 002 b 004 277 b 002 277 260 331 A O
0137560 032 325 _ 026 j : 263 D O 026 k : 262 027 O 030
0137600 g \0 \0 360 225 o \0 \0 \0 260 - g \0 \0 \t \0
0137620 \0 260 ( O 030 g \0 \0 360 262 025 g \0 \0 O 026
0137640 k 325 g \0 \0 O 026 k 325 h 032 032 032 206 g \0
0137660 \0 O 026 h 032 032 \t \0 \0 277 O 030 g \0 \0 360
0137700 242 261 002 311 A 242 261 002 304 A k 324 b 002 261 002
0137720 273 g \0 \0 360 262 T 021 020 036 g \0 \0 _ < 277
0137740 I 002 001 _ " \t \0 \0 _ 277 I 002 002 001 _
0137760 036 \t \0 \0 _ 034 277 A d 227 O O 034 324 325
0140000 b 002 B 032 b 004 277 O O 034 O " 265 026 O
0140020 036 265 \f k l 003 O < 016 023 261 002 p 001 \t \0
0140040 \0 260 363 001 \t \0 \0 260 355 O 4 g \0 \0 360 251
0140060 O 4 d g \0 \0 360 262 T 277 I 002 001 I 002 002
0140100 001 l 016 324 324 l 017 \n \0 \0 j _ & 277 _ $
0140120 277 O $ O & 363 221 h 200 i 256 I 001 \t \0 \0
0140140 277 O & k 324 _ & 277 260 351 B 001 B 002 b 004
0140160 277 b 002 277 I 001 g \0 \0 360 242 261 002 017 A 242
0140200 261 002 \n A k 324 b 002 261 002 001 g \0 \0 360 262
0140220 , g \0 \0 I 002 001 h 032 032 \t \0 \0 277 I 002
0140240 001 \t \0 \0 _ ( 002 b 002 277 g \0 \0 \t \0 \0
0140260 O ( 001 \n \0 \0 b 004 261 001 321 O 4 d g \0
0140300 \0 360 262 035 277 I 002 001 \t \0 \0 \t \0 \0 \t \0
0140320 \0 277 A 242 261 001 266 A k 324 b 002 261 001 255 g
0140340 \0 \0 360 263 # O 4 g \0 \0 360 263 033 O 4 g
0140360 \0 \0 360 263 023 O 4 g \0 \0 360 251 O 4 d g
0140400 \0 \0 360 262 025 277 I \t \0 \0 277 A 242 261 001 }
0140420 A k 325 b 002 261 001 t g \0 \0 360 242 261 001 025
0140440 I 002 001 I 002 002 001 _ 2 277 _ 0 d 004 l 004
0140460 360 242 261 \0 330 301 002 311 \0 g \0 \0 ' _ . 241
0140500 h 200 i 262 u O . 003 262 ' \b \0 \0 277 O .
0140520 d 001 003 241 h 032 h _ , 277 _ * 277 O * 265
0140540 036 o \0 \0 \0 O 0 O 2 \v \0 \0 261 \0 270 o
0140560 \0 \0 \0 O 0 O . \v \0 \0 277 260 312 003 246 O
0140600 * _ , 277 h 210 O * 001 _ , 277 O * 002 _
0140620 * 277 O , 003 265 \t j O , 016 261 \0 211 001 231
0140640 O , 001 O 2 \n \0 \0 262 265 g \0 \0 \t \0 \0
0140660 O , 002 \n \0 \0 260 n O 2 d j : 226 277 o
0140700 \0 \0 \0 260 6 k : 225 o \0 \0 \0 260 - O 2
0140720 d l 002 : 226 277 o \0 \0 \0 260 037 l 003 : 225
0140740 o \0 \0 \0 260 025 O 2 l 004 : 224 o \0 \0 \0
0140760 207 g \0 \0 O 2 h 032 032 \t \0 \0 277 g \0 \0
0141000 O 0 h 032 032 \t \0 \0 260 034 003 236 O 0 001 g
0141020 \0 \0 360 226 O 0 002 \t \0 \0 210 o \0 \0 \0 O
0141040 0 \n \0 \0 277 A 262 d A O 2 k 325 325 b 002
0141060 260 Y O 4 d g \0 \0 360 230 277 g \0 \0 \t \0
0141100 \0 260 H g \0 \0 360 264 5 I 002 001 \t \0 \0 I
0141120 002 002 001 W B 001 002 i \f \0 \0 277 W D k 324
0141140 021 001 037 O > I 002 002 001 032 W B 032 021 001
0141160 I 002 002 002 A B \v \0 \0 023 023 215 o \0 \0 \0
0141200 O 4 o \0 \0 \0 \f \0 \0 277 H 002 X 261 372 217
0141220 \0 ( 2 5 6 4 Q E C A S E - F A
0141240 I L 2 5 4 4 Q A S S E M B L
0141260 E - C O D E 2 5 0 6 Q C R E
0141300 A T E - H U N K 2 4 7 2 Q C
0141320 L : L E N G T H 2 4 5 4 Q E
0141340 M I T - B Y T E 2 4 1 7 Q C
0141360 L : E R R O R 2 4 0 5 Q E M
0141400 I T - B Y T E - L I S T 2 3 6
0141420 3 Q E M I T - B Y T E 2 3 4
0141440 7 Q E M I T - B Y T E - L I S
0141460 T 2 2 4 1 Q C L : M A P C A
0141500 R 2 2 3 3 Q S Y M B O L - F
0141520