$ od -c -N 50000 [eris]<LispUsers>TRACEIN.DCOM!1
0000000 ( F I L E C R E A T E D " 1 6
0000020 - A p r - 8 4 1 4 : 1 1 : 1 9
0000040 " ( " c o m p i l e d o n
0000060 " { P H Y L U M } < L I S P U
0000100 S E R S > T R A C E I N . ; 3 )
0000120 " 1 6 - A p r - 8 4 1 0 : 3
0000140 4 : 2 1 " \r b r e c o m p i l
0000160 e d A L L i n W O R K d
0000200 a t e d " 1 6 - A p r - 8 4
0000220 1 2 : 5 8 : 2 6 " ) \r ( F I L E
0000240 C R E A T E D " 1 9 - A p r -
0000260 8 3 1 1 : 0 4 : 1 9 " < D D
0000300 Y E R > T R A C E I N . . 1 2
0000320 1 4 5 3 6 p r e v i o u s d
0000340 a t e : " 5 - A p r - 8 3
0000360 1 2 : 2 8 : 5 6 " \r < D D Y E
0000400 R > T R A C E I N . . 1 1 ) \r T
0000420 R A C E I N D 1 \r ( L ( 0
0000440 X ) ) \0 Y \a \0 003 001 @ d 003 243 d 221
0000460 h 032 b \0 d 001 021 1 003 H 003 265 035 @ d 002
0000500 001 i 360 226 277 i 272 @ 002 b \0 002 263 024 H g
0000520 \0 \0 I J \f \0 \0 020 002 001 271 H 001 270 260 337
0000540 021 0 006 @ 260 030 d 001 273 H K I J \f \0 \0
0000560 274 M 265 \a L h 032 ^ 201 L & 275 002 003 265 350
0000600 N 020 \0 ( 1 0 5 Q \ T R A C E I
0000620 N B L O C K / T R A C E I N X
0000640 5 4 Q \ T R A C E I N B L O C
0000660 K / T R A C E I N X ) \r ( 4 7 Q
0000700 T T Y : ) \r ( ) \r E V L - F I
0000720 X D 1 \r ( L ( 1 P U T - I
0000740 N 0 E X P ) P 1 N O E
0000760 M B E D F 5 C L I S P A R
0001000 R A Y ) 002 024 005 001 \0 002 021 001 @ U
0001020 035 265 003 @ b \0 d 003 265 \n A @ h 032 \n \0
0001040 \0 020 001 004 l 004 360 242 261 001 254 @ 001 g \0 \0
0001060 033 X d 226 @ H A \v \0 \0 020 @ d 001 g \0
0001100 \0 360 222 261 001 271 d 001 d g \0 \0 360 227 277 o
0001120 \0 \0 \0 261 \0 362 d g \0 \0 360 253 d g \0 \0
0001140 360 245 d g \0 \0 360 227 277 o \0 \0 \0 261 \0 330
0001160 d g \0 \0 360 227 277 o \0 \0 \0 261 \0 312 d g
0001200 \0 \0 360 263 7 d g \0 \0 360 263 0 d g \0 \0
0001220 360 263 ) d g \0 \0 360 263 " d g \0 \0 360 263
0001240 033 d g \0 \0 360 263 024 d g \0 \0 360 253 d g
0001260 \0 \0 360 245 d g \0 \0 360 227 277 o \0 \0 \0 261
0001300 \0 206 d g \0 \0 360 262 - 277 021 0 004 @ 002 001
0001320 260 030 d 001 003 264 006 o \0 \0 \0 272 K 265 \a J
0001340 h 032 \ 201 J & 273 002 003 265 351 L 022 o \0 \0
0001360 \0 032 260 S d g \0 \0 360 245 d g \0 \0 360 230
0001400 277 i 271 o \0 \0 \0 260 > d g \0 \0 360 245 d
0001420 g \0 \0 360 226 277 o \0 \0 \0 260 + d g \0 \0
0001440 360 226 277 o \0 \0 \0 260 036 d g \0 \0 360 253 d
0001460 g \0 \0 360 245 d g \0 \0 360 227 277 i 271 o \0
0001500 \0 \0 201 277 h 265 003 202 261 \0 207 @ 001 \t \0 \0
0001520 d g \0 \0 360 263 " d g \0 \0 360 263 033 d g
0001540 \0 \0 360 263 024 d g \0 \0 360 253 d g \0 \0 360
0001560 245 d g \0 \0 360 226 277 o \0 \0 \0 260 S d g
0001600 \0 \0 360 263 " d g \0 \0 360 263 033 d g \0 \0
0001620 360 263 024 d g \0 \0 360 253 d g \0 \0 360 245 d
0001640 g \0 \0 360 226 277 o \0 \0 \0 260 % 277 o \0 \0
0001660 \0 i \n \0 \0 277 @ 001 i \n \0 \0 277 o \0 \0
0001700 \0 i \n \0 \0 277 i \t \0 \0 277 o \0 \0 \0 A
0001720 \v \0 \0 020 @ d 001 001 g \0 \0 360 262 ! 277 021
0001740 0 004 @ 260 025 d 001 A \n \0 \0 272 K 265 \a J
0001760 h 032 \ 201 J & 273 002 003 265 354 L 020 001 001 g
0002000 \0 \0 360 231 @ 001 A \n \0 \0 @ 002 032 020 o \0
0002020 \0 \0 i \n \0 \0 @ 001 i \n \0 \0 @ 020 \0 (
0002040 1 0 2 0 Q P R I N T 1 0 1 2
0002060 Q P R I N T 7 7 6 Q E V L
0002100 - F I X 7 3 7 Q E V L - F I
0002120 X 7 0 7 Q \ T R A C E I N B
0002140 L O C K / E X P A N D - E V 6
0002160 7 6 Q T E R P R I 6 7 1 Q
0002200 P R I N 1 6 6 0 Q P R I N 1
0002220 6 5 1 Q P R I N 1 5 0 4 Q
0002240 F N T Y P 5 6 Q \ T R A C
0002260 E I N B L O C K / E X P A N D -
0002300 E V 2 5 Q \ A P P E N D 2 )
0002320 \r ( 7 6 6 Q N L A M B D A 7
0002340 1 7 Q L A M B D A 6 2 7 Q
0002360 C F E X P R * 6 2 1 Q F S U
0002400 B R * 6 1 3 Q F E X P R *
0002420 6 0 4 Q C F E X P R 5 7 5 Q
0002440 F S U B R 5 6 6 Q F E X P
0002460 R 5 5 1 Q C E X P R * 5 4
0002500 3 Q E X P R * 5 3 5 Q S U
0002520 B R * 5 2 6 Q C E X P R 5
0002540 1 7 Q E X P R 5 1 0 Q S U
0002560 B R 4 5 5 Q N L A M B D A
0002600 4 4 7 Q L A B E L 4 4 1 Q
0002620 L A M B D A 4 2 4 Q S E L E
0002640 C T Q 4 0 7 Q E R S E T Q
0002660 4 0 1 Q N L S E T Q 3 6 2 Q
0002700 * F U N C T I O N 3 5 4 Q
0002720 F U N C T I O N 2 7 2 Q P R
0002740 O G 2 5 4 Q S U B 1 V A R
0002760 2 4 6 Q A D D 1 V A R 2 4 0
0003000 Q R E S E T F O R M 2 3 1 Q
0003020 F R P T Q 2 2 2 Q R P T Q
0003040 2 1 3 Q P R O G 1 2 0 4 Q
0003060 P R O G N 1 7 5 Q O R 1
0003100 6 6 Q A N D 1 5 0 Q C O N
0003120 D 1 3 2 Q S A V E S E T Q
0003140 1 2 4 Q S E T N 1 1 6 Q S
0003160 E T Q 1 0 0 Q G O 6 5 Q
0003200 W A T C H - E V A L 4 4 Q E
0003220 V L - F I X ) \r ( 1 0 0 6 Q
0003240 " T R A C E I N e x p e c t s
0003260 t o f i n d a f u n c t
0003300 i o n b u t f i n d s : "
0003320 7 0 3 Q ( T A I L T ) 6 6
0003340 5 Q " - T R A C E I N a
0003360 s s u m e s i t i s a S
0003400 P R E A D L A M B D A " 6 4
0003420 5 Q " U n d e f i n e d f u
0003440 n c t i o n " 6 3 6 Q ( T
0003460 A I L N I L ) 5 6 0 Q ( T
0003500 A I L T ) 4 6 6 Q ( N I L
0003520 T A I L T ) 4 3 3 Q ( T
0003540 T A I L ( N I L T A I L
0003560 T ) T ) 4 1 6 Q ( T T A
0003600 I L N I L ) 3 7 3 Q ( L I
0003620 S T P ) 3 4 5 Q ( T A I L
0003640 L I S T P ) 3 1 7 Q ( N I L
0003660 T ) 2 6 3 Q ( T A I L T
0003700 ) 1 5 7 Q ( T A I L ( T A
0003720 I L T ) ) 1 4 1 Q ( N I L
0003740 T ) 1 0 7 Q ( L I S T P )
0003760 ) \r \ T R A C E I N B L O C K /
0004000 W A T C H - R E P A 0 0 0 1 D
0004020 1 \r ( N A M E E R R O R S E T
0004040 L ( 2 E R R O R S E T . W
0004060 1 E R R O R S E T . V 0
0004100 E R R O R S E T . U ) ) \0 017 \0
0004120 \0 \0 003 i d \n \0 \0 g \0 \0 \n \0 \0 h 032
0004140 020 \0 ( 1 2 Q L I S P X 4 L
0004160 I S P X R E A D ) \r ( 7 : ) \r
0004200 ( ) \r \ T R A C E I N B L O C K
0004220 / W A T C H - R E P D 1 \r N I
0004240 L \0 # 001 \0 \0 \0 021 020 \0 o \0 \0 \0 \t
0004260 \0 \0 X 003 265 022 g \0 \0 i \n \0 \0 277 i \t
0004300 \0 \0 263 351 H 020 001 X 260 365 \0 ( 3 1 Q
0004320 L I S P X R E A D P 2 4 Q P
0004340 R I N T 1 1 Q \ T R A C E I
0004360 N B L O C K / W A T C H - R E P
0004400 A 0 0 0 1 ) \r ( 2 0 Q ? ) \r (
0004420 6 ( D U M M Y . F O R . E R
0004440 R O R S E T ) ) \r \ T R A C E I
0004460 N B L O C K / E V M A T C H E R
0004500 D 1 \r ( L ( 1 P A T 0
0004520 E X P ) ) \0 256 001 \0 \0 002 A d 004 l
0004540 004 361 263 033 d 242 261 \0 242 d i 360 221 i 020 021
0004560 001 \0 @ k H 017 016 022 h 360 h 360 020 001 004 l
0004600 004 361 263 { A 001 d g \0 \0 360 233 277 A 002 001
0004620 \t \0 \0 h 360 h 360 020 d g \0 \0 360 262 7 277
0004640 021 020 \0 @ 003 262 @ \t \0 \0 A 002 002 \t \0
0004660 \0 361 262 023 @ 001 A 002 001 \n \0 \0 H 032 270 @
0004700 002 b \0 260 341 H \t \0 \0 @ A 002 002 \n \0 \0
0004720 \n \0 \0 020 g \0 \0 360 226 A 002 001 \t \0 \0 020
0004740 @ 003 265 \f o \0 \0 \0 i \n \0 \0 h 020 001 A
0004760 001 \n \0 \0 @ 002 A 002 \n \0 \0 032 020 @ 003 265
0005000 357 o \0 \0 \0 \t \0 \0 020 \0 ( 2 5 3 Q
0005020 E R R O R 2 3 6 Q \ T R A C
0005040 E I N B L O C K / E V M A T C H
0005060 E R 2 2 7 Q \ T R A C E I N
0005100 B L O C K / E V M A T C H E R
0005120 2 1 7 Q P R I N 1 2 0 2 Q
0005140 E V A L 1 6 6 Q \ N C O N C
0005160 2 1 6 3 Q \ T R A C E I N B
0005200 L O C K / E V M A T C H E R 1
0005220 5 4 Q D R E V E R S E 1 3 7
0005240 Q \ T R A C E I N B L O C K /
0005260 E V M A T C H E R 1 2 4 Q L
0005300 E N G T H 1 1 6 Q L E N G T
0005320 H 6 6 Q E V A L ) \r ( 1 7 2
0005340 Q E V A L 7 7 Q T A I L
0005360 5 5 Q T E S T ) \r ( 2 5 0 Q
0005400 " T r a c e i n e r r o r :
0005420 L i s t a r g u m e n t e
0005440 x p e c t e d " 2 1 3 Q " T
0005460 r a c e i n w a r n i n g :
0005500 m i s s i n g a r g u m e n t
0005520 s d e t e c t e d " ) \r \ T R
0005540 A C E I N B L O C K / E X P A N
0005560 D - E V D 1 \r ( L ( 2 P U
0005600 T - I N 1 P A T 0 E X P
0005620 ) F 0 N O E M B E D ) \0
0005640 ! \0 001 \0 003 @ 002 A \n \0 \0 b 002 @ 001 @
0005660 002 A B \v \0 \0 032 b \0 P 247 B @ h 032 \n
0005700 \0 \0 020 @ 020 \0 ( 3 4 Q \ A P P E
0005720 N D 2 2 0 Q \ T R A C E I N
0005740 B L O C K / E X P A N D - E V 1
0005760 5 \ T R A C E I N B L O C K
0006000 / E V M A T C H E R ) \r N I L \r
0006020 ( ) \r \ T R A C E I N B L O C K
0006040 / E X P A N D - E V 1 D 1 \r (
0006060 L ( 2 P U T - I N 1 P A
0006100 T 0 E X P ) ) \0 O 006 \0 \0 003
0006120 A d 003 262 B \t \0 \0 @ \t \0 \0 360 250 o \0
0006140 \0 \0 i \n \0 \0 277 @ A 021 B 005 I 003 265 003
0006160 205 001 275 H 003 265 004 J 020 001 M B \v \0 \0 274
0006200 K 265 017 L h 032 [ 272 I 002 271 H 002 270 260 336
0006220 L & 273 260 365 225 @ B \n \0 \0 020 @ 020 \0 (
0006240 1 1 2 Q E V L - F I X 5 6 Q
0006260 \ T R A C E I N B L O C K / E
0006300 X P A N D - E V 1 2 5 Q P R
0006320 I N 1 1 3 Q L E N G T H 7
0006340 L E N G T H ) \r N I L \r ( 2
0006360 1 Q " T r a c e i n w a r n
0006400 i n g : e x t r a a r g u m
0006420 e n t s i g n o r e d " ) \r \
0006440 T R A C E I N B L O C K / T R A
0006460 C E - C R E A T E D 1 \r ( L
0006500 ( 0 F O R M ) F 0 C L I
0006520 S P A R R A Y ) \0 030 \0 001 \0 001 @
0006540 i \n \0 \0 @ P 035 265 003 @ @ o \0 \0 \0 \n
0006560 \0 \0 \n \0 \0 020 \0 ( 2 5 Q C L I S
0006600 P T R A N 2 2 Q E V L - F I
0006620 X 4 D W I M I F Y ) \r N I L
0006640 \r ( 1 7 Q ( W A T C H - E V
0006660 A L ) ) \r \ T R A C E I N B L O
0006700 C K / T R A C E I N X D 1 \r (
0006720 L ( 3 T r a c e 2 W H E
0006740 N 1 W H E R E 0 F N ) )
0006760 \0 ! \0 \0 \0 004 @ g \0 \0 A h 032 032 B
0007000 C 223 g \0 \0 202 g \0 \0 g \0 \0 h 032 032 l
0007020 004 g \0 \0 017 016 020 \0 N I L \r ( 3 4 Q
0007040 B R E A K I N 2 4 Q O K
0007060 2 1 Q S T E P 1 5 Q T R A
0007100 C E A L L 3 A R O U N D ) \r
0007120 ( ) \r U N W A T C H D 1 \r ( L
0007140 ( 0 X P R ) ) \0 \0 \0 \0 001
0007160 @ 003 262 033 @ d 001 g \0 \0 360 225 002 001 b \0
0007200 260 361 001 \t \0 \0 @ 002 \t \0 \0 032 020 @ 020 \0
0007220 ( 3 2 Q U N W A T C H 2 5 Q
0007240 U N W A T C H ) \r ( 1 1 Q W
0007260 A T C H - E V A L ) \r ( ) \r W A
0007300 T C H - E V A L A 0 0 0 2 D 1
0007320 \r ( N A M E E R R O R S E T
0007340 L ( 2 E R R O R S E T . W
0007360 1 E R R O R S E T . V 0 E
0007400 R R O R S E T . U ) F 0 X
0007420 P R # ) \0 020 \0 001 \0 003 P \t \0 \0 h
0007440 d d d i \r 006 \0 \0 i 020 \0 ( 1 4 Q
0007460 P R I N T D E F 3 U N W A T
0007500 C H ) \r N I L \r ( ) \r W A T C H
0007520 - E V A L A 0 0 0 3 D 1 \r ( N
0007540 A M E E R R O R S E T L (
0007560 2 E R R O R S E T . W 1 E
0007600 R R O R S E T . V 0 E R R O
0007620 R S E T . U ) F 0 ! V A L
0007640 U E ) \0 \r \0 001 \0 003 P h d d d i
0007660 \r 006 \0 \0 i 020 \0 ( 1 1 Q P R I N
0007700 T D E F ) \r N I L \r ( ) \r W A T
0007720 C H - E V A L A 0 0 0 4 D 1 \r
0007740 ( N A M E E R R O R S E T L
0007760 ( 2 E R R O R S E T . W 1
0010000 E R R O R S E T . V 0 E R
0010020 R O R S E T . U ) F 0 ! V
0010040 A L U E ) \0 \r \0 001 \0 003 i d \n \0
0010060 \0 \t \0 \0 c \0 i 020 \0 ( 7 L I S P
0010100 X E V A L 4 L I S P X R E A
0010120 D ) \r N I L \r ( ) \r W A T C H -
0010140 E V A L D 1 \r ( P 4 S t e
0010160 p A c t i o n P 1 ! V A L
0010200 U E P 0 I N D E N T # I
0010220 0 X P R # F 5 S t e p
0010240 A c t i o n F 6 I N D E N
0010260 T # F 7 V A L U E P R I N
0010300 T E R F 1 0 Q T r a c e i
0010320 n T a b l e F 1 1 Q F O R
0010340 M P R I N T E R ) 001 203 005 005 001 001
0010360 V l 002 330 021 1 003 U g \0 \0 360 242 261 \0 230
0010400 @ \t \0 \0 020 o \0 \0 \0 W 020 i \r 005 \0 \0
0010420 d g \0 \0 360 262 027 277 i \t \0 \0 277 o \0 \0
0010440 \0 i \n \0 \0 277 \b \0 \0 261 \0 214 d g \0 \0
0010460 360 227 277 h i \n \0 \0 260 a d g \0 \0 360 262
0010500 # 277 I g \0 \0 360 236 g \0 \0 021 001 004 @ \t
0010520 \0 \0 Y 023 261 \0 224 o \0 \0 \0 i \n \0 \0 261
0010540 \0 210 d g \0 \0 360 237 277 g \0 \0 c \n 277 I
0010560 g \0 \0 360 262 t 260 l d g \0 \0 360 236 277 i
0010600 \t \0 \0 277 o \0 \0 \0 \t \0 \0 260 * d g \0
0010620 \0 360 262 ? 277 g \0 \0 Y 277 H h i \v \0 \0
0010640 277 W 022 272 @ i l 002 J 017 016 277 @ 003 226 U
0010660 227 i \t \0 \0 277 U 263 + @ d 003 262 ' 277 h
0010700 d I g \0 \0 360 222 261 377 > o \0 \0 \0 261 377
0010720 ; d g \0 \0 360 262 9 277 I g \0 \0 360 242 261
0010740 \0 213 @ \t \0 \0 Y 277 @ 003 226 H h i \v \0
0010760 \0 277 o \0 \0 \0 i \n \0 \0 277 W 016 273 I i
0011000 l 002 K 017 016 277 U 263 e @ 003 262 _ 260 251 d
0011020 i 360 262 037 277 I g \0 \0 360 233 i 021 001 004 @
0011040 \t \0 \0 Y 023 260 303 o \0 \0 \0 i \n \0 \0 260
0011060 270 d g \0 \0 360 237 277 i \t \0 \0 277 o \0 \0
0011100 \0 \t \0 \0 261 377 q g \0 \0 360 262 031 i \t \0
0011120 \0 277 o \0 \0 \0 i \n \0 \0 277 o \0 \0 \0 \t
0011140 \0 \0 260 205 \b \0 \0 261 377 200 U 223 i \t \0 \0
0011160 I 020 \0 ( 5 7 7 Q T E R P R I
0011200 5 6 6 Q S H O U L D N T 5 6
0011220 1 Q W A T C H - E V A L A 0 0
0011240 0 4 5 5 1 Q P R I N 1 5 4
0011260 0 Q T E R P R I 5 2 3 Q W
0011300 A T C H - E V A L A 0 0 0 3 5
0011320 1 3 Q T E R P R I 4 7 6 Q
0011340 P R I N 1 4 6 2 Q E V A L
0011360 4 1 1 Q P R I N 1 4 0 0 Q
0011400 T A B 3 6 5 Q E V A L 3 0
0011420 4 Q T E R P R I 2 5 7 Q T
0011440 A B 2 3 2 Q W A T C H - E V
0011460 A L A 0 0 0 2 2 2 2 Q T E R
0011500 P R I 1 5 6 Q P R I N 1 1
0011520 4 1 Q E V A L 1 0 7 Q B R
0011540 E A K 1 7 0 Q \ T R A C E I
0011560 N B L O C K / W A T C H - R E P
0011600 6 4 Q P R I N 1 5 3 Q T
0011620 E R P R I 3 7 Q A S K U S E
0011640 R 2 3 Q E V A L ) \r ( 5 3 1
0011660 Q X 5 0 4 Q V 4 5 0 Q
0011700 N O B I N D 3 5 4 Q N O B I
0011720 N D 3 4 4 Q S 3 2 4 Q N
0011740 O B I N D 2 4 7 Q N O B I N
0011760 D 2 4 0 Q R 2 1 3 Q P
0012000 2 0 2 Q N O B I N D 1 7 3 Q
0012020 E V A L 1 6 5 Q F 1 3 2
0012040 Q E V A L 1 2 5 Q N O B I
0012060 N D 1 1 5 Q E 7 7 Q B
0012100 4 3 Q % 1 2 Q E V A L )
0012120 \r ( 5 5 6 Q ( D U M M Y . F
0012140 O R . E R R O R S E T ) 5 4 5
0012160 Q " s e t e x i t v a l u
0012200 e : " 5 2 0 Q ( D U M M Y
0012220 . F O R . E R R O R S E T ) 4
0012240 7 2 Q " V a l u e a l r e a
0012260 d y e x i s t s - d o R
0012300 f i r s t " 4 0 5 Q " =
0012320 " 3 3 5 Q " < - " 2 2 7
0012340 Q ( D U M M Y . F O R . E R R
0012360 O R S E T ) 1 5 2 Q " V a l
0012400 u e a l r e a d y e x i s t
0012420 s - d o R f i r s t "
0012440 6 0 Q " e v a l : " 3 0 Q
0012460 " - > " ) \r W A T C H - E V A
0012500 L H O O K A 0 0 0 5 D 1 \r ( N
0012520 A M E E R R O R S E T L (
0012540 2 E R R O R S E T . W 1 E
0012560 R R O R S E T . V 0 E R R O
0012600 R S E T . U ) F 0 X P R #
0012620 ) \0 \r \0 001 \0 003 P h d d d i \r 006
0012640 \0 \0 i 020 \0 ( 1 1 Q P R I N T D
0012660 E F ) \r N I L \r ( ) \r W A T C H
0012700 - E V A L H O O K A 0 0 0 6 D
0012720 1 \r ( N A M E E R R O R S E T
0012740 L ( 2 E R R O R S E T . W
0012760 1 E R R O R S E T . V 0
0013000 E R R O R S E T . U ) F 0
0013020 ! V A L U E ) \0 \r \0 001 \0 003 P h
0013040 d d d i \r 006 \0 \0 i 020 \0 ( 1 1 Q
0013060 P R I N T D E F ) \r N I L \r ( )
0013100 \r W A T C H - E V A L H O O K A
0013120 0 0 0 7 D 1 \r ( N A M E E R
0013140 R O R S E T L ( 2 E R R O
0013160 R S E T . W 1 E R R O R S E
0013200 T . V 0 E R R O R S E T . U
0013220 ) F 0 ! V A L U E ) \0 \r
0013240 \0 001 \0 003 i d \n \0 \0 \t \0 \0 c \0 i 020
0013260 \0 ( 7 L I S P X E V A L 4
0013300 L I S P X R E A D ) \r N I L \r (
0013320 ) \r W A T C H - E V A L H O O K
0013340 D 1 \r ( P 4 S t e p A c t
0013360 i o n P 1 ! V A L U E P
0013400 0 I N D E N T # I 0 X
0013420 P R # F 5 S t e p A c t i
0013440 o n F 6 I N D E N T # F
0013460 7 F O R M P R I N T E R F
0013500 1 0 Q V A L U E P R I N T E
0013520 R F 1 1 Q T r a c e i n T
0013540 a b l e ) 001 302 005 005 \0 001 g \0 \0 \t
0013560 \0 \0 242 261 001 265 V l 002 330 021 1 003 g \0 \0
0013600 Y 277 H h i \v \0 \0 277 W 016 272 @ i l 002
0013620 J 017 016 277 @ 003 226 U 233 i \t \0 \0 277 U 265
0013640 003 202 261 001 V @ 003 242 261 001 O h d I g \0
0013660 \0 360 244 o \0 \0 \0 203 o \0 \0 \0 W 022 i h
0013700 d i \r \b \0 \0 d g \0 \0 360 262 026 277 i \t
0013720 \0 \0 277 o \0 \0 \0 i \n \0 \0 277 \b \0 \0 260
0013740 276 d g \0 \0 360 227 277 h i \n \0 \0 260 224 d
0013760 g \0 \0 360 262 024 277 I g \0 \0 360 263 o \0
0014000 \0 \0 i \n \0 \0 260 033 d g \0 \0 360 262 A 277
0014020 g \0 \0 c \n 277 I g \0 \0 360 225 @ \t \0 \0
0014040 Y 277 @ 003 226 H h i \v \0 \0 277 o \0 \0 \0
0014060 i \n \0 \0 277 W 020 273 I i l 002 K 017 016 277
0014100 U 222 261 \0 320 @ 003 242 261 \0 307 261 377 S d g
0014120 \0 \0 360 237 277 i \t \0 \0 277 o \0 \0 \0 \t \0
0014140 \0 261 377 < d g \0 \0 360 223 277 261 377 022 d g
0014160 \0 \0 360 262 034 277 I g \0 \0 360 242 261 \0 223 @
0014200 g \0 \0 \n \0 \0 271 g \0 \0 \t \0 \0 260 224 d
0014220 i 360 262 + 277 I g \0 \0 360 262 030 i 021 001 004
0014240 @ g \0 \0 \n \0 \0 271 g \0 \0 \t \0 \0 023 261
0014260 377 s o \0 \0 \0 i \n \0 \0 261 377 g d g \0
0014300 \0 360 237 277 i \t \0 \0 277 o \0 \0 \0 \t \0 \0
0014320 261 376 315 g \0 \0 360 262 032 i \t \0 \0 277 o \0
0014340 \0 \0 i \n \0 \0 277 o \0 \0 \0 \t \0 \0 261 377
0014360 3 \b \0 \0 261 377 - U i 360 242 261 377 ! @ g
0014400 \0 \0 \n \0 \0 271 g \0 \0 \t \0 \0 261 377 025 U
0014420 264 \b i \t \0 \0 277 U g \0 \0 360 250 g \0 \0
0014440 g \0 \0 \n \0 \0 I 020 @ \t \0 \0 020 \0 ( 6
0014460 7 7 Q E V A L 6 7 1 Q S E
0014500 T T O P V A L 6 5 1 Q T E R
0014520 P R I 6 3 7 Q S E T T O P V
0014540 A L 6 3 0 Q E V A L H O O K
0014560 6 0 7 Q S H O U L D N T 6
0014600 0 1 Q W A T C H - E V A L H O
0014620 O K A 0 0 0 7 5 7 1 Q P R I
0014640 N 1 5 6 0 Q T E R P R I 5
0014660 4 3 Q W A T C H - E V A L H O
0014700 O K A 0 0 0 6 5 3 3 Q T E R
0014720 P R I 5 1 5 Q P R I N 1 5
0014740 0 1 Q S E T T O P V A L 4 7
0014760 2 Q E V A L H O O K 4 4 0 Q
0015000 S E T T O P V A L 4 3 1 Q
0015020 E V A L H O O K 3 6 4 Q W A
0015040 T C H - E V A L H O O K A 0 0 0
0015060 5 3 5 4 Q T E R P R I 3 0
0015100 7 Q P R I N 1 2 7 6 Q T A
0015120 B 2 6 3 Q E V A L 2 3 1 Q
0015140 P R I N 1 2 0 0 Q B R E A
0015160 K 1 1 6 2 Q \ T R A C E I N
0015200 B L O C K / W A T C H - R E P
0015220 1 5 6 Q P R I N 1 1 4 5 Q
0015240 T E R P R I 1 3 1 Q A S K U
0015260 S E R 6 0 Q T E R P R I 3
0015300 3 Q T A B 5 B O U N D P )
0015320 \r ( 6 6 6 Q W A T C H - E V A
0015340 L H O O K 6 6 3 Q E V A L H
0015360 O O K 6 5 6 Q E V A L 6 3
0015400 4 Q E V A L H O O K 6 2 5 Q
0015420 W A T C H - E V A L H O O K
0015440 5 5 1 Q X 5 2 4 Q V 4 7
0015460 6 Q E V A L H O O K 4 6 7 Q
0015500 W A T C H - E V A L H O O K
0015520 4 5 4 Q N O B I N D 4 3 5 Q
0015540 E V A L H O O K 4 2 6 Q W
0015560 A T C H - E V A L H O O K 4 1
0015600 5 Q N O B I N D 4 0 5 Q S
0015620 3 7 3 Q R 3 4 5 Q P 2
0015640 5 5 Q N O B I N D 2 4 6 Q
0015660 E V A L 2 3 7 Q F 2 1 6 Q
0015700 N O B I N D 2 0 6 Q E 1
0015720 7 0 Q B 1 3 5 Q % 1 0
0015740 4 Q N O B I N D 2 3 Q N O
0015760 B I N D 2 F o r m T o E v a
0016000 l ) \r ( 5 7 6 Q ( D U M M Y
0016020 . F O R . E R R O R S E T ) 5
0016040 6 5 Q " s e t e x i t v a
0016060 l u e : " 5 4 0 Q ( D U M
0016100 M Y . F O R . E R R O R S E T )
0016120 5 1 1 Q " V a l u e a l r
0016140 e a d y e x i s t s - d o
0016160 R f i r s t " 3 6 1 Q (
0016200 D U M M Y . F O R . E R R O R S
0016220 E T ) 3 0 3 Q " = " 2
0016240 2 5 Q " V a l u e a l r e a
0016260 d y e x i s t s - d o R
0016300 f i r s t " 1 5 2 Q " e v
0016320 a l : " 1 1 7 Q " - > "
0016340 1 1 2 Q " < - " ) \r W A T C H
0016360 D 1 \r ( L ( 2 N o H o o k
0016400 ) P 0 I N D E N T # I
0016420 1 S t e p A c t i o n I 0
0016440 F o r m T o E v a l F 1
0016460 C L I S P A R R A Y F 2 W
0016500 A T C H - E V A L H O O K ) \0
0016520 [ 001 002 \0 003 j 021 001 \0 i \t \0 \0 B 263 /
0016540 R 262 , g \0 \0 \t \0 \0 262 $ g \0 \0 \t \0
0016560 \0 262 034 o \0 \0 \0 i \n \0 \0 277 i \t \0 \0
0016600 277 @ \t \0 \0 g \0 \0 \t \0 \0 277 020 o \0 \0
0016620 \0 i \n \0 \0 277 i \t \0 \0 277 @ Q 035 Q 035
0016640 265 \v @ Q 035 265 006 @ \t \0 \0 \t \0 \0 020 \0
0016660 ( 1 3 0 Q E V A L 1 2 5 Q
0016700 \ T R A C E I N B L O C K / T R
0016720 A C E - C R E A T E 1 0 4 Q
0016740 T E R P R I 7 7 Q P R I N 1
0016760 6 5 Q S E T T O P V A L 5
0017000 7 Q W A T C H - E V A L H O O
0017020 K 5 2 Q T E R P R I 4 5 Q
0017040 P R I N 1 3 3 Q C C O D E
0017060 P 2 3 Q S U B R P 7 T E
0017100 R P R I ) \r ( 6 2 Q E V A L H
0017120 O O K 3 0 Q W A T C H - E V
0017140 A L H O O K 2 0 Q E V A L H
0017160 O O K ) \r ( 7 3 Q " < < w a
0017200 t c h > > " 4 1 Q " < < e v
0017220 a l h o o k > > " ) \r P R I N T
0017240 U P T O D 1 \r ( I 4 F I L
0017260 E I 3 I g n o r e L s t
0017300 I 2 U s e P r i n 2 I 1
0017320 L i m i t I 0 O b j e c
0017340 t ) \0 \t \0 \0 \0 005 @ B h D \f \0 \0
0017360 020 \0 ( 6 P r i n t U p T o ) \r
0017400 N I L \r ( ) \r P r i n t U p T o
0017420 D 1 \r ( P 0 S i z e I
0017440 3 F I L E I 2 T a i l p
0017460 I 1 U s e P r i n 2 I
0017500 0 O b j e c t F 1 1 Q L
0017520 i m i t F 1 2 Q I g n o r
0017540 e L s t ) 001 017 \t 002 \0 004 W 022 j 360
0017560 265 003 202 261 001 006 @ 003 265 003 202 261 \0 255 B 262
0017600 < W 022 d k 360 234 277 o \0 \0 \0 C \n \0 \0
0017620 j c 022 020 l 002 360 233 o \0 \0 \0 C \n \0 \0
0017640 j c 022 020 o \0 \0 \0 C \n \0 \0 W 022 l 003
0017660 331 c 022 h b 004 277 277 277 260 263 @ A \n \0 \0
0017700 021 021 001 H W 022 361 263 032 A 223 g \0 \0 202 g
0017720 \0 \0 271 @ C l 002 I 017 016 277 W 022 H 331 260
0017740 037 @ A \n \0 \0 W 022 021 R \b k _ 016 277 J
0017760 003 265 021 L 022 \t \0 \0 C \n \0 \0 277 j c 022
0020000 h 020 001 _ 020 277 O 016 K 361 263 351 O 020 276 M
0020020 265 023 N h 032 ] 274 O 016 k 330 _ 016 277 J 002
0020040 Z 260 317 N & 275 260 361 001 W 024 034 230 @ 002 001
0020060 b \0 277 261 377 9 B 224 o \0 \0 \0 203 o \0 \0
0020100 \0 C \n \0 \0 277 W 022 k 331 c 022 @ 001 A h
0020120 C \f \0 \0 @ 002 230 @ 002 A i C \f \0 \0 277
0020140 B 265 030 W 022 j 360 265 022 o \0 \0 \0 C \n \0
0020160 \0 264 \b W 022 k 331 c 022 020 \0 ( 4 0 4 Q
0020200 P R I N 1 3 6 2 Q P r i n
0020220 t U p T o 3 4 7 Q P r i n t
0020240 U p T o 3 3 0 Q P R I N 1
0020260 2 1 7 Q P R I N 1 2 1 3 Q
0020300 P A C K 1 7 1 Q U N P A C K
0020320 1 2 3 Q N C H A R S 7 7 Q
0020340 P R I N 1 6 3 Q P R I N 1
0020360 4 3 Q P R I N 1 ) \r ( 1 4 5
0020400 Q P R I N 1 1 4 1 Q P R I
0020420 N 2 ) \r ( 4 0 0 Q " ) " 3
0020440 2 4 Q " ( " 3 1 7 Q " "
0020460 7 3 Q " . " 5 7 Q "
0020500 . " 3 7 Q " " ) \r T R A
0020520 C E I N F P D 1 \r ( I 1 F
0020540 I L E I 0 F O R M ) \0 '
0020560 002 \0 \0 002 @ l 024 h A \n \0 \0 A \t \0 \0
0020600 l 024 330 331 021 002 001 H d I 361 241 277 I 022 i
0020620 o \0 \0 \0 A \r 005 \0 \0 020 \0 ( 4 4 Q
0020640 P R I N T U P T O 1 3 Q P O
0020660 S I T I O N 7 L I N E L E N
0020700 G T H ) \r N I L \r ( 3 7 Q (
0020720 W A T C H - E V A L ) ) \r T R A
0020740 C E I N V P D 1 \r ( I 1 F
0020760 I L E I 0 V A L ) \0 $ 002
0021000 \0 \0 002 @ l 024 h A \n \0 \0 A \t \0 \0 l
0021020 024 330 331 021 002 001 H d I 361 241 277 I 022 i h
0021040 A \r 005 \0 \0 020 \0 ( 4 1 Q P R I N
0021060 T U P T O 1 3 Q P O S I T I
0021100 O N 7 L I N E L E N G T H )
0021120 \r N I L \r ( ) \r ( P R E T T Y C
0021140 O M P R I N T T R A C E I N C
0021160 O M S ) \r ( R P A Q Q T R A C
0021200 E I N C O M S ( ( A L I S T S
0021220 * T R A C E I N A L I S T S
0021240 ) ( A D V I S E * T R A C
0021260 E I N A D V I C E ) ( B L O C
0021300 K S * T R A C E I N B L O C
0021320 K S ) ( V A R S * \r T R A
0021340 C E I N V A R S ) ( F N S *
0021360 T R A C E I N F N S ) ( D E
0021400 C L A R E : D O N T E V A L @
0021420 L O A D D O E V A L @ C O M P
0021440 I L E D O N T C O P Y C O M
0021460 P I L E R V A R S ( A D D V A
0021500 R S \r ( N L A M A T R A C E
0021520 I N ) ( N L A M L W A T C H
0021540 - E V A L ) ( L A M A ) ) ) )
0021560 ) \r ( R P A Q Q T R A C E I N
0021600 A L I S T S ( ( B R E A K M A
0021620 C R O S S T E P T R A C E A
0021640 L L ) ) ) \r ( A D D T O V A R
0021660 B R E A K M A C R O S ( S T E
0021700 P ( S E T Q B R K V A L U E
0021720 ( C O N S ( S E T Q ! V A
0021740 L U E ( W A T C H B R K E X
0021760 P ) ) ) ) ) ( T R A C E A L L
0022000 ( S E T Q \r B R K V A L U E
0022020 ( C O N S ( S E T Q ! V A
0022040 L U E ( W A T C H B R K E X
0022060 P T ) ) ) ) ) ) \r ( R P A Q Q
0022100 T R A C E I N A D V I C E (
0022120 B R E A K I N ) ) \r ( P U T P R
0022140 O P S B R E A K I N R E A D
0022160 V I C E ( N I L ( B E F O R
0022200 E N I L ( O R ( L I S T P
0022220 ( G E T D F N ) ) ( A N D
0022240 ( L I S T P ( G E T P R O P
0022260 F N ( Q U O T E E X P R )
0022300 \r ) ) ( U N S A V E D E F F
0022320 N ) ) ( L O A D F N S F N )
0022340 ) ) ) ) \r ( R E A D V I S E B
0022360 R E A K I N ) \r ( R P A Q Q T
0022400 R A C E I N B L O C K S ( ( T
0022420 R A C E I N B L O C K T R A C
0022440 E I N E V L - F I X W A T C
0022460 H - R E P E V M A T C H E R
0022500 E X P A N D - E V E X P A N D
0022520 - E V 1 \r T R A C E - C R E A
0022540 T E T R A C E I N X U N W A
0022560 T C H W A T C H - E V A L W
0022600 A T C H - E V A L H O O K W A
0022620 T C H ( E N T R I E S T R A
0022640 C E I N W A T C H W A T C H
0022660 - E V A L \r W A T C H - E V A
0022700 L H O O K E V L - F I X U N
0022720 W A T C H ) ( B L K A P P L Y
0022740 F N S W A T C H - E V A L W
0022760 A T C H - E V A L H O O K ) (
0023000 S P E C V A R S X P R # I N
0023020 D E N T # N O E M B E D \r S
0023040 t e p A c t i o n ) ) ) ) \r ( R
0023060 P A Q Q T R A C E I N V A R S
0023100 ( T R A C E I N A L I S T S
0023120 T r a c e i n T a b l e ( F O
0023140 R M P R I N T E R ( F U N C T
0023160 I O N T R A C E I N F P ) )
0023200 ( V A L U E P R I N T E R ( \r
0023220 F U N C T I O N T R A C E I N
0023240 V P ) ) ( W A T C H - E V A L
0023260 H O O K ( S E L E C T Q ( S
0023300 Y S T E M T Y P E ) ( V A X
0023320 T ) N I L ) ) ) ) \r ( R P A Q
0023340 Q T R A C E I N A L I S T S
0023360 ( ( B R E A K M A C R O S S T
0023400 E P T R A C E A L L ) ) ) \r (
0023420 R P A Q Q T r a c e i n T a b
0023440 l e ( ( % " " E X P L
0023460 A I N S T R I N G " < s p a c
0023500 e > t o e v a l a f o r
0023520 m y o u t y p e " ) ( B
0023540 " r e a k " ) ( E " " \r
0023560 E X P L A I N S T R I N G " E
0023600 v a l f o r m s i l e n t l
0023620 y " ) ( F " " E X P L A
0023640 I N S T R I N G " F i n i s h
0023660 t h i s B r e a k " ) ( P
0023700 " " E X P L A I N S T R I
0023720 N G \r " P r e t t y P r i n t
0023740 f o r m " ) ( R " " E
0023760 X P L A I N S T R I N G " R e
0024000 t r y f o r m " ) ( S "
0024020 " E X P L A I N S T R I N G
0024040 " S t e p O n " ) ( T "
0024060 " \r E X P L A I N S T R I N G
0024100 " T r a c e F o r m " ) (
0024120 V " " E X P L A I N S T R
0024140 I N G " V t o P r e t t y
0024160 p r i n t V a l u e " ) ( X
0024200 " " E X P L A I N S T R I
0024220 N G \r " X t o s e t t h
0024240 e E x i t v a l u e " ) ) )
0024260 \r ( R P A Q F O R M P R I N T
0024300 E R ( F U N C T I O N T R A
0024320 C E I N F P ) ) \r ( R P A Q V
0024340 A L U E P R I N T E R ( F U N
0024360 C T I O N T R A C E I N V P )
0024400 ) \r ( R P A Q W A T C H - E V
0024420 A L H O O K ( S E L E C T Q
0024440 ( S Y S T E M T Y P E ) ( V A
0024460 X T ) N I L ) ) \r ( R P A Q
0024500 Q T R A C E I N F N S ( E V
0024520 L - F I X E V M A T C H E R
0024540 E X P A N D - E V E X P A N D
0024560 - E V 1 P R I N T U P T O P
0024600 r i n t U p T o T R A C E - C
0024620 R E A T E T R A C E I N \r T
0024640 R A C E I N F P T R A C E I N
0024660 V P T R A C E I N X U N W A
0024700 T C H W A T C H - E V A L W
0024720 A T C H - E V A L H O O K W A
0024740 T C H W A T C H - R E P ) ) \r
0024760 N I L \r
0024764