$ od -c -N 50000 [eris]<Lisp>Harmony>SOURCES>HELPDL.DCOM!1 0000000 ( F I L E C R E A T E D " 1 1 0000020 - S e p - 8 4 1 6 : 5 2 : 2 0 0000040 " ( " c o m p i l e d o n 0000060 " { E R I S } < L I S P C O R 0000100 E > S O U R C E S > H E L P D L 0000120 . ; 6 ) \r " 1 1 - S e p - 8 4 0000140 1 4 : 1 0 : 1 3 " b c o m p 0000160 l ' d i n " I N T E R L I S 0000200 P - D 1 1 - S e p - 8 4 . . 0000220 . " d a t e d " 1 1 - S e p 0000240 - 8 4 1 5 : 2 0 : 1 1 " ) \r ( 0000260 F I L E C R E A T E D " 1 1 - 0000300 S e p - 8 4 1 6 : 5 1 : 1 6 " 0000320 { E R I S } < L I S P C O R E 0000340 > S O U R C E S > H E L P D L . 0000360 ; 6 3 5 0 2 1 c h a n g e s 0000400 t o : ( V A R S H E L P D 0000420 L C O M S \r ) ( F N S I N T 0000440 C H A R ) p r e v i o u s d 0000460 a t e : " 1 1 - S e p - 8 4 0000500 1 5 : 0 4 : 4 8 " { E R I S } 0000520 < L I S P C O R E > S O U R C E 0000540 S > H E L P D L . ; 5 ) \r E R R 0000560 O R X D 1 \r ( L ( 0 E R X 0000600 M ) ) \0 037 \0 \0 \0 001 @ 265 022 \b \0 \0 0000620 m 377 g \0 \0 i \v \0 \0 \n \0 \0 020 001 @ 002 0000640 001 \n \0 \0 277 @ 260 352 \0 ( 3 1 Q S E 0000660 T E R R O R N 2 1 Q \ H E L 0000700 P D L B L O C K / E R R O R X 2 0000720 1 6 Q R E A L S T K N T H 0000740 5 E R R O R N ) \r ( 1 2 Q E 0000760 R R O R X ) \r ( ) \r \ H E L P D 0001000 L B L O C K / E R R O R X 2 D 0001020 1 \r ( P 3 B R E A K C H K 0001040 P 0 P R I N T M S G I 1 0001060 E R R O R P O S I 0 E R 0001100 R O R M E S S F 4 E R R O 0001120 R T Y P E L S T ) \0 340 004 001 \0 002 0001140 i 021 1 003 A @ 001 \n \0 \0 [ @ 001 T \n \0 0001160 \0 Y 265 033 @ 001 d l 020 360 262 2 277 @ 002 001 0001200 \t \0 \0 262 w @ 002 001 \t \0 \0 260 n 002 001 \t 0001220 \0 \0 Y 262 341 A d \t \0 \0 I @ 002 001 A \t 0001240 \0 \0 \v \0 \0 i \f \0 \0 277 260 312 d l 032 360 0001260 262 025 277 @ 002 001 003 262 C @ 002 001 \t \0 \0 A 0001300 \t \0 \0 277 020 l + 360 262 2 @ 002 001 ` \0 \0 0001320 \n \0 \0 Y 262 033 g \0 \0 o \0 \0 \0 A I 002 0001340 001 h 032 032 o \0 \0 \0 \v \0 \0 \n \0 \0 211 o 0001360 \0 \0 \0 @ 002 001 \n \0 \0 277 K 263 031 H 224 @ 0001400 \t \0 \0 277 A \t \0 \0 277 g \0 \0 o \0 \0 \0 0001420 \n \0 \0 277 A \t \0 \0 Z d \t \0 \0 Y 230 J 0001440 I A @ \f \0 \0 Y 202 \b \0 \0 277 g \0 \0 g 0001460 \0 \0 A I i h 032 032 032 032 \n \0 \0 h 020 \0 0001500 ( 3 3 4 Q R E T E V A L 3 1 0001520 2 Q S H O U L D N T 3 0 5 Q 0001540 \ H E L P D L B L O C K / E R 0001560 R O R X 3 2 7 4 Q F N T Y P 0001600 2 6 7 Q S T K N A M E 2 6 0001620 2 Q R E T E V A L 2 4 7 Q 0001640 R E L S T K 2 4 2 Q E R R O 0001660 R M E S S 2 3 0 Q E R R O R 0001700 2 1 5 Q R E T E V A L 2 1 0001720 2 Q S U B P A I R 1 6 2 Q 0001740 F A S S O C 1 4 2 Q R E L S 0001760 T K 1 3 6 Q H A S H O V E R 0002000 F L O W 1 1 0 Q R E T A P P 0002020 L Y 1 0 4 Q S U B S T 1 0 0002040 1 Q S T K A R G S 7 1 Q S 0002060 T K N A M E 6 1 Q E V A L 0002100 5 2 Q E O F C L O S E F 4 2 0002120 Q O P E N P 2 0 Q F A S S 0002140 O C 1 1 Q B R E A K C H E C 0002160 K ) \r ( 3 2 1 Q R E T F R O M 0002200 3 1 6 Q E R R O R X 2 5 3 0002220 Q E R R O R X 1 7 0 Q E R 0002240 R O R X 1 5 7 Q U S E R I N 0002260 T E R R U P T S ) \r ( 2 5 7 Q 0002300 ( E R R O R ! ) 2 2 2 Q " 0002320 u n d e f i n e d u s e r i 0002340 n t e r r u p t " 2 0 7 Q ( 0002360 O R ( E R S E T Q ( R E T F 0002400 R O M E R R O R P O S E X P 0002420 T ) ) ( P R O G N ( R E L 0002440 S T K E R R O R P O S ) ( E 0002460 R R O R ! ) ) ) 1 7 4 Q ( E 0002500 R R O R P O S E X P ) ) \r \ H 0002520 E L P D L B L O C K / E R R O R 0002540 X 3 D 1 \r ( L ( 3 E R R M 0002560 E S S 2 P O S 1 T Y P E 0002600 0 F N ) ) \0 m 003 \0 \0 004 021 0 0002620 002 B \t \0 \0 270 @ \t \0 \0 l 002 360 237 H B 0002640 \n \0 \0 Z 262 6 J 004 l 004 360 262 / 210 j 271 0002660 I d H 360 262 026 277 g \0 \0 A @ C 001 ` \0 0002700 \0 034 262 # d \t \0 \0 260 ! k 330 Y B \n \0 0002720 \0 Z 226 J 004 l 004 360 263 330 @ A B H h C 0002740 \r 006 \0 \0 020 @ \t \0 \0 \v \0 \0 i @ h B 0002760 C h 032 032 032 032 032 032 032 020 \0 ( 1 3 5 Q 0003000 S A V E D 1 1 3 2 Q S M A 0003020 R T A R G L I S T 1 2 5 Q \ 0003040 H E L P D L B L O C K / E R R O 0003060 R X 4 1 0 2 Q S T K A R G N 0003100 A M E 7 1 Q A R G L I S T 0003120 2 4 Q S T K A R G N A M E 1 0003140 3 Q A R G T Y P E 6 S T K 0003160 N A R G S ) \r ( 6 2 Q S T O R 0003200 A G E R R O R S 5 3 Q B R E 0003220 A K 1 ) \r ( ) \r \ H E L P D L B 0003240 L O C K / E R R O R X 4 D 1 \r 0003260 ( L ( 5 E R R M E S S 4 0003300 A R G V A L S 3 N A R G S 0003320 2 P O S 1 T Y P E 0 F 0003340 N ) ) 001 036 005 \0 \0 006 j 021 A 004 A g 0003360 \0 \0 360 250 A d g \0 \0 360 262 > 277 B 005 \b 0003400 265 - g \0 \0 g \0 \0 g \0 \0 @ h 032 032 g 0003420 \0 \0 D h 032 032 o \0 \0 \0 h 032 032 032 032 i 0003440 @ h B E h 032 032 032 032 032 032 032 020 C k 331 0003460 \n \0 \0 b \b 277 260 314 g \0 \0 360 250 A d g 0003500 \0 \0 360 262 037 277 B 005 \b 265 020 A g \0 \0 360 0003520 262 262 D 001 b \b 277 260 253 C \n \0 \0 b \b 277 0003540 260 242 @ E 001 ` \0 \0 034 224 d \t \0 \0 203 @ 0003560 \t \0 \0 \ \v \0 \0 273 L 265 8 C 246 L \t \0 0003600 \0 b 006 277 H d C 360 262 5 277 g \0 \0 g \0 0003620 \0 g \0 \0 K i @ h B E h 032 032 032 032 032 0003640 032 032 h 032 032 g \0 \0 I h 032 032 h 032 032 032 0003660 020 004 l 004 361 263 306 L h 032 274 260 300 k 330 270 0003700 I L 265 " @ \b \0 \0 h 032 032 \t \0 \0 272 K 0003720 J h 032 \n \0 \0 277 J B 005 \b 262 033 H B \n 0003740 \0 \0 260 033 d 004 l 004 361 245 277 L h 274 260 352 0003760 001 L 002 274 260 344 D 001 D 002 b \b 277 032 h 032 0004000 \n \0 \0 271 261 377 200 \0 ( 4 3 0 Q \ N 0004020 C O N C 2 3 6 7 Q S T K A R 0004040 G 3 5 3 Q \ N C O N C 2 3 0004060 4 3 Q P A C K 3 3 5 Q G E 0004100 N S Y M 2 2 6 Q L E N G T H 0004120 2 1 4 Q S A V E D 1 2 1 0 0004140 Q S M A R T A R G L I S T 2 0004160 0 3 Q A R G L I S T 1 6 2 Q 0004200 S T K A R G S 1 1 0 Q S T 0004220 K A R G S ) \r ( 2 7 5 Q Q U O 0004240 T E 2 5 1 Q B R E A K 1 2 0004260 4 6 Q Q U O T E 2 4 3 Q E 0004300 V A L A 1 7 5 Q S T O R A G 0004320 E R R O R S 1 4 4 Q F S U B 0004340 R * 1 2 7 Q F S U B R * 1 0004360 2 0 Q S U B R * 4 7 Q Q U 0004400 O T E 4 0 Q Q U O T E 3 5 0004420 Q B L K A P P L Y 3 2 Q B 0004440 R E A K 1 1 6 Q C E X P R * 0004460 7 E X P R * ) \r ( 5 7 Q 0004500 ( Q U O T E I N T E R N A L ) 0004520 ) \r I N T E R R U P T D 1 \r ( 0004540 L ( 2 I N T Y P E ) P 0 0004560 E R R O R P O S I 1 I N 0004600 T A R G S I 0 I N T F N ) 0004620 \0 266 001 \0 \0 003 g \0 \0 021 001 \0 B d k 0004640 360 222 261 \0 223 d l 002 360 262 ' 277 g \0 \0 g 0004660 \0 \0 h i @ d 003 264 \n 001 g \0 \0 h 032 032 0004700 h g \0 \0 h 032 032 032 032 032 032 \n \0 \0 260 g 0004720 d l 003 360 231 277 g \0 \0 i \n \0 \0 260 X j 0004740 360 246 B d m 377 360 235 277 g \0 \0 @ A \n \0 0004760 \0 \n \0 \0 260 A l @ 361 262 4 B l @ 331 b 0005000 004 ` \0 \0 \n \0 \0 265 \f o \0 \0 \0 B \n \0 0005020 \0 260 $ 002 001 \t \0 \0 277 i \t \0 \0 \t \0 \0 0005040 277 g \0 \0 @ A \n \0 \0 \n \0 \0 207 o \0 \0 0005060 \0 B \n \0 \0 277 g \0 \0 @ d \t \0 \0 g \0 0005100 \0 h A \r 005 \0 \0 \n \0 \0 h 020 \0 ( 2 6 0005120 2 Q R E T E V A L 2 5 7 Q 0005140 \ H E L P D L B L O C K / E R R 0005160 O R X 4 2 4 6 Q F N T Y P 0005200 2 3 5 Q H E L P 2 2 4 Q R 0005220 E T E V A L 2 2 1 Q M A K E 0005240 A P P L Y 2 1 0 Q B K B U F 0005260 S 2 0 5 Q C L B U F S 2 0 0005300 0 Q E V A L 1 7 1 Q E R R 0005320 O R 1 5 7 Q F A S S O C 1 0005340 3 4 Q R E T E V A L 1 3 1 Q 0005360 M A K E A P P L Y 1 0 5 Q 0005400 P R I N 1 6 6 Q R E T E V A 0005420 L ) \r ( 2 5 1 Q I N T E R R U 0005440 P T 2 4 1 Q I N T E R R U P 0005460 T 2 1 4 Q I N T E R R U P T 0005500 1 5 4 Q U S E R I N T E R R 0005520 U P T S 1 2 4 Q I N T E R R 0005540 U P T 1 0 1 Q g c t r p 5 0005560 4 Q I N T E R R U P T 4 5 Q 0005600 - - 3 2 Q B R E A K 1 2 0005620 7 Q I N T E R R U P T 2 I 0005640 N T E R R U P T ) \r ( 2 3 1 Q 0005660 " b a d i n t e r r u p t 0005700 t y p e " 1 6 5 Q " u n d e 0005720 f i n e d u s e r i n t e r 0005740 r u p t " ) \r M A K E A P P L Y 0005760 D 1 \r ( I 1 I N T A R G S 0006000 I 0 I N T F N ) \0 ' \0 \0 0006020 \0 002 g \0 \0 g \0 \0 @ h 032 032 g \0 \0 @ 0006040 \t \0 \0 l 003 360 222 A 001 200 A h 032 032 o \0 0006060 \0 \0 h 032 032 032 032 020 \0 ( 2 0 Q A R 0006100 G T Y P E ) \r ( 1 4 Q Q U O T 0006120 E 5 Q U O T E 2 A P P L 0006140 Y ) \r ( 3 7 Q ( Q U O T E 0006160 I N T E R N A L ) ) \r F A U L T 0006200 1 D 1 \r ( L ( 3 F A U L T 0006220 Z 2 F A U L T A P P L Y F L 0006240 G 1 F A U L T A R G S 0 0006260 F A U L T X ) P 3 E R R O 0006300 R M E S S P 2 P R I N T M 0006320 S G ) \0 246 004 \0 \0 004 m 377 B 223 g \0 0006340 \0 202 g \0 \0 \n \0 \0 @ i 021 023 003 ` \0 \0 0006360 234 @ 004 l 004 361 246 B 246 @ 027 \0 \0 277 B 222 0006400 l . 216 @ d 004 l 004 361 243 277 l , 203 001 271 0006420 l - I \n \0 \0 C 233 B 251 \b \0 \0 C h 032 0006440 \n \0 \0 202 \b \0 \0 [ H \t \0 \0 257 H \t \0 0006460 \0 277 J 224 K \t \0 \0 277 \b \0 \0 277 ` \0 \0 0006500 227 g \0 \0 I \n \0 \0 277 B 235 I A \n \0 \0 0006520 b \0 277 B 223 g \0 \0 202 g \0 \0 g \0 \0 @ 0006540 i I h g \0 \0 H \n \0 \0 H \t \0 \0 277 h 0006560 032 K h 032 032 032 032 032 032 032 \n \0 \0 h 020 \0 0006600 ( 2 4 2 Q R E T E V A L 2 2 0006620 3 Q R E L S T K 2 1 7 Q B 0006640 L I P V A L 1 6 5 Q M A K E 0006660 A P P L Y 1 5 5 Q L I S P X 0006700 P U T 1 4 1 Q E R R O R ! 0006720 1 3 5 Q E R R O R M E S S 1 0006740 2 6 Q R E L S T K 1 2 1 Q 0006760 B R E A K C H E C K 1 1 4 Q 0007000 E R R O R N 1 1 0 Q \ A P P 0007020 E N D 2 1 0 2 Q E R R O R N 0007040 7 3 Q S E T E R R O R N 1 0007060 5 Q S T K N T H ) \r ( 2 1 3 Q 0007100 * F O R M * 2 0 4 Q B R E 0007120 A K 1 2 0 1 Q F A U L T E V 0007140 A L 1 7 5 Q F A U L T A P P 0007160 L Y 1 5 1 Q * E R R O R * 0007200 1 4 5 Q L I S P X H I S T O R 0007220 Y 4 2 Q L A S T W O R D 2 0007240 5 Q D W I M F L G 1 2 Q F 0007260 A U L T E V A L 6 F A U L T 0007300 A P P L Y ) \r ( ) \r B R E A K C 0007320 H E C K D 1 \r ( L ( 1 E R 0007340 X N 0 E R R O R P O S ) F 0007360 0 H E L P F L A G F 1 0007400 H E L P C L O C K F 2 P R 0007420 I N T M S G ) \0 K \0 003 \0 002 A l 0007440 022 360 263 B P 245 @ \t \0 \0 h 020 @ ` \0 \0 0007460 \n \0 \0 d g \0 \0 360 263 362 263 * P g \0 \0 0007500 360 263 # Q d 005 001 241 005 002 264 035 ` \0 \0 d 0007520 005 001 241 005 002 264 022 l 002 \t \0 \0 Q 331 ` \0 0007540 \0 361 264 005 i c 004 020 \0 ( 7 5 Q C L 0007560 O C K 2 4 Q \ B R E A K C H 0007600 E C K B L O C K / F I N D E R S 0007620 E T 1 3 Q \ B R E A K C H E 0007640 C K B L O C K / F I N D E R S E 0007660 T ) \r ( 1 0 2 Q H E L P T I M 0007700 E 6 0 Q H E L P T I M E 4 0007720 1 Q B R E A K ! 3 0 Q N O 0007740 B R E A K 2 1 Q H E L P D E 0007760 P T H ) \r ( ) \r \ B R E A K C H 0010000 E C K B L O C K / F I N D E R S 0010020 E T D 1 \r ( L ( 1 N 0 0010040 E R R O R P O S ) F 0 P R 0010060 I N T M S G ) \0 177 \0 001 \0 002 j @ 0010100 \n \0 \0 b \0 277 A 262 031 @ d \t \0 \0 262 023 0010120 277 A g \0 \0 @ i \v \0 \0 331 k 331 b 002 277 0010140 @ \t \0 \0 g \0 \0 360 262 B l 002 @ \t \0 \0 0010160 361 h 360 264 \b l 002 @ \n \0 \0 d i 360 234 277 0010200 i c \0 277 A 264 037 j A 361 260 032 265 \f ` \0 0010220 \0 h 360 c \0 265 017 210 g \0 \0 360 234 h c \0 0010240 277 g \0 \0 @ \t \0 \0 277 020 m 377 @ d \v \0 0010260 \0 b \0 264 004 260 221 \t \0 \0 h 020 \0 ( 1 7 0010300 3 Q R E L S T K 1 6 2 Q S 0010320 T K N T H 1 5 1 Q R E L S T 0010340 K 7 4 Q S T K A R G 6 1 Q 0010360 S T K N A R G S 4 5 Q S T 0010400 K N A M E 3 3 Q B L I P V A 0010420 L 1 7 Q R E A L F R A M E P 0010440 4 S T K N T H ) \r ( 1 4 5 Q 0010460 N O B R E A K 1 3 4 Q N O 0010500 B R E A K 1 2 2 Q N L S E T 0010520 Q G A G 5 0 Q E R R O R S E 0010540 T 2 6 Q * F O R M * ) \r ( ) 0010560 \r H E L P D 1 \r ( I 2 B R 0010600 K T Y P E I 1 M E S S 2 0010620 I 0 M E S S 1 ) \0 034 \0 \0 \0 0010640 003 o \0 \0 \0 i g \0 \0 h B @ A g \0 \0 0010660 h 032 032 032 l 006 g \0 \0 017 016 020 \0 N I L 0010700 \r ( 2 7 Q B R E A K 1 1 6 Q 0010720 h e l p ! 7 H E L P ) \r ( 0010740 3 ( E R R O R ( Q U O T E 0010760 " ? ? " ) ( Q U O T E " " 0011000 ) T ) ) \r S H O U L D N T D 0011020 1 \r ( I 0 M E S S ) \0 023 \0 0011040 \0 \0 001 o \0 \0 \0 @ 265 006 o \0 \0 \0 g \0 0011060 \0 \v \0 \0 020 \0 ( 2 0 Q H E L P ) 0011100 \r ( 1 5 Q E R R O R X ) \r ( 0011120 1 2 Q " " 3 " \r \r S h o u 0011140 l d n ' t h a p p e n ! " ) \r 0011160 E R R O R D 1 \r ( P 0 P O 0011200 S I 2 N O B R E A K I 0011220 1 M E S S 2 I 0 M E S S 0011240 1 F 1 H E L P F L A G ) 0011260 \0 G 001 001 \0 003 B 262 9 Q g \0 \0 360 263 2 0011300 021 020 \0 ` \0 \0 262 030 g \0 \0 m 377 \n \0 \0 0011320 X 233 l 002 H \n \0 \0 H \t \0 \0 277 234 l 021 0011340 @ A 032 \n \0 \0 277 \b \0 \0 277 023 \b \0 \0 020 0011360 l 021 @ A 032 h 032 032 \t \0 \0 020 \0 ( 1 0 0011400 4 Q E R R O R X 7 0 Q E R 0011420 R O R ! 6 3 Q E R R O R M E 0011440 S S 5 7 Q S E T E R R O R N 0011460 4 5 Q R E L S T K 4 1 Q 0011500 S T K A R G 3 1 Q S T K P O 0011520 S ) \r ( 2 4 Q E R R O R S E T 0011540 1 7 Q N L S E T Q G A G 6 0011560 B R E A K ! ) \r ( ) \r S E A R 0011600 C H P D L D 1 \r ( P 0 S R 0011620 C H X I 1 S R C H P O S 0011640 I 0 S R C H F N ) \0 0 001 \0 0011660 \0 002 021 020 \0 A 246 g \0 \0 \t \0 \0 204 j A 0011700 \n \0 \0 b 002 277 m 377 A d \v \0 \0 b 002 d 0011720 236 \t \0 \0 X A l 002 @ 017 016 262 353 H A 032 0011740 020 \0 ( 4 1 Q S T K N A M E 3 0011760 2 Q S T K N T H 2 0 Q S T 0012000 K N T H 1 2 Q S T K P O S ) 0012020 \r ( 7 S E A R C H P D L ) \r ( 0012040 ) \r M A P D L D 1 \r ( I 1 0012060 M A P D L P O S I 0 M A P 0012100 D L F N ) \0 ) \0 \0 \0 002 A 246 g \0 0012120 \0 \t \0 \0 204 j A \n \0 \0 b 002 277 m 377 A 0012140 d \v \0 \0 b 002 d 240 020 \t \0 \0 A l 002 @ 0012160 017 016 260 352 \0 ( 3 7 Q S T K N A M 0012200 E 2 7 Q S T K N T H 1 5 Q 0012220 S T K N T H 7 S T K P O S 0012240 ) \r ( 4 M A P D L ) \r ( ) \r F 0012260 A U L T A P P L Y D 1 \r ( I 0012300 1 F A U L T A R G S I 0 0012320 F A U L T F N ) \0 \b \0 \0 \0 002 @ 0012340 A i \v \0 \0 020 \0 ( 5 F A U L T 1 0012360 ) \r N I L \r ( ) \r E R R O R M E 0012400 S S D 1 \r ( P 0 E X T R A 0012420 M E S I 0 U ) \0 236 001 \0 \0 0012440 001 @ 265 \a \b \0 \0 b \0 001 l 021 360 236 @ 002 0012460 001 b \0 001 @ 002 g \0 \0 \v \0 \0 020 ` \0 \0 0012500 262 034 @ 001 l 022 360 263 025 @ 001 ` \0 \0 \n \0 0012520 \0 251 g \0 \0 @ 002 001 \n \0 \0 277 ` \0 \0 262 0012540 Z @ 002 002 001 021 001 \0 i \t \0 \0 @ 001 \t \0 0012560 \0 i \n \0 \0 i \t \0 \0 @ 002 001 i \n \0 \0 0012600 H 003 262 1 o \0 \0 \0 i \n \0 \0 277 H 001 i 0012620 d \v \0 \0 277 o \0 \0 \0 i \n \0 \0 277 H 002 0012640 262 023 o \0 \0 \0 i \n \0 \0 277 H 002 i d \v 0012660 \0 \0 277 i \t \0 \0 h 020 @ \t \0 \0 020 \0 ( 0012700 2 3 3 Q E R R O R M 2 2 5 Q 0012720 L I S P X T E R P R I 2 2 0 0012740 Q L I S P X P R I N 2 2 1 0 0012760 Q L I S P X P R I N 1 1 7 3 0013000 Q L I S P X P R I N 1 1 6 2 0013020 Q L I S P X P R I N 2 1 5 2 0013040 Q L I S P X P R I N 1 1 3 6 0013060 Q L I S P X P R I N 2 1 2 7 0013100 Q L I S P X T E R P R I 1 2 0013120 3 Q L I S P X P R I N 1 1 1 0013140 7 Q E R R O R S T R I N G 1 0013160 1 2 Q L I S P X T E R P R I 0013200 7 1 Q L I S P X P U T 5 7 Q 0013220 M E M B 3 2 Q E R R O R M 0013240 E S S 1 5 E R R O R N ) \r ( 0013260 7 5 Q L I S P X P R I N T F L 0013300 G 6 3 Q * E R R O R * 5 4 0013320 Q S T O R A G E R R O R S 3 0013340 6 Q L I S P X H I S T O R Y 0013360 2 7 Q E R R O R ) \r ( 2 0 4 0013400 Q " i n " 1 6 7 Q " } 0013420 " 1 4 6 Q " { i n " ) \r 0013440 E R R O R M E S S 1 D 1 \r ( P 0013460 1 M E S S A G E P 0 B 0013500 A D G U Y I 2 M E S S 3 0013520 I 1 M E S S 2 I 0 M E 0013540 S S 1 ) \0 _ 002 \0 \0 003 021 001 @ 265 0013560 \r A 247 B i d \v \0 \0 h 020 @ i \n \0 \0 0013600 @ 004 l 004 361 223 A 005 \a 225 k i \n \0 \0 203 0013620 i \t \0 \0 277 @ X A Y d 005 \a 232 A i \n 0013640 \0 \0 277 i \t \0 \0 211 A X i d \v \0 \0 277 0013660 @ Y 277 ` \0 \0 264 304 B g \0 \0 360 263 274 g 0013700 \0 \0 H \n \0 \0 277 260 262 \0 ( 1 3 2 Q 0013720 L I S P X P U T 1 0 3 Q L I 0013740 S P X P R I N T 7 3 Q L I S 0013760 P X T E R P R I 6 6 Q L I S 0014000 P X P R I N 1 5 0 Q L I S P 0014020 X T E R P R I 4 3 Q L I S P 0014040 X S P A C E S 2 4 Q L I S P 0014060 X P R I N 1 1 5 Q L I S P X 0014100 P R I N T ) \r ( 1 2 6 Q * E R 0014120 R O R * 1 2 0 Q h e l p ! 0014140 1 1 2 Q L I S P X H I S T O R 0014160 Y ) \r ( ) \r I N T C H A R D 1 0014200 \r ( L ( 2 H A R D F L G 1 0014220 T Y P / F O R M 0 C H A R 0014240 ) ) 001 : 004 \0 \0 003 021 @ 003 @ d 241 h 0014260 020 i 360 262 - \b \0 \0 212 d 001 \t \0 \0 H \n 0014300 \0 \0 270 002 003 265 364 \b \0 \0 217 d 001 273 g \0 0014320 \0 K \n \0 \0 H \n \0 \0 270 002 003 265 357 H 020 0014340 @ d 003 262 - 277 @ 265 004 H 020 001 @ 002 001 @ 0014360 d 002 001 003 232 002 002 001 @ 002 002 002 b \0 277 205 0014400 002 002 b \0 277 h \v \0 \0 H \n \0 \0 X 260 327 0014420 d 005 001 241 005 002 263 * @ d 004 l 004 360 237 d 0014440 \t \0 \0 k 360 230 277 @ \t \0 \0 b \0 260 024 \t 0014460 \0 \0 265 \v l 033 @ h 032 032 \t \0 \0 b \0 277 0014500 @ ` \0 \0 \n \0 \0 Y @ \t \0 \0 Z d 262 ' 0014520 g \0 \0 360 246 J g \0 \0 360 262 026 I 002 001 003 0014540 264 025 @ I 002 001 003 J g \0 \0 360 h 032 032 203 0014560 @ J h 032 032 X A i 360 263 \ I 232 I ` \0 0014600 \0 \n \0 \0 027 \0 \0 277 J d A 360 222 261 377 " 0014620 224 @ \t \0 \0 277 A 265 004 260 ; 003 262 037 @ g 0014640 \0 \0 \n \0 \0 277 @ A B h 032 032 032 ` \0 \0 0014660 032 027 \0 \0 277 @ h H 032 032 020 A 004 l 004 360 0014700 226 A \t \0 \0 Z 265 020 @ A \n \0 \0 277 @ h 0014720 H 032 032 X H 020 \t \0 \0 277 J A H 032 032 270 0014740 260 350 \0 ( 4 5 7 Q S E T I N T E 0014760 R R U P T 4 4 3 Q S E T I N 0015000 T E R R U P T 4 3 3 Q G E T 0015020 I N T E R R U P T 3 7 3 Q S 0015040 E T I N T E R R U P T 3 5 3 Q 0015060 S E T I N T E R R U P T 3 3 0015100 2 Q D R E M O V E 2 4 2 Q 0015120 G E T I N T E R R U P T 2 3 5 0015140 Q F A S S O C 2 2 3 Q E R 0015160 R O R X 2 1 0 Q G E T I N T 0015200 E R R U P T 2 0 1 Q C H C O 0015220 N 1 1 7 1 Q N C H A R S 1 0015240 4 3 Q \ N C O N C 2 1 3 7 Q 0015260 I N T C H A R 5 7 Q \ N C 0015300 O N C 2 5 3 Q A P P L Y 4 0015320 0 Q L I S P I N T E R R U P T 0015340 S 3 0 Q \ N C O N C 2 2 4 0015360 Q I N T C H A R 1 6 Q G E 0015400 T I N T E R R U P T ) \r ( 4 1 2 0015420 Q U S E R I N T E R R U P T S 0015440 4 0 6 Q U S E R I N T E R R 0015460 U P T S 3 7 0 Q I N T E R R 0015500 U P T 3 3 5 Q U S E R I N T 0015520 E R R U P T S 3 2 7 Q U S E 0015540 R I N T E R R U P T S 3 0 1 Q 0015560 E R R O R X 2 5 7 Q I N T 0015600 E R R U P T 2 5 1 Q E R R O 0015620 R X 2 3 2 Q U S E R I N T E 0015640 R R U P T S 4 7 Q I N T C H 0015660 A R ) \r ( ) \r I N T E R R U P T 0015700 C H A R D 1 \r ( L ( 2 H A 0015720 R D F L G 1 T Y P / F O R M 0015740 0 C H A R ) F 1 L I S 0015760 P X H I S T ) \0 030 001 001 \0 003 @ A 0016000 B \v \0 \0 021 001 \0 Q 231 g \0 \0 H h 032 032 0016020 \t \0 \0 H 020 \0 ( 2 4 Q U N D O S 0016040 A V E 5 I N T C H A R ) \r ( 0016060 1 5 Q I N T E R R U P T C H A 0016100 R ) \r ( ) \r R E S E T T E R M C 0016120 H A R S D 1 \r ( L ( 1 S Y 0016140 S T E M T Y P E 0 T E R M T 0016160 A B L E ) ) \0 372 \0 \0 \0 002 A 265 005 0016200 g \0 \0 d g \0 \0 360 246 d g \0 \0 360 262 H 0016220 277 l 025 l 016 \n \0 \0 277 l 025 \t \0 \0 263 026 0016240 l 025 g \0 \0 @ \v \0 \0 277 l 025 g \0 \0 @ 0016260 \v \0 \0 277 l 177 l 032 \n \0 \0 277 l 177 \t \0 0016300 \0 251 l 177 g \0 \0 @ \v \0 \0 277 l 023 l 030 0016320 \n \0 \0 261 \0 241 d g \0 \0 360 262 > 277 l 025 0016340 l 016 \n \0 \0 277 l 025 \t \0 \0 263 026 l 025 g 0016360 \0 \0 @ \v \0 \0 277 l 025 g \0 \0 @ \v \0 \0 0016400 277 l 177 \t \0 \0 277 l 177 \t \0 \0 263 h l 177 0016420 g \0 \0 @ \v \0 \0 260 ] d g \0 \0 360 246 d 0016440 g \0 \0 360 262 L 277 l 016 l 025 \n \0 \0 277 l 0016460 032 l 177 \n \0 \0 277 l 023 l 030 \n \0 \0 277 l 0016500 021 \t \0 \0 263 026 l 021 g \0 \0 @ \v \0 \0 277 0016520 l 021 g \0 \0 @ \v \0 \0 277 k \t \0 \0 250 k 0016540 g \0 \0 @ \v \0 \0 277 l 030 l 023 \n \0 \0 203 0016560 277 \b \0 \0 h 020 \0 ( 3 6 6 Q S H O 0016600 U L D N T 3 6 1 Q \ R E S E 0016620 T T E R M C H A R S / R E S E T 0016640 I N T 3 5 1 Q S E T S Y N T 0016660 A X 3 4 0 Q G E T I N T E R 0016700 R U P T 3 3 3 Q S E T S Y N 0016720 T A X 3 2 1 Q E C H O C O N 0016740 T R O L 3 0 6 Q G E T I N T 0016760 E R R U P T 3 0 0 Q \ R E S 0017000 E T T E R M C H A R S / R E S E 0017020 T I N T 2 7 0 Q \ R E S E T 0017040 T E R M C H A R S / R E S E T I 0017060 N T 2 6 0 Q \ R E S E T T E 0017100 R M C H A R S / R E S E T I N T 0017120 2 3 1 Q S E T S Y N T A X 0017140 2 1 6 Q G E T I N T E R R U P 0017160 T 2 1 0 Q \ R E S E T T E R 0017200 M C H A R S / R E S E T I N T 0017220 2 0 2 Q S E T S Y N T A X 1 0017240 7 0 Q E C H O C O N T R O L 0017260 1 5 5 Q G E T I N T E R R U P 0017300 T 1 4 7 Q \ R E S E T T E R 0017320 M C H A R S / R E S E T I N T 0017340 1 2 5 Q \ R E S E T T E R M C 0017360 H A R S / R E S E T I N T 1 1 0017400 5 Q S E T S Y N T A X 1 0 3 0017420 Q G E T I N T E R R U P T 7 0017440 5 Q \ R E S E T T E R M C H A 0017460 R S / R E S E T I N T 6 5 Q 0017500 S E T S Y N T A X 5 3 Q E C 0017520 H O C O N T R O L 4 0 Q G E 0017540 T I N T E R R U P T 3 2 Q \ 0017560 R E S E T T E R M C H A R S / R 0017600 E S E T I N T ) \r ( 3 4 5 Q C 0017620 H A R D E L E T E 3 2 7 Q L 0017640 I N E D E L E T E 3 1 5 Q I 0017660 G N O R E 2 4 5 Q D 2 3 7 0017700 Q T E N E X 2 2 5 Q C H A 0017720 R D E L E T E 1 7 6 Q L I N 0017740 E D E L E T E 1 6 4 Q I G N 0017760 O R E 1 3 4 Q V A X 1 1 1 0020000 Q C H A R D E L E T E 6 1 Q 0020020 L I N E D E L E T E 4 7 Q 0020040 I G N O R E 1 7 Q J E R I C 0020060 H O 1 1 Q T O P S 2 0 5 0020100 D ) \r ( ) \r \ R E S E T T E R M 0020120 C H A R S / R E S E T I N T D 0020140 1 \r ( L ( 1 T O 0 F R O 0020160 M ) ) \0 0 002 \0 \0 002 021 001 @ \t \0 0020200 \0 X d 262 % g \0 \0 360 263 036 H g \0 \0 360 0020220 263 027 A \t \0 \0 Y 224 I H 360 264 \r @ \t \0 0020240 \0 277 A H \n \0 \0 h 020 \0 ( 5 4 Q S 0020260 E T I N T E R R U P T 4 6 Q 0020300 S E T I N T E R R U P T 3 3 Q 0020320 G E T I N T E R R U P T 6 0020340 G E T I N T E R R U P T ) \r ( 2 0020360 4 Q I N T E R R U P T 1 5 Q 0020400 E R R O R X ) \r ( ) \r S T K A 0020420 R G S D 1 \r ( P 0 L I 0020440 1 N A R G S I 0 P O S ) 0020460 \0 037 001 \0 \0 002 021 020 \0 A 265 \b @ \t \0 0020500 \0 b 002 j 360 221 H 020 A @ \n \0 \0 H 032 270 0020520 A k 331 260 356 \0 ( 2 5 Q S T K A R 0020540 G 1 1 Q S T K N A R G S ) \r 0020560 N I L \r ( ) \r V A R I A B L E S 0020600 D 1 \r ( P 1 L P 0 N 0020620 I 0 P O S ) \0 033 002 \0 \0 001 0020640 021 001 @ \t \0 \0 X d j 360 221 I 020 @ \n 0020660 \0 \0 I 032 271 H k 331 260 357 \0 ( 2 1 Q 0020700 S T K A R G N A M E 6 S T K 0020720 N A R G S ) \r N I L \r ( ) \r F A 0020740 U L T E V A L D 1 \r ( I 0 0020760 F A U L T X ) \0 006 \0 \0 \0 001 @ \t 0021000 \0 \0 020 \0 ( 3 F A U L T 1 ) \r N 0021020 I L \r ( ) \r L I S P I N T E R R 0021040 U P T S D 1 \r ( I 0 S Y S 0021060 T Y P E ) \0 < \0 \0 \0 001 @ 265 005 g 0021100 \0 \0 d g \0 \0 360 245 d g \0 \0 360 224 o \0 0021120 \0 \0 020 d g \0 \0 360 224 o \0 \0 \0 020 d g 0021140 \0 \0 360 224 o \0 \0 \0 020 g \0 \0 360 224 o \0 0021160 \0 \0 020 \b \0 \0 020 \0 ( 7 1 Q S H O 0021200 U L D N T ) \r ( 5 7 Q D 4 5 0021220 Q V A X 3 2 Q T E N E X 0021240 1 7 Q J E R I C H O 1 1 Q 0021260 T O P S 2 0 5 D ) \r ( 6 5 0021300 Q ( ( 2 B R E A K ) ( 4 0021320 R E S E T ) ( 5 E R R O R ) 0021340 ( 1 0 Q H E L P ) ( 2 0 Q 0021360 P R I N T L E V E L ) ( 2 4 0021400 Q C O N T R O L - T ) ( 2 5 0021420 Q C T R L U F L G ) ( 1 7 7 0021440 Q R U B O U T ) ) 5 3 Q ( 0021460 ( 0 R U B O U T ) ( 2 B R 0021500 E A K ) ( 3 \ Q U I T ) ( 0021520 4 R E S E T ) ( 5 E R R O 0021540 R ) ( 1 0 Q H E L P ) ( 1 0021560 7 Q O U T P U T B U F F E R ) 0021600 ( 2 0 Q P R I N T L E V E L 0021620 ) ( 4 5 Q \ Q U O T E ) ( 0021640 2 3 Q \ S T O P O U T P U T ) 0021660 ( 2 4 Q C O N T R O L - T ) 0021700 ( 1 6 Q C T R L U F L G ) 0021720 ( 3 2 Q \ P A U S E ) ) 4 0 0021740 Q ( ( 1 0 Q H E L P ) ( 2 0021760 0 Q P R I N T L E V E L ) ( 0022000 2 3 Q S T O R A G E ) ( 3 4 0022020 Q R U B O U T ) ( 5 E R R 0022040 O R ) ( 4 R E S E T ) ( 1 0022060 7 Q O U T P U T B U F F E R ) 0022100 ( 2 B R E A K ) ( 2 5 Q 0022120 C T R L U F L G ) ( 2 4 Q C 0022140 O N T R O L - T ) ) 2 5 Q ( 0022160 ( 1 0 Q H E L P ) ( 2 0 Q 0022200 P R I N T L E V E L ) ( 3 0 Q 0022220 S T O R A G E ) ( 3 2 Q R 0022240 U B O U T ) ( 5 E R R O R ) 0022260 ( 4 R E S E T ) ( 1 7 Q 0022300 O U T P U T B U F F E R ) ( 2 0022320 B R E A K ) ( 1 6 Q C T R 0022340 L U F L G ) ( N I L C O N T 0022360 R O L - T ) ) ) \r ( P R E T T Y 0022400 C O M P R I N T H E L P D L C 0022420 O M S ) \r ( R P A Q Q H E L P 0022440 D L C O M S ( ( F N S H E L 0022460 P S H O U L D N T E R R O R 0022500 E R R O R M E S S E R R O R 0022520 M E S S 1 E R R O R X E R R 0022540 O R X 2 E R R O R X 3 E R R 0022560 O R X 4 \r B R E A K C H E C K 0022600 F I N D E R S E T S T K A R 0022620 G S V A R I A B L E S I N T 0022640 E R R U P T M A K E A P P L Y 0022660 F A U L T E V A L F A U L T 0022700 A P P L Y F A U L T 1 S E A 0022720 R C H P D L M A P D L \r I N 0022740 T C H A R I N T E R R U P T C 0022760 H A R L I S P I N T E R R U P 0023000 T S R E S E T T E R M C H A R 0023020 S R E S E T I N T ) ( I N I 0023040 T V A R S ( H E L P F L A G 0023060 T ) ( H E L P D E P T H 7 ) 0023100 ( \r H E L P T I M E 1 0 0 0 0023120 ) ( H E L P C L O C K ) ( N 0023140 L S E T Q G A G T ) ( S T O 0023160 R A G E R R O R S ( Q U O T E 0023200 ( 2 1 2 2 1 3 1 3 4 ) 0023220 ) ) ( E R R O R T Y P E L S T 0023240 ) ( \r U S E R I N T E R R U P 0023260 T S ) ) ( P ( M O V D ? ( 0023300 Q U O T E F A U L T 1 ) ( Q 0023320 U O T E O L D F A U L T 1 ) ) 0023340 ( M O V D ? ( Q U O T E C 0023360 L O S E F ) ( Q U O T E E O 0023400 F C L O S E F ) ) \r ( P U T D 0023420 Q ? B R E A K 1 ( N L A M B 0023440 D A ( B R K E X P B R K W H 0023460 E N B R K F N ) ( P R O G 0023500 ( B R K T E M ) ( P R I N T 0023520 ( L I S T B R K F N ( Q U O 0023540 T E B R O K E N ) ) T T ) 0023560 \r L P ( P R I N 1 " : " 0023600 T T ) ( S E L E C T Q ( S 0023620 E T Q B R K T E M ( R E A D 0023640 T T ) ) ( O K ( R E T E 0023660 V A L ( Q U O T E B R E A K 0023700 1 ) B R K E X P ) ) ( B T 0023720 ( \r B A C K T R A C E ( Q U O 0023740 T E B R E A K 1 ) T 0 ) ) 0023760 ( B T V ( B A C K T R A C E 0024000 ( Q U O T E B R E A K 1 ) 0024020 T 7 ) ) N I L ) ( P R I N 0024040 T ( E V A L B R K T E M ( 0024060 Q U O T E : ) \r ) T T ) 0024100 ( G O L P ) ) ) ) ( A N D 0024120 ( C C O D E P ( Q U O T E G 0024140 E T I N T E R R U P T ) ) ( I 0024160 N T C H A R T ) ) ) ( B L O 0024200 C K S * H E L P D L B L O C 0024220 K S ) ( D E C L A R E : \r E 0024240 V A L @ C O M P I L E ( A D D 0024260 V A R S ( S Y S S P E C V A R 0024300 S H E L P F L A G ) ) D O N 0024320 T C O P Y ( M A C R O S C F 0024340 O B F ) ) ( D E C L A R E : 0024360 D O N T E V A L @ L O A D \r D 0024400 O E V A L @ C O M P I L E D O 0024420 N T C O P Y C O M P I L E R V 0024440 A R S ( A D D V A R S ( N L 0024460 A M A ) ( N L A M L ) ( L A 0024500 M A ) ) ) ) ) \r ( R P A Q ? H 0024520 E L P F L A G T ) \r ( R P A Q 0024540 ? H E L P D E P T H 7 ) \r ( 0024560 R P A Q ? H E L P T I M E 1 0024600 0 0 0 ) \r ( R P A Q ? H E L P 0024620 C L O C K ) \r ( R P A Q ? N L 0024640 S E T Q G A G T ) \r ( R P A Q 0024660 ? S T O R A G E R R O R S ( 0024700 Q U O T E ( 2 1 2 2 1 3 0024720 1 3 4 ) ) ) \r ( R P A Q ? E 0024740 R R O R T Y P E L S T ) \r ( R P 0024760 A Q ? U S E R I N T E R R U P 0025000 T S ) \r ( M O V D ? ( Q U O T 0025020 E F A U L T 1 ) ( Q U O T E 0025040 O L D F A U L T 1 ) ) \r ( M O 0025060 V D ? ( Q U O T E C L O S E 0025100 F ) ( Q U O T E E O F C L O 0025120 S E F ) ) \r ( P U T D Q ? B R 0025140 E A K 1 ( N L A M B D A ( B 0025160 R K E X P B R K W H E N B R 0025200 K F N ) ( P R O G ( B R K T 0025220 E M ) ( P R I N T ( L I S T 0025240 B R K F N ( Q U O T E B R 0025260 O K E N ) ) T T ) \r L P 0025300 ( P R I N 1 " : " T T ) 0025320 ( S E L E C T Q ( S E T Q B 0025340 R K T E M ( R E A D T T ) 0025360 ) ( O K ( R E T E V A L ( 0025400 Q U O T E B R E A K 1 ) B R 0025420 K E X P ) ) ( B T ( \r B A C 0025440 K T R A C E ( Q U O T E B R 0025460 E A K 1 ) T 0 ) ) ( B T V 0025500 ( B A C K T R A C E ( Q U O 0025520 T E B R E A K 1 ) T 7 ) ) 0025540 N I L ) ( P R I N T ( E V 0025560 A L B R K T E M ( Q U O T E 0025600 : ) \r ) T T ) ( G O L 0025620 P ) ) ) ) \r ( A N D ( C C O D 0025640 E P ( Q U O T E G E T I N T 0025660 E R R U P T ) ) ( I N T C H A 0025700 R T ) ) \r ( R P A Q Q H E L 0025720 P D L B L O C K S ( ( H E L P 0025740 D L B L O C K E R R O R X ( 0025760 N O L I N K F N S B R E A K C 0026000 H E C K ) E R R O R X 2 E R 0026020 R O R X 3 E R R O R X 4 I N 0026040 T E R R U P T \r M A K E A P P 0026060 L Y F A U L T 1 ( E N T R I 0026100 E S E R R O R X I N T E R R 0026120 U P T F A U L T 1 M A K E A 0026140 P P L Y ) ( L I N K F N S . 0026160 T ) ( S P E C V A R S E R 0026200 R O R M E S S \r E R R O R P O 0026220 S B R E A K C H K I N T F N 0026240 I N T A R G S P R I N T M S 0026260 G ) ( L O C A L F R E E V A R 0026300 S P R I N T M S G ) ( G L O 0026320 B A L V A R S S T O R A G E R 0026340 R O R S L A S T W O R D \r D 0026360 W I M F L G L I S P X H I S T 0026400 O R Y U S E R I N T E R R U P 0026420 T S ) ) ( B R E A K C H E C K 0026440 B L O C K B R E A K C H E C K 0026460 F I N D E R S E T ( E N T R 0026500 I E S B R E A K C H E C K ) 0026520 ( \r G L O B A L V A R S H E L 0026540 P T I M E H E L P D E P T H 0026560 N L S E T Q G A G ) ( S P E C 0026600 V A R S P R I N T M S G ) ) 0026620 ( N I L H E L P S H O U L D 0026640 N T E R R O R ( L I N K F N 0026660 S . T ) ) \r ( N I L S E 0026700 A R C H P D L M A P D L ( G 0026720 L O B A L V A R S S P A G H E 0026740 T T I F L G ) ( L I N K F N S 0026760 . T ) ) ( N I L F A U L 0027000 T A P P L Y ( L I N K F N S 0027020 . T ) ( N O L I N K F N S \r 0027040 F A U L T 1 ) ) ( N I L E 0027060 R R O R M E S S E R R O R M E 0027100 S S 1 ( G L O B A L V A R S 0027120 L I S P X P R I N T F L G L I 0027140 S P X H I S T O R Y D W I M F 0027160 L G S T O R A G E R R O R S ) 0027200 ( \r L I N K F N S . T ) ) 0027220 ( N I L I N T C H A R I N 0027240 T E R R U P T C H A R ( L O C 0027260 A L V A R S . T ) ( G L O 0027300 B A L V A R S U S E R I N T E 0027320 R R U P T S ) ) ( R E S E T T 0027340 E R M C H A R S \r R E S E T T 0027360 E R M C H A R S R E S E T I N 0027400 T ) ) ) \r ( A D D T O V A R S 0027420 Y S S P E C V A R S H E L P F 0027440 L A G ) \r ( P U T P R O P S H 0027460 E L P D L C O P Y R I G H T 0027500 ( " X e r o x C o r p o r a t 0027520 i o n " T 1 9 8 2 1 9 8 3 0027540 1 9 8 4 ) ) \r N I L \r 0027554