$ od -c -N 50000 [eris]<LispCore>PROLOG>ACCESS.DCOM!1
0000000 ( F I L E C R E A T E D " 1
0000020 - A u g - 8 5 1 2 : 5 2 : 1 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 > P R O L O G > A C C E S S .
0000120 % ; 1 ) \r " 1 9 - M a r - 8 5
0000140 1 4 : 3 4 : 1 7 " t c o m p
0000160 l ' d i n " I N T E R L I S
0000200 P - D 1 9 - J u n - 8 5 . .
0000220 . " d a t e d " 1 9 - J u n
0000240 - 8 5 1 0 : 2 4 : 2 8 " ) \r (
0000260 F I L E C R E A T E D " 1 -
0000300 A u g - 8 5 1 2 : 3 8 : 5 1 "
0000320 { E R I S } < L I S P C O R E
0000340 > P R O L O G > A C C E S S . %
0000360 ; 1 3 1 1 0 c h a n g e s
0000400 t o : ( V A R S A C C E S S
0000420 C O M S ) \r ( F N S Q P . O
0000440 B J . T A G ) ) \r Q P . O B J .
0000460 T A G D 1 \r ( P 0 T Y P E
0000500 I 0 O B J ) \0 4 001 \0 \0 001
0000520 @ \t \0 \0 021 001 \0 H d g \0 \0 360 223 ` \0
0000540 \0 020 g \0 \0 360 223 ` \0 \0 020 H d g \0 \0
0000560 360 223 ` \0 \0 020 g \0 \0 360 223 ` \0 \0 020 \b
0000600 \0 \0 020 \0 ( 6 1 Q S H O U L D N
0000620 T 3 T Y P E N A M E ) \r ( 5
0000640 5 Q F L O A T . T A G . 1 6
0000660 5 0 Q F L O A T P 4 4 Q B
0000700 O X E D . T A G . 1 6 3 7 Q
0000720 F I X P 3 1 Q I M M E D . T
0000740 A G . 1 6 2 4 Q S M A L L P
0000760 2 0 Q S Y M B O L . T A G .
0001000 1 6 1 3 Q L I T A T O M ) \r
0001020 ( ) \r ( P R E T T Y C O M P R I
0001040 N T A C C E S S C O M S ) \r (
0001060 R P A Q Q A C C E S S C O M S
0001100 ( ( M A C R O S Q P . S T O
0001120 R E . A T O M Q P . S T O R E
0001140 . F U N C T O R Q P . S T O R
0001160 E . U N B O X E D \ L E F T B
0001200 Y T E \ R I G H T B Y T E )
0001220 ( V A R S \r B O X E D . T A G
0001240 . 1 6 B O X E D . T A G . 8
0001260 F L O A T . T A G . 1 6 F L O
0001300 A T . T A G . 8 I M M E D . T
0001320 A G . 1 6 I M M E D . T A G .
0001340 8 L I S T . T A G . 1 6 L I
0001360 S T . T A G . 8 \r R E F . T A
0001400 G . 1 6 R E F . T A G . 8 S
0001420 T R U C T . T A G . 1 6 S T R
0001440 U C T . T A G . 8 S Y M B O L
0001460 . T A G . 1 6 S Y M B O L . T
0001500 A G . 8 ) ( F N S Q P . O B
0001520 J . T A G ) ) ) \r ( P U T P R O
0001540 P S Q P . S T O R E . A T O M
0001560 M A C R O ( * * M A C R O A
0001600 R G * * ( L E T ( ( B A S E
0001620 ( C A R ( N T H * * M A C
0001640 R O A R G * * 1 ) ) ) ( O F
0001660 F S E T ( C A R ( N T H \r
0001700 * * M A C R O A R G * * 2 ) )
0001720 ) ( A T O M ( C A R ( N T
0001740 H * * M A C R O A R G * * 3
0001760 ) ) ) ) ( B Q U O T E ( P R
0002000 O G N ( \ P U T B A S E P T R
0002020 , B A S E , O F F S E T
0002040 , \r A T O M ) ( \ P U T B
0002060 A S E , B A S E , O F F
0002100 S E T ( I P L U S S Y M B O
0002120 L . T A G . 1 6 ( \ G E T B A
0002140 S E , B A S E , O F F S
0002160 E T ) ) ) ) ) ) ) ) \r ( P U T P
0002200 R O P S Q P . S T O R E . F U
0002220 N C T O R M A C R O ( * * M
0002240 A C R O A R G * * ( L E T (
0002260 ( B A S E ( C A R ( N T H
0002300 * * M A C R O A R G * * 1 ) )
0002320 ) ( O F F S E T ( C A R (
0002340 \r N T H * * M A C R O A R G *
0002360 * 2 ) ) ) ( N A M E ( C A
0002400 R ( N T H * * M A C R O A R
0002420 G * * 3 ) ) ) ( A R I T Y
0002440 ( C A R ( N T H * * M A C R
0002460 O A R G * * 4 ) ) ) ) ( B Q
0002500 U O T E ( \r P R O G N ( \ P
0002520 U T B A S E P T R , B A S E
0002540 , O F F S E T , N A M E
0002560 ) ( \ P U T B A S E , B A
0002600 S E , O F F S E T ( I P L
0002620 U S S Y M B O L . T A G . 1 6
0002640 , A R I T Y ) ) ) ) ) \r ) )
0002660 \r ( P U T P R O P S Q P . S T
0002700 O R E . U N B O X E D M A C R
0002720 O ( * * M A C R O A R G * *
0002740 ( L E T ( ( B A S E ( C A R
0002760 ( N T H * * M A C R O A R G
0003000 * * 1 ) ) ) ( O F F S E T
0003020 ( C A R ( \r N T H * * M A C
0003040 R O A R G * * 2 ) ) ) ( L E
0003060 F T ( C A R ( N T H * * M
0003100 A C R O A R G * * 3 ) ) ) (
0003120 R I G H T ( C A R ( N T H
0003140 * * M A C R O A R G * * 4 ) )
0003160 ) ) ( B Q U O T E ( \r P R O
0003200 G N ( \ P U T B A S E , B
0003220 A S E , O F F S E T , L
0003240 E F T ) ( \ P U T B A S E ,
0003260 B A S E ( A D D 1 , O F
0003300 F S E T ) , R I G H T ) ) )
0003320 ) ) ) \r ( P U T P R O P S \ L
0003340 E F T B Y T E M A C R O ( *
0003360 * M A C R O A R G * * ( L E T
0003400 ( ( B A S E ( C A R ( N T
0003420 H * * M A C R O A R G * * 1
0003440 ) ) ) ( O F F S E T ( C A R
0003460 ( N T H \r * * M A C R O A R
0003500 G * * 2 ) ) ) ) ( B Q U O T
0003520 E ( L E T ( ( W O R D ( \
0003540 G E T B A S E , B A S E ,
0003560 O F F S E T ) ) ) ( L R S H
0003600 W O R D 8 ) ) ) ) ) ) \r ( P
0003620 U T P R O P S \ R I G H T B Y
0003640 T E M A C R O ( * * M A C R
0003660 O A R G * * ( L E T ( ( B A
0003700 S E ( C A R ( N T H * * M
0003720 A C R O A R G * * 1 ) ) ) (
0003740 O F F S E T ( C A R ( N T H
0003760 \r * * M A C R O A R G * * 2
0004000 ) ) ) ) ( B Q U O T E ( L E
0004020 T ( ( W O R D ( \ G E T B A
0004040 S E , B A S E , O F F S
0004060 E T ) ) ) ( L O G A N D W O
0004100 R D 2 5 5 ) ) ) ) ) ) \r ( R P
0004120 A Q Q B O X E D . T A G . 1 6
0004140 5 9 6 4 8 ) \r ( R P A Q Q B
0004160 O X E D . T A G . 8 2 3 3 ) \r
0004200 ( R P A Q Q F L O A T . T A G
0004220 . 1 6 6 3 4 8 8 ) \r ( R P A Q
0004240 Q F L O A T . T A G . 8 2 4
0004260 8 ) \r ( R P A Q Q I M M E D .
0004300 T A G . 1 6 5 5 5 5 2 ) \r ( R
0004320 P A Q Q I M M E D . T A G . 8
0004340 2 1 7 ) \r ( R P A Q Q L I S
0004360 T . T A G . 1 6 3 2 7 6 8 ) \r
0004400 ( R P A Q Q L I S T . T A G .
0004420 8 1 2 8 ) \r ( R P A Q Q R E
0004440 F . T A G . 1 6 0 ) \r ( R P A
0004460 Q Q R E F . T A G . 8 0 ) \r
0004500 ( R P A Q Q S T R U C T . T A
0004520 G . 1 6 1 8 4 3 2 ) \r ( R P A
0004540 Q Q S T R U C T . T A G . 8
0004560 7 2 ) \r ( R P A Q Q S Y M B O
0004600 L . T A G . 1 6 5 1 2 0 0 ) \r
0004620 ( R P A Q Q S Y M B O L . T A
0004640 G . 8 2 0 0 ) \r ( P U T P R O
0004660 P S A C C E S S C O P Y R I
0004700 G H T ( " X e r o x C o r p
0004720 o r a t i o n " 1 9 8 5 ) ) \r
0004740 N I L \r
0004744