$ od -c -N 50000 [phylum]<LISP>KOTO>Lispusers>CompModeRec.TEdit!1 0000000 X E R O X \t C O M P M O D E R E 0000020 C \r 2 \r \r 4 \r \r 1 \r \r C o m p M 0000040 o d e R e c \r 1 \r \r 4 \r \r B y : 0000060 R o n K a p l a n ( K a 0000100 p l a n . p a @ X e r o x . c o 0000120 m ) \r \r I N T R O D U C T I O N 0000140 \r T h i s p a c k a g e e n 0000160 a b l e s C O M P I L E M O D 0000200 E - d e p e n d e n t r e c o 0000220 r d d e c l a r a t i o n s 0000240 t o b e d e c l a r e d s 0000260 o t h a t a c c e s s a n 0000300 d l a y o u t f o r f i e 0000320 l d s o f a g i v e n r 0000340 e c o r d m a y b e s p e 0000360 c i f i e d i n a s i n g 0000400 l e d e c l a r a t i o n f 0000420 o r d i f f e r e n t t a r 0000440 g e t i m p l e m e n t a t i 0000460 o n s . \r O P E R A T I O N \r C 0000500 O M P R E C i s d e f i n e 0000520 d a s a n e w r e c o r 0000540 d - d e f i n i n g w o r d 0000560 a l a R E C O R D , H A S H 0000600 L I N K , e t c . A C O M 0000620 P R E C " d e c l a r a t i o 0000640 n " i s o f t h e f o r 0000660 m \r ( C O M P R E C n a m e 0000700 . d e c l s ) \t [ D e c l a r 0000720 a t i o n ] \r w h e r e d e c 0000740 l s i s a n a l i s t o 0000760 f ( c o m p i l e m o d e d 0001000 e c l ) p a i r s , w h e r 0001020 e c o m p i l e m o d e c a 0001040 n b e a n a t o m i c C 0001060 O M P I L E M O D E v a l u e 0001100 o r a l i s t o f s u 0001120 c h v a l u e s a l a S E 0001140 L E C T Q . \r E X A M P L E \r T 0001160 h u s \r ( C O M P R E C F O O 0001200 ( D ( D A T A T Y P E ( A 0001220 B ) ) ) \r 0001240 ( P D P - 1 0 ( B L O C K 0001260 R E C O R D ( A B ] \r \r \0 \0 0001300 \0 \0 \0 005 \0 006 \0 ( \0 \0 \0 \0 001 310 \0 \v 0001320 \0 \0 \0 004 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0001340 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( 0001360 \0 \0 \0 \0 001 310 \0 021 \0 \0 \0 004 002 003 \0 \0 0001400 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0001420 \0 \0 \0 \0 \0 \0 \0 ( \0 212 \0 212 001 8 \0 006 0001440 \0 \0 \0 004 002 003 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0001460 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( 0001500 \0 212 \0 212 001 8 \0 \0 \0 \0 \0 004 002 004 \0 \0 0001520 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0001540 \0 \0 \0 \0 \0 \0 \0 D \0 \0 \0 \0 001 310 \0 \0 0001560 \0 \0 \0 \0 003 004 \0 \0 001 001 310 001 \0 \0 \0 \0 0001600 \0 \0 \0 \v P A G E H E A D I N G \0 0001620 \v R U N N I N G H E A D \0 \0 \0 \0 0001640 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 0001660 \0 \0 \0 \0 \0 \0 \0 \0 002 001 \0 \0 \0 \0 \0 \0 0001700 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0001720 \0 \0 \0 \0 \0 \0 \0 004 \0 \b \0 026 \0 \b T E 0001740 R M I N A L \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0001760 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 0002000 \0 \0 001 \0 \0 024 \0 006 M O D E R N \0 \n 0002020 \0 \0 \0 \0 \0 \0 002 \0 \0 024 \0 006 M O D E 0002040 R N \0 \f \0 \0 \0 \0 \0 \0 002 \0 \0 024 \0 006 0002060 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 0002100 \0 024 \0 006 M O D E R N \0 006 \0 \0 \0 \0 0002120 \0 \0 \0 \0 \0 022 \0 004 L O G O \0 030 \0 \0 0002140 \0 \0 \0 \0 \0 \0 \0 ? \0 1 ( D E F A U 0002160 L T F O N T 1 ( G A C H A 0002200 1 0 ) ( G A C H A 8 ) ( T 0002220 E R M I N A L 8 ) ) \0 \n \0 \0 \0 0002240 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 0002260 005 \0 \0 \0 \0 \a \0 \0 \0 001 \0 \0 \0 \0 006 \0 0002300 \0 \0 \f \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 005 0002320 \0 \0 \0 002 \0 001 \0 \v H R U L E . G E 0002340 T F N 001 \0 024 \0 006 M O D E R N \0 \n 0002360 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 0002400 005 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 0002420 \v H R U L E . G E T F N 001 \0 024 \0 0002440 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0002460 \0 \0 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 0002500 \0 004 \0 \0 \0 002 \0 001 \0 \v H R U L E . 0002520 G E T F N 001 \0 024 \0 006 M O D E R N 0002540 \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 0002560 \0 \0 005 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 \f \0 0002600 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 003 \0 \0 \0 002 0002620 \0 001 \0 \v H R U L E . G E T F N 001 0002640 \0 024 \0 006 M O D E R N \0 \f \0 \0 \0 \0 0002660 \0 \0 002 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 \0 \0 0002700 \0 \0 002 \0 004 \0 \0 \0 002 \0 001 \0 \v H R U 0002720 L E . G E T F N 001 \0 024 \0 006 M O D 0002740 E R N \0 \f \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 0002760 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 002 \0 \0 0003000 \0 & \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 002 \0 0003020 \0 \0 001 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 001 0003040 \0 \0 \0 \f \0 \0 \0 \0 003 \0 \0 \0 001 \0 \0 \0 0003060 \0 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 324 \0 \0 0003100 \0 \0 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 \n \0 0003120 \0 \0 \0 003 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 s 0003140 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 0003160 \t \0 \0 \0 \0 005 \0 \0 \0 \f \0 \0 \0 \0 002 \0 0003200 \0 \0 020 \0 \0 \0 \0 005 \0 \0 \0 \0 \0 002 \0 001 0003220 \0 \0 \0 006 \0 \0 \0 \0 005 \0 \0 \0 005 \0 \0 \0 0003240 \0 002 \0 \0 \0 021 \0 \0 \0 \0 005 \0 \0 \0 020 \0 0003260 \0 \0 \0 002 \0 \0 \0 017 \0 \0 \0 \0 005 \0 \0 \0 0003300 \v \0 \0 \0 \0 002 \0 \0 \0 J \0 \0 \0 \0 005 \0 0003320 \0 \0 \0 \0 002 \0 001 \0 \0 \0 \b \0 \0 \0 \0 003 0003340 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 005 \0 \0 \0 \0 0003360 005 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 I \0 \0 \0 0003400 \0 001 \0 \0 \0 \0 \0 002 \0 006 \0 \0 \0 001 \0 \0 0003420 \0 \0 \b \0 \0 \0 \0 \0 002 \0 006 \0 \0 002 276 \0 0003440 7 z 272 0003443