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