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