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