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