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