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