$ od -c -N 50000 [phylum]<LISPUSERS>koto>READDATATYPE.TEDIT!1 0000000 X E R O X \t R E A D D A T A T Y 0000020 P E \r 2 \r \r 4 \r \r 1 \r \r R E A D 0000040 D A T A T Y P E \r 1 \r \r 4 \r \r B 0000060 y : C h r i s t o p h e r 0000100 L a n e ( L a n e @ S u m e x 0000120 - A i m . S t a n f o r d . E d 0000140 u ) \r R E A D A T A T Y P E g 0000160 i v e s @ a r e a d m a 0000200 c r o d e f i n i t i o n s 0000220 o t h a t i t c a n b e 0000240 u s e d t o t y p e i n 0000260 d a t a t y p e p o i n t e 0000300 r s d i r e c t l y . F o 0000320 r e x a m p l e , s u p p o 0000340 s e y o u h a v e l o s t 0000360 y o u r p o i n t e r o n 0000400 t o a w i n d o w ( o r 0000420 m e n u , e t c . ) b u t 0000440 y o u h a v e i t ' s p r 0000460 i n t e d r e p r e s e n t a 0000500 t i o n a r o u n d ( e g . 0000520 { W I N D O W } # 5 6 , 1 7 4 0000540 7 0 ) t h e n y o u c a n 0000560 d o t h i n g s l i k e : 0000600 \r 9 0 _ ( I N V E R T W @ { W 0000620 I N D O W } # 5 6 , 1 7 4 7 0 ) 0000640 \r { W I N D O W } # 5 6 , 1 7 4 0000660 7 0 \r T h e r e a d m a c r 0000700 o i s o n l y i n t e n d 0000720 e d t o b e u s e d a t 0000740 t h e R E A D - E V A L - P 0000760 R I N T l o o p . I f t 0001000 h e c h a r a c t e r f o l 0001020 l o w i n g t h e @ i s 0001040 n o t a { t h e n t h e 0001060 r e a d m a c r o r e t u 0001100 r n s t h e @ c h a r a c 0001120 t e r j u s t a s i f y 0001140 o u h a d t y p e d i t 0001160 i n s o t h a t o t h e r 0001200 e x p r e s s i o n s t h a 0001220 t u s e @ , l i k e ( B 0001240 Q U O T E ( A B , @ ' ( 0001260 C D E ) F ) ) , w i l l 0001300 s t i l l w o r k c o r r 0001320 e c t l y . \r A l t h o u g h 0001340 t h e r e a d m a c r o d 0001360 o e s n ' t n e e d t h e 0001400 d a t a t y p e n a m e i 0001420 n t h e b r a c k e t s ( 0001440 e g . { M E N U } ) t o g 0001460 e t t h e p o i n t e r , 0001500 i t d o e s r e q u i r e 0001520 i t i n o r d e r t o c 0001540 h e c k t h e p o i n t e r 0001560 t o m a k e s u r e i t 0001600 i s o f t h e c o r r e 0001620 c t ' t y p e ' . I f t 0001640 h e p o i n t e r i s n o 0001660 t o f t h e t y p e s p 0001700 e c i f i e d , t h e n t h 0001720 e r e a d m a c r o r e t 0001740 u r n s N I L . \0 \0 \0 \0 \0 003 ( 0001760 L I S T ( ( P A G E N I L 0002000 ( F O L I O I N F O ( A R A B 0002020 I C ) S T A R T I N G P A G E 0002040 # 1 ) ( 0 0 6 1 2 7 9 0002060 2 ) ( ( F O L I O N I L ( 0002100 P A R A L O O K S ( Q U A D 0002120 C E N T E R E D ) C H A R L O 0002140 O K S ( S U P E R S C R I P T 0002160 0 S I Z E 1 0 F A M I L 0002200 Y M O D E R N O V E R L I N 0002220 E O F F S T R I K E O U T 0002240 O F F U N D E R L I N E O F 0002260 F S L O P E R E G U L A R 0002300 W E I G H T M E D I U M ) F 0002320 O R M A T I N F O ( A R A B I 0002340 C ) ) ( 1 7 4 3 6 2 8 8 0002360 3 6 ) N I L ) ( H E A D I N 0002400 G N I L ( H E A D I N G T Y 0002420 P E R U N N I N G H E A D ) 0002440 ( 8 4 7 4 4 4 4 4 3 6 ) 0002460 N I L ) ( T E X T N I L N 0002500 I L ( 8 4 9 6 4 5 6 6 0 0002520 0 ) N I L ) ) ) ( P A G E 0002540 N I L N I L ( 0 0 6 1 2 0002560 7 9 2 ) ( ( F O L I O N I 0002600 L ( P A R A L O O K S ( Q U 0002620 A D C E N T E R E D ) C H A 0002640 R L O O K S ( S U P E R S C R 0002660 I P T 0 S I Z E 1 0 F A 0002700 M I L Y M O D E R N O V E R 0002720 L I N E O F F S T R I K E O 0002740 U T O F F U N D E R L I N E 0002760 O F F S L O P E R E G U L 0003000 A R W E I G H T M E D I U M 0003020 ) ) ( 2 8 2 4 2 7 2 3 6 0003040 ) N I L ) ( H E A D I N G 0003060 N I L ( H E A D I N G T Y P E 0003100 R U N N I N G H E A D ) ( 8 0003120 4 7 4 4 4 4 4 3 6 ) N I 0003140 L ) ( T E X T N I L N I L 0003160 ( 8 4 9 6 4 5 6 6 0 0 ) 0003200 N I L ) ) ) ( P A G E N I 0003220 L N I L ( 0 0 6 1 2 7 0003240 9 2 ) ( ( F O L I O N I L 0003260 ( P A R A L O O K S ( Q U A D 0003300 C E N T E R E D ) C H A R L 0003320 O O K S ( S U P E R S C R I P 0003340 T 0 S I Z E 1 0 F A M I 0003360 L Y M O D E R N O V E R L I 0003400 N E O F F S T R I K E O U T 0003420 O F F U N D E R L I N E O 0003440 F F S L O P E R E G U L A R 0003460 W E I G H T M E D I U M ) ) 0003500 ( 2 8 2 4 2 7 2 3 6 ) 0003520 N I L ) ( H E A D I N G N I 0003540 L ( H E A D I N G T Y P E R 0003560 U N N I N G H E A D ) ( 8 4 0003600 7 4 4 4 4 4 3 6 ) N I L ) 0003620 ( T E X T N I L N I L ( 0003640 8 4 9 6 4 5 6 6 0 0 ) N 0003660 I L ) ) ) ) ) \0 \0 \0 \0 \0 005 \0 006 \0 0003700 ( \0 \0 \0 \0 001 310 \0 \v \0 \0 \0 \0 002 004 \0 0003720 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0003740 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 001 310 \0 0003760 021 \0 \0 \0 004 002 003 \0 \0 \0 \0 \0 \0 \0 \0 \0 0004000 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0004020 ( \0 212 \0 212 001 8 \0 006 \0 \0 \0 004 002 003 \0 0004040 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0004060 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 001 310 \0 0004100 \v \0 \0 \0 004 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 0004120 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0004140 ( \0 212 \0 212 001 8 \0 \0 \0 \0 \0 004 002 004 \0 0004160 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0004200 \0 \0 \0 \0 \0 \0 \0 \0 D \0 \0 \0 \0 001 310 \0 0004220 \0 \0 \0 \0 \0 003 004 \0 \0 001 001 310 001 \0 \0 \0 0004240 \0 \0 \0 \0 \v P A G E H E A D I N G 0004260 \0 \v R U N N I N G H E A D \0 \0 \0 0004300 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0004320 004 \0 006 \0 026 \0 \b T E R M I N A L \0 0004340 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 024 \0 006 M O D 0004360 E R N \0 \n \0 \0 \0 \0 \0 \0 002 \0 \0 024 \0 0004400 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0004420 \0 \0 024 \0 006 M O D E R N \0 \f \0 \0 \0 0004440 \0 \0 \0 002 \0 \0 024 \0 006 M O D E R N \0 0004460 006 \0 \0 \0 \0 \0 \0 \0 \0 \0 022 \0 004 L O G 0004500 O \0 030 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0004520 002 \0 006 \0 \0 \0 005 \0 \0 \0 \0 006 \0 \0 \0 001 0004540 \0 \0 \0 \0 005 \0 \0 \0 \r \0 \0 \0 \0 003 \0 \0 0004560 \0 \0 \0 002 \0 006 \0 \0 \0 002 \0 001 \0 \v H R 0004600 U L E . G E T F N 001 \0 024 \0 006 M O 0004620 D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0004640 \0 001 \0 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 005 \0 0004660 \0 \0 002 \0 001 \0 \v H R U L E . G E T 0004700 F N 001 \0 024 \0 006 M O D E R N \0 \n \0 0004720 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 003 0004740 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 002 \0 001 \0 \v 0004760 H R U L E . G E T F N 001 \0 024 \0 006 0005000 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0005020 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 0005040 003 \0 \0 \0 \r \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 0005060 \0 003 \0 \0 \0 002 \0 001 \0 \v H R U L E . 0005100 G E T F N 001 \0 024 \0 006 M O D E R N 0005120 \0 \f \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 001 \0 \0 0005140 \0 \0 004 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 002 \0 0005160 001 \0 \v H R U L E . G E T F N 001 \0 0005200 024 \0 006 M O D E R N \0 \f \0 \0 \0 \0 \0 0005220 \0 002 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 \0 0005240 \0 002 \0 002 \0 \0 \0 4 \0 \0 \0 \0 003 \0 \0 \0 0005260 \0 \0 002 \0 004 \0 \0 \0 \v \0 \0 \0 \0 002 \0 \0 0005300 \0 \a \0 \0 \0 \0 003 \0 \0 \0 001 \0 \0 \0 \0 002 0005320 \0 \0 \0 333 \0 \0 \0 \0 003 \0 \0 \0 021 \0 \0 \0 0005340 \0 001 \0 \0 \0 037 \0 \0 \0 \0 003 \0 \0 \0 \0 \0 0005360 002 \0 001 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 0005400 \0 002 \0 001 \0 \0 \0 022 \0 \0 \0 \0 001 \0 \0 \0 0005420 \0 \0 002 \0 004 \0 \0 \0 h \0 \0 \0 \0 003 \0 \0 0005440 \0 001 \0 \0 \0 \0 002 \0 \0 \0 \n \0 \0 \0 \0 003 0005460 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 ! \0 \0 \0 0005500 \0 003 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 M \0 0005520 \0 \0 \0 003 \0 \0 \0 001 \0 \0 \0 \0 002 \0 \0 \0 0005540 \a \0 \0 \0 \0 003 \0 \0 \0 034 \0 \0 \0 \0 001 \0 0005560 \0 \0 035 \0 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 004 0005600 \0 \0 \0 M \0 \0 \0 \0 003 \0 \0 \0 006 \0 \0 \0 0005620 \0 001 \0 \0 \0 273 \0 \0 \0 \0 003 \0 \0 \0 003 \0 0005640 \0 \0 \0 001 \0 \0 \0 001 \0 \0 \0 \0 003 \0 \0 003 0005660 351 \0 5 z 272 0005665