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