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