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