$ od -c -N 50000 [eris]<Lisp>INTERMEZZO>SOURCES>LLSUBRS.DCOM!1
0000000 ( F I L E C R E A T E D " 6
0000020 - J a n - 8 5 0 1 : 3 5 : 0 1
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 S U B R
0000120 S . ; 2 ) \r " 4 - J a n - 8
0000140 5 1 7 : 3 2 : 4 3 " b c o m
0000160 p l ' d i n " I N T E R L I
0000200 S P - D 4 - J a n - 8 5 .
0000220 . . " d a t e d " 4 - J a
0000240 n - 8 5 1 7 : 4 8 : 3 6 " ) \r
0000260 ( F I L E C R E A T E D " 5
0000300 - S e p - 8 4 1 7 : 3 0 : 2 4
0000320 " { E R I S } < L I S P C O R
0000340 E > S O U R C E S > L L S U B R
0000360 S . ; 2 4 2 9 6 c h a n g e
0000400 s t o : ( F N S \r D I S K
0000420 P A R T I T I O N ) p r e v i
0000440 o u s d a t e : " 2 0 - J U
0000460 L - 8 3 1 1 : 5 3 : 4 8 " {
0000500 E R I S } < L I S P C O R E > S
0000520 O U R C E S > L L S U B R S . ;
0000540 1 ) \r \ u C o d e C h e c k D
0000560 1 \r ( L ( 0 D U M M Y ) )
0000600 \0 006 \0 \0 \0 001 @ } \0 001 020 \0 N I L \r
0000620 N I L \r ( ) \r w a s \ S t a c k
0000640 O v e r f l o w D 1 \r ( L (
0000660 0 D U M M Y ) ) \0 006 \0 \0 \0 001
0000700 @ } 001 001 020 \0 N I L \r N I L \r ( )
0000720 \r \ N W W I n t e r r u p t D
0000740 1 \r ( L ( 0 D U M M Y ) )
0000760 \0 006 \0 \0 \0 001 @ } 002 001 020 \0 N I L \r
0001000 N I L \r ( ) \r w a s \ P a g e F
0001020 a u l t D 1 \r N I L \0 005 \0 \0
0001040 \0 \0 } 003 \0 020 \0 N I L \r N I L \r (
0001060 ) \r \ S t a t s O v e r f l o w
0001100 D 1 \r ( L ( 0 D U M M Y )
0001120 ) \0 006 \0 \0 \0 001 @ } 004 001 020 \0 N I
0001140 L \r N I L \r ( ) \r N O O P S U B
0001160 R D 1 \r ( L ( 0 D U M M Y
0001200 ) ) \0 006 \0 \0 \0 001 @ } 005 001 020 \0 N
0001220 I L \r N I L \r ( ) \r \ B A C K G
0001240 R O U N D S U B R D 1 \r ( L
0001260 ( 0 D U M M Y ) ) \0 006 \0 \0 \0
0001300 001 @ } 006 001 020 \0 N I L \r N I L \r (
0001320 ) \r \ C H E C K B C P L P A S S
0001340 W O R D D 1 \r ( L ( 1 V E
0001360 C T O R 0 P A S S ) ) \0 \a
0001400 \0 \0 \0 002 @ A } \a 002 020 \0 N I L \r N
0001420 I L \r ( ) \r D I S K P A R T I T
0001440 I O N D 1 \r N I L \0 037 \0 \0 \0
0001460 \0 \b \0 \0 d g \0 \0 360 245 d g \0 \0 360 224
0001500 277 } \b \0 020 g \0 \0 360 264 005 \b \0 \0 020 \0
0001520 ( 3 4 Q \ D F S C u r r e n t
0001540 V o l u m e 2 M A C H I N E
0001560 T Y P E ) \r ( 2 6 Q D A N D E
0001600 L I O N 1 4 Q D O L P H I N
0001620 6 D O R A D O ) \r ( ) \r D S
0001640 P B O U T D 1 \r ( L ( 0 C
0001660 H A R C O D E ) ) \0 006 \0 \0 \0 001
0001700 @ } \t 001 020 \0 N I L \r N I L \r ( )
0001720 \r \ D S P R A T E D 1 \r ( L
0001740 ( 2 A C 2 1 A C 1 0 A
0001760 C 0 ) ) \0 \b \0 \0 \0 003 @ A B } \n
0002000 003 020 \0 N I L \r N I L \r ( ) \r \ G
0002020 A T H E R S T A T S D 1 \r ( L
0002040 ( 0 F I D ) ) \0 006 \0 \0 \0 001
0002060 @ } \v 001 020 \0 N I L \r N I L \r ( )
0002100 \r \ G E T P A C K E T B U F F E
0002120 R D 1 \r N I L \0 005 \0 \0 \0 \0 }
0002140 \f \0 020 \0 N I L \r N I L \r ( ) \r \
0002160 L I S P F I N I S H D 1 \r ( L
0002200 ( 0 D U M M Y ) ) \0 006 \0 \0
0002220 \0 001 @ } \r 001 020 \0 N I L \r N I L \r
0002240 ( ) \r \ M O R E V M E M F I L E
0002260 D 1 \r ( L ( 0 F I L E P A
0002300 G E ) ) \0 006 \0 \0 \0 001 @ } 016 001 020
0002320 \0 N I L \r N I L \r ( ) \r R A I D
0002340 D 1 \r ( L ( 2 F L G 1
0002360 M E S S 2 0 M E S S 1 ) )
0002400 \0 \b \0 \0 \0 003 @ A B } 017 003 020 \0 N I
0002420 L \r N I L \r ( ) \r \ R E A D R A
0002440 W P B I D 1 \r N I L \0 005 \0 \0
0002460 \0 \0 } 020 \0 020 \0 N I L \r N I L \r (
0002500 ) \r \ W R I T E R A W P B I D
0002520 1 \r ( L ( 0 P B I ) ) \0 006
0002540 \0 \0 \0 001 @ } 021 001 020 \0 N I L \r N I
0002560 L \r ( ) \r S E T S C R E E N C O
0002600 L O R D 1 \r ( L ( 0 F L G
0002620 ) ) \0 006 \0 \0 \0 001 @ } 022 001 020 \0 N
0002640 I L \r N I L \r ( ) \r S H O W D I
0002660 S P L A Y D 1 \r ( L ( 1 R
0002700 A S T E R W I D T H 0 B A S
0002720 E ) ) \0 \a \0 \0 \0 002 @ A } 023 002 020
0002740 \0 N I L \r N I L \r ( ) \r \ P U P
0002760 L E V E L 1 S T A T E D 1 \r (
0003000 L ( 0 F L G ) ) \0 006 \0 \0 \0
0003020 001 @ } 024 001 020 \0 N I L \r N I L \r (
0003040 ) \r \ W R I T E S T A T S D 1
0003060 \r ( L ( 1 2 Q X 1 0 1 1 Q
0003100 X 9 1 0 Q X 8 7 X 7
0003120 6 X 6 5 X 5 4 X 4 3
0003140 X 3 2 X 2 1 X 1 0
0003160 T Y P E ) ) \0 024 \0 \0 \0 \v @ A B
0003200 C D E F G 016 G 020 G 022 G 024 } 025 \v 020
0003220 \0 N I L \r N I L \r ( ) \r \ C O N
0003240 T E X T S W I T C H D 1 \r ( L
0003260 ( 0 D U M M Y ) ) \0 006 \0 \0
0003300 \0 001 @ } 026 001 020 \0 N I L \r N I L \r
0003320 ( ) \r \ C O P Y S Y S 0 S U B R
0003340 D 1 \r ( L ( 0 F I D ) )
0003360 \0 006 \0 \0 \0 001 @ } 027 001 020 \0 N I L \r
0003400 N I L \r ( ) \r \ W R I T E M A P
0003420 D 1 \r ( L ( 2 F L A G S
0003440 1 R P 0 V P ) ) \0 \b \0 \0
0003460 \0 003 @ A B } 030 003 020 \0 N I L \r N I
0003500 L \r ( ) \r ( P R E T T Y C O M P
0003520 R I N T L L S U B R S C O M S
0003540 ) \r ( R P A Q Q L L S U B R S
0003560 C O M S ( ( F N S * ( P R
0003600 O G N \ I N I T S U B R S ) )
0003620 ( V A R S \ I N I T S U B R
0003640 S ) ( P R O P A R G N A M E
0003660 S * ( P R O G N \ I N I T
0003700 S U B R S ) ) ) \r ) \r ( R P A Q
0003720 Q \ I N I T S U B R S ( \ u
0003740 C o d e C h e c k w a s \ S t
0003760 a c k O v e r f l o w \ N W W
0004000 I n t e r r u p t w a s \ P a
0004020 g e F a u l t \ S t a t s O v
0004040 e r f l o w N O O P S U B R
0004060 \r \ B A C K G R O U N D S U B R
0004100 \ C H E C K B C P L P A S S W
0004120 O R D D I S K P A R T I T I O
0004140 N D S P B O U T \ D S P R A
0004160 T E \ G A T H E R S T A T S
0004200 \ G E T P A C K E T B U F F E R
0004220 \r \ L I S P F I N I S H \ M
0004240 O R E V M E M F I L E R A I D
0004260 \ R E A D R A W P B I \ W R
0004300 I T E R A W P B I S E T S C R
0004320 E E N C O L O R S H O W D I S
0004340 P L A Y \ P U P L E V E L 1 S
0004360 T A T E \r \ W R I T E S T A T
0004400 S \ C O N T E X T S W I T C H
0004420 \ C O P Y S Y S 0 S U B R \
0004440 W R I T E M A P ) ) \r ( P U T P
0004460 R O P S \ u C o d e C h e c k
0004500 A R G N A M E S ( D U M M Y
0004520 ) ) \r ( P U T P R O P S w a s
0004540 \ S t a c k O v e r f l o w A
0004560 R G N A M E S ( D U M M Y ) )
0004600 \r ( P U T P R O P S \ N W W I
0004620 n t e r r u p t A R G N A M E
0004640 S ( D U M M Y ) ) \r ( P U T P
0004660 R O P S \ S t a t s O v e r f
0004700 l o w A R G N A M E S ( D U
0004720 M M Y ) ) \r ( P U T P R O P S
0004740 N O O P S U B R A R G N A M E
0004760 S ( D U M M Y ) ) \r ( P U T P
0005000 R O P S \ B A C K G R O U N D
0005020 S U B R A R G N A M E S ( D
0005040 U M M Y ) ) \r ( P U T P R O P S
0005060 \ C H E C K B C P L P A S S W
0005100 O R D A R G N A M E S ( P A
0005120 S S V E C T O R ) ) \r ( P U T
0005140 P R O P S D I S K P A R T I T
0005160 I O N A R G N A M E S N I L
0005200 ) \r ( P U T P R O P S D S P B
0005220 O U T A R G N A M E S ( C H
0005240 A R C O D E ) ) \r ( P U T P R O
0005260 P S \ D S P R A T E A R G N
0005300 A M E S ( A C 0 A C 1 A C
0005320 2 ) ) \r ( P U T P R O P S \ G
0005340 A T H E R S T A T S A R G N A
0005360 M E S ( F I D ) ) \r ( P U T P
0005400 R O P S \ G E T P A C K E T B
0005420 U F F E R A R G N A M E S N
0005440 I L ) \r ( P U T P R O P S \ L
0005460 I S P F I N I S H A R G N A M
0005500 E S ( D U M M Y ) ) \r ( P U T
0005520 P R O P S \ M O R E V M E M F
0005540 I L E A R G N A M E S ( F I
0005560 L E P A G E ) ) \r ( P U T P R O
0005600 P S R A I D A R G N A M E S
0005620 ( M E S S 1 M E S S 2 F L
0005640 G ) ) \r ( P U T P R O P S \ R
0005660 E A D R A W P B I A R G N A M
0005700 E S N I L ) \r ( P U T P R O P
0005720 S \ W R I T E R A W P B I A
0005740 R G N A M E S ( P B I ) ) \r (
0005760 P U T P R O P S S E T S C R E
0006000 E N C O L O R A R G N A M E S
0006020 ( F L G ) ) \r ( P U T P R O P
0006040 S S H O W D I S P L A Y A R
0006060 G N A M E S ( B A S E R A S
0006100 T E R W I D T H ) ) \r ( P U T P
0006120 R O P S \ P U P L E V E L 1 S
0006140 T A T E A R G N A M E S ( F
0006160 L G ) ) \r ( P U T P R O P S \
0006200 W R I T E S T A T S A R G N A
0006220 M E S ( T Y P E X 1 X 2
0006240 X 3 X 4 X 5 X 6 X 7 X
0006260 8 X 9 X 1 0 ) ) \r ( P U T P
0006300 R O P S \ C O N T E X T S W I
0006320 T C H A R G N A M E S ( D U
0006340 M M Y ) ) \r ( P U T P R O P S
0006360 \ C O P Y S Y S 0 S U B R A R
0006400 G N A M E S ( F I D ) ) \r ( P
0006420 U T P R O P S \ W R I T E M A
0006440 P A R G N A M E S ( V P R
0006460 P F L A G S ) ) \r ( P U T P R
0006500 O P S L L S U B R S C O P Y
0006520 R I G H T ( " X e r o x C o
0006540 r p o r a t i o n " 1 9 8 3
0006560 1 9 8 4 ) ) \r N I L \r
0006573