$ od -c -N 50000 [eris]<LispCore>PROLOG>ALLOCPAGEBLOCK.DCOM!1
0000000 ( F I L E C R E A T E D " 2 4
0000020 - A p r - 8 5 1 5 : 3 5 : 1 1
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P N E W
0000100 > I N T E R M E Z Z O > P A T C
0000120 H E S > A L L O C P A G E B L O
0000140 C K . ; 2 ) \r " 1 9 - M a r -
0000160 8 5 1 4 : 3 4 : 1 7 " r e c
0000200 o m p i l e d c h a n g e s :
0000220 \ A L L O C P A G E B L O C K
0000240 i n " I N T E R L I S P - D
0000260 1 6 - A p r - 8 5 . . . "
0000300 d a t e d \r " 1 6 - A p r - 8
0000320 5 1 3 : 0 2 : 1 5 " ) \r ( F I
0000340 L E C R E A T E D " 2 4 - A p
0000360 r - 8 5 1 5 : 3 4 : 2 0 " {
0000400 E R I S } < L I S P N E W > I N
0000420 T E R M E Z Z O > P A T C H E S
0000440 > A L L O C P A G E B L O C K .
0000460 ; 2 1 3 5 2 7 c h a n g e s
0000500 \r t o : ( F N S \ A L L O
0000520 C P A G E B L O C K ) ( V A R
0000540 S A L L O C P A G E B L O C K
0000560 C O M S ) p r e v i o u s d
0000600 a t e : " 2 4 - A p r - 8 5
0000620 1 5 : 1 7 : 2 1 " \r { E R I S
0000640 } < L I S P N E W > I N T E R M
0000660 E Z Z O > P A T C H E S > A L L
0000700 O C P A G E B L O C K . ; 1 ) \r
0000720 \ A L L O C P A G E B L O C K
0000740 D 1 \r ( P 5 B A S E P 2
0000760 R E S U L T P 1 F I R S
0001000 T P A G E P 0 \ I N T E R
0001020 R U P T A B L E I 0 N P A
0001040 G E S ) \0 205 \a \0 \0 001 021 @ 003 ` \0
0001060 \0 l 200 330 ` \0 \0 l 002 330 @ k 330 m 376 345
0001100 b \0 331 Y 361 250 I l 002 331 027 \0 \0 260 : `
0001120 \0 \0 265 005 \b \0 \0 l 002 360 241 h 020 I ` \0
0001140 \0 361 230 I l 002 331 027 \0 \0 260 035 n 377 374 `
0001160 \0 \0 Y @ 330 361 264 ' I @ 330 027 \0 \0 277 `
0001200 \0 \0 n 377 377 315 A 277 @ I [ 343 K l 377 345
0001220 341 321 Z 021 022 006 k 276 N L 363 221 J 020 M \t
0001240 \0 \0 277 N k 324 276 M n 001 \0 320 275 260 353 \0
0001260 ( 1 6 6 Q \ N E W P A G E 5
0001300 3 Q \ S E T . S T O R A G E .
0001320 S T A T E ) \r ( 1 2 6 Q \ I n
0001340 t e r f a c e P a g e 1 2 2 Q
0001360 \ S e c o n d A r r a y P a g
0001400 e 1 0 6 Q \ S e c o n d A r
0001420 r a y P a g e 7 6 Q \ N x t
0001440 M D S P a g e 6 5 Q \ N x t
0001460 A r r a y P a g e 4 6 Q \ S
0001500 T O R A G E F U L L S T A T E
0001520 4 1 Q \ N x t M D S P a g e
0001540 1 3 Q \ N x t M D S P a g e
0001560 5 \ N x t A r r a y P a g e )
0001600 \r ( ) \r \ M A P M D S D 1 \r (
0001620 P 5 V P P 2 T Y P P
0001640 1 I I 1 F N I 0
0001660 T Y P E ) \0 y 006 \0 \0 002 @ 236 @ d
0001700 005 001 241 005 002 246 @ \t \0 \0 b \0 277 ` \0 \0
0001720 l 004 360 221 k 200 j j 021 " 003 I d H 363 221
0001740 h 020 j 360 223 n @ \0 202 n 377 375 I j 360 235
0001760 ` \0 \0 d ` \0 \0 361 227 277 ` \0 \0 202 ` \0
0002000 \0 021 002 005 M L 363 263 & M [ 343 K l 377 345
0002020 341 321 004 Z @ 360 251 @ 254 J j 360 250 J k 360
0002040 244 M k A 016 277 M l 002 324 ] 260 332 023 I k
0002060 324 Y 260 252 \0 ( 1 5 Q \ T Y P E N
0002100 U M B E R F R O M N A M E ) \r (
0002120 1 0 4 Q \ N x t M D S P a g e
0002140 1 0 0 Q \ L e a s t M D S P
0002160 a g e 7 2 Q \ L e a s t M D
0002200 S P a g e 6 6 Q \ N x t M D
0002220 S P a g e 2 3 Q \ S T O R A
0002240 G E F U L L S T A T E ) \r ( ) \r
0002260 \ C H E C K F O R S T O R A G E
0002300 F U L L D 1 \r ( P 1 P A G
0002320 E S L E F T P 0 \ I N T E
0002340 R R U P T A B L E I 0 N P
0002360 A G E S ) \0 350 002 \0 \0 001 021 001 l
0002400 200 ` \0 \0 ` \0 \0 331 l 002 330 Y 361 246 @ 264
0002420 003 202 261 \0 314 ` \0 \0 265 005 \b \0 \0 d k 360
0002440 245 d l 004 360 262 N 277 j I 361 233 l 024 o \0
0002460 \0 \0 \n \0 \0 277 260 366 I l @ 361 263 033 ` \0
0002500 \0 d j 360 263 026 277 j 027 \0 \0 277 l 031 o \0
0002520 \0 \0 \n \0 \0 260 030 ` \0 \0 263 024 i 027 \0 \0
0002540 277 ` \0 \0 k 317 \0 ` 277 i 027 \0 \0 277 \b \0
0002560 \0 h 020 d l 002 360 262 9 @ 265 033 I j 361 263
0002600 023 ` \0 \0 027 \0 \0 277 n 377 374 027 \0 \0 277 l
0002620 004 217 h 260 031 I 361 262 027 ` \0 \0 027 \0 \0 277
0002640 l 003 \t \0 \0 277 ` \0 \0 \t \0 \0 265 2 i 020
0002660 l 003 360 262 , ` \0 \0 ` \0 \0 361 234 n 377 374
0002700 027 \0 \0 l 004 \t \0 \0 i 020 @ 265 004 i 020 l
0002720 200 330 n 377 374 ` \0 \0 331 375 361 263 362 h 020 \b
0002740 \0 \0 020 \0 ( 3 4 5 Q S H O U L D
0002760 N T 3 1 3 Q \ A D V A N C E
0003000 . S T O R A G E . S T A T E 2
0003020 5 7 Q \ A D V A N C E . A R R
0003040 A Y . S E G M E N T S 2 5 0 Q
0003060 \ A D V A N C E . S T O R A G
0003100 E . S T A T E 1 6 4 Q \ D O
0003120 R E C L A I M 1 3 0 Q \ M P
0003140 . E R R O R 7 0 Q \ M P . E
0003160 R R O R 4 0 Q \ S E T . S T
0003200 O R A G E . S T A T E ) \r ( 3 3
0003220 3 Q \ N x t A r r a y P a g e
0003240 3 0 6 Q \ N x t M D S P a g
0003260 e 2 7 6 Q \ N x t M D S P a
0003300 g e 2 7 3 Q \ L e a s t M D
0003320 S P a g e 2 5 4 Q \ S e c o
0003340 n d A r r a y P a g e 2 4 2 Q
0003360 \ L e a s t M D S P a g e 2
0003400 3 7 Q \ N x t A r r a y P a g
0003420 e 2 2 1 Q \ N x t M D S P a
0003440 g e 2 1 2 Q \ L e a s t M D
0003460 S P a g e 2 0 7 Q \ N x t A
0003500 r r a y P a g e 1 6 0 Q \ P
0003520 E N D I N G I N T E R R U P T
0003540 1 4 7 Q \ I N T E R R U P T S
0003560 T A T E 1 4 3 Q \ S T O R A
0003600 G E F U L L 1 3 5 Q \ S T O
0003620 R A G E F U L L 1 1 6 Q \ S
0003640 T O R A G E F U L L 1 0 4 Q
0003660 \ S T O R A G E F U L L 3 3 Q
0003700 \ S T O R A G E F U L L S T A
0003720 T E 1 2 Q \ N x t A r r a y
0003740 P a g e 7 \ N x t M D S P a
0003760 g e ) \r ( 1 2 5 Q " S p a c
0004000 e g e t t i n g V E R Y f
0004020 u l l . P l e a s e s a v e
0004040 a n d r e l o a d a . s .
0004060 a . p . T y p e c o n t r o
0004100 l - N t o c o n t i n u e
0004120 n o w . " 6 5 Q " S t o r a
0004140 g e c o m p l e t e l y f u
0004160 l l " ) \r S T O R A G E D 1 \r
0004200 ( P 2 0 Q H F L G P 1 7
0004220 Q T Y P E P 1 5 Q I P
0004240 1 3 Q D O B L O C K S F L G
0004260 P 1 2 Q T Y P E N A M E
0004300 P 1 1 Q T Y P E P 1 0 Q
0004320 H U N K S T A T S P 7 F
0004340 R E E P 6 T O T A L H U N
0004360 K S P 5 T O T A L A L L O
0004400 C M D S I 1 P A G E T H R
0004420 E S H O L D I 0 T Y P E S
0004440 ) 002 325 021 \0 \0 002 l 002 037 l 002 037 l 002
0004460 037 l 002 j 021 2 004 I H 363 263 ! j d d d
0004500 d h 032 032 032 032 032 274 K 265 \r L h 032 [ 272
0004520 I k 324 Y 260 344 L & 273 260 367 J 022 021 4 \v
0004540 o \0 \0 \0 \t \0 \0 277 l 017 \t \0 \0 277 o \0
0004560 \0 \0 \t \0 \0 277 l 036 \t \0 \0 277 o \0 \0 \0
0004600 \t \0 \0 277 l - \t \0 \0 277 o \0 \0 \0 \t \0
0004620 \0 277 l 7 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277
0004640 h \t \0 \0 277 l 017 \t \0 \0 277 o \0 \0 \0 \t
0004660 \0 \0 277 h \t \0 \0 @ 265 003 202 261 \0 324 ` \0
0004700 \0 k 021 002 \r O 032 d O 030 363 242 261 001 G 023
0004720 N A \n \0 \0 277 h \t \0 \0 277 o \0 \0 \0 \t
0004740 \0 \0 277 l 017 \t \0 \0 277 o \0 \0 \0 M N 330
0004760 \n \0 \0 277 h \t \0 \0 277 h \t \0 \0 277 o \0
0005000 \0 \0 \t \0 \0 277 h \t \0 \0 277 l 036 \t \0 \0
0005020 277 o \0 \0 \0 \t \0 \0 277 l 2 \t \0 \0 277 o
0005040 \0 \0 \0 \t \0 \0 277 h \t \0 \0 277 l \t \0
0005060 \0 277 o \0 \0 \0 \t \0 \0 277 l 4 \t \0 \0 277
0005100 o \0 \0 \0 \t \0 \0 277 h \t \0 \0 277 o \0 \0
0005120 \0 \t \0 \0 277 l 036 \t \0 \0 277 o \0 \0 \0 M
0005140 \n \0 \0 277 l 2 \t \0 \0 277 o \0 \0 \0 \t \0
0005160 \0 277 h \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 N
0005200 j \n \0 \0 222 261 \0 237 o \0 \0 \0 261 \0 234 i
0005220 360 222 261 377 , @ 021 ! 020 O 034 265 017 O 225
0005240 M A \n \0 \0 277 023 261 001 L 003 246 O 034 _ 036
0005260 277 h 210 O 034 001 _ 036 277 O 034 002 _ 034 277 O
0005300 036 d d 005 001 241 005 002 262 " 277 j O 036 361 250
0005320 O 036 d ` \0 \0 361 232 277 o \0 \0 \0 O 036 \n
0005340 \0 \0 215 j 360 234 i _ 026 206 \t \0 \0 _ 036 h
0005360 360 263 250 ` \0 \0 O 036 340 340 340 340 320 312 004 P
0005400 j 360 243 i _ 277 O 036 O 016 M A \f \0 \0
0005420 277 260 210 O 016 M A \f \0 \0 277 O 032 k 324 _
0005440 032 261 376 246 o \0 \0 \0 \t \0 \0 277 l 036 \t \0
0005460 \0 277 o \0 \0 \0 ` \0 \0 d l 004 360 245 d l
0005500 003 360 262 023 277 ` \0 \0 n 023 \0 331 ` \0 \0 `
0005520 \0 \0 331 330 207 277 ` \0 \0 n 023 \0 331 \n \0 \0
0005540 277 l 2 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 o
0005560 \0 \0 \0 \b \0 \0 001 \n \0 \0 277 h \t \0 \0 277
0005600 N j \n \0 \0 263 , o \0 \0 \0 \t \0 \0 277 l
0005620 036 \t \0 \0 277 o \0 \0 \0 N \n \0 \0 277 l 2
0005640 \t \0 \0 277 o \0 \0 \0 \t \0 \0 277 h \t \0 \0
0005660 277 o \0 \0 \0 ` \0 \0 l 177 330 342 342 342 342 342
0005700 342 342 l 004 332 n \b \0 \v \0 \0 277 ` \0 \0 236
0005720 o \0 \0 \0 ` \0 \0 k 330 ` \0 \0 k 330 213 o
0005740 \0 \0 \0 ` \0 \0 k 330 n 005 377 \v \0 \0 277 i
0005760 _ 026 277 O 026 264 006 \b \0 \0 h 020 \0 ( 1 3
0006000 2 1 Q \ S H O W . A R R A Y .
0006020 F R E E L I S T S 1 3 0 5 Q
0006040 \ S T L I N P 1 2 4 2 Q \ S
0006060 T L I N P 1 2 0 7 Q T E R P
0006100 R I 1 2 0 2 Q P R I N 1 1
0006120 1 7 2 Q T A B 1 1 6 4 Q P
0006140 R I N T N U M 1 1 5 3 Q T A
0006160 B 1 1 4 5 Q P R I N 1 1 1
0006200 3 4 Q I E Q P 1 1 2 6 Q T
0006220 E R P R I 1 1 2 1 Q P R I N
0006240 T N U M 1 1 1 5 Q S T O R A
0006260 G E . L E F T 1 1 0 5 Q P R
0006300 I N 1 1 0 7 5 Q T A B 1 0
0006320 6 7 Q P R I N T N U M 1 0 1
0006340 0 Q T A B 1 0 0 2 Q P R I
0006360 N 1 7 6 1 Q \ S T O R A G E
0006400 . T Y P E 7 4 7 Q \ S T O R
0006420 A G E . T Y P E 7 0 4 Q \ T
0006440 Y P E N U M B E R F R O M N A M
0006460 E 6 7 1 Q E R R O R 5 7 4
0006500 Q \ S T O R A G E . H U N K T
0006520 Y P E 5 3 3 Q I E Q P 5 2
0006540 5 Q P R I N 1 5 1 5 Q T E
0006560 R P R I 5 1 0 Q P R I N 1
0006600 5 0 0 Q T A B 4 7 2 Q P R
0006620 I N T N U M 4 6 1 Q T A B
0006640 4 5 3 Q P R I N 1 4 4 3 Q
0006660 T E R P R I 4 3 6 Q P R I N
0006700 1 4 2 6 Q T A B 4 2 0 Q
0006720 P R I N 1 4 1 0 Q T A B 4
0006740 0 2 Q T E R P R I 3 7 5 Q
0006760 P R I N 1 3 6 5 Q T A B 3
0007000 5 7 Q P R I N 1 3 4 7 Q T
0007020 A B 3 4 1 Q T E R P R I 3
0007040 3 4 Q P R I N 1 3 2 4 Q T
0007060 E R P R I 3 1 7 Q T E R P R
0007100 I 3 1 2 Q P R I N T N U M
0007120 2 7 7 Q T A B 2 7 1 Q P R
0007140 I N 1 2 6 1 Q T E R P R I
0007160 2 5 4 Q \ S T O R A G E . H U
0007200 N K T Y P E 2 1 6 Q T E R P
0007220 R I 2 1 1 Q P R I N 1 2 0
0007240 1 Q T A B 1 7 3 Q T E R P
0007260 R I 1 6 6 Q P R I N 1 1 5
0007300 6 Q T A B 1 5 0 Q P R I N
0007320 1 1 4 0 Q T A B 1 3 2 Q
0007340 P R I N 1 1 2 2 Q T A B 1
0007360 1 4 Q P R I N 1 1 0 4 Q T
0007400 A B 7 6 Q P R I N 1 ) \r ( 1
0007420 2 7 5 Q \ C u r P n P a g e
0007440 1 2 6 3 Q \ C u r P n P a g e
0007460 1 2 5 6 Q \ C u r P n P a g
0007500 e 1 2 4 6 Q \ P N A M E S .
0007520 I N . B L O C K S ? 1 2 1 7 Q
0007540 \ A t o m F r L s t 1 0 6 0
0007560 Q \ N x t A r r a y P a g e
0007600 1 0 5 1 Q \ S e c o n d A r r
0007620 a y P a g e 1 0 4 6 Q \ N x
0007640 t A r r a y P a g e 1 0 3 7 Q
0007660 \ L e a s t M D S P a g e 1
0007700 0 2 0 Q \ S T O R A G E F U L
0007720 L S T A T E 7 1 5 Q \ D T D
0007740 S p a c e B a s e 6 5 5 Q \
0007760 M a x T y p e N u m b e r 2 3
0010000 0 Q \ M a x T y p e N u m b e
0010020 r ) \r ( 1 2 7 2 Q " L i t a
0010040 t o m P n a m e s " 1 2 5 3
0010060 Q " L i t a t o m P n a m e
0010100 s ( f r o m b o o t s t r a
0010120 p ) " 1 2 1 4 Q " L i t a t
0010140 o m s " 1 1 7 7 Q " / " 1
0010160 1 6 0 Q ( F I X 1 0 Q ) 1
0010200 1 4 2 Q " A r r a y B l o c k
0010220 s ( c h u n k e d ) " 1 1 1
0010240 2 Q ( F I X 6 ) 1 1 0 2 Q
0010260 " - - " 1 0 1 5 Q ( F I X
0010300 1 0 Q ) 7 7 7 Q " " 6 6
0010320 4 Q " N o t a t y p e n
0010340 u m b e r " 5 4 3 Q " ( v
0010360 a r i a b l e ) " 5 2 2 Q "
0010400 A r r a y B l o c k s " 5 0 5
0010420 Q " \ " 4 6 6 Q ( F I X
0010440 1 0 Q ) 4 5 0 Q " D a t a t
0010460 y p e s ( i n c l . L I S T
0010500 P e t c . ) " 4 3 3 Q " P
0010520 a g e s " 4 1 5 Q " P a g e
0010540 s " 3 7 2 Q " R e m a i n i
0010560 n g " 3 5 4 Q " A l l o c a
0010600 t e d " 3 3 1 Q " D a t a
0010620 S p a c e s S u m m a r y "
0010640 3 0 4 Q ( F I X 5 ) 2 6 6
0010660 Q " T O T A L " 2 0 6 Q "
0010700 p a g e s [ i t e m s ] " 1
0010720 6 3 Q " T o t a l a l l o c
0010740 " 1 4 5 Q " I n u s e "
0010760 1 2 7 Q " F r e e i t e m s
0011000 " 1 1 1 Q " A s s i g n e d
0011020 " 7 3 Q " T y p e " ) \r S T
0011040 O R A G E . L E F T D 1 \r N I
0011060 L \0 274 003 \0 \0 \0 ` \0 \0 265 005 \b \0 \0
0011100 l 003 360 223 n 377 374 202 ` \0 \0 ` \0 \0 331 `
0011120 \0 \0 d l 002 360 233 277 n 377 374 ` \0 \0 331 l
0011140 002 330 217 l 003 360 232 ` \0 \0 ` \0 \0 331 l 002
0011160 330 200 j ` \0 \0 j 021 022 002 H 262 026 I k 324
0011200 271 H Z 343 J l 377 345 341 321 311 \0 005 001 X 260
0011220 354 I 022 l 002 330 330 330 021 021 001 H ` \0 \0 k
0011240 360 221 j 206 n 377 376 ` \0 \0 331 n ' \0 330 353
0011260 Y H I ` \0 \0 d k 360 223 277 I 260 027 l 002
0011300 360 237 ` \0 \0 l 002 330 ` \0 \0 331 o \0 \0 \0
0011320 353 200 j n \b \0 ` \0 \0 l 177 330 342 342 342 342
0011340 342 342 342 l 004 332 331 d n \b \0 353 h 032 032 032
0011360 032 032 020 \0 ( 7 \ S E T . S T O R
0011400 A G E . S T A T E ) \r ( 2 4 0 Q
0011420 \ A t o m F r L s t 2 2 2 Q
0011440 \ N x t A r r a y P a g e 2
0011460 1 4 Q \ N x t M D S P a g e
0011500 1 7 5 Q \ S T O R A G E F U L
0011520 L S T A T E 1 6 1 Q \ S e c
0011540 o n d A r r a y P a g e 1 4 6
0011560 Q \ S T O R A G E F U L L S T
0011600 A T E 7 5 Q \ M D S F R E E
0011620 L I S T P A G E 6 4 Q \ L e
0011640 a s t M D S P a g e 6 1 Q \
0011660 N x t M D S P a g e 4 5 Q \
0011700 S e c o n d A r r a y P a g e
0011720 3 1 Q \ S T O R A G E F U L L
0011740 S T A T E 2 5 Q \ N x t A r
0011760 r a y P a g e 2 2 Q \ N x t
0012000 M D S P a g e 2 \ S T O R A
0012020 G E F U L L S T A T E ) \r ( 2
0012040 2 7 Q 9 9 8 4 . 0 ) \r ( P R E
0012060 T T Y C O M P R I N T A L L O
0012100 C P A G E B L O C K C O M S ) \r
0012120 ( R P A Q Q A L L O C P A G E
0012140 B L O C K C O M S ( ( F N S
0012160 \ A L L O C P A G E B L O C K
0012200 \ M A P M D S \ C H E C K F O
0012220 R S T O R A G E F U L L S T O
0012240 R A G E S T O R A G E . L E F
0012260 T ) ) ) \r ( P U T P R O P S A
0012300 L L O C P A G E B L O C K C O
0012320 P Y R I G H T ( " X e r o x
0012340 C o r p o r a t i o n " 1 9 8
0012360 5 ) ) \r N I L \r
0012370