$ od -c -N 50000 [eris]<Lisp>INTERMEZZO>SOURCES>LLDATATYPE.DCOM!3
0000000 ( F I L E C R E A T E D " 1 4
0000020 - M a r - 8 5 1 2 : 2 4 : 1 3
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 D A T A
0000120 T Y P E . ; 3 3 ) \r " 1 2 - M
0000140 a r - 8 5 0 8 : 1 2 : 4 5 "
0000160 r e c o m p i l e d c h a n g
0000200 e s : \ A S S I G N D A T A T
0000220 Y P E 1 i n " I N T E R L I
0000240 S P - D 1 2 - M a r - 8 5 .
0000260 . . " d a t e d \r " 1 2 - M
0000300 a r - 8 5 0 8 : 2 4 : 1 3 " )
0000320 \r ( F I L E C R E A T E D " 1
0000340 4 - M a r - 8 5 1 2 : 2 3 : 2
0000360 5 " { E R I S } < L I S P C O
0000400 R E > S O U R C E S > L L D A T
0000420 A T Y P E . ; 3 3 5 0 9 6 3
0000440 c h a n g e s t o : ( F N S
0000460 \r \ A S S I G N D A T A T Y P
0000500 E 1 ) p r e v i o u s d a t
0000520 e : " 1 4 - M a r - 8 5 1 1
0000540 : 1 6 : 2 1 " { E R I S } < L
0000560 I S P C O R E > S O U R C E S >
0000600 L L D A T A T Y P E . ; 3 2 ) \r
0000620 N T Y P X D 1 \r ( L ( 0 X
0000640 ) ) \0 023 \0 \0 \0 001 ` \0 \0 @ 322 341 @
0000660 323 343 330 342 320 310 \0 l 377 345 020 \0 N I L \r
0000700 ( 2 \ M D S T y p e T a b l e
0000720 ) \r ( ) \r \ A L L O C M D S P A
0000740 G E D 1 \r ( L ( 0 T Y P )
0000760 ) \0 { 004 \0 \0 001 021 @ 003 ` \0 \0 X 265
0001000 9 \b \0 \0 277 ` \0 \0 X l 002 331 027 \0 \0 277
0001020 H [ 343 K l 377 345 341 321 Y \t \0 \0 n 001 \0
0001040 320 \t \0 \0 277 H n 377 370 ` \0 \0 310 001 361 263
0001060 4 @ n 200 \0 344 260 7 Z 343 J l 377 345 341 321
0001100 Y 311 \0 d 262 032 005 001 265 026 l 032 o \0 \0 \0
0001120 ` \0 \0 h 027 \0 \0 277 \v \0 \0 277 260 237 027 \0
0001140 \0 260 303 @ d l \n 360 223 277 n @ \n \n \0 \0
0001160 I 020 \0 ( 1 6 7 Q \ M A K E M D
0001200 S E N T R Y 1 4 2 Q \ M P .
0001220 E R R O R 5 3 Q \ N E W P A
0001240 G E 4 4 Q \ N E W P A G E
0001260 1 3 Q \ C H E C K F O R S T O
0001300 R A G E F U L L ) \r ( 1 5 0 Q
0001320 \ M D S F R E E L I S T P A G E
0001340 1 3 6 Q \ M D S F R E E L I
0001360 S T P A G E 1 3 2 Q \ M D S
0001400 F R E E L I S T P A G E 6 3 Q
0001420 \ H T C O L L 2 6 Q \ N x
0001440 t M D S P a g e 1 7 Q \ N x
0001460 t M D S P a g e 5 \ M D S F
0001500 R E E L I S T P A G E ) \r ( 1
0001520 2 7 Q " M D S F r e e P a
0001540 g e l i n k b a d . ^ N
0001560 t o c o n t i n u e " ) \r \
0001600 A L L O C P A G E B L O C K D
0001620 1 \r ( L ( 0 N P A G E S )
0001640 P 0 \ I N T E R R U P T A B
0001660 L E ) \0 ] \a \0 \0 001 021 @ 003 ` \0 \0
0001700 l 200 324 ` \0 \0 @ k 330 m 376 345 b \0 331 Y
0001720 363 262 026 ` \0 \0 265 005 \b \0 \0 l 002 360 264 &
0001740 I ` \0 \0 363 264 037 @ I l 002 330 [ 343 K l
0001760 377 345 341 321 Z 021 022 006 k 276 N L 363 226 023 I
0002000 027 \0 \0 J 020 M \t \0 \0 277 N k 324 276 M n
0002020 001 \0 320 275 260 346 \0 ( 1 1 6 Q \ N E
0002040 W P A G E 4 0 Q \ S E T . S
0002060 T O R A G E . S T A T E ) \r ( 1
0002100 1 0 Q \ N x t M D S P a g e
0002120 5 1 Q \ N x t A r r a y P a g
0002140 e 3 3 Q \ S T O R A G E F U
0002160 L L S T A T E 1 3 Q \ N x t
0002200 M D S P a g e 5 \ N x t A r
0002220 r a y P a g e ) \r ( ) \r \ M A P
0002240 M D S D 1 \r ( L ( 1 F N
0002260 0 T Y P E ) ) \0 w 006 \0 \0 002 @
0002300 236 @ d 005 001 241 005 002 246 @ \t \0 \0 b \0 277
0002320 ` \0 \0 l 004 360 221 k 200 j j 021 B 005 I d
0002340 H 363 221 h 020 j 360 223 n @ \0 202 n 377 375 I
0002360 j 360 235 ` \0 \0 d ` \0 \0 361 227 277 ` \0 \0
0002400 202 ` \0 \0 275 274 M L 363 263 & M [ 343 K l
0002420 377 345 341 321 004 Z @ 360 251 @ 254 J j 360 250 J
0002440 k 360 244 M k A 016 277 M l 002 324 ] 260 332 I
0002460 k 324 Y 260 254 \0 ( 1 5 Q \ T Y P E
0002500 N U M B E R F R O M N A M E ) \r
0002520 ( 1 0 4 Q \ N x t M D S P a g
0002540 e 1 0 0 Q \ L e a s t M D S
0002560 P a g e 7 2 Q \ L e a s t M
0002600 D S P a g e 6 6 Q \ N x t M
0002620 D S P a g e 2 3 Q \ S T O R
0002640 A G E F U L L S T A T E ) \r ( )
0002660 \r \ C H E C K F O R S T O R A G
0002700 E F U L L D 1 \r ( L ( 0 N
0002720 P A G E S ) P 0 \ I N T E
0002740 R R U P T A B L E ) \0 350 002 \0 \0
0002760 001 021 001 l 200 ` \0 \0 ` \0 \0 331 l 002 330
0003000 Y 361 246 @ 264 003 202 261 \0 314 ` \0 \0 265 005 \b
0003020 \0 \0 d k 360 245 d l 004 360 262 N 277 j I 361
0003040 233 l 024 o \0 \0 \0 \n \0 \0 277 260 366 I l @
0003060 361 263 033 ` \0 \0 d j 360 263 026 277 j 027 \0 \0
0003100 277 l 031 o \0 \0 \0 \n \0 \0 260 030 ` \0 \0 263
0003120 024 i 027 \0 \0 277 ` \0 \0 k 317 \0 ` 277 i 027
0003140 \0 \0 277 \b \0 \0 h 020 d l 002 360 262 9 @ 265
0003160 033 I j 361 263 023 ` \0 \0 027 \0 \0 277 n 377 374
0003200 027 \0 \0 277 l 004 217 h 260 031 I 361 262 027 ` \0
0003220 \0 027 \0 \0 277 l 003 \t \0 \0 277 n @ \0 \t \0
0003240 \0 265 2 i 020 l 003 360 262 , ` \0 \0 ` \0 \0
0003260 361 234 n 377 374 027 \0 \0 l 004 \t \0 \0 i 020 @
0003300 265 004 i 020 l 200 330 n 377 374 ` \0 \0 331 375 361
0003320 263 362 h 020 \b \0 \0 020 \0 ( 3 4 5 Q S
0003340 H O U L D N T 3 1 3 Q \ A D
0003360 V A N C E . S T O R A G E . S T
0003400 A T E 2 5 7 Q \ A D V A N C
0003420 E . A R R A Y . S E G M E N T S
0003440 2 5 0 Q \ A D V A N C E . S
0003460 T O R A G E . S T A T E 1 6 4
0003500 Q \ D O R E C L A I M 1 3 0
0003520 Q \ M P . E R R O R 7 0 Q
0003540 \ M P . E R R O R 4 0 Q \ S
0003560 E T . S T O R A G E . S T A T E
0003600 ) \r ( 3 3 3 Q \ N x t A r r a
0003620 y P a g e 3 0 6 Q \ N x t M
0003640 D S P a g e 2 7 6 Q \ N x t
0003660 M D S P a g e 2 7 3 Q \ L e
0003700 a s t M D S P a g e 2 4 2 Q
0003720 \ L e a s t M D S P a g e 2 3
0003740 7 Q \ N x t A r r a y P a g e
0003760 2 2 1 Q \ N x t M D S P a g
0004000 e 2 1 2 Q \ L e a s t M D S
0004020 P a g e 2 0 7 Q \ N x t A r
0004040 r a y P a g e 1 6 0 Q \ P E
0004060 N D I N G I N T E R R U P T 1
0004100 4 7 Q \ I N T E R R U P T S T
0004120 A T E 1 4 3 Q \ S T O R A G
0004140 E F U L L 1 3 5 Q \ S T O R
0004160 A G E F U L L 1 1 6 Q \ S T
0004200 O R A G E F U L L 1 0 4 Q \
0004220 S T O R A G E F U L L 3 3 Q
0004240 \ S T O R A G E F U L L S T A T
0004260 E 1 2 Q \ N x t A r r a y P
0004300 a g e 7 \ N x t M D S P a g
0004320 e ) \r ( 1 2 5 Q " S p a c e
0004340 g e t t i n g V E R Y f u
0004360 l l . P l e a s e s a v e
0004400 a n d r e l o a d a . s . a
0004420 . p . T y p e c o n t r o l
0004440 - N t o c o n t i n u e n
0004460 o w . " 6 5 Q " S t o r a g
0004500 e c o m p l e t e l y f u l
0004520 l " ) \r \ D O S T O R A G E F U
0004540 L L I N T E R R U P T D 1 \r (
0004560 P 0 H E L P F L A G ) \0
0004600 001 \0 \0 \0 ` \0 \0 j 317 \0 ` 277 j d 360 h
0004620 360 g \0 \0 021 001 \0 o \0 \0 \0 l 037 i \v \0
0004640 \0 h 020 \0 ( 3 4 Q \ L I S P E R
0004660 R O R ) \r ( 1 7 Q B R E A K !
0004700 2 \ I N T E R R U P T S T A
0004720 T E ) \r ( 2 6 Q " s a v e
0004740 y o u r w o r k & r e l o
0004760 a d a . s . a . p . " ) \r \ S
0005000 E T . S T O R A G E . S T A T E
0005020 D 1 \r N I L \0 - \0 \0 \0 \0 ` \0
0005040 \0 d l 005 360 222 277 i 214 l 006 360 234 ` \0 \0
0005060 310 = j 360 h 360 222 l 002 200 k 027 \0 \0 g \0
0005100 \0 ` \0 \0 032 027 \0 \0 277 020 \0 N I L \r (
0005120 5 1 Q \ S Y S T E M C A C H E
0005140 V A R S 4 5 Q \ S Y S T E M
0005160 C A C H E V A R S 4 2 Q \ S
0005200 T O R A G E F U L L S T A T E
0005220 3 7 Q \ S T O R A G E F U L L
0005240 S T A T E 2 1 Q \ I n t e r
0005260 f a c e P a g e 2 \ M A C H
0005300 I N E T Y P E ) \r ( ) \r \ A D V
0005320 A N C E . S T O R A G E . S T A
0005340 T E D 1 \r ( L ( 0 F L G )
0005360 ) \0 032 \0 \0 \0 001 @ 027 \0 \0 ` \0 \0 n
0005400 377 377 315 A g \0 \0 ` \0 \0 \n \0 \0 027 \0 \0
0005420 020 \0 ( 2 4 Q D R E M O V E ) \r
0005440 ( 2 7 Q \ S Y S T E M C A C H
0005460 E V A R S 2 1 Q \ S Y S T E
0005500 M C A C H E V A R S 1 6 Q \
0005520 S T O R A G E F U L L S T A T E
0005540 6 \ I n t e r f a c e P a g
0005560 e 3 \ S T O R A G E F U L L
0005600 S T A T E ) \r ( ) \r \ N E W 2 P
0005620 A G E D 1 \r ( L ( 0 B A S
0005640 E ) ) \0 \r \0 \0 \0 001 @ \t \0 \0 n 001
0005660 \0 320 \t \0 \0 020 \0 ( 1 2 Q \ N E W
0005700 P A G E 3 \ N E W P A G E )
0005720 \r N I L \r ( ) \r \ M A K E M D S
0005740 E N T R Y D 1 \r ( L ( 1 V
0005760 0 V P ) ) \0 \f \0 \0 \0 002 ` \0
0006000 \0 @ 342 320 A 315 \0 A 020 \0 N I L \r ( 2
0006020 \ M D S T y p e T a b l e ) \r
0006040 ( ) \r \ G C T Y P E D 1 \r ( L
0006060 ( 1 D T D 0 T Y P E N U
0006100 M ) ) \0 ! 002 \0 \0 002 @ l 005 360 263 032
0006120 A @ \t \0 \0 A 310 001 A 311 002 @ \f \0 \0 021
0006140 002 001 H I 316 002 I 020 h 020 \0 ( 2 4 Q
0006160 \ I N I T M D S P A G E 1 2 Q
0006200 \ A L L O C M D S P A G E ) \r
0006220 N I L \r ( ) \r \ I N I T M D S P
0006240 A G E D 1 \r ( L ( 2 P R E
0006260 V 1 S I Z E 0 B A S E )
0006300 ) \0 T 006 \0 \0 003 n 001 \0 A 334 021 Q 005
0006320 H j 360 263 025 H A 342 375 361 234 n 001 \0 A 361
0006340 226 l 002 271 n 001 \0 204 k 271 n 002 \0 272 I 274
0006360 k ] L 363 263 % j 273 K A 324 [ J 361 256 @
0006400 B 316 \0 277 @ b 004 A 320 b \0 277 260 354 @ H
0006420 320 b \0 277 M k 324 260 332 B 020 \0 N I L \r
0006440 N I L \r ( ) \r \ A S S I G N D A
0006460 T A T Y P E 1 D 1 \r ( L ( 4
0006500 P T R F I E L D S 3 S P E
0006520 C S 2 S I Z E 1 D E S C
0006540 R I P T O R S 0 N A M E )
0006560 P 2 \ I N T E R R U P T A B
0006600 L E ) \0 364 003 \0 \0 005 @ \t \0 \0 021 021
0006620 001 H 242 261 \0 201 ` \0 \0 H 340 340 340 340 320 271
0006640 D I 311 \b 364 262 023 B I 310 001 364 232 I A 024
0006660 004 277 I C 024 006 H 020 ` \0 \0 i 360 263 / `
0006700 \0 \0 262 , l 036 ` \0 \0 g \0 \0 360 223 g \0
0006720 \0 202 g \0 \0 B 224 o \0 \0 \0 203 o \0 \0 \0
0006740 @ h 032 032 \v \0 \0 g \0 \0 360 241 h 020 H `
0006760 \0 \0 361 262 030 021 020 002 I g \0 \0 323 315 \0 277
0007000 I h 024 004 277 I h 024 006 023 210 o \0 \0 \0 @
0007020 \n \0 \0 277 B 264 g ` \0 \0 l 377 360 226 @ l
0007040 " \n \0 \0 277 021 020 002 ` \0 \0 k 324 027 \0 \0
0007060 270 ` \0 \0 H 340 340 340 340 320 Y d 323 l 377 345
0007100 l 020 330 l 377 361 232 277 I l 020 320 i \n \0 \0
0007120 277 I @ 323 315 \0 277 B j 360 263 ! I B 315 001
0007140 277 I A \t \0 \0 024 004 277 I C \t \0 \0 024 006
0007160 277 I D 024 \b 277 H I \n \0 \0 H 020 \0 ( 3
0007200 6 0 Q \ G C T Y P E 3 4 3 Q
0007220 C O P Y 3 3 3 Q C O P Y
0007240 3 0 5 Q \ N E W P A G E 2 3
0007260 1 Q \ L I S P E R R O R 2 1
0007300 0 Q E R R O R 1 3 4 Q A S
0007320 K U S E R 3 \ T Y P E N U M
0007340 B E R F R O M N A M E ) \r ( 2 5
0007360 1 Q \ D T D S p a c e B a s e
0007400 2 4 5 Q \ M a x T y p e N u
0007420 m b e r 2 4 0 Q \ M a x T y
0007440 p e N u m b e r 2 1 7 Q \ M
0007460 a x T y p e N u m b e r 1 6 1
0007500 Q * * D E A L L O C * * 1 4
0007520 7 Q \ M a x S y s T y p e N u
0007540 m 1 3 7 Q Y 1 1 2 Q N
0007560 1 0 6 Q Y 1 0 1 Q Y 7 6
0007600 Q C R O S S C O M P I L I N G
0007620 6 7 Q C R O S S C O M P I L
0007640 I N G 6 0 Q C R O S S C O M
0007660 P I L I N G 1 6 Q \ D T D S
0007700 p a c e B a s e ) \r ( 2 0 4 Q
0007720 " I L L E G A L D A T A T
0007740 Y P E " 1 2 5 Q " O K t o
0007760 d e a l l o c a t e D A T A
0010000 T Y P E " 1 2 0 Q " O K
0010020 T O R E D E C L A R E D A T
0010040 A T Y P E " ) \r \ A S S I G N
0010060 . D A T A T Y P E D 1 \r ( L
0010100 ( 3 O F F S E T 2 F I E L
0010120 D S P E C S 1 D L I S T 0
0010140 T Y P E N A M E ) ) \0 K 005 \0
0010160 \0 004 @ d 262 032 \t \0 \0 @ A C B A 021 A
0010200 004 H 003 265 \f I 022 \r 005 \0 \0 \n \0 \0 020 001
0010220 \ 002 002 001 d g \0 \0 360 245 d g \0 \0 360 222
0010240 277 h 201 277 i 253 L 002 001 273 J 265 \f K h 032
0010260 Z 271 H 002 X 260 315 K & 272 260 370 \0 ( 3 3
0010300 Q S E T T O P V A L 3 0 Q
0010320 A S S I G N D A T A T Y P E 6
0010340 \ T Y P E G L O B A L V A R I
0010360 A B L E ) \r ( 5 3 Q F U L L P
0010400 O I N T E R 4 5 Q P O I N T
0010420 E R ) \r ( ) \r \ T Y P E N U M B
0010440 E R F R O M N A M E D 1 \r ( L
0010460 ( 0 T Y P E ) ) \0 2 002 \0 \0
0010500 001 @ d 262 . g \0 \0 360 h 360 264 & ` \0 \0
0010520 k 021 002 001 I H 363 263 031 @ 323 ` \0 \0 I 340
0010540 340 340 340 320 310 \0 360 221 I 020 I k 324 Y 260 347
0010560 h 020 \0 N I L \r ( 3 4 Q \ D T D
0010600 S p a c e B a s e 1 6 Q \ M
0010620 a x T y p e N u m b e r 6 *
0010640 * D E A L L O C * * ) \r ( ) \r C
0010660 R E A T E C E L L D 1 \r ( L
0010700 ( 0 T Y P ) ) \0 006 \0 \0 \0 001 @
0010720 \t \0 \0 020 \0 ( 3 \ C R E A T E C
0010740 E L L ) \r N I L \r ( ) \r \ C R E
0010760 A T E C E L L D 1 \r ( L ( 0
0011000 T Y P ) P 0 \ I N T E R
0011020 R U P T A B L E ) \0 217 006 \0 \0 001
0011040 @ l 005 360 227 o \0 \0 \0 \t \0 \0 277 021 ` 005
0011060 ` \0 \0 @ 340 340 340 340 320 Y 311 002 265 \a @ I
0011100 \n \0 \0 Z I J 311 \0 265 016 d h 316 002 277 @
0011120 I \n \0 \0 277 201 316 002 277 I l \n 320 \ 310 001
0011140 k 320 323 273 L K 315 001 277 K j 360 230 L d 310
0011160 \0 k 330 315 \0 277 I 310 001 275 J M m 377 324 ]
0011200 320 j 315 \0 277 J d k 320 M 304 277 J 025 001 277
0011220 ` \0 \0 262 031 ` \0 \0 k 361 264 \v ` \0 \0 k
0011240 331 027 \0 \0 206 027 \0 \0 277 \b \0 \0 J 020 \0 (
0011260 2 1 3 Q \ D O R E C L A I M
0011300 6 3 Q \ G C T Y P E 4 2 Q
0011320 \ G C T Y P E 1 3 Q R A I D
0011340 ) \r ( 2 0 7 Q \ R E C L A I M
0011360 . C O U N T D O W N 2 0 3 Q
0011400 \ R E C L A I M . C O U N T D O
0011420 W N 1 7 6 Q \ R E C L A I M
0011440 . C O U N T D O W N 1 6 7 Q
0011460 \ R E C L A I M . C O U N T D O
0011500 W N 1 6 2 Q \ R E C L A I M
0011520 . C O U N T D O W N 2 2 Q \
0011540 D T D S p a c e B a s e ) \r (
0011560 1 0 Q " C R E A T E C E L L
0011600 \ L I S T P " ) \r F E T C H F I
0011620 E L D D 1 \r ( L ( 1 D A T
0011640 U M 0 D E S C R I P T O R )
0011660 ) 001 \n 005 \0 \0 002 @ 001 @ 002 001 021 2 004
0011700 H 227 A H \n \0 \0 b 002 277 @ 002 002 001 d g
0011720 \0 \0 360 263 024 d g \0 \0 360 253 d g \0 \0 360
0011740 245 d g \0 \0 360 226 277 A I 320 311 \0 020 d g
0011760 \0 \0 360 236 277 A I 320 310 \0 A I 320 310 001 \n
0012000 \0 \0 020 d g \0 \0 360 234 277 A I 320 310 \0 A
0012020 I 320 310 001 365 020 g \0 \0 360 233 A I 320 310 001
0012040 A I 320 310 \0 365 020 @ 002 002 001 I 273 Z 001 d
0012060 g \0 \0 360 262 027 277 A K 320 310 \0 J 002 \t \0
0012100 \0 \n \0 \0 J 002 \t \0 \0 345 020 d g \0 \0 360
0012120 262 3 277 A K 320 310 \0 J 002 \t \0 \0 \n \0 \0
0012140 J 002 \t \0 \0 345 J 002 \t \0 \0 274 d k L k
0012160 331 \n \0 \0 k 331 361 231 k L \n \0 \0 k 331 331
0012200 k 331 020 d g \0 \0 360 262 035 277 A K 320 310 \0
0012220 J 002 \t \0 \0 \n \0 \0 J 002 \t \0 \0 345 A K
0012240 320 310 001 365 020 g \0 \0 360 237 A K 320 310 \0 J
0012260 002 \t \0 \0 345 j 360 h 360 020 @ l 033 \n \0 \0
0012300 020 \0 ( 4 0 7 Q \ L I S P E R R
0012320 O R 3 7 3 Q B i t F i e l d
0012340 S h i f t e d M a s k 3 4 4 Q
0012360 B i t F i e l d M a s k 3 3
0012400 7 Q L R S H 3 3 4 Q B i t
0012420 F i e l d S h i f t 3 0 4 Q
0012440 L L S H 2 7 3 Q L L S H 2
0012460 6 2 Q B i t F i e l d W i d t
0012500 h 2 5 4 Q B i t F i e l d M
0012520 a s k 2 4 7 Q L R S H 2 4
0012540 4 Q B i t F i e l d S h i f t
0012560 2 2 0 Q B i t F i e l d M a
0012600 s k 2 1 3 Q L R S H 2 1 0
0012620 Q B i t F i e l d S h i f t
0012640 1 1 1 Q M A K E F L O A T N U
0012660 M B E R 1 6 Q \ D T E S T )
0012700 \r ( 3 5 7 Q F L A G B I T S
0012720 3 1 6 Q L O N G B I T S 2 2
0012740 6 Q S I G N E D B I T S 1 7
0012760 2 Q B I T S 1 4 0 Q S W A
0013000 P P E D F I X P 1 1 6 Q F I
0013020 X P 7 1 Q F L O A T P 5 4
0013040 Q F U L L X P O I N T E R 4
0013060 6 Q F U L L P O I N T E R 4
0013100 0 Q X P O I N T E R 3 1 Q
0013120 P O I N T E R ) \r ( ) \r R E P L
0013140 A C E F I E L D D 1 \r ( L (
0013160 2 N E W V A L U E 1 D A T
0013200 U M 0 D E S C R I P T O R )
0013220 P 1 0 Q \ I N T E R R U P
0013240 T A B L E ) 002 \t \f \0 \0 003 @ 002 001
0013260 @ 002 002 001 @ 001 021 S \a J 227 A J \n \0 \0
0013300 b 002 277 I g \0 \0 360 247 I d g \0 \0 360 230
0013320 277 A H 320 B 024 \0 B 020 g \0 \0 360 262 033 021
0013340 020 \b A H 340 k 330 B 322 l 377 345 307 A H k
0013360 330 320 B 323 315 \0 B 020 I d g \0 \0 360 230 277
0013400 A H 320 B 316 \0 B 020 g \0 \0 360 262 032 A H
0013420 B 355 001 021 003 \v O 022 O 024 320 O 026 316 \0 277
0013440 O 026 022 355 \0 020 I d g \0 \0 360 231 277 A H
0013460 320 B \n \0 \0 B 020 g \0 \0 360 230 A H 320 B
0013500 \n \0 \0 B 020 I 001 d g \0 \0 360 262 = 277 A
0013520 H A H 320 310 \0 I 002 \t \0 \0 \ I 002 \t \0
0013540 \0 [ \n \0 \0 n 377 377 346 345 B L 345 K \n \0
0013560 \0 344 021 003 \v O 022 O 024 320 O 026 315 \0 277 O
0013600 026 022 K \n \0 \0 L 345 020 d g \0 \0 360 262 j
0013620 277 A H A H 320 310 \0 I 002 \t \0 \0 \ I 002
0013640 \t \0 \0 [ \n \0 \0 n 377 377 346 345 B k I 002
0013660 \t \0 \0 \n \0 \0 k 331 L 345 345 K \n \0 \0 344
0013700 021 003 \v O 022 O 024 320 O 026 315 \0 277 O 026 022
0013720 K \n \0 \0 L 345 ] k I 002 \t \0 \0 k 331 \n
0013740 \0 \0 k 331 361 237 M k I 002 \t \0 \0 \n \0 \0
0013760 k 331 331 k 331 020 M 020 d g \0 \0 360 262 4 277
0014000 A H 320 A H 320 310 \0 I 002 \t \0 \0 \ I 002
0014020 \t \0 \0 [ \n \0 \0 n 377 377 346 345 B 223 n 377
0014040 377 200 j L 345 K \n \0 \0 344 315 \0 B 264 j i
0014060 020 g \0 \0 360 262 y B 004 d l 002 360 233 277 B
0014100 310 \0 _ 016 277 B 310 001 260 032 d k 360 262 K 277
0014120 j B 361 245 j _ 016 277 B 207 n 377 377 _ 016 277
0014140 B 323 276 021 020 \b A H 320 A H 320 310 \0 I 002
0014160 \t \0 \0 \ I 002 \t \0 \0 [ \n \0 \0 n 377 377
0014200 346 345 O 016 L 345 K \n \0 \0 344 315 \0 277 A H
0014220 k 330 320 N 315 \0 B 020 l 003 360 227 B \t \0 \0
0014240 b 004 260 226 B l \n \n \0 \0 b 004 260 214 @ l
0014260 033 \n \0 \0 020 \0 ( 1 0 0 6 Q \ L I
0014300 S P E R R O R 7 7 4 Q \ L I
0014320 S P E R R O R 7 6 2 Q \ F I
0014340 X P . F R O M . F L O A T P 7
0014360 3 4 Q L L S H 7 1 7 Q L L
0014400 S H 7 1 3 Q B i t F i e l d
0014420 S h i f t 7 0 5 Q B i t F i
0014440 e l d M a s k 5 7 3 Q L L S
0014460 H 5 5 1 Q L L S H 5 4 5 Q
0014500 B i t F i e l d S h i f t 5
0014520 3 7 Q B i t F i e l d M a s k
0014540 5 0 2 Q L L S H 4 7 7 Q
0014560 B i t F i e l d W i d t h 4 6
0014600 4 Q L L S H 4 5 7 Q B i t
0014620 F i e l d W i d t h 4 4 6 Q
0014640 L R S H 4 2 1 Q L L S H 4
0014660 1 0 Q L L S H 4 0 5 Q B i
0014700 t F i e l d W i d t h 3 7 1 Q
0014720 L L S H 3 6 5 Q B i t F i
0014740 e l d S h i f t 3 5 7 Q B i
0014760 t F i e l d M a s k 3 3 0 Q
0015000 L R S H 3 0 3 Q L L S H 2
0015020 6 7 Q L L S H 2 6 3 Q B i
0015040 t F i e l d S h i f t 2 5 5 Q
0015060 B i t F i e l d M a s k 2 2
0015100 5 Q \ P U T S W A P P E D F I
0015120 X P 2 0 7 Q \ P U T F I X P
0015140 2 2 Q \ D T E S T ) \r ( 6 0
0015160 6 Q L O N G B I T S 5 1 6 Q
0015200 F L A G B I T S 3 3 7 Q S
0015220 I G N E D B I T S 2 3 5 Q B
0015240 I T S 2 1 4 Q S W A P P E D
0015260 F I X P 1 7 5 Q F I X P 1
0015300 3 5 Q F L O A T P 1 1 7 Q
0015320 F U L L X P O I N T E R 5 6 Q
0015340 X P O I N T E R 4 0 Q F U
0015360 L L P O I N T E R 3 1 Q P O
0015400 I N T E R ) \r ( ) \r B O X C O U
0015420 N T D 1 \r ( L ( 1 N 0
0015440 T Y P E ) P 1 \ I N T E R
0015460 R U P T A B L E ) \0 : 002 \0 \0 002
0015500 ` \0 \0 @ d 005 001 247 265 005 l 002 202 \t \0 \0
0015520 340 340 340 340 320 021 001 \0 H 313 \n H 310 \f 330 A
0015540 d 005 001 245 d 005 002 241 005 003 234 021 020 001 H j
0015560 315 \f 277 H A 314 \n 023 020 \0 ( 1 7 Q \
0015600 T Y P E N U M B E R F R O M N A
0015620 M E ) \r ( 2 \ D T D S p a c e
0015640 B a s e ) \r ( ) \r C O N S C O U
0015660 N T D 1 \r ( L ( 0 N ) )
0015700 \0 \b \0 \0 \0 001 l 005 @ \n \0 \0 020 \0 ( 5
0015720 B O X C O U N T ) \r N I L \r (
0015740 ) \r \ D T E S T D 1 \r ( L (
0015760 1 T Y P E 0 O B J ) ) \0
0016000 \b \0 \0 \0 002 @ A 323 \n \0 \0 020 \0 ( 5
0016020 \ D T E S T F A I L ) \r N I L \r
0016040 ( ) \r \ D T E S T F A I L D 1
0016060 \r ( L ( 1 T Y P E N 0 O
0016100 B J ) ) 001 m 002 \0 \0 002 ` \0 \0 @ 004
0016120 340 340 340 340 320 310 \0 A 360 221 @ 020 j A 321 d
0016140 g \0 \0 360 225 277 @ \t \0 \0 020 d g \0 \0 360
0016160 262 @ @ m 377 g \0 \0 \n \0 \0 d g \0 \0 360
0016200 253 d g \0 \0 360 245 d g \0 \0 360 225 277 g \0
0016220 \0 260 033 d g \0 \0 360 253 d g \0 \0 360 245 d
0016240 g \0 \0 360 224 277 g \0 \0 201 277 h \n \0 \0 020
0016260 d g \0 \0 360 262 ) @ 265 023 ` \0 \0 265 \n @
0016300 l 3 i \v \0 \0 020 006 \0 \0 020 003 262 363 @ d
0016320 001 \t \0 \0 g \0 \0 360 262 350 277 @ 001 020 d g
0016340 \0 \0 360 225 277 @ \t \0 \0 020 d g \0 \0 360 262
0016360 Q 277 021 001 @ 004 d l 002 360 231 277 @ 310 \0
0016400 270 @ 310 001 260 026 d k 360 262 ! 277 j @ 361 243
0016420 j 270 @ 205 n 377 377 270 @ 323 271 H I 365 005 001
0016440 265 \t @ l 033 i \v \0 \0 020 l 003 360 227 @ \t
0016460 \0 \0 b \0 260 302 @ l \n \n \0 \0 b \0 260 270
0016500 d g \0 \0 360 230 277 @ l 004 i \v \0 \0 020 d
0016520 g \0 \0 360 230 277 @ l 016 i \v \0 \0 020 d g
0016540 \0 \0 360 230 277 @ l 023 i \v \0 \0 020 d g \0
0016560 \0 360 230 277 @ l & i \v \0 \0 020 d g \0 \0
0016600 360 230 277 @ l ' i \v \0 \0 020 d g \0 \0 360
0016620 230 277 @ l 034 i \v \0 \0 020 g \0 \0 360 227 o
0016640 \0 \0 \0 \t \0 \0 020 @ o \0 \0 \0 j A 321 \n
0016660 \0 \0 i \v \0 \0 020 \0 ( 5 5 2 Q \ L
0016700 I S P E R R O R 5 4 6 Q C O
0016720 N C A T 5 3 2 Q E R R O R
0016740 5 1 5 Q \ L I S P E R R O R
0016760 4 7 6 Q \ L I S P E R R O R
0017000 4 5 7 Q \ L I S P E R R O R
0017020 4 4 0 Q \ L I S P E R R O R
0017040 4 2 1 Q \ L I S P E R R O R
0017060 4 0 2 Q \ L I S P E R R O R
0017100 3 6 0 Q \ L I S P E R R O R
0017120 3 4 6 Q \ F I X P . F R O M .
0017140 F L O A T P 3 3 5 Q \ L I S
0017160 P E R R O R 2 3 5 Q \ C O E
0017200 R C E F O N T D E S C 2 1 0 Q
0017220 T Y P E N A M E 1 7 2 Q \
0017240 L I S P E R R O R 1 4 3 Q \
0017260 G E T S T R E A M 5 7 Q S T
0017300 K N T H N A M E 3 6 Q \ F L
0017320 O A T ) \r ( 5 2 1 Q \ D I S P
0017340 L A Y D A T A 5 0 3 Q A R R
0017360 A Y P 4 6 4 Q T E R M T A B
0017400 L E P 4 4 5 Q R E A D T A B
0017420 L E P 4 2 6 Q S T A C K P
0017440 4 0 7 Q L I T A T O M 3 7 0
0017460 Q L I S T P 2 4 2 Q S M A
0017500 L L P 2 2 6 Q F O N T D E S
0017520 C R I P T O R 2 1 3 Q H A R
0017540 R A Y P 1 7 6 Q H A R R A Y
0017560 P 1 6 1 Q S Y S H A S H A R
0017600 R A Y 1 5 0 Q H A R R A Y P
0017620 1 3 5 Q O U T P U T 1 2 7
0017640 Q B O U T 1 2 1 Q \ B O U
0017660 T 1 1 3 Q \ B O U T S 1 0
0017700 5 Q I N P U T 7 7 Q B I N
0017720 7 1 Q \ B I N 6 3 Q \ B
0017740 I N S 5 4 Q \ D T E S T F A
0017760 I L 4 3 Q S T R E A M 2 7
0020000 Q F L O A T P 2 \ D T D S
0020020 p a c e B a s e ) \r ( 5 4 0 Q
0020040 " A R G N O T " 5 2 7 Q
0020060 " A R G N O T D I S P L A
0020100 Y S T R E A M " ) \r G E T D E
0020120 S C R I P T O R S D 1 \r ( L
0020140 ( 0 T Y P E N A M E ) ) \0 035
0020160 \0 \0 \0 001 ` \0 \0 @ d 004 l 004 360 225 \t \0
0020200 \0 d 241 020 004 340 340 340 340 320 311 004 \t \0 \0 020
0020220 \0 ( 3 2 Q C O P Y 1 4 Q \
0020240 T Y P E N U M B E R F R O M N A
0020260 M E ) \r ( 2 \ D T D S p a c e
0020300 B a s e ) \r ( ) \r G E T F I E L
0020320 D S P E C S D 1 \r ( L ( 0
0020340 T Y P E N A M E ) ) \0 035 \0 \0 \0
0020360 001 ` \0 \0 @ d 004 l 004 360 225 \t \0 \0 d 241
0020400 020 004 340 340 340 340 320 311 006 \t \0 \0 020 \0 ( 3
0020420 2 Q C O P Y 1 4 Q \ T Y P
0020440 E N U M B E R F R O M N A M E )
0020460 \r ( 2 \ D T D S p a c e B a s
0020500 e ) \r ( ) \r N C R E A T E D 1
0020520 \r ( L ( 1 O L D O B J 0
0020540 T Y P E ) ) \0 \n \0 \0 \0 002 @ \t \0
0020560 \0 A \n \0 \0 020 \0 ( 7 N C R E A T
0020600 E 2 3 \ T Y P E N U M B E R
0020620 F R O M N A M E ) \r N I L \r ( )
0020640 \r N C R E A T E 2 D 1 \r ( L
0020660 ( 1 O L D O B J 0 N T Y P
0020700 X ) P 3 \ I N T E R R U P
0020720 T A B L E ) \0 4 004 \0 \0 002 ` \0 \0
0020740 @ 340 340 340 340 320 @ 037 021 022 002 A 004 @ 360 262
0020760 037 021 020 003 I A H 310 001 304 277 H 311 \b 213 d
0021000 001 272 I J 320 311 \0 025 \0 277 002 003 265 363 I 020
0021020 \0 N I L \r ( 2 \ D T D S p a c
0021040 e B a s e ) \r ( ) \r R E P L A C
0021060 E F I E L D V A L D 1 \r ( L
0021100 ( 2 N E W V A L U E 1 D A
0021120 T U M 0 D E S C R I P T O R
0021140 ) ) \0 \t \0 \0 \0 003 @ A B \v \0 \0 A
0021160 020 \0 ( 5 R E P L A C E F I E L
0021200 D ) \r N I L \r ( ) \r P U T B A S
0021220 E P T R X D 1 \r ( L ( 2 N
0021240 E W V A L U E 1 O F F S E T
0021260 0 D A T U M ) P 0 \ I
0021300 N T E R R U P T A B L E ) \0
0021320 001 \0 \0 003 021 020 \0 @ A 320 @ A 320 310 \0 n
0021340 377 \0 345 B 322 344 315 \0 @ A k 330 320 B 323 315
0021360 \0 B 020 \0 N I L \r N I L \r ( ) \r /
0021400 R E P L A C E F I E L D D 1 \r
0021420 ( L ( 2 N E W V A L U E 1
0021440 D A T U M 0 D E S C R I P
0021460 T O R ) F 0 L I S P X H I
0021500 S T ) \0 036 \0 001 \0 003 P 262 025 g \0 \0
0021520 @ A @ A \n \0 \0 h 032 032 032 032 \t \0 \0 277
0021540 @ A B \v \0 \0 020 \0 ( 3 3 Q R E P
0021560 L A C E F I E L D 2 4 Q U N
0021600 D O S A V E 1 4 Q F E T C H
0021620 F I E L D ) \r ( 5 / R E P L A
0021640 C E F I E L D ) \r ( ) \r T Y P E
0021660 N A M E D 1 \r ( L ( 0 D A
0021700 T U M ) ) \0 036 001 \0 \0 001 @ 004 021 001
0021720 \0 H l 006 360 224 @ \t \0 \0 020 j ` \0 \0 H
0021740 340 340 340 340 320 310 \0 321 020 \0 ( 1 5 Q \
0021760 A R R A Y T Y P E N A M E ) \r (
0022000 2 2 Q \ D T D S p a c e B a s
0022020 e ) \r ( ) \r \ T Y P E N A M E F
0022040 R O M N U M B E R D 1 \r ( L
0022060 ( 0 N ) ) \0 031 \0 \0 \0 001 @ ` \0
0022100 \0 k 330 375 361 264 017 j ` \0 \0 @ 340 340 340 340
0022120 320 310 \0 321 020 \0 N I L \r ( 1 5 Q \
0022140 D T D S p a c e B a s e 3 \
0022160 M a x T y p e N u m b e r ) \r (
0022200 ) \r \ B L O C K D A T A P D 1
0022220 \r ( L ( 0 X ) ) \0 ) 001 \0 \0
0022240 001 @ 004 021 001 \0 H j 360 235 @ 004 j 360 264 \t
0022260 l 023 @ 322 361 h 360 020 ` \0 \0 H 340 340 340 340
0022300 320 312 004 P j 360 h 360 020 \0 N I L \r ( 3
0022320 1 Q \ D T D S p a c e B a s e
0022340 ) \r ( ) \r U S E R D A T A T Y P
0022360 E S D 1 \r N I L \0 006 \0 \0 \0 \0
0022400 i \t \0 \0 020 \0 ( 3 D A T A T Y P
0022420 E S ) \r N I L \r ( ) \r D A T A T
0022440 Y P E P D 1 \r ( L ( 0 D A
0022460 T A T Y P E S P E C ) ) \0 w 002
0022500 \0 \0 001 @ d 005 001 262 . 277 ` \0 \0 @ 340 340
0022520 340 340 320 021 021 001 H 312 004 P j 360 h 360 h 360
0022540 264 X j H 310 \0 321 Y d 262 O g \0 \0 360 h
0022560 360 264 G I 020 004 l 004 360 241 h 020 @ d g \0
0022600 \0 360 263 6 d g \0 \0 360 263 / 277 ` \0 \0 k
0022620 021 002 001 I H 363 263 035 j ` \0 \0 I 340 340 340
0022640 340 320 310 \0 321 @ 360 224 I 265 \v i 206 I k 324
0022660 Y 260 343 h 022 264 003 @ 020 \0 N I L \r ( 1
0022700 3 0 Q \ D T D S p a c e B a s
0022720 e 1 1 3 Q \ M a x T y p e N
0022740 u m b e r 1 0 4 Q H A R R A
0022760 Y P 7 5 Q C C O D E P 5 2
0023000 Q * * D E A L L O C * * 1 1
0023020 Q \ D T D S p a c e B a s e )
0023040 \r ( ) \r D A T A T Y P E S D 1
0023060 \r ( L ( 0 U S E R S F L G )
0023100 ) \0 1 005 \0 \0 001 ` \0 \0 @ 225 ` \0 \0
0023120 k 330 200 k 021 2 004 I d H 363 221 J 020 \t \0
0023140 \0 265 003 210 274 K 265 \r L h 032 [ 272 I k 324
0023160 Y 260 347 L & 273 260 367 \0 ( 3 0 Q D A
0023200 T A T Y P E P ) \r ( 7 \ M a x
0023220 S y s T y p e N u m 2 \ M a
0023240 x T y p e N u m b e r ) \r ( ) \r
0023260 S T O R A G E D 1 \r ( L ( 1
0023300 P A G E T H R E S H O L D 0
0023320 T Y P E S ) P 5 H U N K
0023340 S T A T S ) 002 316 \f \0 \0 002 l 002 037
0023360 l 002 037 l 002 037 l 002 j 021 2 004 I H 363 263
0023400 ! j d d d d h 032 032 032 032 032 274 K 265 \r
0023420 L h 032 [ 272 I k 324 Y 260 344 L & 273 260 367
0023440 J 022 021 4 \b o \0 \0 \0 \t \0 \0 277 l 017 \t
0023460 \0 \0 277 o \0 \0 \0 \t \0 \0 277 l 036 \t \0 \0
0023500 277 o \0 \0 \0 \t \0 \0 277 l - \t \0 \0 277 o
0023520 \0 \0 \0 \t \0 \0 277 l 7 \t \0 \0 277 o \0 \0
0023540 \0 \t \0 \0 277 h \t \0 \0 277 l 017 \t \0 \0 277
0023560 o \0 \0 \0 \t \0 \0 277 h \t \0 \0 @ 265 003 202
0023600 261 \0 325 ` \0 \0 k _ 020 277 _ 016 277 O 020 d
0023620 O 016 363 242 261 001 C 277 K A \n \0 \0 277 h \t
0023640 \0 \0 277 o \0 \0 \0 \t \0 \0 277 l 017 \t \0 \0
0023660 277 o \0 \0 \0 J K 330 \n \0 \0 277 h \t \0 \0
0023700 277 h \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 h \t
0023720 \0 \0 277 l 036 \t \0 \0 277 o \0 \0 \0 \t \0 \0
0023740 277 l 2 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 h
0023760 \t \0 \0 277 l \t \0 \0 277 o \0 \0 \0 \t \0
0024000 \0 277 l 4 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277
0024020 h \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 l 036 \t
0024040 \0 \0 277 o \0 \0 \0 J \n \0 \0 277 l 2 \t \0
0024060 \0 277 o \0 \0 \0 \t \0 \0 277 h \t \0 \0 277 o
0024100 \0 \0 \0 \t \0 \0 277 K j 374 222 261 \0 234 o \0
0024120 \0 \0 261 \0 231 i 360 222 261 377 + @ 021 ! \v O
0024140 022 265 017 O 026 225 J A \n \0 \0 277 023 261 001 E
0024160 003 246 O 022 _ 024 277 h 210 O 022 001 _ 024 277 O
0024200 022 002 _ 022 277 O 024 d d 005 001 241 005 002 262 !
0024220 277 j O 024 361 250 O 024 d ` \0 \0 361 232 277 o
0024240 \0 \0 \0 O 024 \n \0 \0 214 j 360 233 i ^ 206 \t
0024260 \0 \0 _ 024 h 360 263 251 ` \0 \0 O 024 340 340 340
0024300 340 320 312 004 P j 360 243 i _ 026 277 O 024 L J
0024320 A \f \0 \0 277 260 212 L J A \f \0 \0 277 O 020
0024340 k 324 _ 020 261 376 253 o \0 \0 \0 \t \0 \0 277 l
0024360 036 \t \0 \0 277 o \0 \0 \0 ` \0 \0 d l 004 360
0024400 245 d l 003 360 262 023 277 ` \0 \0 n 023 \0 331 `
0024420 \0 \0 n @ \0 331 330 207 277 ` \0 \0 n 023 \0 331
0024440 \n \0 \0 277 l 2 \t \0 \0 277 o \0 \0 \0 \t \0
0024460 \0 277 o \0 \0 \0 \b \0 \0 001 \n \0 \0 277 h \t
0024500 \0 \0 277 K j 374 263 , o \0 \0 \0 \t \0 \0 277
0024520 l 036 \t \0 \0 277 o \0 \0 \0 K \n \0 \0 277 l
0024540 2 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 h \t \0
0024560 \0 277 o \0 \0 \0 ` \0 \0 l 177 330 342 342 342 342
0024600 342 342 342 l 004 332 n \b \0 \v \0 \0 277 ` \0 \0
0024620 236 o \0 \0 \0 ` \0 \0 k 330 ` \0 \0 k 330 213
0024640 o \0 \0 \0 ` \0 \0 k 330 n 005 377 \v \0 \0 277
0024660 i 276 N 264 006 \b \0 \0 h 020 \0 ( 1 3 1 2
0024700 Q \ S H O W . A R R A Y . F R
0024720 E E L I S T S 1 3 0 1 Q \ S
0024740 T L I N P 1 2 3 6 Q \ S T L
0024760 I N P 1 2 0 3 Q T E R P R I
0025000 1 1 7 6 Q P R I N 1 1 1 6
0025020 6 Q T A B 1 1 6 0 Q P R I
0025040 N T N U M 1 1 4 7 Q T A B
0025060 1 1 4 1 Q P R I N 1 1 1 2 4
0025100 Q T E R P R I 1 1 1 7 Q P
0025120 R I N T N U M 1 1 1 3 Q S T
0025140 O R A G E . L E F T 1 1 0 3 Q
0025160 P R I N 1 1 0 7 3 Q T A B
0025200 1 0 6 5 Q P R I N T N U M
0025220 1 0 0 6 Q T A B 1 0 0 0 Q
0025240 P R I N 1 7 5 7 Q \ S T O R
0025260 A G E . T Y P E 7 4 6 Q \ S
0025300 T O R A G E . T Y P E 7 0 4 Q
0025320 \ T Y P E N U M B E R F R O M
0025340 N A M E 6 7 2 Q E R R O R
0025360 5 7 5 Q \ S T O R A G E . H U
0025400 N K T Y P E 5 3 0 Q P R I N
0025420 1 5 2 0 Q T E R P R I 5 1
0025440 3 Q P R I N 1 5 0 3 Q T A
0025460 B 4 7 5 Q P R I N T N U M
0025500 4 6 4 Q T A B 4 5 6 Q P R
0025520 I N 1 4 4 6 Q T E R P R I
0025540 4 4 1 Q P R I N 1 4 3 1 Q
0025560 T A B 4 2 3 Q P R I N 1 4
0025600 1 3 Q T A B 4 0 5 Q T E R
0025620 P R I 4 0 0 Q P R I N 1 3
0025640 7 0 Q T A B 3 6 2 Q P R I
0025660 N 1 3 5 2 Q T A B 3 4 4 Q
0025700 T E R P R I 3 3 7 Q P R I
0025720 N 1 3 2 7 Q T E R P R I 3
0025740 2 2 Q T E R P R I 3 1 5 Q
0025760 P R I N T N U M 3 0 2 Q T A
0026000 B 2 7 4 Q P R I N 1 2 6 4
0026020 Q T E R P R I 2 5 7 Q \ S
0026040 T O R A G E . H U N K T Y P E
0026060 2 1 6 Q T E R P R I 2 1 1 Q
0026100 P R I N 1 2 0 1 Q T A B
0026120 1 7 3 Q T E R P R I 1 6 6 Q
0026140 P R I N 1 1 5 6 Q T A B
0026160 1 5 0 Q P R I N 1 1 4 0 Q
0026200 T A B 1 3 2 Q P R I N 1 1
0026220 2 2 Q T A B 1 1 4 Q P R I
0026240 N 1 1 0 4 Q T A B 7 6 Q
0026260 P R I N 1 ) \r ( 1 2 7 1 Q \ C
0026300 u r P n P a g e 1 2 5 7 Q \
0026320 C u r P n P a g e 1 2 5 2 Q
0026340 \ C u r P n P a g e 1 2 4 2 Q
0026360 \ P N A M E S . I N . B L O C
0026400 K S ? 1 2 1 3 Q \ A t o m F
0026420 r L s t 1 0 5 6 Q \ N x t A
0026440 r r a y P a g e 1 0 4 4 Q \
0026460 N x t A r r a y P a g e 1 0 3
0026500 5 Q \ L e a s t M D S P a g e
0026520 1 0 1 6 Q \ S T O R A G E F
0026540 U L L S T A T E 7 1 5 Q \ D
0026560 T D S p a c e B a s e 6 5 6 Q
0026600 \ M a x T y p e N u m b e r
0026620 2 3 0 Q \ M a x T y p e N u m
0026640 b e r ) \r ( 1 2 6 6 Q " L i
0026660 t a t o m P n a m e s " 1 2
0026700 4 7 Q " L i t a t o m P n a
0026720 m e s ( f r o m b o o t s t
0026740 r a p ) " 1 2 1 0 Q " L i t
0026760 a t o m s " 1 1 7 3 Q " / "
0027000 1 1 5 4 Q ( F I X 1 0 Q )
0027020 1 1 3 6 Q " A r r a y B l o
0027040 c k s ( c h u n k e d ) " 1
0027060 1 1 0 Q ( F I X 6 ) 1 1 0
0027100 0 Q " - - " 1 0 1 3 Q ( F
0027120 I X 1 0 Q ) 7 7 5 Q " "
0027140 6 6 5 Q " N o t a t y p e
0027160 n u m b e r " 5 4 4 Q "
0027200 ( v a r i a b l e ) " 5 2 5 Q
0027220 " A r r a y B l o c k s " 5
0027240 1 0 Q " \ " 4 7 1 Q ( F I
0027260 X 1 0 Q ) 4 5 3 Q " D a t
0027300 a t y p e s ( i n c l . L I
0027320 S T P e t c . ) " 4 3 6 Q
0027340 " P a g e s " 4 2 0 Q " P a
0027360 g e s " 3 7 5 Q " R e m a i
0027400 n i n g " 3 5 7 Q " A l l o
0027420 c a t e d " 3 3 4 Q " D a t
0027440 a S p a c e s S u m m a r y
0027460 " 3 0 7 Q ( F I X 5 ) 2
0027500 7 1 Q " T O T A L " 2 0 6 Q
0027520 " p a g e s [ i t e m s ] "
0027540 1 6 3 Q " T o t a l a l l
0027560 o c " 1 4 5 Q " I n u s e
0027600 " 1 2 7 Q " F r e e i t e
0027620 m s " 1 1 1 Q " A s s i g n
0027640 e d " 7 3 Q " T y p e " ) \r
0027660 S T O R A G E . L E F T D 1 \r
0027700 N I L \0 261 003 \0 \0 \0 ` \0 \0 265 005 \b
0027720 \0 \0 l 003 360 223 n 377 374 202 ` \0 \0 ` \0 \0
0027740 331 ` \0 \0 d l 002 360 224 277 n 277 376 217 l 003
0027760 360 232 ` \0 \0 ` \0 \0 331 l 002 330 200 j ` \0
0030000 \0 j 021 022 002 H 262 026 I k 324 271 H Z 343 J
0030020 l 377 345 341 321 311 \0 005 001 X 260 354 I 022 l 002
0030040 330 330 330 021 021 001 H ` \0 \0 k 360 221 j 202 n
0030060 277 376 n ' \0 330 353 Y H I ` \0 \0 d k 360
0030100 223 277 I 260 027 l 002 360 237 ` \0 \0 l 002 330 `
0030120 \0 \0 331 o \0 \0 \0 353 200 j n \b \0 ` \0 \0
0030140 l 177 330 342 342 342 342 342 342 342 l 004 332 331 d n
0030160 \b \0 353 h 032 032 032 032 032 020 \0 ( 7 \ S
0030200 E T . S T O R A G E . S T A T E
0030220 ) \r ( 2 2 5 Q \ A t o m F r L
0030240 s t 2 0 7 Q \ N x t A r r a
0030260 y P a g e 2 0 1 Q \ N x t M
0030300 D S P a g e 1 6 2 Q \ S T O
0030320 R A G E F U L L S T A T E 1 3
0030340 7 Q \ S T O R A G E F U L L S
0030360 T A T E 6 6 Q \ M D S F R E
0030400 E L I S T P A G E 5 5 Q \ L
0030420 e a s t M D S P a g e 5 2 Q
0030440 \ N x t M D S P a g e 3 1 Q
0030460 \ S T O R A G E F U L L S T A T
0030500 E 2 5 Q \ N x t A r r a y P
0030520 a g e 2 2 Q \ N x t M D S P
0030540 a g e 2 \ S T O R A G E F U
0030560 L L S T A T E ) \r ( 2 1 4 Q
0030600 9 9 8 4 . 0 ) \r \ S T O R A G E
0030620 . T Y P E A 0 0 0 1 D 1 \r ( F
0030640 0 A L L O C M D S ) \0 \a \0
0030660 001 \0 \0 P k 324 c \0 020 \0 N I L \r N I
0030700 L \r ( ) \r \ S T O R A G E . T Y
0030720 P E D 1 \r ( L ( 3 P A G E
0030740 T H R E S H O L D 2 T O T A
0030760 L A L L O C M D S 1 F R E E
0031000 0 T Y P E ) P 0 A L L
0031020 O C M D S F 1 5 Q H U N K
0031040 S T A T S ) 001 * \r 001 \0 004 j 021 301
0031060 \f ` \0 \0 @ 340 340 340 340 320 _ 016 j O 016 310
0031100 \0 321 Z 264 003 202 261 001 017 O 016 312 004 P j 360
0031120 h 360 O 016 310 001 Y J g \0 \0 360 222 261 \0 367
0031140 J d g \0 \0 360 222 261 \0 355 g \0 \0 360 222 l
0031160 350 204 n 002 \0 I 333 ] @ g \0 \0 \n \0 \0 H
0031200 l 002 332 ^ O 016 312 004 P j 360 263 027 W 032 O
0031220 016 312 004 a k 330 \n \0 \0 001 _ 020 d 001 N 324
0031240 030 202 B N 366 277 C 265 j A 006 \0 \0 j 314 \0
0031260 @ l 005 360 262 v ` \0 \0 310 \r _ 022 343 O 022
0031300 l 377 345 341 321 _ 026 263 P H M 332 [ A 331 \
0031320 O 016 312 004 P j 360 263 e O 020 002 O 020 002 001
0031340 K 324 030 277 O 020 002 002 O 020 002 002 001 A 324 030
0031360 277 O 020 002 002 002 O 020 002 002 002 001 L 324 030 277
0031400 O 020 002 002 002 002 d 001 @ \t \0 \0 324 030 277 260
0031420 E N 361 262 226 h 020 A O 026 312 \0 \a 366 277 O
0031440 026 310 001 _ 024 343 O 024 260 230 O 016 311 002 _ 030
0031460 262 231 A k 366 277 O 030 311 \0 260 364 J d g \0
0031500 \0 360 224 277 o \0 \0 \0 N K A L @ \t \0 \0
0031520 \r 006 \0 \0 h 020 \0 ( 4 4 6 Q \ S T
0031540 M D S T Y P E 4 4 2 Q B O X
0031560 C O U N T 3 3 6 Q B O X C O
0031600 U N T 1 5 3 Q N T H 1 2 1
0031620 Q \ M A P M D S ) \r ( 4 2 3 Q
0031640 L I S T P 2 1 3 Q \ L I S
0031660 T P D T D 1 7 7 Q F I X P
0031700 1 1 6 Q \ S T O R A G E . T Y
0031720 P E A 0 0 0 1 7 7 Q L I S T
0031740 P 6 7 Q S M A L L P 5 5 Q
0031760 L I T A T O M 6 \ D T D S
0032000 p a c e B a s e ) \r ( 4 3 2 Q
0032020 " L I S T P ~ " ) \r \
0032040 S T L I N P D 1 \r ( L ( 2
0032060 T O T 1 A L L O C 0 S T
0032100 R ) ) \0 & \0 \0 \0 003 @ \t \0 \0 l 036
0032120 \t \0 \0 o \0 \0 \0 A \n \0 \0 l 2 \t \0 \0
0032140 o \0 \0 \0 B A 331 \n \0 \0 h \t \0 \0 020 \0
0032160 ( 4 3 Q T E R P R I 3 7 Q
0032200 P R I N T N U M 2 5 Q T A B
0032220 2 0 Q P R I N T N U M 1 0
0032240 Q T A B 3 P R I N 1 ) \r N
0032260 I L \r ( 3 1 Q ( F I X 1 0
0032300 Q ) 1 4 Q ( F I X 1 0 Q )
0032320 ) \r \ S T M D S T Y P E D 1 \r
0032340 ( L ( 5 B O X C O U N T 4
0032360 I N U S E 3 F R E E 2
0032400 A L L O C 1 N P A G E S A L
0032420 L O C A T E D 0 N A M E ) )
0032440 \0 F \0 \0 \0 006 @ \t \0 \0 l 017 \t \0 \0
0032460 o \0 \0 \0 A \n \0 \0 o \0 \0 \0 B \n \0 \0
0032500 l 036 \t \0 \0 o \0 \0 \0 C \n \0 \0 l + \t
0032520 \0 \0 o \0 \0 \0 D \n \0 \0 l 8 \t \0 \0 o
0032540 \0 \0 \0 E \n \0 \0 h \t \0 \0 020 \0 ( 1 0
0032560 3 Q T E R P R I 7 7 Q P R
0032600 I N T N U M 6 7 Q T A B 6
0032620 2 Q P R I N T N U M 5 2 Q
0032640 T A B 4 5 Q P R I N T N U M
0032660 3 5 Q T A B 3 0 Q P R I
0032700 N T N U M 2 0 Q P R I N T N
0032720 U M 1 0 Q T A B 3 P R I
0032740 N 1 ) \r N I L \r ( 7 3 Q ( F
0032760 I X 1 2 Q ) 5 6 Q ( F I X
0033000 1 0 Q ) 4 1 Q ( F I X 1
0033020 0 Q ) 2 4 Q ( F I X 1 0 Q
0033040 ) 1 4 Q ( F I X 5 ) ) \r \
0033060 S T O R A G E . H U N K T Y P E
0033100 D 1 \r ( L ( 1 P A G E T H
0033120 R E S H O L D 0 T O T A L )
0033140 F 3 H U N K S T A T S )
0033160 \0 J 003 001 \0 002 021 0 002 o \0 \0 \0 260 = d
0033200 001 272 S J 001 k 330 \n \0 \0 001 Y 001 270 @ H
0033220 366 277 H j 360 263 $ A 224 A H 361 263 035 J 002
0033240 001 H I 002 001 I 002 002 001 I 002 002 002 001 I 002
0033260 002 002 002 001 \r 006 \0 \0 277 002 003 265 304 h 020 \0
0033300 ( 1 0 1 Q \ S T M D S T Y P E
0033320 2 3 Q N T H ) \r N I L \r (
0033340 6 ( ( 0 U N B O X E D H U N
0033360 K ) ( 1 P T R H U N K ) (
0033400 2 C O D E H U N K ) ) ) \r ( P
0033420 R E T T Y C O M P R I N T L L
0033440 D A T A T Y P E C O M S ) \r ( R
0033460 P A Q Q L L D A T A T Y P E C
0033500 O M S ( ( C O M S ( * S t
0033520 o r a g e m a n a g e m e n t
0033540 ) ( F N S N T Y P X \ A L
0033560 L O C M D S P A G E \ A L L O
0033600 C P A G E B L O C K \ M A P M
0033620 D S \r \ C H E C K F O R S T O
0033640 R A G E F U L L \ D O S T O R
0033660 A G E F U L L I N T E R R U P T
0033700 \ S E T . S T O R A G E . S T
0033720 A T E \ A D V A N C E . S T O
0033740 R A G E . S T A T E \ N E W 2
0033760 P A G E \r \ M A K E M D S E N
0034000 T R Y \ G C T Y P E \ I N I
0034020 T M D S P A G E \ A S S I G N
0034040 D A T A T Y P E 1 \ A S S I G
0034060 N . D A T A T Y P E \ T Y P E
0034100 N U M B E R F R O M N A M E C
0034120 R E A T E C E L L \r \ C R E A
0034140 T E C E L L ) ( I N I T V A R
0034160 S ( C R O S S C O M P I L I N
0034200 G ) ( A S S I G N D A T A T Y
0034220 P E . A S K U S E R W A I T 3
0034240 0 0 ) ( \ S T O R A G E F U L
0034260 L S T A T E ) ( \r \ S T O R A
0034300 G E F U L L ) ) ( G L O B A L
0034320 V A R S C R O S S C O M P I L
0034340 I N G \ S T O R A G E F U L L
0034360 S T A T E \ S T O R A G E F U
0034400 L L \ S Y S T E M C A C H E V
0034420 A R S \r \ N x t A r r a y P a
0034440 g e ) ( S P E C V A R S A S
0034460 S I G N D A T A T Y P E . A S K
0034500 U S E R W A I T ) ) ( C O M S
0034520 ( * f e t c h a n d r e
0034540 p l a c e ) ( F N S F E T C
0034560 H F I E L D \r R E P L A C E F
0034600 I E L D B O X C O U N T C O
0034620 N S C O U N T \ D T E S T \
0034640 D T E S T F A I L G E T D E S
0034660 C R I P T O R S G E T F I E L
0034700 D S P E C S N C R E A T E N
0034720 C R E A T E 2 \r R E P L A C E
0034740 F I E L D V A L P U T B A S E
0034760 P T R X / R E P L A C E F I E
0035000 L D T Y P E N A M E \ T Y P
0035020 E N A M E F R O M N U M B E R
0035040 \ B L O C K D A T A P U S E R
0035060 D A T A T Y P E S \r D A T A T
0035100 Y P E P D A T A T Y P E S )
0035120 ( P ( M O V D ? ( Q U O T E
0035140 F E T C H F I E L D ) ( Q U
0035160 O T E F F E T C H F I E L D )
0035200 ) ( M O V D ? ( Q U O T E
0035220 R E P L A C E F I E L D ) ( \r
0035240 Q U O T E F R E P L A C E F I
0035260 E L D ) ) ( M O V D ? ( Q U
0035300 O T E R E P L A C E F I E L D
0035320 V A L ) ( Q U O T E F R E P
0035340 L A C E F I E L D V A L ) ) ) )
0035360 ( C O M S ( * S T O R A G
0035400 E ) ( \r F N S S T O R A G E
0035420 S T O R A G E . L E F T \ S
0035440 T O R A G E . T Y P E \ S T L
0035460 I N P \ S T M D S T Y P E \
0035500 S T O R A G E . H U N K T Y P E
0035520 ) ( D E C L A R E : D O N T
0035540 C O P Y ( \r R E C O R D S H
0035560 U N K S T A T ) ) ( I N I T V
0035600 A R S ( S T O R A G E . A R R
0035620 A Y S I Z E S ( Q U O T E (
0035640 4 1 6 6 4 2 5 6 1 0 2 4
0035660 4 0 9 6 1 6 3 8 4 N I L )
0035700 ) ) ) ) ( \r D E C L A R E :
0035720 ( E X P O R T ( M A C R O S
0035740 P U T B A S E P T R X ) ) ( E
0035760 X P O R T ( C O N S T A N T S
0036000 \ S M A L L P \ F I X P \
0036020 F L O A T P \ L I T A T O M
0036040 \ L I S T P \r \ A R R A Y P
0036060 \ S T R I N G P \ S T A C K P
0036100 \ V M E M P A G E P \ S T R
0036120 E A M ) ) D O N T C O P Y (
0036140 E X P O R T ( R E C O R D S
0036160 D T D ) ( M A C R O S \ G E
0036200 T D T D ) ( \r C O N S T A N T
0036220 S \ G U A R D S T O R A G E F
0036240 U L L \ G U A R D 1 S T O R A
0036260 G E F U L L ) ( G L O B A L V
0036300 A R S \ N x t M D S P a g e
0036320 \ L e a s t M D S P a g e \ M
0036340 D S F R E E L I S T P A G E \r
0036360 \ M a x S y s T y p e N u m \
0036400 M a x T y p e N u m b e r \ S
0036420 T O R A G E F U L L \ I N T E
0036440 R R U P T S T A T E \ P E N D
0036460 I N G I N T E R R U P T ) ) (
0036500 C O N S T A N T S * \r S T O
0036520 R A G E F U L L S T A T E S )
0036540 ( V A R S D T D E C L S ) )
0036560 ( C O M S ( * f o r M A K
0036600 E I N I T ) ( F N S C R E A
0036620 T E M D S T Y P E T A B L E I
0036640 N I T D A T A T Y P E S \r I N
0036660 I T D A T A T Y P E N A M E S )
0036700 ( D E C L A R E : D O N T C
0036720 O P Y ( A D D V A R S ( I N
0036740 I T V A L U E S ( \ N x t M D
0036760 S P a g e \ F i r s t M D S P
0037000 a g e ) ( \ L e a s t M D S P
0037020 a g e \r \ F i r s t M D S P a
0037040 g e ) ( \ M D S F R E E L I S
0037060 T P A G E ) ( \ M a x S y s T
0037100 y p e N u m 0 ) ( \ M a x T
0037120 y p e N u m b e r ) ) ( I N E
0037140 W C O M S ( F N S N T Y P X
0037160 \r \ A L L O C M D S P A G E
0037200 \ M A K E M D S E N T R Y \ G
0037220 C T Y P E \ I N I T M D S P A
0037240 G E \ A S S I G N D A T A T Y
0037260 P E 1 \ T Y P E N U M B E R F
0037300 R O M N A M E \ C R E A T E C
0037320 E L L \r \ N E W 2 P A G E )
0037340 ( F N S C R E A T E M D S T Y
0037360 P E T A B L E I N I T D A T A
0037400 T Y P E S I N I T D A T A T Y
0037420 P E N A M E S ) ( V A R S D
0037440 T D E C L S ) ) ( R D C O M S
0037460 ( F N S N T Y P X \r T Y P
0037500 E N A M E ) ) ( R D . S U B F
0037520 N S ( \ A R R A Y T Y P E N A
0037540 M E L A M B D A ( X ) ( Q
0037560 U O T E A R R A Y P ) ) ) (
0037600 E X P A N D M A C R O F N S \
0037620 G E T D T D P U T B A S E P T
0037640 R X \r R E P L A C E F I E L D
0037660 F E T C H F I E L D \ G E T
0037700 B I T S \ P U T B I T S \ T
0037720 E S T B I T S G E T B A S E B
0037740 I T S P U T B A S E B I T S
0037760 F F E T C H F I E L D F R E P
0040000 L A C E F I E L D \r F R E P L
0040020 A C E F I E L D V A L R E P L
0040040 A C E F I E L D V A L N C R E
0040060 A T E ) ( M K I . S U B F N S
0040100 ( \ G C D I S A B L E D .
0040120 N I L L ) ( C R E A T E C E L
0040140 L . \r I . \ C R E A T E C E
0040160 L L ) ( \ C H E C K F O R S T
0040200 O R A G E F U L L . N I L L
0040220 ) ) ) E V A L @ C O M P I L E
0040240 ( A D D V A R S ( D O N T C
0040260 O M P I L E F N S \r C R E A T
0040300 E M D S T Y P E T A B L E I N
0040320 I T D A T A T Y P E S I N I T
0040340 D A T A T Y P E N A M E S ) ) )
0040360 ) ( L O C A L V A R S . T
0040400 ) ( D E C L A R E : E V A L
0040420 @ C O M P I L E D O N T C O P
0040440 Y \r ( F I L E S ( L O A D C
0040460 O M P ) D T D E C L A R E ) )
0040500 ) ) \r ( R P A Q ? C R O S S C
0040520 O M P I L I N G ) \r ( R P A Q ?
0040540 A S S I G N D A T A T Y P E .
0040560 A S K U S E R W A I T 3 0 0 )
0040600 \r ( R P A Q ? \ S T O R A G E
0040620 F U L L S T A T E ) \r ( R P A Q
0040640 ? \ S T O R A G E F U L L ) \r
0040660 ( M O V D ? ( Q U O T E F E
0040700 T C H F I E L D ) ( Q U O T E
0040720 F F E T C H F I E L D ) ) \r (
0040740 M O V D ? ( Q U O T E R E P
0040760 L A C E F I E L D ) ( Q U O T
0041000 E F R E P L A C E F I E L D )
0041020 ) \r ( M O V D ? ( Q U O T E
0041040 R E P L A C E F I E L D V A L )
0041060 ( Q U O T E F R E P L A C E
0041100 F I E L D V A L ) ) \r ( R P A Q
0041120 ? S T O R A G E . A R R A Y S
0041140 I Z E S ( Q U O T E ( 4 1
0041160 6 6 4 2 5 6 1 0 2 4 4 0
0041200 9 6 1 6 3 8 4 N I L ) ) ) \r
0041220 ( D E C L A R E : E V A L @ C
0041240 O M P I L E ( P U T P R O P S
0041260 P U T B A S E P T R X M A C
0041300 R O ( O P E N L A M B D A (
0041320 D A T U M O F F S E T N E W
0041340 V A L U E ) ( \r U N I N T E R
0041360 R U P T A B L Y ( \ P U T B A
0041400 S E B Y T E D A T U M ( A D
0041420 D 1 ( L L S H O F F S E T
0041440 1 ) ) ( L O G A N D ( \ H I
0041460 L O C N E W V A L U E ) 2 5
0041500 5 ) ) ( \ P U T B A S E \r D
0041520 A T U M ( A D D 1 O F F S E
0041540 T ) ( \ L O L O C N E W V A
0041560 L U E ) ) N E W V A L U E ) )
0041600 ) ) \r ( D E C L A R E : E V A
0041620 L @ C O M P I L E ( R P A Q Q
0041640 \ S M A L L P 1 ) ( R P A
0041660 Q Q \ F I X P 2 ) ( R P A
0041700 Q Q \ F L O A T P 3 ) ( R
0041720 P A Q Q \ L I T A T O M 4 )
0041740 ( R P A Q Q \r \ L I S T P
0041760 5 ) ( R P A Q Q \ A R R A Y
0042000 P 6 ) ( R P A Q Q \ S T R
0042020 I N G P 7 ) ( R P A Q Q \
0042040 S T A C K P 8 ) ( R P A Q Q
0042060 \ V M E M P A G E P 1 0 )
0042100 ( R P A Q Q \ S T R E A M \r
0042120 1 1 ) ( C O N S T A N T S \
0042140 S M A L L P \ F I X P \ F L
0042160 O A T P \ L I T A T O M \ L
0042200 I S T P \ A R R A Y P \ S T
0042220 R I N G P \ S T A C K P \ V
0042240 M E M P A G E P \ S T R E A M
0042260 ) ) \r ( P U T P R O P S L L D
0042300 A T A T Y P E C O P Y R I G H
0042320 T ( " X e r o x C o r p o r
0042340 a t i o n " 1 9 8 2 1 9 8 3
0042360 1 9 8 4 1 9 8 5 ) ) \r N I L
0042400 \r
0042401