$ od -c -N 50000 [phylum]<LISP>KOTO>Lispusers>MESATOLISP.TEDIT!1 0000000 X E R O X \t M E S A T O L I S P 0000020 \r 2 \r \r 4 \r \r 1 \r \r M E S A t o 0000040 L I S P \r 1 \r \r 4 \r \r B y : 0000060 K e l l y R o a c h ( R o a 0000100 c h . p a @ X e r o x . c o m ) 0000120 \r I n t e r n a l \r L a s t r 0000140 e v i s e d 3 0 - J u l - 8 5 0000160 . \r I N T R O D U C T I O N 0000200 \r T h e M E S A T O L I S P 0000220 p a c k a g e c o n v e r t s 0000240 M e s a a n d C e d a r 0000260 c o d e i n t o I n t e r l 0000300 i s p . M E S A T O L I S P 0000320 d o e s n o t o f f e r 0000340 1 0 0 % t r a n s l a t i o n 0000360 a n d t h e t h e o u 0000400 t p u t o f t h i s p a c 0000420 k a g e w i l l h a v e t 0000440 o b e e d i t e d c o n s 0000460 i d e r a b l y w i t h a n 0000500 I n t e r l i s p e d i t o 0000520 r s u c h a s D E D I T . 0000540 M E S A T O L I S P i s 0000560 V E R Y m u c h s t i l l 0000600 i n t h e d e v e l o p m e 0000620 n t p h a s e . A t t h 0000640 i s t i m e , M E S A T O L 0000660 I S P i s o n l y b e i n 0000700 g r e c o m m e n d e d t o 0000720 e x p e r t v o l u n t e e 0000740 r s t h a t h a v e a s 0000760 m a l l t o m e d i u m s 0001000 i z e d M e s a o r C e d 0001020 a r p a c k a g e t h e y 0001040 w o u l d l i k e t o c o 0001060 n v e r t . \r T h e f o l 0001100 l o w i n g f u n c t i o n s 0001120 a r e d e f i n e d b y 0001140 M E S A T O L I S P : \r ( 0001160 P A R S E . M E S A F I L E ) 0001200 \t \t \t \t \t \t \t \t \t [ F u n c t i 0001220 o n ] \r C o n v e r t s a M 0001240 e s a s o u r c e f i l e 0001260 F I L E i n t o I n t e r l 0001300 i s p c o d e . T h e o 0001320 u t p u t i s a f i l e 0001340 p a c k a g e f i l e c o m s 0001360 w h i c h i s b o u n d 0001400 t o t h e v a l u e o f 0001420 P A R S E . F I L E C O M S . \r 0001440 ( P A R S E . C E D A R F I L 0001460 E ) \t \t \t \t \t \t \t \t \t [ F u n c 0001500 t i o n ] \r C o n v e r t s a 0001520 C e d a r s o u r c e f i 0001540 l e F I L E i n t o I n t 0001560 e r l i s p c o d e . A g 0001600 a i n , t h e o u t p u t 0001620 i s a f i l e p a c k a g 0001640 e f i l e c o m s w h i c h 0001660 i s b o u n d t o t h e 0001700 v a l u e o f P A R S E . 0001720 F I L E C O M S . \r \r ( P A R S 0001740 E . S M U R F N ) \t \t \t \t \t \t 0001760 \t \t \t [ F u n c t i o n ] \r T h 0002000 i s i s m y p r i n c i p 0002020 l e d e b u g g i n g f u n 0002040 c t i o n . I f t h e M 0002060 E S A T O L I S P p a r s e r 0002100 b r e a k s , ( P A R S E . 0002120 S M U R F ) w i l l s h o w 0002140 y o u t h e t e x t a r 0002160 o u n d t h e p o i n t i 0002200 n t h e s o u r c e f i l 0002220 e w h e r e t h e p a r s 0002240 e g o t s t u c k . S e 0002260 n d m e t h e n a m e o 0002300 f t h e s o u r c e f i l 0002320 e i f t h i s h a p p e n 0002340 s . A w o r k a r o u n d 0002360 i s t o e d i t o u t 0002400 t h e o f f e n d i n g M e 0002420 s a / C e d a r e x p r e s s 0002440 i o n u s i n g T e d i t 0002460 o n y o u r s o u r c e f 0002500 i l e , t h e n t r y a g 0002520 a i n . \0 \0 \0 \0 \0 003 ( L I S T 0002540 ( ( P A G E N I L ( P A P 0002560 E R S I Z E L e t t e r F O 0002600 L I O I N F O ( A R A B I C 0002620 ) ) ( 0 0 6 1 2 7 9 2 0002640 ) ( ( F O L I O N I L ( P 0002660 A R A L O O K S ( Q U A D C 0002700 E N T E R E D ) C H A R L O O 0002720 K S ( S U P E R S C R I P T 0002740 0 I N V I S I B L E O F F 0002760 S E L E C T P O I N T O F F 0003000 P R O T E C T E D O F F S I 0003020 Z E 1 0 F A M I L Y M O D 0003040 E R N O V E R L I N E O F F 0003060 S T R I K E O U T O F F U 0003100 N D E R L I N E O F F E X P 0003120 A N S I O N R E G U L A R S 0003140 L O P E R E G U L A R W E I 0003160 G H T M E D I U M I N V E R 0003200 T E D O F F U S E R I N F O 0003220 N I L S T Y L E N I L ) 0003240 F O R M A T I N F O ( A R A B 0003260 I C ) ) ( 1 7 4 3 6 2 0003300 8 8 3 6 ) N I L ) ( H E A 0003320 D I N G N I L ( H E A D I N 0003340 G T Y P E R U N N I N G H E A 0003360 D ) ( 8 4 7 4 4 5 2 8 3 0003400 6 ) N I L ) ( T E X T N I 0003420 L N I L ( 8 4 9 6 4 5 6 0003440 6 0 0 ) N I L ) ) ) ( P A 0003460 G E N I L ( P A P E R S I Z 0003500 E L e t t e r F O L I O I N 0003520 F O ( A R A B I C ) ) ( 0003540 0 0 6 1 2 7 9 2 ) ( ( F 0003560 O L I O N I L ( P A R A L O 0003600 O K S ( Q U A D C E N T E R 0003620 E D ) C H A R L O O K S ( S 0003640 U P E R S C R I P T 0 I N V 0003660 I S I B L E O F F S E L E C 0003700 T P O I N T O F F P R O T E 0003720 C T E D O F F S I Z E 1 0 0003740 F A M I L Y M O D E R N O 0003760 V E R L I N E O F F S T R I 0004000 K E O U T O F F U N D E R L 0004020 I N E O F F E X P A N S I O 0004040 N R E G U L A R S L O P E 0004060 R E G U L A R W E I G H T M 0004100 E D I U M I N V E R T E D O 0004120 F F U S E R I N F O N I L 0004140 S T Y L E N I L ) F O R M A 0004160 T I N F O ( A R A B I C ) 0004200 ) ( 1 7 4 3 6 2 8 8 3 6 0004220 ) N I L ) ( H E A D I N G 0004240 N I L ( H E A D I N G T Y P E 0004260 R U N N I N G H E A D ) ( 8 0004300 4 7 4 4 5 2 8 3 6 ) N I 0004320 L ) ( T E X T N I L N I L 0004340 ( 8 4 9 6 4 5 6 6 0 0 ) 0004360 N I L ) ) ) ( P A G E N I 0004400 L ( P A P E R S I Z E L e t 0004420 t e r F O L I O I N F O ( A 0004440 R A B I C ) ) ( 0 0 6 0004460 1 2 7 9 2 ) ( ( F O L I O 0004500 N I L ( P A R A L O O K S ( 0004520 Q U A D C E N T E R E D ) C 0004540 H A R L O O K S ( S U P E R S 0004560 C R I P T 0 I N V I S I B L 0004600 E O F F S E L E C T P O I N 0004620 T O F F P R O T E C T E D 0004640 O F F S I Z E 1 0 F A M I 0004660 L Y M O D E R N O V E R L I 0004700 N E O F F S T R I K E O U T 0004720 O F F U N D E R L I N E O 0004740 F F E X P A N S I O N R E G 0004760 U L A R S L O P E R E G U L 0005000 A R W E I G H T M E D I U M 0005020 I N V E R T E D O F F U S 0005040 E R I N F O N I L S T Y L E 0005060 N I L ) F O R M A T I N F O 0005100 ( A R A B I C ) ) ( 1 7 0005120 4 3 6 2 8 8 3 6 ) N I L 0005140 ) ( H E A D I N G N I L ( 0005160 H E A D I N G T Y P E R U N N 0005200 I N G H E A D ) ( 8 4 7 4 4 0005220 5 2 8 3 6 ) N I L ) ( T 0005240 E X T N I L N I L ( 8 4 0005260 9 6 4 5 6 6 0 0 ) N I L ) 0005300 ) ) ) ) \0 \0 \0 \0 \0 005 \0 005 \0 ( \0 \0 0005320 \0 \0 001 310 \0 \v \0 \0 \0 004 002 004 \0 \0 \0 \0 0005340 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005360 \0 \0 \0 \0 \0 ( \0 \0 \0 \0 001 310 \0 021 \0 \0 0005400 \0 004 002 003 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005420 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 ( \0 212 0005440 \0 212 001 8 \0 006 \0 \0 \0 004 002 003 \0 \0 \0 \0 0005460 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005500 \0 \0 \0 \0 \0 ( \0 212 \0 212 001 8 \0 \0 \0 \0 0005520 \0 004 002 004 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005540 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 D \0 \0 0005560 \0 \0 001 310 \0 \0 \0 \0 \0 \0 003 004 \0 \0 001 001 0005600 310 001 \0 \0 \0 \0 \0 \0 \0 \v P A G E H E 0005620 A D I N G \0 \v R U N N I N G H E 0005640 A D \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0005660 \0 \0 \0 \0 \0 004 \0 006 \0 024 \0 006 M O D E 0005700 R N \0 006 \0 \0 \0 \0 \0 \0 \0 \0 \0 024 \0 006 0005720 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 001 \0 0005740 \0 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 0005760 \0 \0 002 \0 \0 024 \0 006 M O D E R N \0 \f 0006000 \0 \0 \0 \0 \0 \0 002 \0 \0 022 \0 004 L O G O 0006020 \0 030 \0 \0 \0 \0 \0 \0 \0 \0 \0 024 \0 006 M O 0006040 D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0006060 \0 \0 \0 002 \0 005 \0 \0 \0 005 \0 \0 \0 \0 005 \0 0006100 \0 \0 001 \0 \0 \0 \0 001 \0 \0 \0 \v \0 \0 \0 \0 0006120 006 \0 \0 \0 \0 \0 002 \0 005 \0 \0 \0 002 \0 001 \0 0006140 \v H R U L E . G E T F N 001 \0 024 \0 0006160 006 M O D E R N \0 \n \0 \0 \0 \0 \0 \0 \0 0006200 \0 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 0006220 \0 004 \0 \0 \0 002 \0 001 \0 \v H R U L E . 0006240 G E T F N 001 \0 024 \0 006 M O D E R N 0006260 \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 001 \0 \0 0006300 \0 \0 006 \0 \0 \0 \0 \0 002 \0 004 \0 \0 \0 002 \0 0006320 001 \0 \v H R U L E . G E T F N 001 \0 0006340 024 \0 006 M O D E R N \0 \n \0 \0 \0 \0 \0 0006360 \0 \0 \0 \0 \0 \0 001 \0 \0 \0 \0 006 \0 \0 \0 \0 0006400 \0 002 \0 003 \0 \0 \0 \v \0 \0 \0 \0 004 \0 \0 \0 0006420 \0 \0 002 \0 003 \0 \0 \0 002 \0 001 \0 \v H R U 0006440 L E . G E T F N 001 \0 024 \0 006 M O D 0006460 E R N \0 \f \0 \0 \0 \0 \0 \0 002 \0 \0 \0 \0 0006500 001 \0 \0 \0 \0 004 \0 \0 \0 \0 \0 002 \0 004 \0 \0 0006520 \0 002 \0 001 \0 \v H R U L E . G E T F 0006540 N 001 \0 024 \0 006 M O D E R N \0 \f \0 \0 0006560 \0 \0 \0 \0 002 \0 \0 \0 \0 001 \0 \0 \0 \0 004 \0 0006600 \0 \0 \0 \0 002 \0 002 \0 \0 \0 & \0 \0 \0 \0 006 0006620 \0 \0 \0 \0 \0 002 \0 002 \0 \0 \0 \t \0 \0 \0 \0 0006640 006 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 032 \0 \0 \0 0006660 \0 006 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 \r \0 \0 0006700 \0 \0 003 \0 \0 \0 \0 \0 002 \0 001 \0 \0 001 270 \0 0006720 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 6 0006740 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 001 \0 \0 \0 0006760 \f \0 \0 \0 \0 006 \0 \0 \0 004 \0 \0 \0 \0 002 \0 0007000 \0 \0 025 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 001 0007020 \0 \0 \0 214 \0 \0 \0 \0 006 \0 \0 \0 \0 \0 002 \0 0007040 001 \0 \0 \0 \r \0 \0 \0 \0 006 \0 \0 \0 004 \0 \0 0007060 \0 \0 002 \0 \0 \0 025 \0 \0 \0 \0 006 \0 \0 \0 \0 0007100 \0 002 \0 001 \0 \0 \0 225 \0 \0 \0 \0 006 \0 \0 \0 0007120 \0 \0 002 \0 001 \0 \0 \0 \r \0 \0 \0 \0 006 \0 \0 0007140 \0 001 \0 \0 \0 \0 002 \0 \0 \0 025 \0 \0 \0 \0 006 0007160 \0 \0 \0 \0 \0 002 \0 001 \0 \0 001 W \0 \0 \0 \0 0007200 006 \0 \0 005 U \0 4 z 272 0007211