$ od -c -N 50000 [eris]<Lisp>JCAI>sources>VANILLADISK.DCOM!1
0000000 ( F I L E C R E A T E D " 3 0
0000020 - J a n - 8 5 2 2 : 3 8 : 0 9
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 > V A N I L L
0000120 A D I S K . ; 2 ) \r " 3 0 - J
0000140 a n - 8 5 1 3 : 3 6 : 2 7 "
0000160 r e c o m p i l e d e x p r s
0000200 : \ V A N I L L A D I S K I N
0000220 I T \ V A N I L L A H O S T N
0000240 A M E P \ V A N I L L A E V E
0000260 N T F N i n \r " I N T E R L
0000300 I S P - D 3 0 - J a n - 8 5
0000320 . . . " d a t e d " 3 0 - J
0000340 a n - 8 5 1 3 : 5 1 : 2 5 " )
0000360 \r ( F I L E C R E A T E D " 3
0000400 0 - J a n - 8 5 2 2 : 3 5 : 2
0000420 9 " { E R I S } < L I S P C O
0000440 R E > S O U R C E S > V A N I L
0000460 L A D I S K . ; 2 4 3 6 4 c
0000500 h a n g e s t o : ( F N S
0000520 \r \ V A N I L L A D I S K I N I
0000540 T \ V A N I L L A H O S T N A
0000560 M E P \ V A N I L L A E V E N
0000600 T F N \ G E T P S E U D O D S
0000620 K ) ( V A R S V A N I L L A
0000640 D I S K C O M S ) p r e v i o
0000660 u s \r d a t e : " 1 5 - J a
0000700 n - 8 5 1 2 : 2 9 : 2 8 " {
0000720 E R I S } < L I S P C O R E > S
0000740 O U R C E S > V A N I L L A D I
0000760 S K . ; 1 ) \r \ V A N I L L A D
0001000 I S K I N I T D 1 \r N I L 001
0001020 # \t \0 \0 \0 ` \0 \0 \t \0 \0 021 201 \b l /
0001040 j 272 271 J I 363 254 H J j \v \0 \0 277 J k
0001060 324 Z 260 362 l @ l : 274 273 L K 363 254 H L
0001100 j \v \0 \0 277 L k 324 \ 260 362 l ` l [ 276
0001120 275 N M 363 254 H N j \v \0 \0 277 N k 324 ^
0001140 260 362 l 377 l { _ 020 277 _ 016 277 O 020 O 016
0001160 363 257 H O 020 j \v \0 \0 277 O 020 k 324 _ 020
0001200 260 356 H l ; d \v \0 \0 277 H l ! l ; \v
0001220 \0 \0 277 H l * d \v \0 \0 277 H l 033 l *
0001240 \v \0 \0 277 H l ? l # \v \0 \0 277 H l .
0001260 d \v \0 \0 277 H l - d \v \0 \0 277 H l +
0001300 d \v \0 \0 277 H l $ d \v \0 \0 277 H 027 \0
0001320 \0 023 h ` \0 \0 037 d o \0 \0 \0 024 \0 277 d
0001340 g \0 \0 024 \b 277 d g \0 \0 024 020 277 d g \0
0001360 \0 024 : 277 d g \0 \0 024 8 277 d g \0 \0 024
0001400 6 277 d g \0 \0 024 4 277 d g \0 \0 024 2 277
0001420 d g \0 \0 024 0 277 d g \0 \0 024 . 277 d g
0001440 \0 \0 024 * 277 d g \0 \0 024 $ 277 d g \0 \0
0001460 024 006 277 \n \0 \0 020 \0 ( 4 4 0 Q \ D
0001500 E F I N E D E V I C E 2 6 6 Q
0001520 S E T C A S E A R R A Y 2 5
0001540 6 Q S E T C A S E A R R A Y
0001560 2 4 6 Q S E T C A S E A R R A
0001600 Y 2 3 6 Q S E T C A S E A R
0001620 R A Y 2 2 6 Q S E T C A S E
0001640 A R R A Y 2 1 5 Q S E T C A
0001660 S E A R R A Y 2 0 4 Q S E T
0001700 C A S E A R R A Y 1 7 4 Q S
0001720 E T C A S E A R R A Y 1 6 3 Q
0001740 S E T C A S E A R R A Y 1 4
0001760 3 Q S E T C A S E A R R A Y
0002000 1 0 5 Q S E T C A S E A R R A
0002020 Y 5 6 Q S E T C A S E A R R
0002040 A Y 2 7 Q S E T C A S E A R
0002060 R A Y 5 C O P Y A R R A Y )
0002100 \r ( 4 3 2 Q N I L L 4 2 3 Q
0002120 \ G E N E R I C . R E A D P
0002140 4 1 4 Q N I L L 4 0 5 Q \
0002160 I S . N O T . R A N D A C C E S
0002200 S P 3 7 6 Q \ I L L E G A L
0002220 . D E V I C E O P 3 6 7 Q \
0002240 I S . N O T . R A N D A C C E S
0002260 S P 3 6 0 Q \ I L L E G A L
0002300 . D E V I C E O P 3 5 1 Q \
0002320 G E N E R I C . B I N S 3 4 2
0002340 Q \ G E N E R I C . B O U T S
0002360 3 3 3 Q \ G E N E R I C . R
0002400 E N A M E F I L E 3 2 4 Q \
0002420 V A N I L L A H O S T N A M E P
0002440 3 1 5 Q N I L L 3 0 0 Q
0002460 004 003 F D E V T Y P E # 2 7 3 Q
0002500 \ D I S K N A M E C A S E A R
0002520 R A Y 2 U P P E R C A S E A
0002540 R R A Y ) \r ( 3 0 6 Q " V A
0002560 N I L L A D I S K " ) \r \ V A N
0002600 I L L A H O S T N A M E P D 1
0002620 \r ( L ( 0 N A M E ) ) \0 `
0002640 \0 \0 \0 001 \b \0 \0 d g \0 \0 360 246 d g \0
0002660 \0 360 262 > @ g \0 \0 360 241 h 020 g \0 \0 \t
0002700 \0 \0 224 \b \0 \0 265 ) ` \0 \0 263 030 g \0 \0
0002720 \t \0 \0 277 g \0 \0 \t \0 \0 027 \0 \0 g \0 \0
0002740 024 \b 277 g \0 \0 ` \0 \0 \n \0 \0 ` \0 \0 020
0002760 d g \0 \0 360 246 d g \0 \0 360 264 300 277 @ \t
0003000 \0 \0 020 \0 ( 1 3 5 Q \ M 4 4 H O
0003020 S T N A M E P 1 0 7 Q \ D E
0003040 F I N E D E V I C E 6 5 Q \
0003060 G E T D E V I C E F R O M N A M
0003100 E 5 6 Q C O R E D E V I C E
0003120 4 1 Q \ L F O p e n D e v i
0003140 c e 3 5 Q \ D E F I N E D P
0003160 2 M A C H I N E T Y P E ) \r
0003200 ( 1 2 5 Q D O R A D O 1 1 7
0003220 Q D O L P H I N 1 1 2 Q \
0003240 P S E U D O D S K 1 0 4 Q \
0003260 P S E U D O D S K 1 0 1 Q D
0003300 S K 7 3 Q \ V A N I L L A E
0003320 V E N T F N 7 0 Q \ P S E U
0003340 D O D S K 6 2 Q P S E U D O
0003360 - D S K 5 3 Q P S E U D O -
0003400 D S K 4 6 Q \ P S E U D O D
0003420 S K 3 2 Q \ L F O p e n D e
0003440 v i c e 2 3 Q D S K 1 4 Q
0003460 D O V E 6 D A N D E L I O
0003500 N ) \r ( ) \r \ V A N I L L A E V
0003520 E N T F N D 1 \r ( L ( 1 E
0003540 V E N T 0 F D E V ) ) \0 #
0003560 \0 \0 \0 002 A g \0 \0 360 263 025 A g \0 \0 360
0003600 254 A g \0 \0 360 246 A g \0 \0 360 264 \t @ g
0003620 \0 \0 \n \0 \0 020 \0 ( 4 0 Q \ R E M
0003640 O V E D E V I C E . N A M E S )
0003660 \r ( 3 5 Q D S K 2 6 Q A F
0003700 T E R S A V E V M 2 0 Q A F
0003720 T E R M A K E S Y S 1 2 Q A
0003740 F T E R S Y S O U T 3 A F T
0003760 E R L O G O U T ) \r ( ) \r ( P R
0004000 E T T Y C O M P R I N T V A N
0004020 I L L A D I S K C O M S ) \r ( R
0004040 P A Q Q V A N I L L A D I S K
0004060 C O M S ( ( F N S \ V A N I
0004100 L L A D I S K I N I T \ V A N
0004120 I L L A H O S T N A M E P \ V
0004140 A N I L L A E V E N T F N ) (
0004160 I N I T V A R S ( \ P S E U D
0004200 O D S K \r ) ) ( G L O B A L V
0004220 A R S \ P S E U D O D S K \
0004240 D I S K N A M E C A S E A R R A
0004260 Y ) ( D E C L A R E : D O N
0004300 T E V A L @ L O A D ( P ( \
0004320 V A N I L L A D I S K I N I T )
0004340 ) ) ( \r L O C A L V A R S .
0004360 T ) ) ) \r ( R P A Q ? \ P S
0004400 E U D O D S K ) \r ( \ V A N I L
0004420 L A D I S K I N I T ) \r ( P U T
0004440 P R O P S V A N I L L A D I S
0004460 K C O P Y R I G H T ( " X e
0004500 r o x C o r p o r a t i o n "
0004520 1 9 8 5 ) ) \r N I L \r
0004534