$ od -c -N 50000 [eris]<LispCore>New-XCL>XCL-PACKAGE.DCOM!4 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 ( D E F P A C K A G E " X 0000100 C L " ( 247 U S E ) ) ) \r ( I L 0000120 : F I L E C R E A T E D " 2 4 0000140 - O c t - 8 6 1 9 : 2 7 : 5 9 0000160 " ( " c o m p i l e d o n 0000200 " I L : { E R I S } < L I S P 0000220 C O R E > S O U R C E S > X C L 0000240 - P A C K A G E . ; 7 ) \r " 2 0000260 1 - O c t - 8 6 0 4 : 1 3 : 0 0000300 1 " I L : t c o m p l ' d I 0000320 L : i n " X e r o x L i s p 0000340 2 1 - O c t - 8 6 . . . " 0000360 I L : d a t e d " 2 1 - O c t 0000400 - 8 6 0 4 : 4 8 : 4 3 " ) \r ( 0000420 I L : F I L E C R E A T E D " 0000440 2 4 - O c t - 8 6 1 9 : 2 7 : 0000460 3 0 " I L : { E R I S } < L I 0000500 S P C O R E > S O U R C E S > X 0000520 C L - P A C K A G E . ; 7 1 0 0000540 6 2 0 I L : c h a n g e s I 0000560 L : t o % : \r ( I L : V A R S 0000600 I L : X C L - P A C K A G E C 0000620 O M S ) I L : p r e v i o u s 0000640 I L : d a t e % : " 2 4 - O 0000660 c t - 8 6 1 2 : 0 2 : 4 1 " 0000700 \r I L : { E R I S } < L I S P C 0000720 O R E > S O U R C E S > X C L - 0000740 P A C K A G E . ; 5 ) \r ( I L : 0000760 P R E T T Y C O M P R I N T I 0001000 L : X C L - P A C K A G E C O M 0001020 S ) \r ( I L : R P A Q Q I L : 0001040 X C L - P A C K A G E C O M S 0001060 ( ( I L : * I L : ; ; ; " S 0001100 e t t i n g u p t h e X C 0001120 L p a c k a g e . " ) ( I L 0001140 : P ( I L : D E F P A C K A G 0001160 E \r " X E R O X - C O M M O N 0001200 - L I S P " ( : U S E " L I 0001220 S P " ) ( : N I C K N A M E S 0001240 " X C L " ) ( : P R E F I X 0001260 - N A M E " X C L " ) ( : E 0001300 X P O R T & C O N T E X T \r 0001320 * P R I N T - S T R U C T U R E 0001340 * * T O T A L - P A C K A G E 0001360 S - L I M I T * A B O R T A 0001400 D J U S T A B L E - A R R A Y - 0001420 P A R R A Y - N E E D S - I N 0001440 D I R E C T I O N - P A S E T 0001460 \r C A T C H - A B O R T C E 0001500 L L - E R R O R C E L L - E R 0001520 R O R - N A M E C O M P U T E 0001540 - P R O C E E D - C A S E S C 0001560 O N D I T I O N C O N D I T I 0001600 O N - B I N D C O N D I T I O 0001620 N - C A S E \r C O N D I T I O 0001640 N - H A N D L E R C O N D I T 0001660 I O N - R E P O R T E R C O N 0001700 T R O L - E R R O R C O P Y - 0001720 A R R A Y D E B U G D E F - 0001740 D E F I N E - T Y P E \r D E F 0001760 A U L T - P R O C E E D - R E P 0002000 O R T D E F A U L T - P R O C 0002020 E E D - T E S T D E F C O M M 0002040 A N D D E F D E F I N E R D 0002060 E F G L O B A L P A R A M E T E 0002100 R D E F G L O B A L V A R \r 0002120 D E F I N E - C O N D I T I O N 0002140 D E F I N E - P R O C E E D - 0002160 F U N C T I O N D E F I N L I 0002200 N E D E F O P T I M I Z E R 0002220 D E F P A C K A G E D E L E T 0002240 E - P A C K A G E \r D E S T R 0002260 U C T U R I N G - B I N D D E 0002300 S T R U C T U R I N G - S E T Q 0002320 D I S P L A C E D - A R R A Y 0002340 - P D O - E X T E R N A L - S 0002360 Y M B O L S D O - L O C A L - 0002400 S Y M B O L S \r E N D - O F - 0002420 F I L E E N D - O F - F I L E 0002440 - S T R E A M E Q U A L - D I 0002460 M E N S I O N S - P E X T E N 0002500 D A B L E - A R R A Y - P F I 0002520 L L - A R R A Y F I L L - V E 0002540 C T O R \r F I N D - P R O C E 0002560 E D - C A S E G L O B A L G 0002600 L O B A L I Z E H A N D L E R 0002620 - B I N D I G N O R E - E R R 0002640 O R S I L L E G A L - G O I 0002660 L L E G A L - G O - T A G I L 0002700 L E G A L - R E T U R N \r I L 0002720 L E G A L - R E T U R N - T A G 0002740 I L L E G A L - T H R O W I 0002760 L L E G A L - T H R O W - T A G 0003000 I N V O K E - P R O C E E D - 0003020 C A S E M A K E - C O N D I T 0003040 I O N O P T I M I Z E R S P 0003060 A C K \r P A C K * P A R S E 0003100 - B O D Y P R O C E E D P R 0003120 O C E E D - C A S E P R O C E 0003140 E D - C A S E - N A M E R E A 0003160 D - E R R O R R E A D - E R R 0003200 O R - S T R E A M \r R E A D - 0003220 O N L Y - A R R A Y - P R E M 0003240 O V E - C O M M E N T S S E R 0003260 I O U S - C O N D I T I O N S 0003300 H A D O W I N G - U S E - P A C 0003320 K A G E S I G N A L S I M P 0003340 L E - A R R A Y - P \r S I M P 0003360 L E - B R E A K S I M P L E - 0003400 B R E A K - F O R M A T - A R G 0003420 U M E N T S S I M P L E - B R 0003440 E A K - F O R M A T - S T R I N 0003460 G S I M P L E - C O N D I T I 0003500 O N \r S I M P L E - C O N D I 0003520 T I O N - F O R M A T - A R G U 0003540 M E N T S S I M P L E - C O N 0003560 D I T I O N - F O R M A T - S T 0003600 R I N G S I M P L E - E R R O 0003620 R \r S I M P L E - E R R O R - 0003640 F O R M A T - A R G U M E N T S 0003660 S I M P L E - E R R O R - F O 0003700 R M A T - S T R I N G S I M P 0003720 L E - W A R N I N G \r S I M P 0003740 L E - W A R N I N G - F O R M A 0003760 T - A R G U M E N T S S I M P 0004000 L E - W A R N I N G - F O R M A 0004020 T - S T R I N G S T A C K - O 0004040 V E R F L O W S T O R A G E - 0004060 C O N D I T I O N \r S T O R E 0004100 - V A L U E S T R E A M - E R 0004120 R O R S T R E A M - E R R O R 0004140 - S T R E A M S T R I N G - A 0004160 R R A Y - P T R U E U N B O 0004200 U N D - V A R I A B L E \r U N 0004220 B O U N D - V A R I A B L E - N 0004240 A M E U N D E F I N E D - F U 0004260 N C T I O N U N D E F I N E D 0004300 - F U N C T I O N - N A M E U 0004320 S E - V A L U E V E C T O R - 0004340 L E N G T H W A L K - F O R M 0004360 \r W A L K - F O R M - I N T E 0004400 R N A L W A L K - T E M P L A 0004420 T E W A R N I N G ) ) ( I L 0004440 : * I L : ; ; ; " D O N O 0004460 T A D D N E W S Y M B O L 0004500 S T O T H I S L I S T " ) 0004520 ( \r C L : I M P O R T ( C L 0004540 : Q U O T E ( & C O N T E X T 0004560 * P R I N T - S T R U C T U R 0004600 E * * T O T A L - P A C K A G 0004620 E S - L I M I T * A B O R T 0004640 A D J U S T A B L E - A R R A Y 0004660 - P \r A R R A Y - N E E D S - 0004700 I N D I R E C T I O N - P A S 0004720 E T C A T C H - A B O R T C 0004740 E L L - E R R O R C E L L - E 0004760 R R O R - N A M E C O M P U T 0005000 E - P R O C E E D - C A S E S 0005020 C O N D I T I O N \r C O N D I 0005040 T I O N - B I N D C O N D I T 0005060 I O N - C A S E C O N D I T I 0005100 O N - H A N D L E R C O N D I 0005120 T I O N - R E P O R T E R C O 0005140 N T R O L - E R R O R C O P Y 0005160 - A R R A Y D E B U G \r D E 0005200 F - D E F I N E - T Y P E D E 0005220 F A U L T - P R O C E E D - R E 0005240 P O R T D E F A U L T - P R O 0005260 C E E D - T E S T D E F C O M 0005300 M A N D D E F D E F I N E R 0005320 D E F G L O B A L P A R A M E T 0005340 E R \r D E F G L O B A L V A R 0005360 D E F I N E - C O N D I T I O 0005400 N D E F I N E - P R O C E E D 0005420 - F U N C T I O N D E F I N L 0005440 I N E D E F O P T I M I Z E R 0005460 D E F P A C K A G E D E L E 0005500 T E - P A C K A G E \r D E S T 0005520 R U C T U R I N G - B I N D D 0005540 E S T R U C T U R I N G - S E T 0005560 Q D I S P L A C E D - A R R A 0005600 Y - P D O - E X T E R N A L - 0005620 S Y M B O L S D O - L O C A L 0005640 - S Y M B O L S \r E N D - O F 0005660 - F I L E E N D - O F - F I L 0005700 E - S T R E A M E Q U A L - D 0005720 I M E N S I O N S - P E X T E 0005740 N D A B L E - A R R A Y - P F 0005760 I L L - A R R A Y F I L L - V 0006000 E C T O R \r F I N D - P R O C 0006020 E E D - C A S E G L O B A L 0006040 G L O B A L I Z E H A N D L E 0006060 R - B I N D I G N O R E - E R 0006100 R O R S I L L E G A L - G O 0006120 I L L E G A L - G O - T A G I 0006140 L L E G A L - R E T U R N \r I 0006160 L L E G A L - R E T U R N - T A 0006200 G I L L E G A L - T H R O W 0006220 I L L E G A L - T H R O W - T A 0006240 G I N V O K E - P R O C E E D 0006260 - C A S E M A K E - C O N D I 0006300 T I O N O P T I M I Z E R S 0006320 \r P A R S E - B O D Y P R O C 0006340 E E D P R O C E E D - C A S E 0006360 P R O C E E D - C A S E - N A 0006400 M E R E A D - E R R O R R E 0006420 A D - E R R O R - S T R E A M 0006440 R E A D - O N L Y - A R R A Y - 0006460 P \r R E M O V E - C O M M E N 0006500 T S S E R I O U S - C O N D I 0006520 T I O N S H A D O W I N G - U 0006540 S E - P A C K A G E S I G N A 0006560 L S I M P L E - A R R A Y - P 0006600 S I M P L E - B R E A K \r S 0006620 I M P L E - B R E A K - F O R M 0006640 A T - A R G U M E N T S S I M 0006660 P L E - B R E A K - F O R M A T 0006700 - S T R I N G S I M P L E - C 0006720 O N D I T I O N \r S I M P L E 0006740 - C O N D I T I O N - F O R M A 0006760 T - A R G U M E N T S S I M P 0007000 L E - C O N D I T I O N - F O R 0007020 M A T - S T R I N G S I M P L 0007040 E - E R R O R \r S I M P L E - 0007060 E R R O R - F O R M A T - A R G 0007100 U M E N T S S I M P L E - E R 0007120 R O R - F O R M A T - S T R I N 0007140 G S I M P L E - W A R N I N G 0007160 \r S I M P L E - W A R N I N G 0007200 - F O R M A T - A R G U M E N T 0007220 S S I M P L E - W A R N I N G 0007240 - F O R M A T - S T R I N G S 0007260 T A C K - O V E R F L O W S T 0007300 O R A G E - C O N D I T I O N 0007320 \r S T O R E - V A L U E S T R 0007340 E A M - E R R O R S T R E A M 0007360 - E R R O R - S T R E A M S T 0007400 R I N G - A R R A Y - P T R U 0007420 E U N B O U N D - V A R I A B 0007440 L E \r U N B O U N D - V A R I 0007460 A B L E - N A M E U N D E F I 0007500 N E D - F U N C T I O N U N D 0007520 E F I N E D - F U N C T I O N - 0007540 N A M E U S E - V A L U E V 0007560 E C T O R - L E N G T H W A L 0007600 K - F O R M \r W A L K - F O R 0007620 M - I N T E R N A L W A L K - 0007640 T E M P L A T E W A R N I N G 0007660 ) ) " I N T E R L I S P " ) ) 0007700 ( I L : * I L : ; ; \r " A 0007720 r r a n g e f o r t h e p 0007740 r o p e r m a k e f i l e e 0007760 n v i r o n m e n t " ) ( I L 0010000 : P R O P I L : M A K E F I L 0010020 E - E N V I R O N M E N T I L 0010040 : X C L - P A C K A G E ) ) ) \r 0010060 ( I L : D E F P A C K A G E " 0010100 X E R O X - C O M M O N - L I S 0010120 P " ( : U S E " L I S P " ) 0010140 ( : N I C K N A M E S " X C 0010160 L " ) ( : P R E F I X - N A M 0010200 E " X C L " ) ( : E X P O R 0010220 T \r & C O N T E X T * P R I 0010240 N T - S T R U C T U R E * * T 0010260 O T A L - P A C K A G E S - L I 0010300 M I T * A B O R T A D J U S 0010320 T A B L E - A R R A Y - P A R 0010340 R A Y - N E E D S - I N D I R E 0010360 C T I O N - P \r A S E T C A 0010400 T C H - A B O R T C E L L - E 0010420 R R O R C E L L - E R R O R - 0010440 N A M E C O M P U T E - P R O 0010460 C E E D - C A S E S C O N D I 0010500 T I O N C O N D I T I O N - B 0010520 I N D \r C O N D I T I O N - C 0010540 A S E C O N D I T I O N - H A 0010560 N D L E R C O N D I T I O N - 0010600 R E P O R T E R C O N T R O L 0010620 - E R R O R C O P Y - A R R A 0010640 Y D E B U G D E F - D E F I 0010660 N E - T Y P E \r D E F A U L T 0010700 - P R O C E E D - R E P O R T 0010720 D E F A U L T - P R O C E E D - 0010740 T E S T D E F C O M M A N D 0010760 D E F D E F I N E R D E F G L 0011000 O B A L P A R A M E T E R D E 0011020 F G L O B A L V A R \r D E F I 0011040 N E - C O N D I T I O N D E F 0011060 I N E - P R O C E E D - F U N C 0011100 T I O N D E F I N L I N E D 0011120 E F O P T I M I Z E R D E F P 0011140 A C K A G E D E L E T E - P A 0011160 C K A G E \r D E S T R U C T U 0011200 R I N G - B I N D D E S T R U 0011220 C T U R I N G - S E T Q D I S 0011240 P L A C E D - A R R A Y - P D 0011260 O - E X T E R N A L - S Y M B O 0011300 L S D O - L O C A L - S Y M B 0011320 O L S \r E N D - O F - F I L E 0011340 E N D - O F - F I L E - S T R 0011360 E A M E Q U A L - D I M E N S 0011400 I O N S - P E X T E N D A B L 0011420 E - A R R A Y - P F I L L - A 0011440 R R A Y F I L L - V E C T O R 0011460 \r F I N D - P R O C E E D - C 0011500 A S E G L O B A L G L O B A 0011520 L I Z E H A N D L E R - B I N 0011540 D I G N O R E - E R R O R S 0011560 I L L E G A L - G O I L L E G 0011600 A L - G O - T A G I L L E G A 0011620 L - R E T U R N \r I L L E G A 0011640 L - R E T U R N - T A G I L L 0011660 E G A L - T H R O W I L L E G 0011700 A L - T H R O W - T A G I N V 0011720 O K E - P R O C E E D - C A S E 0011740 M A K E - C O N D I T I O N 0011760 O P T I M I Z E R S P A C K \r 0012000 P A C K * P A R S E - B O D 0012020 Y P R O C E E D P R O C E E 0012040 D - C A S E P R O C E E D - C 0012060 A S E - N A M E R E A D - E R 0012100 R O R R E A D - E R R O R - S 0012120 T R E A M \r R E A D - O N L Y 0012140 - A R R A Y - P R E M O V E - 0012160 C O M M E N T S S E R I O U S 0012200 - C O N D I T I O N S H A D O 0012220 W I N G - U S E - P A C K A G E 0012240 S I G N A L S I M P L E - A 0012260 R R A Y - P \r S I M P L E - B 0012300 R E A K S I M P L E - B R E A 0012320 K - F O R M A T - A R G U M E N 0012340 T S S I M P L E - B R E A K - 0012360 F O R M A T - S T R I N G S I 0012400 M P L E - C O N D I T I O N \r 0012420 S I M P L E - C O N D I T I O N 0012440 - F O R M A T - A R G U M E N T 0012460 S S I M P L E - C O N D I T I 0012500 O N - F O R M A T - S T R I N G 0012520 S I M P L E - E R R O R \r S 0012540 I M P L E - E R R O R - F O R M 0012560 A T - A R G U M E N T S S I M 0012600 P L E - E R R O R - F O R M A T 0012620 - S T R I N G S I M P L E - W 0012640 A R N I N G \r S I M P L E - W 0012660 A R N I N G - F O R M A T - A R 0012700 G U M E N T S S I M P L E - W 0012720 A R N I N G - F O R M A T - S T 0012740 R I N G S T A C K - O V E R F 0012760 L O W S T O R A G E - C O N D 0013000 I T I O N \r S T O R E - V A L 0013020 U E S T R E A M - E R R O R 0013040 S T R E A M - E R R O R - S T R 0013060 E A M S T R I N G - A R R A Y 0013100 - P T R U E U N B O U N D - 0013120 V A R I A B L E \r U N B O U N 0013140 D - V A R I A B L E - N A M E 0013160 U N D E F I N E D - F U N C T I 0013200 O N U N D E F I N E D - F U N 0013220 C T I O N - N A M E U S E - V 0013240 A L U E V E C T O R - L E N G 0013260 T H W A L K - F O R M \r W A 0013300 L K - F O R M - I N T E R N A L 0013320 W A L K - T E M P L A T E W 0013340 A R N I N G ) ) \r ( C L : I M P 0013360 O R T ( C L : Q U O T E ( & 0013400 C O N T E X T * P R I N T - S 0013420 T R U C T U R E * * T O T A L 0013440 - P A C K A G E S - L I M I T * 0013460 A B O R T A D J U S T A B L 0013500 E - A R R A Y - P \r A R R A Y 0013520 - N E E D S - I N D I R E C T I 0013540 O N - P A S E T C A T C H - 0013560 A B O R T C E L L - E R R O R 0013600 C E L L - E R R O R - N A M E 0013620 C O M P U T E - P R O C E E D 0013640 - C A S E S C O N D I T I O N 0013660 \r C O N D I T I O N - B I N D 0013700 C O N D I T I O N - C A S E 0013720 C O N D I T I O N - H A N D L E 0013740 R C O N D I T I O N - R E P O 0013760 R T E R C O N T R O L - E R R 0014000 O R C O P Y - A R R A Y D E 0014020 B U G \r D E F - D E F I N E - 0014040 T Y P E D E F A U L T - P R O 0014060 C E E D - R E P O R T D E F A 0014100 U L T - P R O C E E D - T E S T 0014120 D E F C O M M A N D D E F D 0014140 E F I N E R D E F G L O B A L 0014160 P A R A M E T E R \r D E F G L 0014200 O B A L V A R D E F I N E - C 0014220 O N D I T I O N D E F I N E - 0014240 P R O C E E D - F U N C T I O N 0014260 D E F I N L I N E D E F O P 0014300 T I M I Z E R D E F P A C K A 0014320 G E D E L E T E - P A C K A G 0014340 E \r D E S T R U C T U R I N G 0014360 - B I N D D E S T R U C T U R 0014400 I N G - S E T Q D I S P L A C 0014420 E D - A R R A Y - P D O - E X 0014440 T E R N A L - S Y M B O L S D 0014460 O - L O C A L - S Y M B O L S 0014500 \r E N D - O F - F I L E E N D 0014520 - O F - F I L E - S T R E A M 0014540 E Q U A L - D I M E N S I O N S 0014560 - P E X T E N D A B L E - A R 0014600 R A Y - P F I L L - A R R A Y 0014620 F I L L - V E C T O R \r F I 0014640 N D - P R O C E E D - C A S E 0014660 G L O B A L G L O B A L I Z E 0014700 H A N D L E R - B I N D I G 0014720 N O R E - E R R O R S I L L E 0014740 G A L - G O I L L E G A L - G 0014760 O - T A G I L L E G A L - R E 0015000 T U R N \r I L L E G A L - R E 0015020 T U R N - T A G I L L E G A L 0015040 - T H R O W I L L E G A L - T 0015060 H R O W - T A G I N V O K E - 0015100 P R O C E E D - C A S E M A K 0015120 E - C O N D I T I O N O P T I 0015140 M I Z E R S \r P A R S E - B O 0015160 D Y P R O C E E D P R O C E 0015200 E D - C A S E P R O C E E D - 0015220 C A S E - N A M E R E A D - E 0015240 R R O R R E A D - E R R O R - 0015260 S T R E A M R E A D - O N L Y 0015300 - A R R A Y - P \r R E M O V E 0015320 - C O M M E N T S S E R I O U 0015340 S - C O N D I T I O N S H A D 0015360 O W I N G - U S E - P A C K A G 0015400 E S I G N A L S I M P L E - 0015420 A R R A Y - P S I M P L E - B 0015440 R E A K \r S I M P L E - B R E 0015460 A K - F O R M A T - A R G U M E 0015500 N T S S I M P L E - B R E A K 0015520 - F O R M A T - S T R I N G S 0015540 I M P L E - C O N D I T I O N 0015560 \r S I M P L E - C O N D I T I O 0015600 N - F O R M A T - A R G U M E N 0015620 T S S I M P L E - C O N D I T 0015640 I O N - F O R M A T - S T R I N 0015660 G S I M P L E - E R R O R \r 0015700 S I M P L E - E R R O R - F O R 0015720 M A T - A R G U M E N T S S I 0015740 M P L E - E R R O R - F O R M A 0015760 T - S T R I N G S I M P L E - 0016000 W A R N I N G \r S I M P L E - 0016020 W A R N I N G - F O R M A T - A 0016040 R G U M E N T S S I M P L E - 0016060 W A R N I N G - F O R M A T - S 0016100 T R I N G S T A C K - O V E R 0016120 F L O W S T O R A G E - C O N 0016140 D I T I O N \r S T O R E - V A 0016160 L U E S T R E A M - E R R O R 0016200 S T R E A M - E R R O R - S T 0016220 R E A M S T R I N G - A R R A 0016240 Y - P T R U E U N B O U N D 0016260 - V A R I A B L E \r U N B O U 0016300 N D - V A R I A B L E - N A M E 0016320 U N D E F I N E D - F U N C T 0016340 I O N U N D E F I N E D - F U 0016360 N C T I O N - N A M E U S E - 0016400 V A L U E V E C T O R - L E N 0016420 G T H W A L K - F O R M \r W 0016440 A L K - F O R M - I N T E R N A 0016460 L W A L K - T E M P L A T E 0016500 W A R N I N G ) ) " I N T E R 0016520 L I S P " ) \r ( I L : P U T P R 0016540 O P S I L : X C L - P A C K A 0016560 G E I L : M A K E F I L E - E 0016600 N V I R O N M E N T ( : R E A 0016620 D T A B L E " I N T E R L I S 0016640 P " : P A C K A G E ( I L : 0016660 D E F P A C K A G E \r " X C L 0016700 " ( : U S E ) ) ) ) \r ( I L : 0016720 P U T P R O P S I L : X C L - 0016740 P A C K A G E I L : C O P Y R 0016760 I G H T ( " X e r o x C o r 0017000 p o r a t i o n " 1 9 8 6 ) ) 0017020 \r N I L \r 0017025