$ od -c -N 50000 [eris]<Lisp>Harmony>Library>COMPILEBANG.DCOM!2 0000000 ( F I L E C R E A T E D " 9 0000020 - N o v - 8 4 1 0 : 4 0 : 2 7 0000040 " ( " c o m p i l e d o n 0000060 " { D A N T E } < L I S P N E 0000100 W > L I B R A R Y > C O M P I L 0000120 E B A N G . ; 2 ) " 1 - N o 0000140 v - 8 4 1 4 : 1 4 : 1 4 " \r 0000160 r e c o m p i l e d c h a n g 0000200 e s : C O M P I L E ! i n 0000220 " I N T E R L I S P - D 1 - 0000240 N o v - 8 4 . . . " d a t e 0000260 d " 1 - N o v - 8 4 1 4 : 0000300 4 0 : 5 5 " ) \r ( F I L E C R E 0000320 A T E D " 8 - N o v - 8 4 0000340 1 9 : 2 0 : 5 5 " { D S K } < 0000360 P L H > C O M P I L E B A N G . 0000400 ; 1 2 5 0 0 c h a n g e s 0000420 t o : ( L I S P X M A C R O S 0000440 C ) ( F N S C O M P I L E 0000460 ! ) p r e v i o u s \r d a t 0000500 e : " 1 0 - M A R - 8 3 1 2 0000520 : 4 8 : 1 7 " { E R I S } < L 0000540 I S P > H A R M O N Y > L I B R 0000560 A R Y > C O M P I L E B A N G . 0000600 ; 1 ) \r C O M P I L E ! A 0 0 0 0000620 1 A 0 0 0 2 D 1 \r ( N A M E 0000640 E R R O R S E T P 6 L C F 0000660 I L P 5 L O C A L V A R S 0000700 P 4 S P E C V A R S P 0000720 3 L S T F I L P 2 S V F 0000740 L G P 1 S T R F P 0 0000760 L A P F L G F 7 X F 1 0001000 0 Q L O C A L V A R S F 1 0001020 1 Q S Y S L O C A L V A R S 0001040 F 1 2 Q P R I N T L A P F 0001060 1 3 Q B Y T E C O M P F L G 0001100 F 1 4 Q N O R E D E F I N 0001120 E F 1 5 Q N O S A V E F 0001140 1 6 Q R E S E T Y ) \0 Z \a 0001160 \b 002 \0 W 024 264 \t W 026 221 i 201 l 002 W 030 0001200 h 360 W 032 h 360 i d W 020 i 360 247 W 022 W 0001220 020 \n \0 \0 201 W 022 021 026 006 W 016 004 l 004 360 0001240 222 W 016 202 g \0 \0 W 016 d 003 245 i \n \0 \0 0001260 260 023 \t \0 \0 222 W 016 211 g \0 \0 h W 016 h 0001300 032 032 032 i \v \0 \0 022 c 034 i 020 \0 ( 1 2 0001320 3 Q C O M P I L E 1 1 0 1 Q 0001340 A R G T Y P E 7 4 Q V I R 0001360 G I N F N 4 0 Q U N I O N ) 0001400 \r ( 1 1 0 Q L A M B D A 6 3 0001420 Q * D U M M Y - C O M P I L E 0001440 D - F U N C T I O N * ) \r ( ) \r 0001460 C O M P I L E ! A 0 0 0 1 D 1 0001500 \r ( N A M E E R R O R S E T 0001520 P 2 R E S E T Z P 1 R 0001540 E S E T Y P 0 L I S P X H 0001560 I S T F 3 L I S P X H I S 0001600 T F 4 R E S E T V A R S L 0001620 S T ) \0 P 003 002 002 \0 ` \0 \0 027 \0 \0 0001640 277 ` \0 \0 027 \0 \0 277 ` \0 \0 027 \0 \0 277 ` 0001660 \0 \0 027 \0 \0 277 ` \0 \0 027 \0 \0 277 ` \0 \0 0001700 027 \0 \0 277 S 021 ! 002 T o \0 \0 \0 g \0 \0 0001720 \n \0 \0 221 h 202 g \0 \0 Z \n \0 \0 277 J 223 0001740 \b \0 \0 200 I 022 h 032 020 \0 ( 1 1 0 Q 0001760 E R R O R ! 1 0 2 Q R E S E 0002000 T R E S T O R E 7 0 Q C O M 0002020 P I L E ! A 0 0 0 1 A 0 0 0 2 ) 0002040 \r ( 7 6 Q E R R O R 6 5 Q 0002060 I N T E R N A L 5 0 Q N O F 0002100 I X V A R S L S T 4 5 Q N O 0002120 F I X V A R S L S T 4 1 Q N 0002140 O F I X F N S L S T 3 6 Q N 0002160 O F I X F N S L S T 3 2 Q L 0002200 A M A 2 7 Q L A M A 2 3 Q 0002220 L A M S 2 0 Q L A M S 1 0002240 4 Q N L A M L 1 1 Q N L A 0002260 M L 5 N L A M A 2 N L A 0002300 M A ) \r ( 6 2 Q ( C O M P I 0002320 L E ! A 0 0 0 1 A 0 0 0 2 ) ) \r 0002340 C O M P I L E ! D 1 \r ( P 1 0002360 M A C R O Y P 0 M A C R 0002400 O X I 3 P R I N T L A P 0002420 I 2 N O R E D E F I N E I 0002440 1 N O S A V E I 0 X 0002460 F 2 R E S E T V A R S L S T 0002500 ) \0 230 002 001 \0 004 g \0 \0 ` \0 \0 032 g 0002520 \0 \0 ` \0 \0 032 g \0 \0 ` \0 \0 032 g \0 \0 0002540 ` \0 \0 032 g \0 \0 ` \0 \0 032 g \0 \0 ` \0 0002560 \0 032 R 032 032 032 032 032 032 c 004 021 021 001 R Y 0002600 o \0 \0 \0 g \0 \0 \n \0 \0 H 001 002 027 \0 \0 0002620 277 H 002 X 001 002 027 \0 \0 277 H 002 X 001 002 027 0002640 \0 \0 277 H 002 X 001 002 027 \0 \0 277 H 002 X 001 0002660 002 027 \0 \0 277 H 002 X 001 002 027 \0 \0 277 I d 0002700 R 360 225 277 H 002 c 004 215 R \n \0 \0 231 R k 0002720 I \v \0 \0 H 002 031 277 265 005 \b \0 \0 001 020 \0 0002740 ( 2 2 4 Q E R R O R ! 2 1 3 0002760 Q N L E F T 2 0 4 Q T A I 0003000 L P 1 0 1 Q C O M P I L E ! 0003020 A 0 0 0 1 ) \r ( 1 6 4 Q N O F 0003040 I X V A R S L S T 1 5 3 Q N 0003060 O F I X F N S L S T 1 4 2 Q 0003100 L A M A 1 3 1 Q L A M S 1 0003120 2 0 Q N L A M L 1 0 7 Q N 0003140 L A M A 7 6 Q I N T E R N A 0003160 L 5 0 Q N O F I X V A R S L 0003200 S T 4 5 Q N O F I X V A R S 0003220 L S T 4 1 Q N O F I X F N S 0003240 L S T 3 6 Q N O F I X F N S 0003260 L S T 3 2 Q L A M A 2 7 Q 0003300 L A M A 2 3 Q L A M S 2 0003320 0 Q L A M S 1 4 Q N L A M 0003340 L 1 1 Q N L A M L 5 N L 0003360 A M A 2 N L A M A ) \r ( 7 0003400 3 Q ( C O M P I L E ! A 0 0 0 0003420 1 ) ) \r ( P R E T T Y C O M P R 0003440 I N T C O M P I L E B A N G C 0003460 O M S ) \r ( R P A Q Q C O M P 0003500 I L E B A N G C O M S ( ( E 0003520 ( R E S E T S A V E C L I S P 0003540 I F Y P R E T T Y F L G N I L 0003560 ) ) ( L I S P X M A C R O S 0003600 C ) ( F N S C O M P I L E ! 0003620 ) ( U S E R M A C R O S C ) 0003640 ) ) \r ( A D D T O V A R L I S 0003660 P X M A C R O S ( C ( C O N 0003700 D ( L I S P X L I N E ( C O 0003720 M P I L E ! ( C A R L I S P 0003740 X L I N E ) N I L N I L T 0003760 ) ) ( T C ) ) ) ) \r ( A D D 0004000 T O V A R U S E R M A C R O S 0004020 ( C N I L ( O R R ( U P 0004040 1 ) N I L ) ( O R R ( ( 0004060 E ( C O M P I L E ! ( O R 0004100 ( L I S T P ( % # % # ) ) ( 0004120 % # % # ! 0 ) ) T T T ) 0004140 ) ) ( ( E ( Q U O T E C ? 0004160 ) ) ) ) \r ) ) \r ( A D D T O V A 0004200 R E D I T C O M S A C ) \r ( 0004220 P U T P R O P S C O M P I L E 0004240 B A N G C O P Y R I G H T ( 0004260 " X e r o x C o r p o r a t i 0004300 o n " 1 9 8 2 1 9 8 3 1 9 0004320 8 4 ) ) \r N I L \r 0004331