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