$ od -c -N 50000 [eris]<LispCore>INTERNAL>library>FASL-DEBUG.DCOM!3 0000000 ( D E F I N E - F I L E - I N F 0000020 O 247 R E A D T A B L E " I N 0000040 T E R L I S P " 247 P A C K A G 0000060 E " I N T E R L I S P " ) \r ( 0000100 F I L E C R E A T E D " 3 - 0000120 D e c - 8 6 1 2 : 0 2 : 0 1 " 0000140 ( " c o m p i l e d o n " 0000160 { E R I S } < L I S P C O R E 0000200 > I N T E R N A L > L I B R A R 0000220 Y > F A S L - D E B U G . ; 3 ) 0000240 \r " 3 0 - N o v - 8 6 1 7 : 0000260 1 9 : 5 4 " " C O M P I L E - 0000300 F I L E d " i n " X e r o x 0000320 L i s p 3 0 - N o v - 8 6 0000340 . . . " d a t e d " 3 0 - N 0000360 o v - 8 6 1 7 : 5 0 : 2 9 " ) 0000400 \r ( F I L E C R E A T E D " 0000420 3 - D e c - 8 6 1 2 : 0 1 : 4 0000440 3 " { E R I S } < L I S P C O 0000460 R E > I N T E R N A L > L I B R 0000500 A R Y > F A S L - D E B U G . ; 0000520 3 3 2 9 6 c h a n g e s t 0000540 o % : ( \r V A R S F A S L - 0000560 D E B U G C O M S ) ( F U N C 0000600 T I O N S F A S L - L O A D 0000620 D U M P - S O M E - T E X T T 0000640 E S T - F A S L - O U T D U M 0000660 P - S O M E - V A L U E S R E 0000700 A D - B A C K - F A S L \r P R 0000720 O C E S S - T E X T P R O C E 0000740 S S - I T E M M A K E - F A S 0000760 L - T R A C E - W I N D O W ) 0001000 p r e v i o u s d a t e % : 0001020 " 1 9 - S e p - 8 6 1 3 : 3 2 0001040 : 5 3 " \r { E R I S } < L I S 0001060 P C O R E > I N T E R N A L > L 0001100 I B R A R Y > F A S L - D E B U 0001120 G . ; 1 ) \r ( R P A Q Q F A S 0001140 L - D E B U G C O M S ( ( F U 0001160 N C T I O N S F A S L - L O A 0001200 D T E S T - F A S L - O U T 0001220 D U M P - S O M E - T E X T D 0001240 U M P - S O M E - V A L U E S 0001260 \r R E A D - B A C K - F A S L 0001300 P R O C E S S - T E X T P R O 0001320 C E S S - I T E M M A K E - F 0001340 A S L - T R A C E - W I N D O W 0001360 ) ( P R O P F I L E T Y P E 0001400 F A S L - D E B U G ) ) ) \r F 0001420 A S L - L O A D A 0 0 0 1 A 0 0 0001440 0 2 D 1 \r ( F 0 S F 1 0001460 A 0 3 7 8 ) \0 \n \0 002 \0 \0 P g 0001500 \0 \0 Q \v \0 \0 020 \0 ( 7 C L : C L 0001520 O S E ) \r ( 3 : A B O R T ) \r 0001540 ( ) \r F A S L - L O A D A 0 0 0 0001560 1 D 1 \r ( N A M E E R R O R 0001600 S E T F 0 R E S E T V A R 0001620 S L S T F 1 S F 2 A 0001640 0 3 7 8 F 3 R E S E T Y ) 0001660 \0 ! \0 004 002 \0 g \0 \0 h 032 h h 032 032 0001700 P 032 c \0 277 Q \t \0 \0 \t \0 \0 h c 004 277 0001720 \t \0 \0 c 006 i 020 \0 ( 2 7 C L : V 0001740 A L U E S - L I S T 2 0 \ M 0001760 V L I S T 1 7 F A S L : P R 0002000 O C E S S - F I L E ) \r ( 2 F 0002020 A S L - L O A D A 0 0 0 1 A 0 0 0002040 0 2 ) \r ( ) \r F A S L - L O A D 0002060 D 1 \r ( L ( 0 N A M E ) 0002100 P 3 R E S E T Y P 2 L 0002120 I S P X H I S T P 1 A 0 3 0002140 7 8 P 0 S F 5 L I S 0002160 P X H I S T F 6 R E S E T 0002200 V A R S L S T ) \0 0 005 002 \0 001 @ 0002220 g \0 \0 g \0 \0 \v \0 \0 i 021 002 001 U 021 ! 0002240 004 V o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g 0002260 \0 \0 \ \n \0 \0 L 223 \b \0 \0 020 K 020 \0 ( 0002300 4 3 E R R O R ! 3 8 R E S 0002320 E T R E S T O R E 2 8 F A S 0002340 L - L O A D A 0 0 0 1 9 O P 0002360 E N ) \r ( 3 4 E R R O R 2 5 0002400 I N T E R N A L 6 : I N P 0002420 U T 3 : D I R E C T I O N ) 0002440 \r ( 2 2 ( F A S L - L O A D 0002460 A 0 0 0 1 ) ) \r T E S T - F A S 0002500 L - O U T A 0 0 0 1 A 0 0 0 2 0002520 D 1 \r ( F 0 H A N D L E F 0002540 1 F A S L % : W I T H - O P 0002560 E N - F A S L - H A N D L E 0 3 0002600 7 9 ) \0 \f \0 002 \0 \0 P d 226 g \0 \0 0002620 Q \v \0 \0 020 \0 ( 9 F A S L : C L 0002640 O S E - F A S L - H A N D L E ) 0002660 \r ( 5 : A B O R T ) \r ( ) \r T 0002700 E S T - F A S L - O U T A 0 0 0 0002720 1 D 1 \r ( N A M E E R R O R 0002740 S E T F 0 R E S E T V A R 0002760 S L S T F 1 H A N D L E 0003000 F 2 F A S L % : W I T H - O 0003020 P E N - F A S L - H A N D L E 0 0003040 3 7 9 F 3 R E S E T Y ) 0003060 \0 * \0 004 002 \0 g \0 \0 h 032 h h 032 032 P 0003100 032 c \0 277 Q o \0 \0 \0 \n \0 \0 277 Q \t \0 0003120 \0 \t \0 \0 h c 004 277 \t \0 \0 c 006 i 020 \0 0003140 ( 3 6 C L : V A L U E S - L I 0003160 S T 2 9 \ M V L I S T 2 6 0003200 D U M P - S O M E - V A L U E 0003220 S 2 1 D U M P - S O M E - T 0003240 E X T ) \r ( 2 T E S T - F A S 0003260 L - O U T A 0 0 0 1 A 0 0 0 2 ) 0003300 \r ( 1 8 " T h i s i s a 0003320 t e s t . " ) \r T E S T - F A 0003340 S L - O U T D 1 \r ( P 3 R 0003360 E S E T Y P 2 L I S P X H 0003400 I S T P 1 F A S L % : W I 0003420 T H - O P E N - F A S L - H A N 0003440 D L E 0 3 7 9 P 0 H A N D 0003460 L E F 5 L I S P X H I S T 0003500 F 6 R E S E T V A R S L S 0003520 T ) \0 3 005 002 \0 \0 o \0 \0 \0 g \0 \0 0003540 g \0 \0 \v \0 \0 i 021 002 001 U 021 ! 004 V o 0003560 \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0 \ 0003600 \n \0 \0 L 223 \b \0 \0 020 K 020 \0 ( 4 6 0003620 E R R O R ! 4 1 R E S E T R 0003640 E S T O R E 3 1 T E S T - F 0003660 A S L - O U T A 0 0 0 1 1 2 0003700 F A S L : O P E N - F A S L - H 0003720 A N D L E ) \r ( 3 7 E R R O R 0003740 2 8 I N T E R N A L 9 : 0003760 O V E R W R I T E 6 : I F - 0004000 E X I S T S ) \r ( 2 5 ( T E 0004020 S T - F A S L - O U T A 0 0 0 1 0004040 ) 3 " t e s t . d f a s l ; 0004060 1 " ) \r D U M P - S O M E - T E 0004100 X T D 1 \r ( L ( 1 S T R I 0004120 N G 0 H A N D L E ) ) \0 \n 0004140 \0 \0 \0 002 A @ \t \0 \0 \n \0 \0 020 \0 ( 7 0004160 C L : P R I N C 4 F A S L 0004200 : B E G I N - T E X T ) \r N I L 0004220 \r ( ) \r D U M P - S O M E - V A 0004240 L U E S D 1 \r ( L ( 0 H A 0004260 N D L E ) ) \0 & \0 \0 \0 001 @ \t \0 0004300 \0 @ o \0 \0 \0 \n \0 \0 @ o \0 \0 \0 \n \0 * 0004340 \0 020 \0 ( 3 5 F A S L : D U M P 0004360 - V A L U E 2 7 F A S L : D 0004400 U M P - V A L U E 1 9 F A S 0004420 L : D U M P - V A L U E 1 1 0004440 F A S L : D U M P - V A L U E 0004460 3 F A S L : B E G I N - B L O 0004500 C K ) \r N I L \r ( 3 2 - 0 . 0004520 1 1 2 4 0 . 1 1 1 6 - 1 0004540 . 1 8 1 . 1 ) \r R E A D - B 0004560 A C K - F A S L D 1 \r ( L ( 0004600 0 - a r g s - ) F 1 S ) 0004620 \0 C 001 001 002 \0 e 021 001 \0 k H 361 224 o 0004640 \0 \0 \0 201 k a g \0 \0 g \0 \0 \v \0 \0 Q 0004660 l 221 : 247 o \0 \0 \0 \t \0 \0 200 h Q \t 0004700 \0 \0 Q \t \0 \0 224 h \f \0 \0 020 Q g \0 \0 0004720 g \0 \0 \v \0 \0 277 260 353 \0 ( 6 2 F A 0004740 S L : P R O C E S S - S E G M E 0004760 N T 5 1 W I T H - O P E N - 0005000 F I L E 4 6 E O F P 4 2 0005020 F A S L : C H E C K - V E R S I 0005040 O N 3 6 C L : E R R O R 2 0005060 3 S ) \r ( 5 9 P R O C E S S 0005100 - I T E M 5 6 P R O C E S S 0005120 - T E X T 2 0 : I N P U T 0005140 1 7 : D I R E C T I O N ) \r ( 0005160 3 3 " I n c o r r e c t s 0005200 i g n a t u r e . " 1 1 " t 0005220 e s t . d f a s l " ) \r P R O C 0005240 E S S - T E X T D 1 \r ( L ( 0005260 0 S ) ) \0 \t \0 \0 \0 001 @ \t \0 \0 0005300 \b \0 \0 020 \0 ( 6 C L : T E R P R 0005320 I 3 C L : P R I N C ) \r N I 0005340 L \r ( ) \r P R O C E S S - I T E 0005360 M D 1 \r ( L ( 0 X ) ) \0 0005400 \v \0 \0 \0 001 i o \0 \0 \0 @ \v \0 \0 020 \0 0005420 ( 8 C L : F O R M A T ) \r N I 0005440 L \r ( 4 " V a l u e : ~ S 0005460 ~ % % " ) \r M A K E - F A S L - 0005500 T R A C E - W I N D O W D 1 \r 0005520 ( F 1 F A S L : : D E B U G 0005540 - S T R E A M ) \0 032 001 001 \0 \0 h 0005560 o \0 \0 \0 \n \0 \0 021 001 \0 g \0 \0 H \n \0 0005600 \0 H \t \0 \0 c 002 020 \0 ( 2 1 G E T 0005620 S T R E A M 1 7 D S P S C R 0005640 O L L 7 C R E A T E W ) \r ( 0005660 1 3 O N ) \r ( 4 " F A S L 0005700 t r a c e " ) \r ( P U T P R O 0005720 P S F A S L - D E B U G F I 0005740 L E T Y P E C L : C O M P I L 0005760 E - F I L E ) \r ( P U T P R O P 0006000 S F A S L - D E B U G C O P 0006020 Y R I G H T ( " X e r o x C 0006040 o r p o r a t i o n " 1 9 8 6 0006060 ) ) \r N I L \r 0006067