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