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