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