$ od -c -N 50000 [eris]<LispCore>CML>MORGUE>CMLDEBUG.DCOM!2
0000000 ( D E F I N E - F I L E - I N F
0000020 O 247 R E A D T A B L E " I N
0000040 T E R L I S P " 247 P A C K A G
0000060 E " I N T E R L I S P " ) \r (
0000100 F I L E C R E A T E D " 2 2 -
0000120 O c t - 8 6 1 6 : 5 2 : 4 4 "
0000140 ( " c o m p i l e d o n "
0000160 { E R I S } < L I S P C O R E
0000200 > S O U R C E S > C M L D E B U
0000220 G . ; 1 ) \r " 2 1 - O c t - 8
0000240 6 0 4 : 1 3 : 0 1 " " C O M
0000260 P I L E - F I L E d " i n "
0000300 X e r o x L i s p 2 1 - O c
0000320 t - 8 6 . . . " d a t e d
0000340 " 2 1 - O c t - 8 6 0 4 : 4 8
0000360 : 4 3 " ) \r ( F I L E C R E A T
0000400 E D " 2 2 - O c t - 8 6 1 6
0000420 : 4 7 : 5 4 " { E R I S } < L
0000440 I S P C O R E > S O U R C E S >
0000460 C M L D E B U G . ; 1 7 5 1 3
0000500 2 p r e v i o u s d a t e %
0000520 : \r " 2 8 - S e p - 8 6 1 4
0000540 : 4 0 : 5 8 " { E R I S } < L
0000560 I S P C O R E > E V A L > C M L
0000600 D E B U G . ; 2 0 ) \r ( R P A Q
0000620 Q C M L D E B U G C O M S (
0000640 ( C O M S ( * ; " f r o
0000660 m H E L P D L : e r r o r
0000700 r u n t i m e " ) ( F N S H
0000720 E L P P R I N T - B A C K T R
0000740 A C E S H O U L D N T \r E R
0000760 R O R E R R O R X I N T E R
0001000 R U P T F A U L T E V A L F
0001020 A U L T A P P L Y O L D F A U
0001040 L T 1 E R R O R M E S S E R
0001060 R O R M E S S 1 ) ( I N I T V
0001100 A R S ( H E L P D E P T H 7
0001120 ) ( \r W B R E A K ) ( N B R
0001140 E A K S 0 ) ( B R O K E N F
0001160 N S ) ( B R E A K D E L I M I
0001200 T E R " \r " ) ( H E L P T I
0001220 M E 1 0 0 0 ) ( H E L P C L
0001240 O C K ) ( N L S E T Q G A G
0001260 T ) ( * M A C R O E X P A N D
0001300 - H O O K * ( Q U O T E C L
0001320 : F U N C A L L ) ) ( \r C O M
0001340 P I L E R M A C R O P R O P S
0001360 ( Q U O T E ( D M A C R O A
0001400 L T O M A C R O B Y T E M A C
0001420 R O M A C R O ) ) ) ) ( P
0001440 ( O R ( A N D ( B O U N D P
0001460 ( Q U O T E C L I S P A R R
0001500 A Y ) \r ) C L I S P A R R A Y
0001520 ) ( S E T Q C L I S P A R R
0001540 A Y ( H A S H A R R A Y 1 0
0001560 0 0 ) ) ) ( O R ( N E Q (
0001600 Q U O T E N O B I N D ) ( G
0001620 E T T O P V A L ( Q U O T E
0001640 H E L P F L A G ) ) \r ) ( S E
0001660 T T O P V A L ( Q U O T E H
0001700 E L P F L A G ) T ) ) ) ( D
0001720 E C L A R E % : E V A L @ C O
0001740 M P I L E ( A D D V A R S (
0001760 S Y S S P E C V A R S H E L P
0002000 F L A G ) ) ) ) ( F N S \r B
0002020 R E A K 1 ) ( V A R S ( B R
0002040 E A K T T B L ( C O P Y T E R
0002060 M T A B L E ( Q U O T E O R
0002100 I G ) ) ) ) ( C O M S ( *
0002120 ; " f r o m B R E A K " )
0002140 ( F N S V I R G I N F N R E
0002160 S T O R E \r B R K L A S T P O
0002200 S U N B R E A K 0 S M A R T
0002220 A R G L I S T P R O C E E D -
0002240 F R O M - B R E A K P R O C E
0002260 E D - W I T H - D E F A U L T S
0002300 C R E A T E - P R O C E E D -
0002320 K E Y L I S T \r T R A C E S
0002340 T K P O Z S T K P O Z 1 S T
0002360 K P O Z 2 U N B R E A K P A
0002400 C K - I N - \ S I M P L I F Y
0002420 . C L . A R G L I S T R E S T
0002440 O R E N A M E S ) ) ( * ; ;
0002460 " " ) ( F N S \r A T T A C
0002500 H - B A C K T R A C E - M E N U
0002520 C L O S E - D E B U G G E R -
0002540 W I N D O W N E A R - B Y - R
0002560 E G I O N S T A C K - E V A L
0002600 ) ( F N S F I N D - L E X I
0002620 C A L - E N V I R O N M E N T )
0002640 \r ( C O M M A N D S ? = E
0002660 D I T @ B T B T ! B T V
0002700 B T V ! C L : E V A L D B
0002720 T D B T ! O K P R R E T
0002740 U R N R E V E R T S T O P
0002760 U B ^ V A L U E ) ( P R O
0003000 P \r F I L E T Y P E C M L D
0003020 E B U G ) ( S P E C I A L - F
0003040 O R M S D E B U G G E R ) (
0003060 F U N C T I O N S E N T E R -
0003100 D E B U G G E R - P B R E A K
0003120 - F U N C T I O N D E B U G G
0003140 E R - L O O P ) \r ( V A R S
0003160 B A K T R A C E L S T ) ( F N
0003200 S W B R E A K B A C K T R A
0003220 C E I T E M W I N D O W \ R E
0003240 L E A S E - S T A C K - D A T U
0003260 M B K I T E M S E L E C T E D
0003300 F N R E G I O N N E X T T O
0003320 \r P R O C E E D - U S I N G - M
0003340 E N U C R E A T E - P R O C E
0003360 E D - M E N U ) ( V A R I A B
0003400 L E S T R A C E R E G I O N
0003420 B R E A K R E G I O N S P E C )
0003440 ( D E C L A R E % : D O C O
0003460 P Y \r D O N T E V A L @ L O A
0003500 D ( I N I T V A R S ( M a x
0003520 B k M e n u W i d t h 1 2 5 )
0003540 ( M a x B k M e n u H e i g h
0003560 t 3 0 0 ) ( A U T O B A C K
0003600 T R A C E F L G N I L ) ( \r
0003620 C L O S E B R E A K W I N D O W
0003640 F L G T ) ( B A C K T R A C
0003660 E F O N T ) ( B r e a k M e n
0003700 u ) ) ) ( D E C L A R E % :
0003720 D O E V A L @ C O M P I L E D
0003740 O N T C O P Y ( R E C O R D S
0003760 \r B K M E N U I T E M ) ) (
0004000 A D D V A R S ( W I N D O W U
0004020 S E R F O R M S ( W B R E A K
0004040 T ) ) ( E N D O F W I N D O
0004060 W U S E R F O R M S ( W B R E
0004100 A K N I L ) ) ) ( F U N C T
0004120 I O N S \r I N I T - T R A C E
0004140 - O U T P U T ) ( D E C L A R
0004160 E % : D O N T E V A L @ L O A
0004200 D D O E V A L @ C O M P I L E
0004220 D O N T C O P Y C O M P I L
0004240 E R V A R S ( A D D V A R S
0004260 ( N L A M A \r U N B R E A K
0004300 T R A C E ) ( N L A M L B R
0004320 E A K 1 ) ( L A M A C R E A
0004340 T E - P R O C E E D - M E N U
0004360 P R O C E E D - U S I N G - M E
0004400 N U W B R E A K S T A C K -
0004420 E V A L E R R O R X \r P R I
0004440 N T - B A C K T R A C E ) ) ) )
0004460 ) \r H E L P D 1 \r ( I 2 B
0004500 R K T Y P E I 1 M E S S 2
0004520 I 0 M E S S 1 F 0 *
0004540 L A S T - C O N D I T I O N * )
0004560 \0 \0 001 \0 003 g \0 \0 g \0 \0 o \0 \0
0004600 \0 g \0 \0 @ A h 032 032 g \0 \0 \f \0 \0 c
0004620 \0 h \f \0 \0 020 \0 ( 2 9 D E B U G
0004640 G E R - L O O P 2 3 M A K E
0004660 - I N T O - C O N D I T I O N )
0004700 \r ( 2 0 D E B U G 1 2 S I
0004720 M P L E - C O N D I T I O N 5
0004740 H E L P 2 E R R O R ! ) \r
0004760 ( 9 " H e l p ! ~ A ~ A "
0005000 ) \r P R I N T - B A C K T R A C
0005020 E A 0 0 0 1 D 1 \r ( L ( 0
0005040 X ) F 0 * S T A N D A R D
0005060 - O U T P U T * ) \0 \a \0 001 \0 001
0005100 @ P \n \0 \0 020 \0 ( 4 P R I N T )
0005120 \r N I L \r ( ) \r P R I N T - B A
0005140 C K T R A C E D 1 \r ( L ( 0
0005160 - a r g s - ) P 2 2 \ P
0005200 R I M O U T . O F D P 2 1
0005220 * P R I N T - L E N G T H * P
0005240 2 0 * P R I N T - L E V E L
0005260 * F 2 3 \ P R I M O U T .
0005300 O F D F 2 4 B R E A K D E
0005320 L I M I T E R ) 001 320 027 002 002 \0 e
0005340 021 001 \0 H k 021 002 002 J d I 363 242 261 \0 263
0005360 277 g \0 \0 022 021 361 020 021 0 023 H k 273 272 K
0005400 d J 363 242 261 \0 261 277 h 274 H k 276 275 N d
0005420 M 363 242 261 \0 267 277 H k _ 020 277 _ 016 277 O
0005440 020 d O 016 363 242 261 \0 265 277 h _ 022 277 H k
0005460 _ 026 277 _ 024 277 O 026 d O 024 363 242 261 \0 266
0005500 277 h _ 030 277 H k _ 034 277 _ 032 277 O 034 d
0005520 O 032 363 242 261 \0 267 277 H k _ 277 _ 036 277
0005540 O d O 036 363 242 261 \0 267 277 h _ " 277 l
0005560 002 021 001 024 l \n 021 001 025 W . 021 001 026 O 030
0005600 \t \0 \0 j I \n \0 \0 _ $ 277 O $ \t \0 \0
0005620 _ & d g \0 \0 360 242 261 \0 236 277 h 261 \0 312
0005640 a g \0 \0 360 226 J k 330 a 261 377 J J l 002
0005660 324 Z 261 377 7 a g \0 \0 360 226 K k 330 a 261
0005700 377 J K l 002 324 [ 261 377 9 a g \0 \0 360 222
0005720 261 377 G N l 002 324 ^ 261 377 7 a g \0 \0 360
0005740 227 O 020 k 330 a 261 377 E O 020 l 002 324 _ 020
0005760 261 377 1 a g \0 \0 360 227 O 026 k 330 a 261 377
0006000 D O 026 l 002 324 _ 026 261 377 0 a g \0 \0 360
0006020 222 261 377 G O 034 l 002 324 _ 034 261 377 4 a g
0006040 \0 \0 360 227 O k 330 a 261 377 C O l 002
0006060 324 _ 261 377 / g \0 \0 360 222 h 260 + O &
0006100 g \0 \0 360 257 O & g \0 \0 360 250 O & d g
0006120 \0 \0 360 222 277 h 217 004 l 004 360 262 7 O & \t
0006140 \0 \0 l \ 360 h 360 262 + O 022 262 032 O $ \t
0006160 \0 \0 O $ \t \0 \0 h i O " h d g \0 \0
0006200 \r \b \0 \0 277 i o \0 \0 \0 O & W 0 \f \0
0006220 \0 277 m 377 O $ \n \0 \0 _ $ d 230 d L \n
0006240 \0 \0 242 261 376 347 \t \0 \0 277 \b \0 \0 020 \0 (
0006260 4 6 1 C L : V A L U E S 4 5
0006300 7 R E L S T K 4 5 0 E Q P
0006320 4 4 1 S T K N T H 4 3 3
0006340 F O R M A T 4 2 0 \ B A C K
0006360 T R A C E 4 0 7 \ S T A C K
0006400 A R G P T R 4 0 2 \ S T A C
0006420 K A R G P T R 3 8 6 C H C O
0006440 N 1 1 7 6 S T K N A M E 1
0006460 6 8 S T K N T H 1 6 3 O U
0006500 T P U T ) \r ( 4 1 6 P R I N T
0006520 - B A C K T R A C E A 0 0 0 1
0006540 3 7 0 C L : E V A L 3 6 2
0006560 A P P L Y 3 5 5 E V A L 3
0006600 4 5 \ I N T E R P R E T E R
0006620 3 2 2 : P R I N T - J U N K
0006640 3 0 3 : L I N K 2 7 9 : O
0006660 U T P U T 2 5 5 : P R I N T
0006700 - V A R I A B L E S 2 3 8 :
0006720 T E S T 2 1 7 : T O 1 9 6
0006740 : F R O M 1 8 2 * E N V *
0006760 2 0 P R I N T - B A C K T R
0007000 A C E ) \r ( 4 2 6 " ~ S ~ A
0007020 " ) \r S H O U L D N T D 1 \r (
0007040 I 0 M E S S ) \0 \n \0 \0 \0 001
0007060 o \0 \0 \0 @ \n \0 \0 020 \0 ( 7 D E B
0007100 U G ) \r N I L \r ( 3 " S h o
0007120 u l d n ' t h a p p e n : ~
0007140 A " ) \r E R R O R D 1 \r ( P
0007160 1 P O S P 0 C O N D I T
0007200 I O N I 2 N O B R E A K
0007220 I 1 M E S S 2 I 0 M E
0007240 S S 1 F 2 H E L P F L A G
0007260 ) \0 T 002 001 \0 003 l 021 @ A 032 \n \0 \0
0007300 021 001 \0 H \t \0 \0 B 262 > R g \0 \0 360 263
0007320 7 021 020 001 ` \0 \0 262 ! g \0 \0 m 377 \n \0
0007340 \0 Y 262 026 I \t \0 \0 k 363 264 \b l 002 I \n
0007360 \0 \0 I \t \0 \0 277 230 H \t \0 \0 277 \b \0 \0
0007400 277 023 \b \0 \0 020 H \t \0 \0 020 \0 ( 8 1
0007420 E R R O R X 7 6 E R R O R !
0007440 7 1 E R R O R M E S S 6 7
0007460 S E T E R R O R N 6 1 R E
0007500 L S T K 5 7 S T K A R G 4
0007520 7 S T K N A R G S 4 0 S T
0007540 K P O S 1 4 R A I S E - S I
0007560 G N A L 7 E R R M - T O - C
0007600 O N D I T I O N ) \r ( 3 5 E R
0007620 R O R S E T 3 0 N L S E T Q
0007640 G A G 2 1 B R E A K ! ) \r (
0007660 ) \r E R R O R X D 1 \r ( L (
0007700 0 - a r g s - ) P 3 P R
0007720 I N T M S G F 4 * L A S T
0007740 - C O N D I T I O N * F 5
0007760 H E L P D E P T H ) \0 V 004 002 002
0010000 \0 e 021 001 \0 k H 361 221 h 201 k a 021 021 002
0010020 l 002 H 361 223 g \0 \0 202 l 002 a 272 I d g
0010040 \0 \0 \n \0 \0 256 277 I 001 I 002 001 \n \0 \0 Y
0010060 \t \0 \0 277 I c \b i 021 001 003 U \t \0 \0 253
0010100 K 225 I i \n \0 \0 277 \b \0 \0 277 J h d I
0010120 h \r 005 \0 \0 020 \0 ( 8 3 D E B U G
0010140 G E R - L O O P 7 3 E R R O
0010160 R ! 6 9 R E P O R T - C O N
0010200 D I T I O N 6 1 E N T E R -
0010220 D E B U G G E R - P 4 9 R A
0010240 I S E - S I G N A L 4 5 E R
0010260 R M - T O - C O N D I T I O N
0010300 3 5 F A K E - T Y P E P - F O
0010320 R - C O N D I T I O N S ) \r ( 3
0010340 2 C O N D I T I O N 2 2 E
0010360 R R O R ! ) \r ( ) \r I N T E R R
0010400 U P T D 1 \r ( I 0 I N T F
0010420 N ) \0 \r \0 \0 \0 001 h @ g \0 \0 h d
0010440 \r 005 \0 \0 020 \0 ( 1 0 D E B U G G
0010460 E R - L O O P ) \r ( 4 I N T E
0010500 R R U P T ) \r ( ) \r F A U L T E
0010520 V A L D 1 \r ( P 1 T E M 2
0010540 P 0 T E M I 0 F A U
0010560 L T X F 2 C L I S P A R R
0010600 A Y F 3 D W I M F L G F
0010620 4 C O M P I L E R M A C R O
0010640 P R O P S F 5 * M A C R O
0010660 E X P A N D - H O O K * F 6
0010700 L A M B D A S P L S T ) \0 v
0010720 002 005 \0 001 021 001 @ 003 265 022 S 262 h g \0
0010740 \0 \t \0 \0 262 ` @ \t \0 \0 020 001 X d 004 l
0010760 004 360 262 < T \n \0 \0 Y 262 # @ d I \n \0
0011000 \0 Y 364 263 031 R 262 023 @ I 003 265 \t g \0 \0
0011020 I h 032 032 R \v \0 \0 277 I , 020 H 301 002 311
0011040 \0 g \0 \0 ' Y 265 026 @ 001 \t \0 \0 X 003 262
0011060 254 H 001 V 034 262 246 @ \t \0 \0 020 @ h l 003
0011100 U 016 , 020 @ \t \0 \0 020 \0 ( 1 1 5 O
0011120 L D F A U L T 1 1 0 2 \ E V
0011140 A L F O R M A S L A M B D A 8
0011160 8 G E T D 6 7 P U T H A S
0011200 H 4 4 M A C R O E X P A N S
0011220 I O N 3 5 G E T M A C R O P
0011240 R O P 2 1 N E W F A U L T 1
0011260 1 5 \ D E F I N E D P ) \r (
0011300 7 9 M A C R O - F N 5 9 P
0011320 R O G N 1 2 N E W F A U L T
0011340 1 ) \r ( ) \r F A U L T A P P L Y
0011360 D 1 \r ( P 8 C N T P 7
0011400 F N P 6 T R A N F N P
0011420 5 T R A N P 4 % % L E
0011440 X I C A L - E N V I R O N M E N
0011460 T % % P 3 D E F P 0
0011500 \ I N T E R R U P T A B L E I
0011520 1 F A U L T A R G S I 0
0011540 F A U L T F N F 9 C L I
0011560 S P A R R A Y F 1 0 L A M
0011600 B D A S P L S T F 1 1 L A
0011620 M B D A T R A N F N S ) \0 320 \t
0011640 003 \0 002 @ \t \0 \0 262 5 021 020 \0 g \0 \0 @
0011660 i \v \0 \0 277 A 022 021 021 002 j 272 I 260 027 d
0011700 001 375 002 J k 330 Z n 002 \0 361 227 o \0 \0 \0
0011720 \t \0 \0 277 265 353 J g \0 \0 016 020 @ d 004 l
0011740 004 360 222 \t \0 \0 021 021 004 K 303 \0 \0 233 K \t
0011760 \0 \0 274 K \t \0 \0 [ 260 362 021 006 K 003 230
0012000 K d 001 W 024 034 263 035 277 o \0 \0 \0 g \0 \0
0012020 g \0 \0 @ \v \0 \0 \n \0 \0 277 @ j 021 002 \b
0012040 A 260 I W 022 \n \0 \0 ] 265 037 K 001 W 026 026
0012060 002 001 ^ 262 027 K k N 016 ] 003 235 W 022 227 K
0012100 M W 022 \v \0 \0 277 M [ 203 L 262 276 K A \n
0012120 \0 \0 020 d 001 375 002 O 020 k 330 _ 020 n 002 \0
0012140 361 227 o \0 \0 \0 \t \0 \0 277 265 351 O 020 O 016
0012160 016 020 \0 ( 1 9 7 L I S P E R R O
0012200 R 1 7 4 A P P L Y 1 6 2
0012220 P U T H A S H 1 3 2 G E T H
0012240 A S H 1 1 8 C L : C E R R O
0012260 R 1 1 5 M A K E - C O N D I
0012300 T I O N 8 3 C L O S U R E -
0012320 F U N C T I O N 7 8 C L O S
0012340 U R E - E N V I R O N M E N T
0012360 6 6 G E T D 4 7 L I S P E
0012400 R R O R 1 6 P U T D 3 C
0012420 C O D E P ) \r ( 1 1 1 : N A M
0012440 E 1 0 8 U N D E F I N E D -
0012460 F U N C T I O N 7 3 C L O S
0012500 U R E 5 4 \ I N T E R P R E
0012520 T E R - D U M M Y 1 1 \ I N
0012540 T E R P R E T E R - D U M M Y )
0012560 \r ( 1 9 4 " T O O M A N Y
0012600 A R G U M E N T S " 1 0 5
0012620 " C a l l t h e f u n c t i
0012640 o n a g a i n " 4 4 " T O
0012660 O M A N Y A R G U M E N T S
0012700 " ) \r O L D F A U L T 1 A 0 0 0
0012720 1 D 1 \r ( P 1 C N T P
0012740 0 F N F 2 F A U L T A P
0012760 P L Y F L G F 3 F A U L T
0013000 F N F 4 F A U L T A R G S
0013020 F 5 F A U L T X ) \0 , 002
0013040 004 \0 \0 R 262 % S j 021 002 001 T 260 027 d 001
0013060 375 002 I k 330 Y n 002 \0 361 227 o \0 \0 \0 \t
0013100 \0 \0 277 265 353 I H 016 020 U \t \0 \0 020 \0 (
0013120 4 1 E V A L 3 0 L I S P E
0013140 R R O R ) \r N I L \r ( 2 7 "
0013160 T O O M A N Y A R G U M E N
0013200 T S " ) \r O L D F A U L T 1 D
0013220 1 \r ( P 2 P R I N T M S G
0013240 P 1 F A U L T F N P 0
0013260 F A U L T P O S I 2 F A U
0013300 L T A P P L Y F L G I 1 F
0013320 A U L T A R G S I 0 F A U
0013340 L T X F 3 * L A S T - C O
0013360 N D I T I O N * ) \0 5 003 001 \0 003
0013400 m 377 B 223 g \0 \0 202 g \0 \0 \n \0 \0 @ i
0013420 021 003 002 B 222 l . 216 @ d 004 l 004 360 223 277
0013440 l , 203 001 271 l - I \n \0 \0 S g \0 \0 \n
0013460 \0 \0 h 020 \0 ( 4 9 E R R O R X
0013500 4 2 S E T E R R O R N 1 3
0013520 S T K N T H ) \r ( 4 6 O L D F
0013540 A U L T 1 A 0 0 0 1 1 0 F A
0013560 U L T E V A L 6 F A U L T A
0013600 P P L Y ) \r ( ) \r E R R O R M E
0013620 S S D 1 \r ( P 3 M E S S 2
0013640 P 2 M E S S 1 P 1 A
0013660 0 4 5 3 P 0 C O N D I T I
0013700 O N I 0 U F 4 * L A
0013720 S T - C O N D I T I O N * F
0013740 5 L I S P X H I S T O R Y F
0013760 6 S T O R A G E R R O R S )
0014000 \0 _ 004 003 \0 001 @ g \0 \0 \n \0 \0 221 @
0014020 200 T 021 001 \0 @ 245 \b \0 \0 b \0 277 H g \0
0014040 \0 \n \0 \0 262 ! H \t \0 \0 l 021 360 262 030 H
0014060 \t \0 \0 021 ! 003 I 001 272 I 002 273 J K g \0
0014100 \0 \v \0 \0 020 U 262 032 @ 001 l 022 360 263 023 @
0014120 001 V \n \0 \0 251 g \0 \0 @ 002 001 \n \0 \0 277
0014140 H \t \0 \0 020 \0 ( 9 2 R E P O R T
0014160 - C O N D I T I O N 8 7 L I
0014200 S P X P U T 7 7 M E M B 6
0014220 0 E R R O R M E S S 1 4 3
0014240 O L D - I N T E R L I S P - E R
0014260 R O R - M E S S A G E 3 4 O
0014300 L D - I N T E R L I S P - E R R
0014320 O R - N U M B E R 2 8 F A K
0014340 E - T Y P E P - F O R - C O N D
0014360 I T I O N S 1 8 E R R O R N
0014400 6 F A K E - T Y P E P - F O
0014420 R - C O N D I T I O N S ) \r ( 8
0014440 1 * E R R O R * 5 7 E R R
0014460 O R 2 5 O L D - I N T E R L
0014500 I S P - E R R O R 3 C O N D
0014520 I T I O N ) \r ( ) \r E R R O R M
0014540 E S S 1 D 1 \r ( P 2 X P
0014560 1 M E S S A G E P 0 B
0014600 A D G U Y I 2 M E S S 3
0014620 I 1 M E S S 2 I 0 M E
0014640 S S 1 F 3 L I S P X H I S
0014660 T O R Y ) \0 k 003 001 \0 003 021 001 @
0014700 265 \r A 247 B i d \v \0 \0 h 020 @ i \n \0
0014720 \0 @ 021 001 002 J h 360 265 \v J l \b \n \0 \0
0014740 264 003 i 022 243 A 005 \a 225 k i \n \0 \0 203 i
0014760 \t \0 \0 277 @ X A Y d 005 \a 232 A i \n \0
0015000 \0 277 i \t \0 \0 211 A X i d \v \0 \0 277 @
0015020 Y 277 S 264 270 B g \0 \0 360 263 260 g \0 \0 H
0015040 \n \0 \0 277 260 246 \0 ( 1 0 2 L I S P
0015060 X P U T 8 1 L I S P X P R I
0015100 N T 7 3 L I S P X T E R P R
0015120 I 6 8 L I S P X P R I N 1
0015140 5 4 L I S P X T E R P R I 4
0015160 9 L I S P X S P A C E S 3 5
0015200 \ T Y P E M A S K . U F N 2
0015220 0 L I S P X P R I N 1 1 3
0015240 L I S P X P R I N T ) \r ( 9 8
0015260 * E R R O R * 9 2 h e l p !
0015300 ) \r ( ) \r ( R P A Q ? H E L P
0015320 D E P T H 7 ) \r ( R P A Q ?
0015340 W B R E A K ) \r ( R P A Q ? N
0015360 B R E A K S 0 ) \r ( R P A Q ?
0015400 B R O K E N F N S ) \r ( R P A
0015420 Q ? B R E A K D E L I M I T E
0015440 R " \r " ) \r ( R P A Q ? H E
0015460 L P T I M E 1 0 0 0 ) \r ( R P
0015500 A Q ? H E L P C L O C K ) \r (
0015520 R P A Q ? N L S E T Q G A G
0015540 T ) \r ( R P A Q ? * M A C R O
0015560 E X P A N D - H O O K * ( Q U
0015600 O T E C L : F U N C A L L ) )
0015620 \r ( R P A Q ? C O M P I L E R
0015640 M A C R O P R O P S ( Q U O T
0015660 E ( D M A C R O A L T O M A
0015700 C R O B Y T E M A C R O M A
0015720 C R O ) ) ) \r ( O R ( A N D
0015740 ( B O U N D P ( Q U O T E C
0015760 L I S P A R R A Y ) ) C L I S
0016000 P A R R A Y ) ( S E T Q C L
0016020 I S P A R R A Y ( H A S H A R
0016040 R A Y 1 0 0 0 ) ) ) \r ( O R
0016060 ( N E Q ( Q U O T E N O B I
0016100 N D ) ( G E T T O P V A L (
0016120 Q U O T E H E L P F L A G ) )
0016140 ) ( S E T T O P V A L ( Q U
0016160 O T E H E L P F L A G ) T )
0016200 ) \r ( A D D T O V A R S Y S S
0016220 P E C V A R S H E L P F L A G
0016240 ) \r B R E A K 1 A 0 0 0 1 D 1
0016260 \r ( F 0 B R K E X P ) \0 006
0016300 \0 001 \0 \0 P \t \0 \0 020 \0 ( 3 E V A
0016320 L ) \r N I L \r ( ) \r B R E A K 1
0016340 D 1 \r ( I 5 C O N D I T I
0016360 O N I 4 B R K T Y P E I
0016400 3 B R K C O M S I 2 B
0016420 R K F N I 1 B R K W H E N
0016440 I 0 B R K E X P ) \0 021 \0
0016460 \0 001 006 A \t \0 \0 264 \v g \0 \0 B D E \f
0016500 \0 \0 020 \0 ( 1 4 D E B U G G E R
0016520 - L O O P 3 E V A L ) \r ( 8
0016540 B R E A K 1 A 0 0 0 1 ) \r ( )
0016560 \r ( R P A Q B R E A K T T B L
0016600 ( C O P Y T E R M T A B L E
0016620 ( Q U O T E O R I G ) ) ) \r V
0016640 I R G I N F N D 1 \r ( P 5
0016660 X P 4 D P 3 X 5 P
0016700 2 X 3 P 1 X 2 P 0
0016720 X 1 I 1 F L G I 0
0016740 F N ) \0 305 006 \0 \0 002 @ g \0 \0 \n \0
0016760 \0 @ g \0 \0 \n \0 \0 @ g \0 \0 \n \0 \0 @
0017000 g \0 \0 \n \0 \0 021 024 004 A 262 ^ H 262 027 @
0017020 i d \v \0 \0 277 o \0 \0 \0 i \n \0 \0 277 @
0017040 \t \0 \0 277 I 262 034 @ i d \v \0 \0 277 o \0
0017060 \0 \0 i \n \0 \0 277 g \0 \0 @ h 032 \n \0 \0
0017100 277 J 262 027 @ i d \v \0 \0 277 o \0 \0 \0 i
0017120 \n \0 \0 277 @ \t \0 \0 277 @ \t \0 \0 \ \t \0
0017140 \0 263 K K 262 H K 020 I 230 @ g \0 \0 \n \0
0017160 \0 265 006 H 265 003 @ \t \0 \0 \ d 003 223 d 002
0017200 003 244 K 265 * L 020 J 262 $ A 244 L \t \0 \0
0017220 274 J 260 027 d 001 021 001 005 M d g \0 \0 @ \v
0017240 \0 \0 L \v \0 \0 \ 023 002 003 265 352 L 020 \0 (
0017260 1 8 7 / D S U B S T 1 8 3
0017300 P A C K * 1 6 5 C O P Y 1
0017320 4 3 G E T D 1 3 4 G E T P
0017340 R O P 1 1 8 E X P R P 1 1
0017360 4 G E T D 1 0 9 R E S T O
0017400 R E N A M E S 1 0 4 P R I N
0017420 1 9 5 P R I N 2 8 5 A P
0017440 P L Y 7 5 P R I N 1 6 6
0017460 P R I N 2 5 6 U N B R E A K
0017500 0 5 1 P R I N 1 4 2 P R
0017520 I N 2 2 7 G E T P R O P 2
0017540 0 G E T P R O P 1 3 G E T
0017560 P R O P 6 G E T P R O P ) \r
0017600 ( 1 7 9 - I N - 1 3 1 A D
0017620 V I S E D 7 9 U N A D V I S
0017640 E 2 4 E X P R 1 7 N A M
0017660 E S C H A N G E D 1 0 A D V
0017700 I S E D 3 B R O K E N ) \r (
0017720 1 0 0 " n a m e s r e s
0017740 t o r e d . \r " 7 1 " u n
0017760 a d v i s e d . \r " 4 7 "
0020000 u n b r o k e n . \r " ) \r R E S
0020020 T O R E D 1 \r ( P 0 Y I
0020040 1 X I 0 F N ) \0 & 001
0020060 \0 \0 002 021 020 \0 @ A \n \0 \0 X 264 033 @ H
0020100 d 004 l 004 360 227 \t \0 \0 H \t \0 \0 277 \n \0
0020120 \0 @ A \n \0 \0 @ 020 \0 ( 3 4 / R E
0020140 M P R O P 2 9 / P U T D 2
0020160 5 / P U T D 2 1 G E T D
0020200 7 G E T P R O P ) \r N I L \r (
0020220 ) \r B R K L A S T P O S D 1 \r
0020240 ( P 0 P O S I 0 F L G
0020260 ) \0 8 001 \0 \0 001 m 377 g \0 \0 i \v \0
0020300 \0 021 001 \0 H \t \0 \0 d g \0 \0 360 263 024 d
0020320 g \0 \0 360 253 d g \0 \0 360 245 d g \0 \0 360
0020340 233 277 m 377 H h H \f \0 \0 X 260 332 H 020 \0
0020360 ( 4 9 R E A L S T K N T H 1
0020400 5 S T K N A M E 8 R E A L
0020420 S T K N T H ) \r ( 3 8 E R R O
0020440 R X 3 2 C L : B R E A K 2
0020460 6 D E B U G 1 9 C L : E R
0020500 R O R 4 D E B U G G E R - L
0020520 O O P ) \r ( ) \r U N B R E A K 0
0020540 D 1 \r ( P 6 V A L P 5
0020560 B R K I N F O P 4 A L I
0020600 A S P 3 F N I 1 T A
0020620 I L I 0 F N F 7 B R
0020640 O K E N F N S F 8 D W I M
0020660 F L G F 9 U S E R W O R D
0020700 S F 1 0 L A S T W O R D )
0020720 \0 254 \a 004 \0 002 021 0 002 @ \t \0 \0 261 \0
0020740 233 d 001 021 001 003 K g \0 \0 \n \0 \0 K g \0
0020760 \0 \n \0 \0 021 022 006 K i 360 224 W 016 001 260 9
0021000 W 020 262 = K W 016 034 263 0 K \t \0 \0 263 *
0021020 K g \0 \0 \n \0 \0 263 ! K l F W 016 h A
0021040 \r 005 \0 \0 265 023 K l F W 022 h A g \0 \0
0021060 \r 006 \0 \0 265 003 K 273 W 020 223 K c 024 277 g
0021100 \0 \0 K W 016 \n \0 \0 \n \0 \0 277 K g \0 \0
0021120 \n \0 \0 276 L 003 262 023 K g \0 \0 \n \0 \0 250
0021140 L 001 L 002 i \v \0 \0 277 N 022 022 270 I 265 \a
0021160 H h 032 Z 201 H & 271 002 003 265 003 202 261 377 d
0021200 J 020 \0 ( 1 4 4 C H N G N M 1
0021220 3 5 G E T P R O P 1 2 3 R
0021240 E S T O R E 1 1 5 / S E T A
0021260 T O M V A L 1 1 2 / D R E M
0021300 O V E 9 2 F I X S P E L L
0021320 7 6 F I X S P E L L 6 3 G
0021340 E T P R O P 5 4 \ D E F I N
0021360 E D P 2 8 G E T P R O P 2
0021400 1 G E T P R O P 6 P A C K
0021420 - I N - ) \r ( 1 3 2 A D V I S
0021440 E D 1 2 0 B R O K E N 1 0
0021460 6 B R O K E N F N S 8 8 G
0021500 E T D 6 0 E X P R 2 5 B
0021520 R K I N F O 1 8 A L I A S )
0021540 \r ( ) \r S M A R T A R G L I S T
0021560 A 0 0 0 1 D 1 \r ( N A M E E
0021600 R R O R S E T F 0 F N F
0021620 1 T E M ) \0 \f \0 002 002 \0 P g
0021640 \0 \0 \n \0 \0 c 002 i 020 \0 ( 6 H E L
0021660 P S Y S ) \r ( 3 A R G S ) \r (
0021700 ) \r S M A R T A R G L I S T D
0021720 1 \r ( P 1 D E F P 0 T
0021740 E M I 2 T A I L I 1
0021760 E X P L A I N F L G I 0 F
0022000 N F 2 C O M P I L E R M A
0022020 C R O P R O P S ) 001 335 002 001 \0 003
0022040 021 001 @ d 004 l 004 360 222 261 001 244 277 A 242
0022060 261 001 222 @ d 003 242 261 001 214 d 001 g \0 \0 360
0022100 242 261 001 202 002 001 \t \0 \0 020 002 001 X d 003 222
0022120 001 221 H 020 A 263 \ H 002 002 020 @ 301 002 311 \0
0022140 g \0 \0 ' Y 265 P @ 301 002 311 \0 g \0 \0 '
0022160 Y 265 003 202 261 \0 203 @ \t \0 \0 265 \f @ o \0
0022200 \0 \0 \n \0 \0 002 001 Y 265 O A 242 261 001 # @
0022220 R \n \0 \0 X d 242 261 001 031 001 d g \0 \0 360
0022240 256 d g \0 \0 360 250 d g \0 \0 360 242 261 \0 312
0022260 277 H 002 001 020 003 001 d g \0 \0 360 253 d g \0
0022300 \0 360 245 d g \0 \0 360 222 277 i 201 277 h 262 231
0022320 I 002 001 \t \0 \0 020 \t \0 \0 245 I \t \0 \0 262
0022340 R A 262 J I \t \0 \0 d l 002 360 245 d l 003
0022360 360 262 8 277 i 260 6 001 d g \0 \0 360 245 d g
0022400 \0 \0 360 223 277 i 260 027 d g \0 \0 360 245 d g
0022420 \0 \0 360 226 277 I 001 I 002 271 201 277 h 242 261 377
0022440 Y I 002 002 001 \t \0 \0 020 277 h 244 I \t \0 \0
0022460 020 g \0 \0 \t \0 \0 242 261 377 R o \0 \0 \0 \t
0022500 \0 \0 242 261 377 G H 242 261 377 B H 001 241 h 270
0022520 I \t \0 \0 H \t \0 \0 360 244 I \t \0 \0 270 @
0022540 g \0 \0 I \t \0 \0 264 004 H 206 H I \t \0 \0
0022560 032 032 \v \0 \0 H 020 d g \0 \0 360 234 277 H 002
0022600 h b 004 277 b \0 023 261 376 231 241 h 020 H 001 003
0022620 264 6 H 001 \t \0 \0 002 262 024 H 001 g \0 \0 H
0022640 001 \t \0 \0 002 h 032 032 \n \0 \0 020 H 001 020 H
0022660 i 360 242 H 265 022 @ i h i B \r 005 \0 \0 X
0022700 265 \a @ \t \0 \0 020 @ 360 263 371 H b \0 o \0
0022720 \0 \0 \n \0 \0 X 265 003 202 261 376 q A 242 261 376
0022740 231 @ 301 002 311 \0 g \0 \0 ' Y 265 333 @ \t \0
0022760 \0 242 261 376 i @ \t \0 \0 261 376 k \0 ( 4 7
0023000 2 G E T D 4 6 4 E X P R P
0023020 4 3 6 G E T L I S 4 2 1
0023040 A R G L I S T 4 1 4 F N C H
0023060 E C K 3 9 4 \ A P P E N D 2
0023100 3 8 7 L A S T 3 7 4 L A
0023120 S T 3 4 0 / P U T 3 3 5
0023140 A R G L I S T 3 2 6 S U B R
0023160 P 3 1 7 A R G L I S T 3 1
0023200 1 L E N G T H 3 0 7 N A R
0023220 G S 2 8 9 S M A R T A R G L
0023240 I S T A 0 0 0 1 2 7 8 \ D E
0023260 F I N E D P 2 7 1 A R G L I
0023300 S T 2 6 3 \ S I M P L I F Y
0023320 . C L . A R G L I S T 1 9 9
0023340 A R G T Y P E 1 9 0 C C O D
0023360 E P 1 8 5 E X P R P 1 8 1
0023400 \ S I M P L I F Y . C L . A R
0023420 G L I S T 1 1 5 G E T M A C
0023440 R O P R O P 1 0 0 G E T L I
0023460 S 9 0 G E T D 4 0 \ S I
0023500 M P L I F Y . C L . A R G L I S
0023520 T ) \r ( 4 5 6 A R G U M E N T
0023540 - L I S T 3 8 2 . . . 3 4
0023560 6 = 3 2 2 A R G N A M E S
0023600 2 7 5 H E L P S Y S 2 4 1
0023620 D E F C O M M A N D 2 3 5
0023640 D E F D E F I N E R 2 2 5 C
0023660 L : D E F U N 2 1 9 D E F M
0023700 A C R O 1 6 6 N L A M B D A
0023720 1 6 0 L A M B D A 1 5 4
0023740 C L : L A M B D A 1 3 8 O P
0023760 E N L A M B D A 1 3 2 N L A
0024000 M B D A 1 2 6 L A M B D A
0024020 7 8 F U N C T I O N S 6 6
0024040 E X P R 3 0 C L : L A M B D
0024060 A ) \r ( 4 3 3 ( A R G N A M
0024100 E S ) 2 8 6 ( S M A R T A R
0024120 G L I S T A 0 0 0 1 ) 9 7 (
0024140 E X P R C O D E ) ) \r P R O C
0024160 E E D - F R O M - B R E A K D
0024200 1 \r ( P 1 C A S E P 0
0024220 K E Y S F 2 * L A S T - C
0024240 O N D I T I O N * F 3 * D
0024260 E B U G - I O * ) \0 5 002 002 \0 \0
0024300 R \t \0 \0 021 001 \0 H 265 \v S o \0 \0 \0 \n
0024320 \0 \0 020 h d o \0 \0 \0 \f \0 \0 277 h d o
0024340 \0 \0 \0 H i \r 005 \0 \0 021 001 001 I d 223 R
0024360 \n \0 \0 020 \0 ( 5 0 P R O C E E D
0024400 - W I T H - D E F A U L T S 4
0024420 0 A S K U S E R 2 7 A S K
0024440 U S E R E X P L A I N 1 7 F
0024460 O R M A T 3 C R E A T E - P
0024500 R O C E E D - K E Y L I S T ) \r
0024520 N I L \r ( 3 4 " P r o c e e
0024540 d h o w ? " 2 4 " \r "
0024560 1 4 " ~ & N o p r o c e e d
0024600 c a s e s e n a b l e d . ~
0024620 % % " ) \r P R O C E E D - W I T
0024640 H - D E F A U L T S D 1 \r ( P
0024660 3 C N T P 2 F N P
0024700 1 A R G S P 0 N A M E
0024720 I 1 C O N D I T I O N I
0024740 0 C A S E ) \0 V 004 \0 \0 002 @ \t
0024760 \0 \0 021 001 \0 H d 262 " \t \0 \0 264 035 g \0
0025000 \0 H g \0 \0 A h 032 032 h 032 032 H o \0 \0
0025020 \0 032 h 032 032 032 \t \0 \0 021 ! 003 g \0 \0 l
0025040 002 273 272 @ A I 260 027 d 001 375 002 K k 330 [
0025060 n 002 \0 361 227 o \0 \0 \0 \t \0 \0 277 265 353 K
0025100 J 016 020 \0 ( 7 7 L I S P E R R O
0025120 R 4 2 C L : E V A L 1 3
0025140 C L : F B O U N D P 3 P R O
0025160 C E E D - C A S E - N A M E ) \r
0025200 ( 4 8 I N V O K E - P R O C E
0025220 E D - C A S E 2 2 Q U O T E
0025240 1 8 P R O C E E D - C A S E
0025260 ) \r ( 7 4 " T O O M A N Y
0025300 A R G U M E N T S " 3 4 (
0025320 ( I G N O R E & R E S T A R
0025340 G S ) : T E S T T R U E A
0025360 R G S ) ) \r C R E A T E - P R O
0025400 C E E D - K E Y L I S T D 1 \r
0025420 ( P 1 0 K E Y L I S T P
0025440 9 M E S S A G E P 8 C A
0025460 S E P 4 I P 0 C A S
0025500 E S I 0 C O N D I T I O N
0025520 ) \0 217 \v \0 \0 001 @ \t \0 \0 021 ! 002 H
0025540 d 262 037 k 021 R \t K 003 265 030 M 022 021 001 \n
0025560 O 024 \t \0 \0 272 o \0 \0 \0 271 J I 031 O 024
0025600 020 001 _ 020 277 h o \0 \0 \0 O 020 \v \0 \0 _
0025620 022 277 L O 022 g \0 \0 i g \0 \0 L o \0 \0
0025640 \0 O 022 \v \0 \0 g \0 \0 i g \0 \0 g \0 \0
0025660 o \0 \0 \0 g \0 \0 O 020 h 032 032 h 032 032 032
0025700 h 032 032 032 032 032 032 032 032 032 032 _ 016 277 N 265
0025720 021 O 016 h 032 ^ 275 K 002 273 L k 324 274 260 211
0025740 O 016 & 276 260 363 \0 ( 7 7 C O N C A
0025760 T 5 4 F O R M A T 2 8 L
0026000 A S T 3 C O M P U T E - P R
0026020 O C E E D - C A S E S ) \r ( 9 4
0026040 Q U O T E 8 7 P R O G N
0026060 8 4 R E T U R N 8 0 C O N
0026100 F I R M F L G 6 7 E X P L A
0026120 I N S T R I N G 6 3 N O E C
0026140 H O F L G ) \r ( 9 1 ( T E R
0026160 P R I T ) 7 2 " - "
0026200 4 9 " ~ A " 3 3 ( ( " N
0026220 " " N o - d o n ' t p r
0026240 o c e e d " N O E C H O F L
0026260 G T C O N F I R M F L G T
0026300 A U T O C O N F I R M F L G
0026320 T R E T U R N ( T E R P R I
0026340 T ) ) ) ) \r T R A C E D 1 \r
0026360 ( P 3 Z I 0 X ) \0 243
0026400 004 \0 003 001 \b \0 \0 021 0 002 @ \t \0 \0 261 \0
0026420 207 d 001 021 001 003 K g \0 \0 g \0 \0 g \0 \0
0026440 g \0 \0 o \0 \0 \0 g \0 \0 K h 032 032 h 032
0026460 032 032 032 g \0 \0 g \0 \0 g \0 \0 K h 032 032
0026500 o \0 \0 \0 032 032 g \0 \0 g \0 \0 K h 032 032
0026520 h 032 032 o \0 \0 \0 032 032 032 g \0 \0 o \0 \0
0026540 \0 g \0 \0 g \0 \0 o \0 \0 \0 g \0 \0 K h
0026560 032 032 o \0 \0 \0 032 032 032 032 o \0 \0 \0 032 032
0026600 032 h 032 032 032 032 \v \0 \0 022 X 003 226 I 265 020
0026620 H Z Y 277 002 003 265 003 202 261 377 x J 020 \t \0
0026640 \0 Y H 031 260 357 \0 ( 1 5 6 L A S T
0026660 1 3 2 A D V I S E 9 N L
0026700 A M B D A . A R G S 2 I N I
0026720 T - T R A C E - O U T P U T ) \r
0026740 ( 1 0 5 Q U O T E 9 8 * T
0026760 R A C E - O U T P U T * 9 5
0027000 F O R M A T 8 8 L E T 7 1
0027020 Q U O T E 6 8 S T K A R G
0027040 S 5 5 Q U O T E 5 2 S M
0027060 A R T A R G L I S T 4 9 P R
0027100 I N T - A R G L I S T 3 7 Q
0027120 U O T E 3 0 * T R A C E - O
0027140 U T P U T * 2 7 F O R M A T
0027160 2 4 P R O G N 2 1 A R O
0027200 U N D ) \r ( 1 2 1 ( ( C L :
0027220 V A L U E S - L I S T C L : V
0027240 A L U E S ) ) 1 1 3 ( C L :
0027260 V A L U E S ) 1 0 2 " ~ S
0027300 = ~ S ~ & " 9 2 ( ( C L : V
0027320 A L U E S ( C L : M U L T I P
0027340 L E - V A L U E - L I S T * )
0027360 ) ) \r 8 2 ( * T R A C E - O
0027400 U T P U T * 0 ) 6 3 ( T )
0027420 3 4 " ~ S : ~ & " ) \r S T K
0027440 P O Z D 1 \r ( P 2 S A W N
0027460 A M E P 1 F N P 0 L
0027500 S T P O S I 0 X F 3
0027520 L A S T P O S ) \0 220 003 001 \0 001 i
0027540 \t \0 \0 021 ! 002 @ 230 @ d 003 263 q \t \0 \0
0027560 277 j H S \v \0 \0 277 H \t \0 \0 S 020 g \0
0027600 \0 360 236 j @ 002 001 \t \0 \0 \n \0 \0 270 @ 002
0027620 260 F @ d 001 3 020 262 031 277 j @ 001 363 227 @
0027640 001 H d \v \0 \0 205 @ 001 H \n \0 \0 X 260 &
0027660 002 001 g \0 \0 360 237 @ 001 j @ 002 002 001 331 \n
0027700 \0 \0 277 @ 002 002 216 m 377 H d \v \0 \0 277 @
0027720 001 \t \0 \0 277 @ 002 b \0 262 230 @ 001 d g \0
0027740 \0 360 262 234 277 j S H \v \0 \0 X 260 350 \0 (
0027760 1 3 9 S T K N T H 1 1 6 S
0030000 T K P O Z 1 1 1 0 S T K N T
0030020 H 9 8 S T K P O Z 1 7 7
0030040 S T K P O Z 2 7 0 S T K N T
0030060 H 4 5 S T K N T H 4 2 E
0030100 V A L 2 8 R E L S T K 2 3
0030120 S T K N T H 1 6 S T K P O
0030140 Z 1 3 B R K L A S T P O S )
0030160 \r ( 1 2 9 @ 8 5 / 3 3
0030200 = ) \r ( ) \r S T K P O Z 1 A 0 0
0030220 0 1 D 1 \r ( I 0 F N F
0030240 0 B R K P A T ) \0 021 \0 001 \0 001
0030260 @ P 002 001 P 002 002 001 P 002 002 002 \f \0 \0 020
0030300 \0 ( 1 4 S K O R 0 ) \r N I L \r
0030320 ( ) \r S T K P O Z 1 D 1 \r ( P
0030340 1 B R K P A T P 0 T E
0030360 M I 1 N I 0 F N F
0030400 2 L S T P O S F 3 N O
0030420 S P E L L F L G ) \0 d 002 002 \0 002
0030440 021 020 \0 @ A R \v \0 \0 X 233 j H R \v \0
0030460 \0 277 H \t \0 \0 020 S i 360 263 9 021 020 001 @
0030500 o \0 \0 \0 \n \0 \0 \t \0 \0 271 g \0 \0 R \n
0030520 \0 \0 X 022 262 037 g \0 \0 i \n \0 \0 277 H 001
0030540 i \n \0 \0 277 j H 002 R \v \0 \0 277 H 002 \t
0030560 \0 \0 020 R \t \0 \0 277 @ o \0 \0 \0 i \v \0
0030600 \0 h 020 \0 ( 9 6 E R R O R 8 6
0030620 R E L S T K 8 1 R E L S T
0030640 K 7 5 S T K N T H 6 7 P
0030660 R I N T 6 0 P R I N 1 4 9
0030700 S E A R C H P D L 4 1 E D
0030720 I T F P A T 3 8 C O N C A T
0030740 2 1 R E L S T K 1 6 S T
0030760 K N T H 8 S T K P O S ) \r (
0031000 5 6 = 4 5 S T K P O Z 1 A
0031020 0 0 0 1 ) \r ( 9 2 " n o t
0031040 f o u n d " 3 5 " 033 033 " ) \r
0031060 S T K P O Z 2 D 1 \r ( P 1
0031100 P O S 2 P 0 P O S 1 I
0031120 1 P O S I 0 N ) \0 ] 002
0031140 \0 \0 002 021 001 m 377 \t \0 \0 X A \n \0 \0
0031160 225 H \t \0 \0 h 020 @ j 360 263 032 @ d 005 003
0031200 224 \t \0 \0 256 @ k 331 b \0 277 m 377 H d \v
0031220 \0 \0 260 331 m 377 \t \0 \0 271 H 265 \b I \t \0
0031240 \0 h 020 A \n \0 \0 225 H \t \0 \0 I 020 m 377
0031260 H d \v \0 \0 270 m 377 I d \v \0 \0 260 334 \0
0031300 ( 8 9 S T K N T H 8 1 S T
0031320 K N T H 7 2 R E L S T K 6
0031340 7 E Q P 6 1 R E L S T K
0031360 5 3 S T K N T H 4 6 S T K
0031400 N T H 3 2 \ F Z E R O P 1
0031420 7 R E L S T K 1 2 E Q P
0031440 7 S T K N T H ) \r N I L \r ( )
0031460 \r U N B R E A K D 1 \r ( P 3
0031500 L I 0 X F 4 B R O
0031520 K E N F N S ) \0 C 004 001 003 001 @ \t
0031540 \0 \0 b \0 242 T 265 \b 021 0 002 @ 260 ' \t \0
0031560 \0 b \0 277 g \0 \0 \t \0 \0 277 260 355 d 021 001
0031600 003 K 001 K \n \0 \0 022 X 003 226 I 265 \f H Z
0031620 Y 277 002 003 265 351 J 020 \t \0 \0 Y H 031 260 363
0031640 \0 ( 6 0 L A S T 4 0 U N B
0031660 R E A K 0 2 7 / S E T A T O
0031700 M V A L 1 8 R E V E R S E
0031720 3 N L A M B D A . A R G S ) \r
0031740 ( 2 4 B R O K E N F N S ) \r (
0031760 ) \r P A C K - I N - D 1 \r ( P
0032000 5 Y P 1 T E M 2 P
0032020 0 T E M 1 I 0 X ) \0 225
0032040 006 \0 \0 001 @ d 003 242 h 032 020 001 @ 002 002 001
0032060 021 002 001 @ 002 001 g \0 \0 360 251 o \0 \0 \0 @
0032100 i \v \0 \0 020 H 003 262 2 021 0 004 H 260 037 d
0032120 001 021 001 005 M g \0 \0 I h 032 032 032 \t \0 \0
0032140 022 Z 003 226 K 265 \f J \ [ 277 002 003 265 342 L
0032160 020 \t \0 \0 [ J 031 260 363 I 003 262 2 021 0 004
0032200 I 260 037 d 001 021 001 005 H g \0 \0 M h 032 032
0032220 032 \t \0 \0 022 Z 003 226 K 265 \f J \ [ 277 002
0032240 003 265 342 L 020 \t \0 \0 [ J 031 260 363 H g \0
0032260 \0 I \v \0 \0 h 032 020 \0 ( 1 4 4 P A
0032300 C K * 1 3 1 L A S T 1 1 1
0032320 P A C K - I N - 7 9 L A S
0032340 T 5 9 P A C K - I N - 3 1
0032360 E R R O R ) \r ( 1 4 0 - I N
0032400 - 1 0 3 I N 5 1 I N 2
0032420 0 I N ) \r ( 2 6 " n o t
0032440 o f f o r m ( f n 1 I N
0032460 f n 2 ) " ) \r \ S I M P L I F Y
0032500 . C L . A R G L I S T D 1 \r (
0032520 L ( 0 L S T ) ) \0 t 006 \0 \0
0032540 001 @ 021 Q 005 H 003 265 004 I 020 001 \ d 003 262
0032560 # 277 M d g \0 \0 360 224 277 L 001 260 E g \0
0032600 \0 360 233 L d 001 003 223 001 001 260 7 001 260 4 L
0032620 260 1 g \0 \0 360 263 323 L d g \0 \0 360 263 "
0032640 d g \0 \0 360 263 033 d g \0 \0 360 263 024 d g
0032660 \0 \0 360 253 d g \0 \0 360 245 d g \0 \0 360 220
0032700 ] 273 J 265 \f K h 032 Z 271 H 002 X 260 231 K
0032720 & 272 260 370 \0 N I L \r ( 9 2 & E N
0032740 V I R O N M E N T 8 6 & R E
0032760 S T 8 0 & B O D Y 7 3 &
0033000 K E Y 6 6 & O P T I O N A L
0033020 5 9 & A U X 5 1 & A U X
0033040 3 1 & K E Y 2 1 & O P T
0033060 I O N A L ) \r ( ) \r R E S T O R
0033100 E N A M E S A 0 0 0 1 D 1 \r (
0033120 N A M E E R R O R S E T F
0033140 0 N O L I N K M E S S F 1
0033160 D E F F 2 F N F 3
0033200 N E W F 4 X X X ) \0 017 \0
0033220 005 002 \0 i c \0 277 Q S T R \f \0 \0 h 032
0033240 020 \0 ( 1 0 C H A N G E N A M E
0033260 1 ) \r N I L \r ( ) \r R E S T O R
0033300 E N A M E S D 1 \r ( P 1 1
0033320 M A C R O Y P 1 0 M A C R
0033340 O X P 9 Z P 8 N E W
0033360 P 7 D E F P 6 F N
0033400 P 5 M A C R O Y P 4 M
0033420 A C R O X P 3 X X X I
0033440 0 F N F 1 2 R E S E T V
0033460 A R S L S T F 1 3 B R O K
0033500 E N F N S F 1 4 N O L I N
0033520 K M E S S ) 001 \0 \f 003 \0 001 021 0 002
0033540 @ g \0 \0 \n \0 \0 261 \0 343 d 001 021 1 006 N
0033560 g \0 \0 \n \0 \0 265 \f N g \0 \0 \n \0 \0 265
0033600 003 N \t \0 \0 K g \0 \0 N \v \0 \0 021 022 \t
0033620 O 020 \t \0 \0 277 O 020 W 032 034 235 g \0 \0 O
0033640 020 W 032 \n \0 \0 \n \0 \0 277 K N g \0 \0 \n
0033660 \0 \0 \n \0 \0 _ 022 231 N g \0 \0 O 022 \v \0
0033700 \0 206 N g \0 \0 \n \0 \0 277 O 020 g \0 \0 \n
0033720 \0 \0 277 O 016 264 5 g \0 \0 W 034 032 W 030 032
0033740 c 030 021 021 \v W 030 _ 026 277 o \0 \0 \0 g \0
0033760 \0 \n \0 \0 O 024 001 002 c 034 277 O 026 d W 030
0034000 360 236 277 O 024 002 c 030 260 033 o \0 \0 \0 032 260
0034020 , W 030 \n \0 \0 234 W 030 k O 026 \v \0 \0 O
0034040 024 002 031 277 265 005 \b \0 \0 022 001 255 O 020 o \0
0034060 \0 \0 N h 032 \n \0 \0 032 200 K 022 022 270 I 265
0034100 \a H h 032 Z 201 H & 271 002 003 265 003 202 261 377
0034120 034 J 022 @ g \0 \0 \n \0 \0 277 020 \0 ( 2 5
0034140 2 / R E M P R O P 2 1 8 \
0034160 A P P E N D 2 2 0 3 E R R O
0034200 R ! 1 9 3 N L E F T 1 8 4
0034220 T A I L P 1 5 0 R E S T O
0034240 R E N A M E S A 0 0 0 1 1 1 6
0034260 / R E M P R O P 1 0 7 / R
0034300 E M P R O P 9 9 / P U T P R
0034320 O P 8 7 R E M O V E 8 4
0034340 G E T P R O P 7 5 / S E T A
0034360 T O M V A L 7 2 R E M O V E
0034400 5 5 / P U T D 4 7 P A C
0034420 K * 3 9 G E T D 3 3 G E
0034440 T P 2 4 G E T P 9 G E T
0034460 P R O P ) \r ( 2 4 9 N A M E S
0034500 C H A N G E D 1 4 7 I N T E
0034520 R N A L 1 2 4 N O L I N K M
0034540 E S S 1 1 3 A L I A S 1 0
0034560 4 N A M E S C H A N G E D 9
0034600 4 N A M E S C H A N G E D 8
0034620 1 N A M E S C H A N G E D 6
0034640 5 B R O K E N F N S 4 3 -
0034660 I N - 3 0 B R O K E N 2 1
0034700 A D V I S E D 6 N A M E S
0034720 C H A N G E D ) \r ( 2 1 2 (
0034740 n o t f o u n d i n ) 1 7
0034760 6 ( n o t d e f i n e d )
0035000 1 4 4 ( R E S T O R E N A M E
0035020 S A 0 0 0 1 ) ) \r A T T A C H -
0035040 B A C K T R A C E - M E N U D
0035060 1 \r ( P 1 3 A T W P 1 1
0035100 D I S P B A K T R A C E L I S
0035120 T P 1 0 Z P 9 Y P
0035140 8 X P 7 F N P 6
0035160 N P 3 B K M E N U P 2
0035200 B T W P 1 T T Y R E G I
0035220 O N P 0 P O S I 1 S
0035240 K I P I 0 T T Y W I N D O
0035260 W F 1 4 M a x B k M e n u
0035300 W i d t h F 1 5 \ T E R M
0035320 . O F D F 1 6 B A C K T R
0035340 A C E F O N T ) 001 245 016 003 \0 002 @
0035360 247 W 036 \t \0 \0 b \0 277 j @ g \0 \0 \n \0
0035400 \0 265 \t o \0 \0 \0 \t \0 \0 \n \0 \0 @ \t \0
0035420 \0 311 006 021 B 005 ` \0 \0 037 j 021 Q \v H \t
0035440 \0 \0 _ 016 277 A 262 @ O 016 d g \0 \0 360 223
0035460 277 h 260 3 g \0 \0 360 222 h 260 + O 016 g \0
0035500 \0 360 257 O 016 g \0 \0 360 250 O 016 d g \0 \0
0035520 360 222 277 h 217 004 l 004 360 262 035 O 016 \t \0 \0
0035540 l \ 360 h 360 237 O 016 d 003 220 001 N h 032 032
0035560 O 026 032 _ 026 277 m 377 H d \v \0 \0 X 264 \b
0035600 N k 324 276 260 232 \t \0 \0 277 O 026 \t \0 \0 022
0035620 274 d L 024 004 277 d g \0 \0 024 026 277 d j 024
0035640 032 277 d W 024 020 277 d k 024 \b 277 d g \0
0035660 \0 024 277 d g \0 \0 024 034 277 j d n 177 377
0035700 d h 032 032 032 032 275 d M 024 \n 277 [ @ \t \0
0035720 \0 021 021 \r O 030 003 265 z h 022 Z 265 Y @ \t
0035740 \0 \0 311 006 K \t \0 \0 006 \0 \0 310 004 d W 034
0035760 361 222 277 W 034 \t \0 \0 I 002 002 002 001 g \0 \0
0036000 \f \0 \0 \t \0 \0 Z 265 034 K J j J g \0 \0
0036020 \n \0 \0 K \t \0 \0 006 \0 \0 310 003 331 032 \v \0
0036040 \0 h 020 @ J \t \0 \0 311 006 001 I 001 361 262 H
0036060 g \0 \0 260 F g \0 \0 \n \0 \0 001 h J \v \0
0036100 \0 277 J g \0 \0 \n \0 \0 277 J \t \0 \0 277 260
0036120 272 001 _ 032 g \0 \0 \n \0 \0 Z 265 \n O 030 002
0036140 _ 030 261 377 t 001 006 \0 \0 311 026 g \0 \0 360 262
0036160 356 O 032 261 377 g g \0 \0 h g \0 \0 \r 005 \0
0036200 \0 277 J g \0 \0 @ \t \0 \0 311 . \v \0 \0 277
0036220 261 377 y \0 ( 4 1 5 P U T W I N D
0036240 O W P R O P 4 1 0 \ I N S U
0036260 R E W I N D O W 4 0 1 A T T
0036300 A C H W I N D O W 3 6 2 G E
0036320 T W I N D O W U S E R P R O P
0036340 3 5 0 C L E A R W 3 4 5 P
0036360 U T W I N D O W P R O P 3 3 7
0036400 D E L E T E M E N U 3 3 1
0036420 G E T W I N D O W U S E R P R O
0036440 P 3 1 2 \ I N S U R E W I N
0036460 D O W 3 0 5 A D D M E N U
0036500 2 9 5 C H E C K / M E N U / I
0036520 M A G E 2 9 1 G E T W I N D
0036540 O W P R O P 2 7 8 C R E A T
0036560 E W 2 7 5 R E G I O N N E X
0036600 T T O 2 6 4 W I D T H I F W
0036620 I N D O W 2 4 8 C H E C K /
0036640 M E N U / I M A G E 2 4 2 \
0036660 I N S U R E W I N D O W 2 2 5
0036700 A T T A C H E D W I N D O W S
0036720 1 5 9 D R E V E R S E 1 5
0036740 3 R E L S T K 1 4 1 S T K
0036760 N T H 1 1 2 C H C O N 1 5
0037000 0 S T K N A M E 3 3 \ I N
0037020 S U R E W I N D O W 2 9 S T
0037040 K N T H 2 6 E R R O R 1 7
0037060 G E T W I N D O W P R O P 6
0037100 W F R O M D S ) \r ( 4 0 6 P
0037120 R O C E S S 3 9 7 L O C A L
0037140 C L O S E 3 9 3 L E F T 3
0037160 8 2 B K I T E M S E L E C T E
0037200 D F N 3 7 7 M E N U 3 5 9
0037220 M E N U 3 4 2 E X T E N T
0037240 3 2 8 M E N U 3 2 3 R I
0037260 G H T 2 9 8 B I T M A P 2
0037300 8 8 H E I G H T 2 7 2 L E
0037320 F T 2 5 1 B I T M A P 2 0
0037340 0 D E F A U L T M E N U H E L
0037360 D F N 1 9 3 C L R P R O M P
0037400 T 1 7 0 B K I T E M S E L E
0037420 C T E D F N 9 6 C L : E V A
0037440 L 8 8 A P P L Y 8 1 E V
0037460 A L 7 1 \ I N T E R P R E T
0037500 E R 6 2 * E N V * 4 1 |
0037520 004 003 M E N U T Y P E # | 1 4
0037540 S T A C K - P O S I T I O N ) \r
0037560 ( 2 3 " N o t a b a c k
0037600 t r a c e w i n d o w " ) \r C
0037620 L O S E - D E B U G G E R - W I
0037640 N D O W D 1 \r ( P 0 P R O
0037660 C I 0 W ) \0 V 001 \0 \0 001 @
0037700 g \0 \0 \n \0 \0 021 001 \0 H \t \0 \0 264 F @
0037720 H \t \0 \0 \t \0 \0 360 264 ; H \b \0 \0 360 262
0037740 035 i \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 @ g
0037760 \0 \0 g \0 \0 \v \0 \0 g \0 \0 020 H o \0 \0
0040000 \0 i \v \0 \0 277 H o \0 \0 \0 \n \0 \0 277 \b
0040020 \0 \0 h 020 \0 ( 8 2 B L O C K 7
0040040 8 P R O C E S S . E V A L 6
0040060 9 P R O C E S S . E V A L 5
0040100 6 W I N D O W D E L P R O P
0040120 4 5 B K S Y S B U F 3 7 C
0040140 L E A R B U F 3 0 T H I S .
0040160 P R O C E S S 2 3 W F R O M
0040200 D S 2 0 P R O C E S S . T T
0040220 Y 1 3 P R O C E S S P 6
0040240 P U T W I N D O W P R O P ) \r (
0040260 5 9 D O N ' T 5 3 C L O S
0040300 E - D E B U G G E R - W I N D O
0040320 W 5 0 C L O S E F N 3 P
0040340 R O C E S S ) \r ( 7 5 ( R E
0040360 T E V A L ( Q U O T E D E B
0040400 U G G E R - L O O P ) ( Q U O
0040420 T E ( E R R O R ! ) ) ) 6 5
0040440 ( S T K N A M E - 3 ) 4 2
0040460 " ^ \r " ) \r N E A R - B Y - R
0040500 E G I O N D 1 \r ( P 2 H E
0040520 I G H T P 1 W I D T H P
0040540 0 X I 2 N I 1 R
0040560 E G I O N T E M P L A T E I
0040600 0 R E G I O N F 3 \ C U
0040620 R S O R D E S T W I D T H F
0040640 4 \ C U R S O R D E S T H E I
0040660 G H T ) \0 K 003 002 \0 003 021 0 002 @ 001
0040700 A 001 B 332 330 X A 002 002 001 Y 330 S 361 243 j
0040720 H 361 227 H S I 331 \n \0 \0 200 H @ 002 001 A
0040740 002 001 B 332 330 X A 002 002 002 001 Z 330 T 361 243
0040760 j H 361 227 H T J 331 \n \0 \0 200 H I J h
0041000 032 032 032 032 020 \0 ( 6 3 I M O D 3
0041020 0 I M O D ) \r N I L \r ( ) \r S
0041040 T A C K - E V A L D 1 \r ( L
0041060 ( 2 L E X I C A L - E N V I R
0041100 O N M E N T 1 F O R M 0
0041120 S T A C K - P O S I T I O N ) )
0041140 \0 017 \0 \0 \0 003 h @ \t \0 \0 \n \0 \0 A
0041160 B \n \0 \0 020 \0 ( 1 2 C L : E V A
0041200 L 7 \ S M A S H L I N K 4
0041220 \ S T A C K A R G P T R ) \r N
0041240 I L \r ( ) \r F I N D - L E X I C
0041260 A L - E N V I R O N M E N T D
0041300 1 \r ( P 0 P O S I 0 S
0041320 T A C K P O S F 1 L A S T
0041340 P O S ) \0 031 001 001 \0 001 g \0 \0 h @
0041360 265 003 Q \v \0 \0 021 001 \0 H 264 \b l 002 H \n
0041400 \0 \0 020 \0 ( 2 2 S T K A R G 1
0041420 0 S T K P O S ) \r ( 2 C L :
0041440 E V A L ) \r ( ) \r b r e a k - ?
0041460 = D 1 \r ( L ( 1 $ $ M A C
0041500 R O - E N V 0 $ $ M A C R O
0041520 - F O R M ) F 0 L A S T P
0041540 O S ) \0 026 \0 001 \0 002 P \t \0 \0 i \n
0041560 \0 \0 P \t \0 \0 i j \f \0 \0 \b \0 \0 020 \0
0041600 ( 1 9 C L : V A L U E S 1 6
0041620 P R I N T - A R G L I S T 1
0041640 1 S T K A R G S 7 S M A R
0041660 T A R G L I S T 3 S T K N A
0041700 M E ) \r N I L \r ( ) \r ( P U T H
0041720 A S H ( Q U O T E ? = ) (
0041740 Q U O T E ( N I L b r e a k
0041760 - ? = : E V A L N I L ) )
0042000 * D E B U G G E R - C O M M A N
0042020 D - T A B L E * ) \r b r e a k -
0042040 E D I T D 1 \r ( L ( 1 $ $
0042060 M A C R O - E N V 0 $ $ M A
0042100 C R O - F O R M ) ) \0 022 \0 \0 \0
0042120 002 o \0 \0 \0 i \n \0 \0 277 i \t \0 \0 \b \0
0042140 \0 020 \0 ( 1 5 C L : V A L U E S
0042160 1 2 T E R P R I 7 P R I
0042200 N 1 ) \r N I L \r ( 3 " T h e
0042220 E D I T c o m m a n d h a
0042240 s n ' t b e e n i m p l e m
0042260 e n t e d y e t " ) \r ( P U T
0042300 H A S H ( Q U O T E E D I T
0042320 ) ( Q U O T E ( N I L b r
0042340 e a k - E D I T : E V A L N
0042360 I L ) ) * D E B U G G E R - C
0042400 O M M A N D - T A B L E * ) \r b
0042420 r e a k - @ D 1 \r ( L ( 1
0042440 $ $ M A C R O - E N V 0 $ $
0042460 M A C R O - F O R M ) ) \0 032 001
0042500 \0 \0 002 @ 002 \t \0 \0 \t \0 \0 021 001 \0 i o
0042520 \0 \0 \0 H \v \0 \0 023 \b \0 \0 020 \0 ( 2 3
0042540 C L : V A L U E S 1 9 F O
0042560 R M A T 7 S T K N A M E 4
0042600 S T K P O Z ) \r N I L \r ( 1
0042620 5 " @ = ~ S ~ % % " ) \r (
0042640 P U T H A S H ( Q U O T E @
0042660 ) ( Q U O T E ( ( & R E S T
0042700 P L A C E ) b r e a k - @
0042720 : E V A L N I L ) ) * D E B
0042740 U G G E R - C O M M A N D - T A
0042760 B L E * ) \r b r e a k - B T D
0043000 1 \r ( L ( 1 $ $ M A C R O -
0043020 E N V 0 $ $ M A C R O - F O
0043040 R M ) F 0 L A S T P O S )
0043060 \0 020 \0 001 \0 002 g \0 \0 P g \0 \0 i \f
0043100 \0 \0 \b \0 \0 020 \0 ( 1 3 C L : V A
0043120 L U E S 1 0 P R I N T - B A
0043140 C K T R A C E ) \r ( 6 : T E S
0043160 T 2 : F R O M ) \r ( ) \r ( P
0043200 U T H A S H ( Q U O T E B T
0043220 ) ( Q U O T E ( N I L b r
0043240 e a k - B T : E V A L N I L
0043260 ) ) * D E B U G G E R - C O M
0043300 M A N D - T A B L E * ) \r b r e
0043320 a k - B T ! D 1 \r ( L ( 1
0043340 $ $ M A C R O - E N V 0 $ $
0043360 M A C R O - F O R M ) F 0
0043400 L A S T P O S ) \0 020 \0 001 \0 002 g
0043420 \0 \0 P g \0 \0 h \f \0 \0 \b \0 \0 020 \0 (
0043440 1 3 C L : V A L U E S 1 0
0043460 P R I N T - B A C K T R A C E )
0043500 \r ( 6 : T E S T 2 : F R O
0043520 M ) \r ( ) \r ( P U T H A S H (
0043540 Q U O T E B T ! ) ( Q U O T
0043560 E ( ( & O P T I O N A L F O
0043600 O ) b r e a k - B T ! : E V
0043620 A L N I L ) ) * D E B U G G
0043640 E R - C O M M A N D - T A B L E
0043660 * ) \r b r e a k - B T V D 1 \r
0043700 ( L ( 1 $ $ M A C R O - E N
0043720 V 0 $ $ M A C R O - F O R M
0043740 ) F 0 L A S T P O S ) \0
0043760 020 \0 001 \0 002 g \0 \0 P g \0 \0 i \f \0 \0
0044000 \b \0 \0 020 \0 ( 1 3 C L : V A L U
0044020 E S 1 0 P R I N T - B A C K
0044040 T R A C E ) \r ( 6 : P R I N T
0044060 - V A R I A B L E S 2 : F R
0044100 O M ) \r ( ) \r ( P U T H A S H
0044120 ( Q U O T E B T V ) ( Q U O
0044140 T E ( N I L b r e a k - B T
0044160 V : E V A L N I L ) ) * D
0044200 E B U G G E R - C O M M A N D -
0044220 T A B L E * ) \r b r e a k - B T
0044240 V ! D 1 \r ( L ( 1 $ $ M A
0044260 C R O - E N V 0 $ $ M A C R
0044300 O - F O R M ) F 0 L A S T
0044320 P O S ) \0 025 \0 001 \0 002 g \0 \0 P g
0044340 \0 \0 i g \0 \0 i \r 006 \0 \0 \b \0 \0 020 \0
0044360 ( 1 8 C L : V A L U E S 1 5
0044400 P R I N T - B A C K T R A C E
0044420 ) \r ( 1 0 : P R I N T - J U N
0044440 K 6 : P R I N T - V A R I A
0044460 B L E S 2 : F R O M ) \r ( )
0044500 \r ( P U T H A S H ( Q U O T E
0044520 B T V ! ) ( Q U O T E ( N
0044540 I L b r e a k - B T V ! : E
0044560 V A L N I L ) ) * D E B U G
0044600 G E R - C O M M A N D - T A B L
0044620 E * ) \r b r e a k - E V A L D
0044640 1 \r ( L ( 1 $ $ M A C R O -
0044660 E N V 0 $ $ M A C R O - F O
0044700 R M ) F 0 B R K V A L U E
0044720 S F 1 D E B U G - F U N C
0044740 T I O N F 2 ! V A L U E )
0044760 \0 027 \0 003 \0 002 Q h g \0 \0 \v \0 \0 \t
0045000 \0 \0 c \0 d 001 c 004 P \t \0 \0 020 \0 ( 2
0045020 0 \ M V L I S T 1 0 \ M V
0045040 L I S T 7 E N V A P P L Y )
0045060 \r ( 4 D E B U G G E R - L O O
0045100 P ) \r ( ) \r ( P U T H A S H (
0045120 Q U O T E C L : E V A L ) (
0045140 Q U O T E ( N I L b r e a k
0045160 - E V A L : E V A L N I L )
0045200 ) * D E B U G G E R - C O M M
0045220 A N D - T A B L E * ) \r b r e a
0045240 k - D B T D 1 \r ( L ( 1 $
0045260 $ M A C R O - E N V 0 $ $ M
0045300 A C R O - F O R M ) ) \0 \n \0 \0
0045320 \0 002 h i \n \0 \0 \b \0 \0 020 \0 ( 7 C
0045340 L : V A L U E S 4 A T T A C
0045360 H - B A C K T R A C E - M E N U
0045400 ) \r N I L \r ( ) \r ( P U T H A S
0045420 H ( Q U O T E D B T ) ( Q
0045440 U O T E ( N I L b r e a k -
0045460 D B T : E V A L N I L ) )
0045500 * D E B U G G E R - C O M M A N
0045520 D - T A B L E * ) \r b r e a k -
0045540 D B T ! D 1 \r ( L ( 1 $ $
0045560 M A C R O - E N V 0 $ $ M A
0045600 C R O - F O R M ) ) \0 \b \0 \0 \0
0045620 002 \b \0 \0 \b \0 \0 020 \0 ( 5 C L : V
0045640 A L U E S 2 A T T A C H - B
0045660 A C K T R A C E - M E N U ) \r N
0045700 I L \r ( ) \r ( P U T H A S H (
0045720 Q U O T E D B T ! ) ( Q U O
0045740 T E ( N I L b r e a k - D B
0045760 T ! : E V A L N I L ) ) *
0046000 D E B U G G E R - C O M M A N D
0046020 - T A B L E * ) \r b r e a k - O
0046040 K D 1 \r ( L ( 1 $ $ M A C
0046060 R O - E N V 0 $ $ M A C R O
0046100 - F O R M ) F 0 B R K V A
0046120 L U E S F 1 ! V A L U E
0046140 F 2 D E B U G - F U N C T I
0046160 O N ) \0 ! \0 003 \0 002 Q P 001 360 255 R
0046200 h g \0 \0 \v \0 \0 \t \0 \0 c \0 277 g \0 \0
0046220 g \0 \0 \t \0 \0 \n \0 \0 020 \0 ( 3 0 \
0046240 D O - T H R O W 2 7 \ M V L
0046260 I S T 1 5 \ M V L I S T 1
0046300 2 E N V A P P L Y ) \r ( 2 4
0046320 N I L L 2 1 D E B U G G E R
0046340 9 D E B U G G E R - L O O P
0046360 ) \r ( ) \r ( P U T H A S H ( Q
0046400 U O T E O K ) ( Q U O T E
0046420 ( N I L b r e a k - O K : Q
0046440 U I E T N I L ) ) * D E B U
0046460 G G E R - C O M M A N D - T A B
0046500 L E * ) \r b r e a k - P R D 1
0046520 \r ( L ( 1 $ $ M A C R O - E
0046540 N V 0 $ $ M A C R O - F O R
0046560 M ) ) \0 005 \0 \0 \0 002 \b \0 \0 020 \0 (
0046600 2 P R O C E E D - F R O M - B
0046620 R E A K ) \r N I L \r ( ) \r ( P U
0046640 T H A S H ( Q U O T E P R )
0046660 ( Q U O T E ( N I L b r e
0046700 a k - P R : E V A L N I L )
0046720 ) * D E B U G G E R - C O M M
0046740 A N D - T A B L E * ) \r b r e a
0046760 k - R E T U R N D 1 \r ( L (
0047000 1 $ $ M A C R O - E N V 0
0047020 $ $ M A C R O - F O R M ) F
0047040 2 B R K V A L U E S ) \0 % 002
0047060 001 \0 002 @ 002 d 220 001 021 021 001 A 271 g \0 \0
0047100 H I \v \0 \0 \t \0 \0 c 004 g \0 \0 g \0 \0
0047120 \t \0 \0 \n \0 \0 020 \0 ( 3 4 \ D O -
0047140 T H R O W 3 1 \ M V L I S T
0047160 2 0 \ M V L I S T 1 7 S
0047200 T A C K - E V A L ) \r ( 2 8 N
0047220 I L L 2 5 D E B U G G E R
0047240 1 2 D E B U G G E R - L O O P
0047260 ) \r ( ) \r ( P U T H A S H ( Q
0047300 U O T E R E T U R N ) ( Q U
0047320 O T E ( ( & O P T I O N A L
0047340 E X P R E S S I O N & E N V I
0047360 R O N M E N T E N V ) b r e
0047400 a k - R E T U R N : E V A L
0047420 N I L ) ) \r * D E B U G G E R
0047440 - C O M M A N D - T A B L E * )
0047460 \r b r e a k - R E V E R T D 1
0047500 \r ( L ( 1 $ $ M A C R O - E
0047520 N V 0 $ $ M A C R O - F O R
0047540 M ) F 2 L A S T P O S F
0047560 3 * T E R M I N A L - I O *
0047600 ) \0 ~ 002 002 \0 002 @ 002 021 021 001 H 224 H
0047620 \t \0 \0 277 R \t \0 \0 Y g \0 \0 S g \0 \0
0047640 l \n g \0 \0 l \n g \0 \0 i g \0 \0 h g
0047660 \0 \0 h g \0 \0 l 003 g \0 \0 l 003 \r 021 \0
0047700 \0 R g \0 \0 o \0 \0 \0 g \0 \0 g \0 \0 g
0047720 \0 \0 h g \0 \0 g \0 \0 I h 032 032 o \0 \0
0047740 \0 032 032 h 032 032 032 h 032 032 g \0 \0 I h 032
0047760 032 o \0 \0 \0 032 032 032 h 032 032 032 R \t \0 \0
0050000 i \f \0 \0 020 \0 ( 1 2 3 R E T A P
0050020 P L Y 1 1 9 S T K A R G S
0050040 5 6 W R I T E 1 5 S T K N
0050060 A M E 1 0 S T K P O Z ) \r (
0050100 1 0 0 Q U O T E 8 0 Q U O
0050120 T E 7 7 C L : A P P L Y 7
0050140 3 L A M B D A 7 0 F U N C
0050160 T I O N 6 7 D E B U G G E R
0050200 - L O O P 6 0 C L : L A M B
0050220 D A 5 0 : L E N G T H 4 5
0050240 : L E V E L 4 1 : P R E T
0050260 T Y 3 7 : C I R C L E 3 3
0050300 : E S C A P E 2 8 : B A S
0050320 E 2 3 : R A D I X 1 9 :
0050340 S T R E A M ) \r ( 1 0 8 ( (
0050360 Q U O T E R E V E R T ) ) 8
0050400 8 ( D E B U G - A R G S ) 6
0050420 4 ( & R E S T D E B U G - A
0050440 R G S ) ) \r ( P U T H A S H (
0050460 Q U O T E R E V E R T ) ( Q
0050500 U O T E ( ( & R E S T P L A
0050520 C E ) b r e a k - R E V E R T
0050540 : E V A L N I L ) ) * D E
0050560 B U G G E R - C O M M A N D - T
0050600 A B L E * ) \r b r e a k - S T O
0050620 P D 1 \r ( L ( 1 $ $ M A C
0050640 R O - E N V 0 $ $ M A C R O
0050660 - F O R M ) ) \0 016 \0 \0 \0 002 g \0
0050700 \0 g \0 \0 \t \0 \0 \n \0 \0 020 \0 ( 1 1
0050720 \ D O - T H R O W 8 \ M V L
0050740 I S T ) \r ( 5 E R R O R ! 2
0050760 D E B U G G E R ) \r ( ) \r ( P
0051000 U T H A S H ( Q U O T E S T
0051020 O P ) ( Q U O T E ( N I L
0051040 b r e a k - S T O P : Q U I E
0051060 T N I L ) ) * D E B U G G E
0051100 R - C O M M A N D - T A B L E *
0051120 ) \r b r e a k - U B D 1 \r ( L
0051140 ( 1 $ $ M A C R O - E N V
0051160 0 $ $ M A C R O - F O R M )
0051200 F 1 B R K F N ) \0 024 001 001 \0
0051220 002 @ 002 265 016 Q 021 001 \0 g \0 \0 H \n \0 \0
0051240 020 001 260 364 \0 ( 1 4 A P P L Y ) \r
0051260 ( 1 0 U N B R E A K ) \r ( ) \r
0051300 ( P U T H A S H ( Q U O T E
0051320 U B ) ( Q U O T E ( ( & O P
0051340 T I O N A L F N ) b r e a k
0051360 - U B : E V A L N I L ) )
0051400 * D E B U G G E R - C O M M A N
0051420 D - T A B L E * ) \r b r e a k -
0051440 ^ D 1 \r ( L ( 1 $ $ M A C
0051460 R O - E N V 0 $ $ M A C R O
0051500 - F O R M ) ) \0 016 \0 \0 \0 002 g \0
0051520 \0 g \0 \0 \t \0 \0 \n \0 \0 020 \0 ( 1 1
0051540 \ D O - T H R O W 8 \ M V L
0051560 I S T ) \r ( 5 E R R O R ! 2
0051600 D E B U G G E R ) \r ( ) \r ( P
0051620 U T H A S H ( Q U O T E ^ )
0051640 ( Q U O T E ( N I L b r e
0051660 a k - ^ : Q U I E T N I L )
0051700 ) * D E B U G G E R - C O M M
0051720 A N D - T A B L E * ) \r b r e a
0051740 k - V A L U E D 1 \r ( L ( 1
0051760 $ $ M A C R O - E N V 0 $
0052000 $ M A C R O - F O R M ) F 0
0052020 ! V A L U E F 1 * N O T
0052040 - Y E T - E V A L U A T E D *
0052060 F 2 B R K V A L U E S ) \0
0052100 \f \0 003 \0 002 P Q 360 221 P 020 R \t \0 \0 020
0052120 \0 ( 9 C L : V A L U E S - L I
0052140 S T ) \r N I L \r ( ) \r ( P U T H
0052160 A S H ( Q U O T E V A L U E
0052200 ) ( Q U O T E ( ( & E N V I
0052220 R O N M E N T E N V ) b r e
0052240 a k - V A L U E : Q U I E T
0052260 N I L ) ) * D E B U G G E R -
0052300 C O M M A N D - T A B L E * ) \r
0052320 ( P U T P R O P S C M L D E B
0052340 U G F I L E T Y P E C L : C
0052360 O M P I L E - F I L E ) \r \ i n
0052400 t e r p r e t - D E B U G G E R
0052420 D 1 \r ( L ( 1 $ $ E N V
0052440 0 $ $ T A I L ) ) \0 3 005 \0 \0
0052460 002 @ 001 021 A 004 @ 002 271 g \0 \0 I \n \0 \0
0052500 d 220 001 272 g \0 \0 I \n \0 \0 d 220 001 273 A
0052520 274 I o \0 \0 \0 \n \0 \0 H J h K L \r 005
0052540 \0 \0 020 \0 ( 4 8 D E B U G G E R
0052560 - L O O P 3 9 K E Y W O R D
0052600 - T E S T 2 5 F I N D - K E
0052620 Y W O R D 1 4 F I N D - K E
0052640 Y W O R D ) \r ( 2 1 : C O N D
0052660 I T I O N 1 0 : I N - F U N
0052700 C T I O N ) \r ( 3 6 ( : C O
0052720 N D I T I O N : I N - F U N C
0052740 T I O N ) ) \r ( P U T P R O P S
0052760 D E B U G G E R S P E C I A
0053000 L - F O R M \ i n t e r p r e
0053020 t - D E B U G G E R ) \r E N T E
0053040 R - D E B U G G E R - P D 1 \r
0053060 ( L ( 0 N ) F 1 P R I
0053100 N T M S G F 2 H E L P F L
0053120 A G F 3 H E L P C L O C K
0053140 F 4 H E L P T I M E ) \0
0053160 216 001 004 \0 001 R 241 h 020 m 377 \t \0 \0 021 001
0053200 \0 H 242 h 260 S @ 225 @ k 325 b \0 277 H \t
0053220 \0 \0 g \0 \0 360 262 b l 002 H \t \0 \0 361 247
0053240 l 002 H \n \0 \0 265 022 ` \0 \0 h 360 c 002 277
0053260 H \t \0 \0 277 h 260 ! g \0 \0 360 232 h c 002
0053300 277 H \t \0 \0 277 h 216 i c 002 277 H \t \0 \0
0053320 277 @ 264 005 j @ 363 022 265 037 R g \0 \0 360 263
0053340 027 S 3 264 023 T 3 264 016 l 002 \t \0 \0
0053360 S 331 T 361 264 003 i 020 m 377 H d \v \0 \0 X
0053400 260 202 \0 ( 1 3 7 S T K N T H 1
0053420 2 2 C L O C K 9 0 R E L S
0053440 T K 7 9 R E L S T K 6 2
0053460 R E L S T K 4 8 S T K A R G
0053500 4 0 S T K N A R G S 2 8
0053520 S T K N A M E 8 S T K N T H
0053540 ) \r ( 1 0 4 B R E A K ! 6 9
0053560 N O B R E A K 5 3 N L S E
0053600 T Q G A G 3 1 E R R O R S E
0053620 T ) \r ( ) \r B R E A K - F U N C
0053640 T I O N A 0 0 0 1 A 0 0 0 2 D
0053660 1 \r ( F 2 O L D - D E F F
0053700 3 B R O K E N ) \0 $ 002 002 \0
0053720 \0 R j 021 002 001 S 260 027 d 001 375 002 I k 330
0053740 Y n 002 \0 361 227 o \0 \0 \0 \t \0 \0 277 265 353
0053760 I H 016 020 \0 ( 2 7 L I S P E R R
0054000 O R ) \r N I L \r ( 2 4 " T O
0054020 O M A N Y A R G U M E N T S
0054040 " ) \r B R E A K - F U N C T I O
0054060 N A 0 0 0 1 D 1 \r ( L ( 0
0054100 - a r g s - ) P 6 B R O K
0054120 E N F 7 F N ) \0 3 \a 001 002
0054140 \0 e 021 001 \0 H k 021 2 005 J d I 363 236 277
0054160 K 022 021 001 006 g \0 \0 W 016 \n \0 \0 020 a 275
0054200 L 265 \r M h 032 \ 273 J k 324 Z 260 337 M &
0054220 274 260 367 \0 ( 2 7 D E B U G G E R
0054240 - L O O P ) \r ( 2 2 B R E A K
0054260 - F U N C T I O N A 0 0 0 1 A 0
0054300 0 0 2 ) \r ( ) \r B R E A K - F U
0054320 N C T I O N A 0 0 0 3 D 1 \r (
0054340 L ( 2 A 0 4 6 5 1 A 0 4
0054360 6 4 0 A 0 4 6 7 ) F 0
0054400 A 0 4 6 8 ) \0 024 \0 001 \0 003 P @ A
0054420 B h 032 032 032 032 \t \0 \0 A B @ \v \0 \0 020
0054440 \0 ( 1 7 P U T P R O P 1 1
0054460 U N D O S A V E ) \r N I L \r ( )
0054500 \r B R E A K - F U N C T I O N A
0054520 0 0 0 4 D 1 \r ( L ( 1 A 0
0054540 4 7 0 0 A 0 4 6 9 ) F 0
0054560 A 0 4 7 1 ) \0 021 \0 001 \0 002 P @
0054600 A h 032 032 032 \t \0 \0 A @ \n \0 \0 020 \0 (
0054620 1 4 S E T F - S Y M B O L - F
0054640 U N C T I O N 9 U N D O S A
0054660 V E ) \r N I L \r ( ) \r B R E A K
0054700 - F U N C T I O N D 1 \r ( P
0054720 6 A 0 4 7 1 P 5 A 0 4 6
0054740 8 P 0 O L D - D E F I
0054760 0 F N F 7 X F 8 T
0055000 A I L ) \0 200 \a 002 \0 001 @ \t \0 \0 c
0055020 016 263 f @ h i h W 020 \r 005 \0 \0 b \0 277
0055040 o \0 \0 \0 \t \0 \0 @ \t \0 \0 021 A 004 @ 272
0055060 H 271 021 020 005 g \0 \0 ] J 301 002 311 \0 g \0
0055100 \0 ' J g \0 \0 h 032 032 032 032 \t \0 \0 023 J
0055120 g \0 \0 I \v \0 \0 277 @ 274 H 273 021 020 006 g
0055140 \0 \0 ^ L \t \0 \0 L h 032 032 032 \t \0 \0 023
0055160 L K \n \0 \0 @ 020 @ o \0 \0 \0 \n \0 \0 262
0055200 241 @ o \0 \0 \0 \n \0 \0 020 \0 ( 1 2 5
0055220 C O N C A T 1 1 5 U N S A F
0055240 E . T O . M O D I F Y 1 0 5
0055260 S E T F - S Y M B O L - F U N C
0055300 T I O N 9 9 U N D O S A V E
0055320 9 1 C L : S Y M B O L - F U
0055340 N C T I O N 7 5 P U T P R O
0055360 P 6 6 U N D O S A V E 3 1
0055400 C L : S Y M B O L - F U N C T
0055420 I O N 2 7 U N D O A B L Y -
0055440 S E T Q 1 7 F N C H E C K
0055460 3 G E T D ) \r ( 8 6 B R E A
0055500 K - F U N C T I O N A 0 0 0 4
0055520 7 1 B R O K E N 5 8 B R O
0055540 K E N 5 3 B R O K E N 4 4
0055560 B R E A K - F U N C T I O N A
0055600 0 0 0 3 ) \r ( 1 2 2 " n o t
0055620 b r o k e n " 1 1 2 " b r
0055640 e a k " 2 4 ( B R O K E N F
0055660 N S ( C L : A D J O I N F N
0055700 B R O K E N F N S ) ) ) \r D E
0055720 B U G G E R - L O O P A 0 0 0 1
0055740 A 0 0 0 2 D 1 \r ( L ( 0 L
0055760 S T ) ) \0 ^ 005 \0 \0 001 @ 021 A 004 H
0056000 001 271 H 002 Z 001 273 J 002 001 274 K \t \0 \0 L
0056020 \t \0 \0 I \t \0 \0 264 @ I g \0 \0 \n \0 \0
0056040 \t \0 \0 I g \0 \0 \n \0 \0 \t \0 \0 I g \0
0056060 \0 \n \0 \0 I g \0 \0 g \0 \0 \v \0 \0 I g
0056100 \0 \0 g \0 \0 \v \0 \0 I g \0 \0 o \0 \0 \0
0056120 \v \0 \0 I \t \0 \0 020 \0 ( 9 1 C L O
0056140 S E W 8 7 P U T W I N D O W
0056160 P R O P 7 6 W I N D O W D E
0056200 L P R O P 6 6 P U T W I N D
0056220 O W P R O P 5 6 P U T W I N
0056240 D O W P R O P 4 9 R E L S T
0056260 K 4 6 P U T W I N D O W P R
0056300 O P 3 9 R E L S T K 3 6
0056320 P U T W I N D O W P R O P 2 7
0056340 W I N D O W P 2 3 R E L S
0056360 T K 1 9 R E L S T K ) \r ( 8
0056400 0 T I T L E 7 3 C L O S E
0056420 - D E B U G G E R - W I N D O W
0056440 7 0 C L O S E F N 6 3 T
0056460 O T O P W 6 0 B U T T O N E
0056500 V E N T F N 5 3 P R O C E S
0056520 S 4 3 L A S T P O S 3 3
0056540 S T A C K - P O S I T I O N ) \r
0056560 ( 8 4 " * D e b u g g e r
0056600 w i n d o w * " ) \r D E B U G G
0056620 E R - L O O P A 0 0 0 1 A 0 0 0
0056640 3 D 1 \r ( L ( 0 W I N D O
0056660 W ) ) \0 I 002 \0 \0 001 ` \0 \0 k 345 j
0056700 360 263 ? i \t \0 \0 ` \0 \0 037 d o \0 \0 \0
0056720 024 004 277 d g \0 \0 024 277 d g \0 \0 024 034
0056740 277 j d n 177 377 d h 032 032 032 032 021 002 001 H
0056760 d I 024 \n 277 022 \t \0 \0 d 240 020 \t \0 \0 020
0057000 h 020 \0 ( 6 8 B K S Y S B U F
0057020 6 2 M E N U 1 2 C L E A R
0057040 B U F ) \r ( 3 5 D E F A U L T
0057060 M E N U H E L D F N 2 8 C L
0057100 R P R O M P T 1 5 | 004 003 M E
0057120 N U T Y P E # | 2 L A S T M
0057140 O U S E B U T T O N S ) \r ( 2
0057160 1 ( ( ! E V A L " ! E V A L
0057200 " " E v a l u a t e s t h e
0057220 b r e a k e x p r e s s i o
0057240 n w i t h o u t r e c u r s
0057260 i v e b r e a k s " ) ( E V
0057300 A L " E V A L \r " " E v a l
0057320 u a t e s t h e b r e a k
0057340 e x p r e s s i o n " ) ( E D
0057360 I T " E D I T \r " " C a l l
0057400 s t h e e d i t o r o n
0057420 t h e s e l e c t e d f r a
0057440 m e f o r m " ) ( R E V E R
0057460 T " R E V E R T @ \r " " U
0057500 n w i n d s t h e s t a c k
0057520 t o t h e s e l e c t e d
0057540 f r a m e " ) ( ^ " ^ \r "
0057560 " E x i t s t o t h e n
0057600 e x t h i g h e r b r e a k
0057620 v i a ( E R R O R ! ) " )
0057640 ( P R O C E E D ( Q U O T E
0057660 ( P R O C E E D - U S I N G - M
0057700 E N U ) ) " R e t u r n s c
0057720 o n t r o l t o a h i g h
0057740 e r P R O C E E D - C A S E "
0057760 ) ( O K " O K \r " " L e a
0060000 v e s t h e b r e a k , r
0060020 e t u r n i n g t h e v a l
0060040 u e o f t h e b r e a k
0060060 e x p r e s s i o n " ) ( B T
0060100 " D B T \r " " B a c k t r
0060120 a c e o f i m p o r t a n t
0060140 f u n c t i o n s i n a
0060160 m e n u " ) ( B T ! " D B T
0060200 ! \r " " B a c k t r a c e
0060220 o f a l l f u n c t i o n s
0060240 i n a m e n u " ) ( ? =
0060260 " ? = \r " " P r i n t s t
0060300 h e v a r i a b l e s b o u
0060320 n d i n t h e s e l e c t
0060340 e d f r a m e " ) ) ) \r D E B
0060360 U G G E R - L O O P A 0 0 0 1 A
0060400 0 0 0 9 A 0 0 1 0 D 1 \r ( L
0060420 ( 1 E N V 0 I N P U T )
0060440 F 0 N B R E A K S ) \0 ( \0
0060460 001 \0 002 j P 325 277 @ d 002 262 033 001 @ d 001
0060500 \t \0 \0 l 003 360 227 277 @ d 002 002 221 002 201 002
0060520 001 \n \0 \0 020 001 \t \0 \0 020 \0 ( 3 7 E
0060540 V A L 3 2 A P P L Y 1 5
0060560 A R G T Y P E ) \r N I L \r ( ) \r
0060600 D E B U G G E R - L O O P A 0 0
0060620 0 1 A 0 0 0 9 A 0 0 1 1 D 1 \r
0060640 ( L ( 1 E N V 0 I N P U
0060660 T ) F 0 N B R E A K S )
0060700 \0 \v \0 001 \0 002 j P 325 277 @ A \n \0 \0 020
0060720 \0 ( 8 E V A L - I N P U T ) \r
0060740 N I L \r ( ) \r D E B U G G E R -
0060760 L O O P A 0 0 0 1 A 0 0 0 9 D
0061000 1 \r ( F 0 * D E F A U L T -
0061020 E X E C - T Y P E * F 1 E
0061040 N V I R O N M E N T F 2 L
0061060 A S T P O S ) \0 A \0 003 \0 \0 g \0
0061100 \0 P g \0 \0 360 224 o \0 \0 \0 203 o \0 \0 \0
0061120 g \0 \0 ` \0 \0 ` \0 \0 h 032 032 g \0 \0 Q
0061140 265 006 R \t \0 \0 g \0 \0 P g \0 \0 360 223 g
0061160 \0 \0 202 g \0 \0 \r \b \0 \0 \b \0 \0 020 \0 (
0061200 6 2 E R R O R ! 5 9 E X E
0061220 C 3 9 F I N D - L E X I C A
0061240 L - E N V I R O N M E N T ) \r (
0061260 5 5 D E B U G G E R - L O O P
0061300 A 0 0 0 1 A 0 0 0 9 A 0 0 1 1
0061320 5 1 D E B U G G E R - L O O P
0061340 A 0 0 0 1 A 0 0 0 9 A 0 0 1 0
0061360 4 6 I N T E R L I S P 4 2
0061400 : F U N C T I O N 3 2 : E N
0061420 V I R O N M E N T 2 6 * E X
0061440 E C - C O M M A N D - T A B L E
0061460 * 2 3 * D E B U G G E R - C
0061500 O M M A N D - T A B L E * 2 0
0061520 : C O M M A N D - T A B L E S
0061540 6 I N T E R L I S P 2 :
0061560 P R O M P T ) \r ( 1 7 " :
0061600 " 1 2 " _ : " ) \r D E B U G
0061620 G E R - L O O P A 0 0 0 1 D 1
0061640 \r ( N A M E E R R O R S E T
0061660 L ( 0 N I L ) F 3 W I
0061700 N D O W F 4 L A S T P O S
0061720 F 5 B R K T Y P E F 6
0061740 C O N D I T I O N F 7 B
0061760 R K F N F 8 \ T E R M . O
0062000 F D F 9 A U T O B A C K T
0062020 R A C E F L G F 1 0 R E S
0062040 E T V A R S L S T F 1 1 W
0062060 B R E A K F 1 2 N B R E A
0062100 K S F 1 3 R E S E T Y F
0062120 1 4 B R E A K R E G I O N S
0062140 P E C F 1 5 D E F A U L T
0062160 T T Y R E G I O N ) 001 321 003 \r 002
0062200 \0 h T U h 032 032 032 021 ! 002 g \0 \0 H h
0062220 032 032 h h 032 032 W 024 032 c 024 277 W 026 242 261
0062240 001 4 W 020 \t \0 \0 242 261 \0 205 V g \0 \0 \n
0062260 \0 \0 262 { V \t \0 \0 o \0 \0 \0 \n \0 \0 262
0062300 n ` \0 \0 \t \0 \0 277 o \0 \0 \0 ` \0 \0 \n
0062320 \0 \0 277 o \0 \0 \0 ` \0 \0 \n \0 \0 277 \b \0
0062340 \0 g \0 \0 \n \0 \0 ` \0 \0 \n \0 \0 277 o \0
0062360 \0 \0 ` \0 \0 \n \0 \0 277 \b \0 \0 222 261 \0 326
0062400 ` \0 \0 g \0 \0 \n \0 \0 277 o \0 \0 \0 ` \0
0062420 \0 \n \0 \0 277 o \0 \0 \0 ` \0 \0 \n \0 \0 277
0062440 ` \0 \0 \t \0 \0 277 ` \0 \0 261 \0 245 W 026 242
0062460 261 \0 243 W 020 \t \0 \0 242 261 \0 232 \b \0 \0 262
0062500 % W 020 \t \0 \0 \t \0 \0 311 006 W 034 \t \0 \0
0062520 265 \f l 024 m 354 l d d \f \0 \0 j W 030 325
0062540 \v \0 \0 201 W 036 o \0 \0 \0 \n \0 \0 c 006 277
0062560 H 272 S 271 J I 030 277 S g \0 \0 W 016 \v \0
0062600 \0 277 S g \0 \0 j T \n \0 \0 \v \0 \0 277 S
0062620 g \0 \0 T \v \0 \0 277 S g \0 \0 h o \0 \0
0062640 \0 V j W 030 325 \f \0 \0 \v \0 \0 277 S g \0
0062660 \0 g \0 \0 \v \0 \0 277 S g \0 \0 g \0 \0 \v
0062700 \0 \0 277 S g \0 \0 \b \0 \0 \v \0 \0 277 S \t
0062720 \0 \0 277 U g \0 \0 360 262 026 T \t \0 \0 003 235
0062740 W 016 004 l 004 360 226 T W 016 \n \0 \0 277 V 265
0062760 021 U d g \0 \0 360 236 277 i o \0 \0 \0 260 023
0063000 i \n \0 \0 277 260 354 g \0 \0 360 232 i o \0 \0
0063020 \0 W 016 \v \0 \0 277 S 262 ) W 022 d g \0 \0
0063040 360 222 277 i 203 241 h 200 U 262 030 h W 022 g \0
0063060 \0 360 246 W 022 g \0 \0 360 221 h 200 i \n \0 \0
0063100 277 j g \0 \0 g \0 \0 \n \0 \0 016 022 c 032 i
0063120 020 \0 ( 4 5 7 \ C A T C H - F U
0063140 N C A L L 4 4 6 A T T A C H
0063160 - B A C K T R A C E - M E N U
0063200 4 0 4 F O R M A T 3 8 6 R
0063220 E P O R T - C O N D I T I O N
0063240 3 6 3 S E T S T K N A M E 3
0063260 4 8 S T K N A M E 3 3 6 T
0063300 T Y D I S P L A Y S T R E A M
0063320 3 3 1 P U T W I N D O W P R O
0063340 P 3 2 8 T H I S . P R O C E
0063360 S S 3 2 0 W I N D O W A D D
0063400 P R O P 3 0 9 P U T W I N D
0063420 O W P R O P 2 9 8 P U T W I
0063440 N D O W P R O P 2 9 5 F O R
0063460 M A T 2 7 7 P U T W I N D O
0063500 W P R O P 2 6 8 P U T W I N
0063520 D O W P R O P 2 6 5 S T K N
0063540 T H 2 5 5 P U T W I N D O W
0063560 P R O P 2 3 5 C R E A T E W
0063600 2 2 5 N E A R - B Y - R E G
0063620 I O N 2 1 8 C R E A T E R E
0063640 G I O N 2 0 6 R E G I O N P
0063660 1 9 9 \ I N S U R E W I N D
0063700 O W 1 9 6 W F R O M D S 1
0063720 8 9 H A S T T Y W I N D O W P
0063740 1 8 2 I M A G E S T R E A M
0063760 P 1 6 4 T E R P R I 1 5 7
0064000 P R I N 1 1 4 6 P R I N 1
0064020 1 3 5 P U T W I N D O W P R
0064040 O P 1 2 2 H A S T T Y W I N
0064060 D O W P 1 1 8 P R I N 1 1
0064100 0 7 P R I N 1 1 0 1 P R O
0064120 C E S S P R O P 9 5 T H I S
0064140 . P R O C E S S 9 1 P R I N
0064160 1 8 0 P R I N 1 6 9 T E
0064200 R P R I 6 1 M E M B 5 4
0064220 O L D - I N T E R L I S P - E R
0064240 R O R - N U M B E R 4 8 F A
0064260 K E - T Y P E P - F O R - C O N
0064300 D I T I O N S 3 7 I M A G E
0064320 S T R E A M P ) \r ( 4 5 4 D E
0064340 B U G G E R - L O O P A 0 0 0 1
0064360 A 0 0 0 9 4 5 1 D E B U G G
0064400 E R 4 3 8 A L W A Y S ! 4
0064420 3 1 B T ! 4 1 4 A L W A Y
0064440 S 3 9 2 O T H E R W I S E
0064460 3 7 2 I N T E R R U P T 3 4
0064500 1 R E V E R T 3 2 5 P R O
0064520 C E S S 3 1 7 C L O S E - D
0064540 E B U G G E R - W I N D O W 3
0064560 1 4 C L O S E F N 3 0 6 D
0064600 E B U G G E R - L O O P A 0 0 0
0064620 1 A 0 0 0 3 3 0 3 B U T T O
0064640 N E V E N T F N 2 8 2 T I T
0064660 L E 2 7 3 L A S T P O S 2
0064700 6 0 S T A C K - P O S I T I O
0064720 N 2 5 0 B R K F N 1 6 8
0064740 P R O M P T W I N D O W 1 6 1
0064760 P R O M P T W I N D O W 1 5
0065000 4 P R O M P T W I N D O W 1
0065020 4 3 P R O M P T W I N D O W
0065040 1 3 2 P A G E F U L L F N 1
0065060 2 9 P R O M P T W I N D O W
0065100 1 1 5 P R O M P T W I N D O W
0065120 1 0 4 P R O M P T W I N D O
0065140 W 9 8 N A M E 8 8 P R O
0065160 M P T W I N D O W 7 7 P R O
0065200 M P T W I N D O W 6 6 P R O
0065220 M P T W I N D O W 4 5 O L D
0065240 - I N T E R L I S P - E R R O R
0065260 1 2 D E B U G G E R - L O O
0065300 P A 0 0 0 1 A 0 0 0 2 ) \r ( 3
0065320 9 9 " ~ % % B r e a k p o i n
0065340 t a t ~ S ~ % % " 3 8 0
0065360 " ~ % % I n t e r r u p t e d
0065400 b e l o w ~ S ~ 2 % % " 2 8
0065420 7 " ~ S b r e a k :
0065440 ~ D " 2 3 2 " D e b u g g e
0065460 r W i n d o w " \r 1 5 1 "
0065500 U s i n g P R O M P T W I N D
0065520 O W a s T T Y w i n d o w
0065540 . " 1 4 0 " w h i c h d o
0065560 e s n o t h a v e a T T
0065600 Y w i n d o w . " 1 1 2 "
0065620 ' " 8 5 " r u n n i n g
0065640 i n p r o c e s s ' " \r 7
0065660 4 " R a n o u t o f s p
0065700 a c e " 5 8 ( 2 1 3 1 )
0065720 ) \r D E B U G G E R - L O O P
0065740 D 1 \r ( L ( 0 - a r g s - )
0065760 P 1 9 R E S E T Y P 1
0066000 8 L I S P X H I S T P 1 7
0066020 B R K V A L U E S P 1 6
0066040 \ I N B Q U O T E P 1 5 W
0066060 I N D O W P 1 4 ! V A L U
0066100 E P 1 3 L A S T P O S P
0066120 1 2 \ I N T E R R U P T A B
0066140 L E P 1 1 \ P R I M T E R
0066160 M S A P 1 0 \ P R I M T E
0066200 R M T A B L E P 9 \ P R I
0066220 M O U T . O F D P 8 \ P R
0066240 I M I N . O F D P 7 \ T E
0066260 R M . O F D P 6 \ L I N E
0066300 B U F . O F D P 5 N B R E
0066320 A K S P 4 E N V I R O N M
0066340 E N T P 3 C O N D I T I O
0066360 N P 2 B R K T Y P E P
0066400 1 B R K F N F 2 1 \ L I
0066420 N E B U F . O F D F 2 2 \
0066440 T E R M . O F D F 2 3 N B
0066460 R E A K S F 2 4 B R E A K
0066500 T T B L F 2 5 \ P R I M T
0066520 E R M T A B L E F 2 6 L I
0066540 S P X H I S T F 2 7 \ P R
0066560 I M T E R M S A F 2 8 * N
0066600 O T - Y E T - E V A L U A T E D
0066620 * F 2 9 R E S E T V A R S
0066640 L S T ) \0 201 025 \t 002 \0 e 021 001 \0 l
0066660 002 H 361 221 h 202 l 002 a 021 1 004 l 003 H 361
0066700 221 h 202 l 003 a 272 l 004 H 361 221 h 202 l 004
0066720 a 273 l 005 H 361 221 h 202 l 005 a 274 j W .
0066740 \t \0 \0 k 324 325 W * W , W * W , W 2
0066760 W 6 i \b \0 \0 W 8 021 : 021 W 0 \t \0 \0
0067000 W 4 021 ! 024 W : o \0 \0 \0 g \0 \0 \n \0
0067020 \0 221 h 202 g \0 \0 _ ( \n \0 \0 277 O ( 223
0067040 \b \0 \0 277 023 O " \t \0 \0 020 \0 ( 1 2 6
0067060 C L : V A L U E S - L I S T
0067100 1 1 9 E R R O R ! 1 1 2 R
0067120 E S E T R E S T O R E 1 0 1
0067140 D E B U G G E R - L O O P A 0 0
0067160 0 1 8 4 S E T T E R M T A B
0067200 L E 7 4 B R K L A S T P O S
0067220 5 5 A B S ) \r ( 1 0 7 E R
0067240 R O R 9 8 I N T E R N A L )
0067260 \r ( 9 5 ( D E B U G G E R -
0067300 L O O P A 0 0 0 1 ) ) \r ( R P A
0067320 Q Q B A K T R A C E L S T (
0067340 ( C L : A P P L Y ( * * D E B
0067360 U G G E R * * E X E C D E B
0067400 U G G E R - L O O P ) ( * * T
0067420 O P * * E X E C E R R O R S
0067440 E T E V A L Q T T ) ) ( \r
0067460 C L : E V A L ( * * B R E A K
0067500 * * E X E C D E B U G G E R
0067520 - L O O P ) ( * * T O P * *
0067540 E X E C E V A L Q T T ) ) )
0067560 ) \r W B R E A K D 1 \r ( L (
0067600 0 - a r g s - ) F 3 W B
0067620 R E A K ) \0 033 003 001 002 \0 e 021 001 \0
0067640 021 002 k H 361 221 i 203 i 271 k a 272 S I
0067660 223 J c 006 277 020 \0 N I L \r N I L \r (
0067700 ) \r B A C K T R A C E I T E M W
0067720 I N D O W D 1 \r ( P 3 A T
0067740 W P 1 B T W I N D O W P
0067760 0 T T Y R E G I O N I 0
0070000 T T Y W I N D O W ) \0 l 004 \0
0070020 \0 001 021 001 @ \t \0 \0 021 021 003 J 003 265 C
0070040 h 022 Y 265 = @ \t \0 \0 X h l 226 g \0 \0
0070060 \f \0 \0 o \0 \0 \0 \n \0 \0 Y g \0 \0 o \0
0070100 \0 \0 \v \0 \0 277 I g \0 \0 @ \t \0 \0 311 .
0070120 \v \0 \0 277 I g \0 \0 g \0 \0 i \f \0 \0 I
0070140 020 001 273 g \0 \0 K \t \0 \0 311 $ \n \0 \0 227
0070160 K \t \0 \0 277 K 260 253 J 002 Z 260 242 \0 ( 9
0070200 7 \ R E L E A S E - S T A C K
0070220 - D A T U M 9 2 M E M B 8
0070240 7 \ I N S U R E W I N D O W
0070260 7 6 W I N D O W A D D P R O P
0070300 6 4 P U T W I N D O W P R O
0070320 P 5 9 \ I N S U R E W I N D
0070340 O W 5 0 P U T W I N D O W P
0070360 R O P 3 9 C R E A T E W 3
0070400 2 R E G I O N N E X T T O 2
0070420 2 W I N D O W R E G I O N 6
0070440 A T T A C H E D W I N D O W S
0070460 ) \r ( 8 3 B T I T E M W I N D
0070500 O W C L O S E F N 7 2 B T I
0070520 T E M W I N D O W C L O S E F N
0070540 6 9 C L O S E F N 5 5 P
0070560 R O C E S S 4 3 M A X S I Z
0070600 E 2 9 T O P ) \r ( 4 7 (
0070620 3 0 0 . 1 5 0 ) 3 6 " B
0070640 a c k T r a c e F r a m e
0070660 W i n d o w " ) \r \ R E L E A S
0070700 E - S T A C K - D A T U M D 1
0070720 \r ( P 0 D T I 0 W )
0070740 \0 ! 001 \0 \0 001 @ g \0 \0 \n \0 \0 021 001 \0
0070760 H d 005 \b 223 \t \0 \0 020 223 H 003 264 \t g \0
0071000 \0 H \n \0 \0 020 \0 ( 3 0 C L : M A
0071020 P C 1 7 R E L S T K 6 G
0071040 E T W I N D O W U S E R P R O P
0071060 ) \r ( 2 6 R E L S T K 3 D
0071100 A T U M ) \r ( ) \r B K I T E M S
0071120 E L E C T E D F N D 1 \r ( P
0071140 1 2 L P P 8 I P 6
0071160 F R A M E W I N D O W P 5
0071200 P O S I T I O N S P 4 P O
0071220 S P 3 B K P O S P 2
0071240 T T Y W I N D O W P 1 O L
0071260 D I T E M P 0 F R A M E S
0071300 P E C N I 2 B U T T O N
0071320 I 1 M E N U I 0 I T E
0071340 M ) \0 371 \r \0 \0 003 @ 002 001 021 a 006 A
0071360 006 \0 \0 311 " Y 265 & @ A \n \0 \0 A \t \0
0071400 \0 g \0 \0 \n \0 \0 Z d g \0 \0 \n \0 \0 [
0071420 H d 3 020 235 K \n \0 \0 \ 260 H A \n \0 \0
0071440 277 260 327 001 K \n \0 \0 274 H 002 H 001 021 2 \v
0071460 O 016 O 020 363 263 * O 020 K \n \0 \0 _ 026 277
0071500 O 024 265 025 O 026 h 032 _ 024 _ 022 277 O 020 m
0071520 377 324 _ 020 277 260 333 O 026 & _ 024 277 260 360 O
0071540 022 022 B g \0 \0 360 223 g \0 \0 202 g \0 \0 g
0071560 \0 \0 g \0 \0 h g \0 \0 h L \t \0 \0 o \0
0071600 \0 \0 \n \0 \0 h J \t \0 \0 g \0 \0 \r \v \0
0071620 \0 ^ d g \0 \0 \n \0 \0 263 1 N J N \t \0
0071640 \0 311 006 002 001 J \t \0 \0 311 006 002 001 361 223 g
0071660 \0 \0 202 g \0 \0 h g \0 \0 \r 005 \0 \0 277 N
0071700 g \0 \0 g \0 \0 \v \0 \0 277 J g \0 \0 \n \0
0071720 \0 021 001 \f O 030 264 \n j L O 030 \v \0 \0 h
0071740 020 \0 ( 2 4 5 S T K N T H 2 3
0071760 1 G E T W I N D O W U S E R P
0072000 R O P 2 2 3 W I N D O W A D
0072020 D P R O P 2 1 2 A T T A C H
0072040 W I N D O W 1 9 1 \ I N S U
0072060 R E W I N D O W 1 8 3 \ I N
0072100 S U R E W I N D O W 1 7 5 G
0072120 E T W I N D O W U S E R P R O P
0072140 1 6 7 I N S P E C T W . C R
0072160 E A T E 1 6 0 B A C K T R A
0072200 C E I T E M W I N D O W 1 5 5
0072220 C O N C A T 1 4 8 S T K N
0072240 A M E 8 3 S T K N T H 6 2
0072260 S T K N T H 5 4 M E N U D
0072300 E S E L E C T 4 7 S T K N T
0072320 H 3 7 G E T W I N D O W U S
0072340 E R P R O P 2 9 G E T W I N
0072360 D O W U S E R P R O P 2 3 W
0072400 F R O M M E N U 1 9 M E N U
0072420 S E L E C T ) \r ( 2 2 8 L A S
0072440 T P O S 2 2 0 D E T A C H W
0072460 I N D O W 2 1 7 C L O S E F
0072500 N 2 0 8 L O C A L C L O S E
0072520 2 0 4 B O T T O M 2 0 0
0072540 T O P 1 7 2 M A I N W I N D
0072560 O W 1 6 3 S T A C K F R A M
0072600 E P R O P P R I N T F N 1 4 3
0072620 S T A C K F R A M E V A L U E
0072640 C O M M A N D F N 1 3 9 R E
0072660 P L A C E S T K A R G 1 3 6
0072700 F E T C H S T K A R G 1 3 3
0072720 P R O P E R T I E S . F R O M .
0072740 F R A M E S P E C 1 2 9 P R
0072760 O P E R T I E S . F R O M . F R
0073000 A M E S P E C . L O T S 1 2 4
0073020 M I D D L E 3 4 S T A C K
0073040 - P O S I T I O N 2 6 M A I
0073060 N W I N D O W 9 M E N U ) \r
0073100 ( 1 5 2 " F r a m e " )
0073120 \r R E G I O N N E X T T O D 1
0073140 \r ( P 5 R H E I G H T P
0073160 4 R W I D T H P 3 R B O
0073200 T T O M P 2 R L E F T P
0073220 1 N B T M P 0 N L F T
0073240 I 4 I N T E R N A L F L G
0073260 I 3 W H E R E I 2 H
0073300 E I G H T I 1 W I D T H
0073320 I 0 R E G I O N F 6 \
0073340 C U R S O R D E S T H E I G H T
0073360 F 7 \ C U R S O R D E S T
0073400 W I D T H ) 001 001 006 002 \0 005 021 ` 005
0073420 @ 001 Z @ 002 001 [ @ 002 002 001 \ @ 002 002 002
0073440 001 ] A 243 L b 002 277 B 243 M b 004 277 C d
0073460 g \0 \0 360 262 ; 277 @ 002 001 @ 002 002 002 001 k
0073500 331 330 d B 330 V 361 262 277 D 222 j 260 034 @
0073520 A B g \0 \0 i b \b 277 b 006 277 b 004 277 b
0073540 002 277 b \0 023 260 250 k 330 271 J X 261 \0 201 g
0073560 \0 \0 360 262 , j K B 331 Y 361 225 D 227 V B
0073600 331 271 J X 260 i @ A B g \0 \0 i b \b 277
0073620 b 006 277 b 004 277 b 002 277 b \0 023 261 377 q C
0073640 g \0 \0 360 262 + j J A 331 X 361 262 4 D 225
0073660 W 016 A 331 260 + @ A B g \0 \0 i b \b 277
0073700 b 006 277 b 004 277 b 002 277 b \0 023 261 377 A J
0073720 L 330 X A k 331 330 W 016 361 224 D 262 030 j 270
0073740 K M B 331 330 d j 361 241 277 j 271 H I A B
0073760 \f \0 \0 020 @ A B g \0 \0 i b \b 277 b 006
0074000 277 b 004 277 b 002 277 b \0 023 261 377 003 \0 ( 2
0074020 2 9 C R E A T E R E G I O N )
0074040 \r ( 2 3 6 L E F T 1 7 4 R
0074060 I G H T 1 4 9 L E F T 1 2
0074100 6 T O P 1 0 0 B O T T O M
0074120 7 1 B O T T O M 3 7 T O
0074140 P ) \r ( ) \r P R O C E E D - U S
0074160 I N G - M E N U D 1 \r ( F 0
0074200 * L A S T - C O N D I T I O N
0074220 * F 1 * D E B U G - I O *
0074240 ) \0 032 \0 002 \0 \0 P \t \0 \0 265 \v Q o
0074260 \0 \0 \0 \n \0 \0 020 \t \0 \0 d 223 P \n \0 \0
0074300 020 \0 ( 2 3 P R O C E E D - W I
0074320 T H - D E F A U L T S 1 7 M
0074340 E N U 1 3 F O R M A T 3
0074360 C R E A T E - P R O C E E D - M
0074400 E N U ) \r N I L \r ( 1 0 " ~
0074420 & N o p r o c e e d c a s e
0074440 s e n a b l e d . ~ % % " ) \r
0074460 C R E A T E - P R O C E E D - M
0074500 E N U A 0 0 0 2 D 1 \r ( L (
0074520 0 C A S E ) ) \0 017 \0 \0 \0 001 h
0074540 o \0 \0 \0 @ \v \0 \0 @ h 032 032 020 \0 ( 8
0074560 F O R M A T ) \r N I L \r ( 4
0074600 " ~ A " ) \r C R E A T E - P R
0074620 O C E E D - M E N U D 1 \r ( L
0074640 ( 0 C O N D I T I O N ) )
0074660 \0 D 003 \0 \0 001 @ \t \0 \0 021 ! 002 H 264 :
0074700 ` \0 \0 037 d o \0 \0 \0 024 022 277 g \0 \0 H
0074720 \n \0 \0 271 d I 024 004 277 d g \0 \0 024 277
0074740 d g \0 \0 024 034 277 j d n 177 377 d h 032 032
0074760 032 032 272 d J 024 \n 277 020 \0 ( 2 8 C L
0075000 : M A P C A R 3 C O M P U T
0075020 E - P R O C E E D - C A S E S )
0075040 \r ( 4 5 D E F A U L T M E N U
0075060 H E L D F N 3 8 C L R P R O
0075100 M P T 2 4 C R E A T E - P R
0075120 O C E E D - M E N U A 0 0 0 2
0075140 1 2 | 004 003 M E N U T Y P E # |
0075160 ) \r ( 1 8 " W a y s t o
0075200 p r o c e e d . . . " ) \r ( C L
0075220 : P R O C L A I M ( Q U O T E
0075240 ( G L O B A L T R A C E R E
0075260 G I O N ) ) ) \r ( O R ( B O U
0075300 N D P ( Q U O T E T R A C E
0075320 R E G I O N ) ) ( S E T Q T
0075340 R A C E R E G I O N ( C O N S
0075360 8 ( C O N S 3 ( C O N S
0075400 5 4 7 ( C O N S 3 1 0 N
0075420 I L ) ) ) ) ) ) \r ( C L : P R O
0075440 C L A I M ( Q U O T E ( G L
0075460 O B A L B R E A K R E G I O N
0075500 S P E C ) ) ) \r ( O R ( B O U
0075520 N D P ( Q U O T E B R E A K
0075540 R E G I O N S P E C ) ) ( S E
0075560 T Q B R E A K R E G I O N S P
0075600 E C ( C O N S 1 7 ( C O N
0075620 S - 1 2 0 ( C O N S 4 0 0
0075640 ( C O N S 1 2 0 N I L \r )
0075660 ) ) ) ) ) \r ( R P A Q ? M a x
0075700 B k M e n u W i d t h 1 2 5 )
0075720 \r ( R P A Q ? M a x B k M e n
0075740 u H e i g h t 3 0 0 ) \r ( R P
0075760 A Q ? A U T O B A C K T R A C
0076000 E F L G N I L ) \r ( R P A Q ?
0076020 C L O S E B R E A K W I N D O
0076040 W F L G T ) \r ( R P A Q ? B
0076060 A C K T R A C E F O N T ) \r ( R
0076100 P A Q ? B r e a k M e n u ) \r
0076120 ( A D D T O V A R W I N D O W
0076140 U S E R F O R M S ( W B R E A
0076160 K T ) ) \r ( A D D T O V A R
0076200 E N D O F W I N D O W U S E R F
0076220 O R M S ( W B R E A K N I L
0076240 ) ) \r I N I T - T R A C E - O U
0076260 T P U T D 1 \r ( F 0 * T R
0076300 A C E - O U T P U T * F 1
0076320 W B R E A K F 2 T R A C E
0076340 R E G I O N ) \0 037 \0 003 \0 \0 Q 264
0076360 032 P \t \0 \0 263 025 g \0 \0 R o \0 \0 \0 h
0076400 i \f \0 \0 c \0 \n \0 \0 020 h 020 \0 ( 2 6
0076420 D S P S C R O L L 2 1 C R
0076440 E A T E W 6 W I N D O W P )
0076460 \r ( 1 1 O N ) \r ( 1 6 " *
0076500 T r a c e - O u t p u t * " ) \r
0076520 ( P U T P R O P S C M L D E B
0076540 U G C O P Y R I G H T ( " X
0076560 e r o x C o r p o r a t i o n
0076600 " 1 9 8 6 ) ) \r N I L \r
0076615