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