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