$ od -c -N 50000 [eris]<LispCore>Pathname>CMLPATHNAME.DCOM!2
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 " 1 4 -
0000120 N o v - 8 6 2 3 : 3 0 : 0 6 "
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 > S O U R C E S > C M L P A T H
0000220 N A M E . ; 2 6 ) \r " 1 2 - N
0000240 o v - 8 6 1 0 : 2 3 : 1 3 "
0000260 " C O M P I L E - F I L E d "
0000300 i n " " d a t e d " 1 2 -
0000320 N o v - 8 6 1 0 : 5 8 : 2 4 "
0000340 ) \r ( F I L E C R E A T E D "
0000360 1 4 - N o v - 8 6 2 3 : 2 9 :
0000400 1 6 " { E R I S } < L I S P C
0000420 O R E > S O U R C E S > C M L P
0000440 A T H N A M E . ; 2 6 4 0 1 3
0000460 9 c h a n g e s t o % : (
0000500 \r V A R I A B L E S * D E F A
0000520 U L T - P A T H N A M E - D E F
0000540 A U L T S * ) p r e v i o u s
0000560 d a t e % : " 7 - N o v -
0000600 8 6 1 6 : 3 8 : 0 3 " \r { E
0000620 R I S } < L I S P C O R E > S O
0000640 U R C E S > C M L P A T H N A M
0000660 E . ; 2 3 ) \r ( R P A Q Q C M
0000700 L P A T H N A M E C O M S ( (
0000720 * ; ; " C o m m o n L i s
0000740 p p a t h n a m e f u n c t
0000760 i o n s " ) ( C O M S ( *
0001000 ; ; " u s e f u l m a c r o
0001020 s " ) ( \r F U N C T I O N S
0001040 % % W I L D - N A M E % % C O
0001060 M P O N E N T - S T R I N G %
0001100 % U N P A C K F I L E 1 ) ) (
0001120 S T R U C T U R E S P A T H N
0001140 A M E ) ( F N S % % P R I N
0001160 T - P A T H N A M E \r C L : M
0001200 A K E - P A T H N A M E ) ( F
0001220 U N C T I O N S C L : P A T H
0001240 N A M E - H O S T C L : P A T
0001260 H N A M E - D E V I C E C L :
0001300 P A T H N A M E - D I R E C T O
0001320 R Y C L : P A T H N A M E - N
0001340 A M E \r C L : P A T H N A M E
0001360 - T Y P E C L : P A T H N A M
0001400 E - V E R S I O N ) ( F N S
0001420 P A T H N A M E C L : M E R G
0001440 E - P A T H N A M E S F I L E
0001460 - N A M E C L : H O S T - N A
0001500 M E S T R I N G \r C L : E N O
0001520 U G H - N A M E S T R I N G %
0001540 % N U M E R I C - S T R I N G -
0001560 P ) ( F U N C T I O N S C L
0001600 : N A M E S T R I N G C L : P
0001620 A R S E - N A M E S T R I N G
0001640 \r P A R S E - N A M E S T R I N
0001660 G 1 C L : T R U E N A M E )
0001700 ( F U N C T I O N S % % M A K
0001720 E - P A T H N A M E ) ( F U N
0001740 C T I O N S % % P A T H N A M
0001760 E - E Q U A L ) ( V A R I A B
0002000 L E S \r * D E F A U L T - P A
0002020 T H N A M E - D E F A U L T S *
0002040 ) ( C O M S ( * ; ; " I
0002060 n t e r l i s p - D c o m p a
0002100 t i b i l i t y " ) ( F U N C
0002120 T I O N S I N T E R L I S P -
0002140 N A M E S T R I N G \r U N P A
0002160 C K P A T H N A M E . S T R I N
0002200 G ) ) ( F U N C T I O N S C
0002220 L : F I L E - N A M E S T R I N
0002240 G C L : D I R E C T O R Y - N
0002260 A M E S T R I N G ) ( C O M S
0002300 ( * ; \r " D i r e c t o r
0002320 i e s , f i l e n a m e s ,
0002340 a n d d i r e c t o r y d e
0002360 f a u l t i n g " ) ( F N S
0002400 C N D I R D I R E C T O R Y N
0002420 A M E D I R E C T O R Y N A M
0002440 E P H O S T N A M E P \r \ A
0002460 D D . C O N N E C T E D . D I R
0002500 ) ) ( P R O P F I L E T Y P
0002520 E C M L P A T H N A M E ) (
0002540 D E C L A R E % : D O N T E V
0002560 A L @ L O A D D O E V A L @ C
0002600 O M P I L E D O N T C O P Y
0002620 \r C O M P I L E R V A R S ( A
0002640 D D V A R S ( N L A M A ) (
0002660 N L A M L ) ( L A M A C L :
0002700 E N O U G H - N A M E S T R I N
0002720 G C L : H O S T - N A M E S T
0002740 R I N G F I L E - N A M E \r
0002760 C L : M E R G E - P A T H N A M
0003000 E S P A T H N A M E C L : M
0003020 A K E - P A T H N A M E % % P
0003040 R I N T - P A T H N A M E ) ) )
0003060 ) ) \r e x p a n d - % % W I L D
0003100 - N A M E D 1 \r ( L ( 1 S
0003120 I : : $ $ M A C R O - E N V I R
0003140 O N M E N T 0 S I : : $ $ M
0003160 A C R O - F O R M ) ) \0 032 001 \0
0003200 \0 002 @ 002 001 021 001 \0 g \0 \0 g \0 \0 H h
0003220 032 032 h 032 o \0 \0 \0 032 032 020 \0 N I L \r
0003240 ( 1 1 S 8 L E T ) \r ( 2
0003260 1 ( ( C L : I F ( S T R I N
0003300 G - E Q U A L S " * " ) :
0003320 W I L D S ) ) ) \r ( S E T F -
0003340 M A C R O - F U N C T I O N (
0003360 Q U O T E % % W I L D - N A M
0003400 E ) ( Q U O T E e x p a n d
0003420 - % % W I L D - N A M E ) ) \r e
0003440 x p a n d - % % C O M P O N E N
0003460 T - S T R I N G D 1 \r ( L (
0003500 1 S I : : $ $ M A C R O - E N
0003520 V I R O N M E N T 0 S I : :
0003540 $ $ M A C R O - F O R M ) ) \0
0003560 022 001 \0 \0 002 @ 002 001 021 001 \0 g \0 \0 H o
0003600 \0 \0 \0 032 032 020 \0 N I L \r ( 8 O R
0003620 ) \r ( 1 3 ( " " ) ) \r ( S E
0003640 T F - M A C R O - F U N C T I O
0003660 N ( Q U O T E % % C O M P O
0003700 N E N T - S T R I N G ) ( Q U
0003720 O T E e x p a n d - % % C O M
0003740 P O N E N T - S T R I N G ) ) \r
0003760 e x p a n d - % % U N P A C K F
0004000 I L E 1 D 1 \r ( L ( 1 S I
0004020 : : $ $ M A C R O - E N V I R O
0004040 N M E N T 0 S I : : $ $ M A
0004060 C R O - F O R M ) ) \0 334 \r \0 \0
0004100 002 @ 002 021 301 \f H 001 271 H 002 Z 001 273 J 002
0004120 \ 001 275 L 002 ^ 001 _ 016 277 N 002 _ 020 001 _
0004140 022 277 O 020 002 _ 024 001 _ 026 277 O 024 002 001 _
0004160 030 277 g \0 \0 g \0 \0 O 026 h 032 032 g \0 \0
0004200 g \0 \0 O 030 g \0 \0 g \0 \0 O 022 g \0 \0
0004220 O 016 K M h 032 032 032 032 h 032 032 i g \0 \0
0004240 g \0 \0 O 016 K M h 032 032 032 032 o \0 \0 \0
0004260 032 032 h 032 032 h 032 032 032 g \0 \0 I O 030 h
0004300 032 032 032 h 032 032 032 h 032 032 032 g \0 \0 g \0
0004320 \0 I O 026 h 032 032 032 g \0 \0 g \0 \0 g \0
0004340 \0 O 022 g \0 \0 O 016 K M h 032 032 032 032 h
0004360 032 032 i g \0 \0 g \0 \0 O 016 K M h 032 032
0004400 032 032 o \0 \0 \0 032 032 h 032 032 h 032 032 032 h
0004420 032 032 h 032 032 032 032 032 032 032 032 020 \0 N I L
0004440 \r ( 1 8 3 S U B S T R I N G
0004460 1 8 0 O R 1 6 4 S U B A T
0004500 O M 1 5 9 C O N D 1 5 6
0004520 R E T U R N 1 5 3 t h e n
0004540 1 4 3 E Q M E M B 1 4 0 e
0004560 l s e i f 1 2 2 C O N S 9
0004600 7 S U B S T R I N G 9 4 O
0004620 R 7 8 S U B A T O M 7 3
0004640 C O N D 7 0 C O N S 6 5
0004660 S E T Q 6 2 t h e n 5 4
0004700 N O T 5 1 i f ) \r ( 1 9 6
0004720 ( " " ) 1 1 0 ( " " ) ) \r
0004740 ( S E T F - M A C R O - F U N C
0004760 T I O N ( Q U O T E % % U N
0005000 P A C K F I L E 1 ) ( Q U O T
0005020 E e x p a n d - % % U N P A C
0005040 K F I L E 1 ) ) \r ( L E T * (
0005060 ( A 2 5 5 3 ( Q U O T E P A
0005100 T H N A M E ) ) ( A 2 5 5 4
0005120 T ) ( A 2 5 5 5 ( Q U O T E
0005140 ( C L : : P S P A T H N A M
0005160 E % % % % M A K E - P A T H N
0005200 A M E ( H O S T \r D E V I C
0005220 E D I R E C T O R Y N A M E
0005240 T Y P E V E R S I O N ) C
0005260 L : : D A T A T Y P E N I L
0005300 N I L % % P A T H N A M E -
0005320 ( % % % % M A K E - P A T H N A
0005340 M E . : N O N E ) \r C L :
0005360 P A T H N A M E P % % P R I N
0005400 T - P A T H N A M E C O P Y -
0005420 P A T H N A M E N I L 0 (
0005440 ( H O S T N I L T N I L
0005460 ( P A T H N A M E 0 P O I N
0005500 T E R ) \r % % P A T H N A M E
0005520 - H O S T ) ( D E V I C E N
0005540 I L T N I L ( P A T H N A
0005560 M E 2 P O I N T E R ) % %
0005600 P A T H N A M E - D E V I C E )
0005620 ( D I R E C T O R Y N I L
0005640 T N I L ( \r P A T H N A M E
0005660 4 P O I N T E R ) % % P A
0005700 T H N A M E - D I R E C T O R Y
0005720 ) ( N A M E N I L T N I
0005740 L ( P A T H N A M E 6 P O
0005760 I N T E R ) % % P A T H N A M
0006000 E - N A M E ) ( T Y P E \r N
0006020 I L T N I L ( P A T H N A
0006040 M E 8 P O I N T E R ) % %
0006060 P A T H N A M E - T Y P E ) (
0006100 V E R S I O N N I L T N I
0006120 L ( P A T H N A M E 1 0 P
0006140 O I N T E R ) \r % % P A T H N
0006160 A M E - V E R S I O N ) ) ( (
0006200 H O S T N I L T N I L (
0006220 P A T H N A M E 0 P O I N T
0006240 E R ) % % P A T H N A M E - H
0006260 O S T ) ( D E V I C E N I L
0006300 T N I L ( \r P A T H N A M
0006320 E 2 P O I N T E R ) % % P
0006340 A T H N A M E - D E V I C E )
0006360 ( D I R E C T O R Y N I L T
0006400 N I L ( P A T H N A M E 4
0006420 P O I N T E R ) % % P A T H
0006440 N A M E - D I R E C T O R Y ) \r
0006460 ( N A M E N I L T N I L
0006500 ( P A T H N A M E 6 P O I
0006520 N T E R ) % % P A T H N A M E
0006540 - N A M E ) ( T Y P E N I L
0006560 T N I L ( P A T H N A M E
0006600 8 P O I N T E R ) \r % % P
0006620 A T H N A M E - T Y P E ) ( V
0006640 E R S I O N N I L T N I L
0006660 ( P A T H N A M E 1 0 P O
0006700 I N T E R ) % % P A T H N A M
0006720 E - V E R S I O N ) ) N I L
0006740 N I L ( P O I N T E R \r P O
0006760 I N T E R P O I N T E R P O
*
0007020 I N T E R ) N I L T ) ) ) )
0007040 ( C L : : S E T - P A R S E D
0007060 - S T R U C T U R E A 2 5 5 3
0007100 A 2 5 5 5 ) ) \r ( S I : : % %
0007120 S T R U C T U R E - D E C L A R
0007140 E - D A T A T Y P E ( Q U O T
0007160 E P A T H N A M E ) ( Q U O
0007200 T E ( P O I N T E R P O I N
0007220 T E R P O I N T E R P O I N
0007240 T E R P O I N T E R \r P O I
0007260 N T E R ) ) ( Q U O T E ( (
0007300 P A T H N A M E 0 P O I N T
0007320 E R ) ( P A T H N A M E 2
0007340 P O I N T E R ) ( P A T H N A
0007360 M E 4 P O I N T E R ) ( P
0007400 A T H N A M E 6 P O I N T E
0007420 R ) \r ( P A T H N A M E 8
0007440 P O I N T E R ) ( P A T H N A
0007460 M E 1 0 P O I N T E R ) ) )
0007500 1 2 ( Q U O T E C L : : S
0007520 T R U C T U R E - O B J E C T )
0007540 ) \r C L : : t y p e - e x p a n
0007560 d - P A T H N A M E D 1 \r ( L
0007600 ( 0 $ $ T Y P E - F O R M )
0007620 ) \0 006 \0 \0 \0 001 o \0 \0 \0 020 \0 N I
0007640 L \r N I L \r ( 3 ( D A T A T
0007660 Y P E P A T H N A M E ) ) \r (
0007700 P U T ( Q U O T E P A T H N
0007720 A M E ) ( Q U O T E T Y P E
0007740 - E X P A N D E R ) ( Q U O T
0007760 E C L : : t y p e - e x p a n
0010000 d - P A T H N A M E ) ) \r C L :
0010020 P A T H N A M E P D 1 \r ( L
0010040 ( 0 C L : : O B J E C T ) )
0010060 \0 \t \0 \0 \0 001 @ 303 \0 \0 264 003 i 020 \0 N
0010100 I L \r ( 3 P A T H N A M E ) \r
0010120 ( ) \r C L : : d e f i n l i n e
0010140 - P A T H N A M E P D 1 \r ( L
0010160 ( 2 $ $ C T X 1 $ $ E N
0010200 V 0 $ $ W H O L E ) ) \0 \r
0010220 001 \0 \0 003 @ 002 021 001 \0 o \0 \0 \0 H 032 020
0010240 \0 N I L \r N I L \r ( 8 ( C L
0010260 : L A M B D A ( C L : : O B J
0010300 E C T ) ( C L : B L O C K C
0010320 L : P A T H N A M E P ( T Y P
0010340 E P C L : : O B J E C T ( Q
0010360 U O T E P A T H N A M E ) ) )
0010400 ) ) \r ( L E T * ( ( A 2 5 5 8
0010420 ( Q U O T E C L : P A T H N
0010440 A M E P ) ) ( A 2 5 5 9 ( Q
0010460 U O T E C O M P I L E R : O P
0010500 T I M I Z E R - L I S T ) ) (
0010520 A 2 5 6 1 ( C L : A D J O I N
0010540 ( Q U O T E \r C L : : d e f
0010560 i n l i n e - P A T H N A M E P
0010600 ) ( G E T A 2 5 5 8 A 2 5
0010620 5 9 ) ) ) ) ( P U T P R O P
0010640 A 2 5 5 8 A 2 5 5 9 A 2 5 6
0010660 1 ) ) \r % % P A T H N A M E - H
0010700 O S T D 1 \r ( L ( 0 P A T
0010720 H N A M E ) ) \0 \b \0 \0 \0 001 @ 006
0010740 \0 \0 311 \0 020 \0 N I L \r ( 3 P A T
0010760 H N A M E ) \r ( ) \r d e f i n l
0011000 i n e - % % P A T H N A M E - H
0011020 O S T D 1 \r ( L ( 2 $ $ C
0011040 T X 1 $ $ E N V 0 $ $ W
0011060 H O L E ) ) \0 \r 001 \0 \0 003 @ 002 021
0011100 001 \0 o \0 \0 \0 H 032 020 \0 N I L \r N I
0011120 L \r ( 8 ( C L : L A M B D A
0011140 ( P A T H N A M E ) ( C L :
0011160 B L O C K % % P A T H N A M E
0011200 - H O S T ( F E T C H F I E L
0011220 D ( Q U O T E ( P A T H N A
0011240 M E 0 P O I N T E R ) ) P
0011260 A T H N A M E ) ) ) ) \r ( L E T
0011300 * ( ( A 2 5 6 3 ( Q U O T E
0011320 % % P A T H N A M E - H O S T
0011340 ) ) ( A 2 5 6 4 ( Q U O T E
0011360 C O M P I L E R : O P T I M I
0011400 Z E R - L I S T ) ) ( A 2 5 6
0011420 6 ( C L : A D J O I N ( \r Q
0011440 U O T E d e f i n l i n e - %
0011460 % P A T H N A M E - H O S T )
0011500 ( G E T A 2 5 6 3 A 2 5 6 4
0011520 ) ) ) ) ( P U T P R O P A 2
0011540 5 6 3 A 2 5 6 4 A 2 5 6 6 )
0011560 ) \r % % P A T H N A M E - D E V
0011600 I C E D 1 \r ( L ( 0 P A T
0011620 H N A M E ) ) \0 \b \0 \0 \0 001 @ 006
0011640 \0 \0 311 002 020 \0 N I L \r ( 3 P A T
0011660 H N A M E ) \r ( ) \r d e f i n l
0011700 i n e - % % P A T H N A M E - D
0011720 E V I C E D 1 \r ( L ( 2 $
0011740 $ C T X 1 $ $ E N V 0 $
0011760 $ W H O L E ) ) \0 \r 001 \0 \0 003 @
0012000 002 021 001 \0 o \0 \0 \0 H 032 020 \0 N I L \r
0012020 N I L \r ( 8 ( C L : L A M B
0012040 D A ( P A T H N A M E ) ( C
0012060 L : B L O C K % % P A T H N A
0012100 M E - D E V I C E ( F E T C H
0012120 F I E L D ( Q U O T E ( P A
0012140 T H N A M E 2 P O I N T E R
0012160 ) ) P A T H N A M E ) ) ) ) \r
0012200 ( L E T * ( ( A 2 5 6 8 ( Q
0012220 U O T E % % P A T H N A M E -
0012240 D E V I C E ) ) ( A 2 5 6 9
0012260 ( Q U O T E C O M P I L E R :
0012300 O P T I M I Z E R - L I S T ) )
0012320 ( A 2 5 7 1 ( C L : A D J O
0012340 I N ( \r Q U O T E d e f i n
0012360 l i n e - % % P A T H N A M E -
0012400 D E V I C E ) ( G E T A 2 5
0012420 6 8 A 2 5 6 9 ) ) ) ) ( P U
0012440 T P R O P A 2 5 6 8 A 2 5 6
0012460 9 A 2 5 7 1 ) ) \r % % P A T H
0012500 N A M E - D I R E C T O R Y D
0012520 1 \r ( L ( 0 P A T H N A M E
0012540 ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 004 020
0012560 \0 N I L \r ( 3 P A T H N A M E
0012600 ) \r ( ) \r d e f i n l i n e - %
0012620 % P A T H N A M E - D I R E C T
0012640 O R Y D 1 \r ( L ( 2 $ $ C
0012660 T X 1 $ $ E N V 0 $ $ W
0012700 H O L E ) ) \0 \r 001 \0 \0 003 @ 002 021
0012720 001 \0 o \0 \0 \0 H 032 020 \0 N I L \r N I
0012740 L \r ( 8 ( C L : L A M B D A
0012760 ( P A T H N A M E ) ( C L :
0013000 B L O C K % % P A T H N A M E
0013020 - D I R E C T O R Y ( F E T C
0013040 H F I E L D ( Q U O T E ( P
0013060 A T H N A M E 4 P O I N T E
0013100 R ) ) P A T H N A M E ) ) ) )
0013120 \r ( L E T * ( ( A 2 5 7 3 (
0013140 Q U O T E % % P A T H N A M E
0013160 - D I R E C T O R Y ) ) ( A 2
0013200 5 7 4 ( Q U O T E C O M P I
0013220 L E R : O P T I M I Z E R - L I
0013240 S T ) ) ( A 2 5 7 6 ( C L :
0013260 A D J O I N \r ( Q U O T E d
0013300 e f i n l i n e - % % P A T H N
0013320 A M E - D I R E C T O R Y ) (
0013340 G E T A 2 5 7 3 A 2 5 7 4 )
0013360 ) ) ) ( P U T P R O P A 2 5
0013400 7 3 A 2 5 7 4 A 2 5 7 6 ) )
0013420 \r % % P A T H N A M E - N A M E
0013440 D 1 \r ( L ( 0 P A T H N A
0013460 M E ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311
0013500 006 020 \0 N I L \r ( 3 P A T H N A
0013520 M E ) \r ( ) \r d e f i n l i n e
0013540 - % % P A T H N A M E - N A M E
0013560 D 1 \r ( L ( 2 $ $ C T X
0013600 1 $ $ E N V 0 $ $ W H O L
0013620 E ) ) \0 \r 001 \0 \0 003 @ 002 021 001 \0 o
0013640 \0 \0 \0 H 032 020 \0 N I L \r N I L \r (
0013660 8 ( C L : L A M B D A ( P
0013700 A T H N A M E ) ( C L : B L O
0013720 C K % % P A T H N A M E - N A
0013740 M E ( F E T C H F I E L D (
0013760 Q U O T E ( P A T H N A M E
0014000 6 P O I N T E R ) ) P A T H
0014020 N A M E ) ) ) ) \r ( L E T * (
0014040 ( A 2 5 7 8 ( Q U O T E % %
0014060 P A T H N A M E - N A M E ) )
0014100 ( A 2 5 7 9 ( Q U O T E C O
0014120 M P I L E R : O P T I M I Z E R
0014140 - L I S T ) ) ( A 2 5 8 1 (
0014160 C L : A D J O I N ( \r Q U O T
0014200 E d e f i n l i n e - % % P A
0014220 T H N A M E - N A M E ) ( G E
0014240 T A 2 5 7 8 A 2 5 7 9 ) ) )
0014260 ) ( P U T P R O P A 2 5 7 8
0014300 A 2 5 7 9 A 2 5 8 1 ) ) \r %
0014320 % P A T H N A M E - T Y P E D
0014340 1 \r ( L ( 0 P A T H N A M E
0014360 ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 \b 020
0014400 \0 N I L \r ( 3 P A T H N A M E
0014420 ) \r ( ) \r d e f i n l i n e - %
0014440 % P A T H N A M E - T Y P E D
0014460 1 \r ( L ( 2 $ $ C T X 1
0014500 $ $ E N V 0 $ $ W H O L E )
0014520 ) \0 \r 001 \0 \0 003 @ 002 021 001 \0 o \0 \0
0014540 \0 H 032 020 \0 N I L \r N I L \r ( 8
0014560 ( C L : L A M B D A ( P A T
0014600 H N A M E ) ( C L : B L O C K
0014620 % % P A T H N A M E - T Y P E
0014640 ( F E T C H F I E L D ( Q U
0014660 O T E ( P A T H N A M E 8
0014700 P O I N T E R ) ) P A T H N A
0014720 M E ) ) ) ) \r ( L E T * ( ( A
0014740 2 5 8 3 ( Q U O T E % % P A
0014760 T H N A M E - T Y P E ) ) ( A
0015000 2 5 8 4 ( Q U O T E C O M P
0015020 I L E R : O P T I M I Z E R - L
0015040 I S T ) ) ( A 2 5 8 6 ( C L
0015060 : A D J O I N ( \r Q U O T E
0015100 d e f i n l i n e - % % P A T H
0015120 N A M E - T Y P E ) ( G E T
0015140 A 2 5 8 3 A 2 5 8 4 ) ) ) )
0015160 ( P U T P R O P A 2 5 8 3 A
0015200 2 5 8 4 A 2 5 8 6 ) ) \r % % P
0015220 A T H N A M E - V E R S I O N
0015240 D 1 \r ( L ( 0 P A T H N A M
0015260 E ) ) \0 \b \0 \0 \0 001 @ 006 \0 \0 311 \n
0015300 020 \0 N I L \r ( 3 P A T H N A M
0015320 E ) \r ( ) \r d e f i n l i n e -
0015340 % % P A T H N A M E - V E R S I
0015360 O N D 1 \r ( L ( 2 $ $ C T
0015400 X 1 $ $ E N V 0 $ $ W H
0015420 O L E ) ) \0 \r 001 \0 \0 003 @ 002 021 001
0015440 \0 o \0 \0 \0 H 032 020 \0 N I L \r N I L
0015460 \r ( 8 ( C L : L A M B D A
0015500 ( P A T H N A M E ) ( C L : B
0015520 L O C K % % P A T H N A M E -
0015540 V E R S I O N ( F E T C H F I
0015560 E L D ( Q U O T E ( P A T H
0015600 N A M E 1 0 P O I N T E R )
0015620 ) P A T H N A M E ) ) ) ) \r (
0015640 L E T * ( ( A 2 5 8 8 ( Q U
0015660 O T E % % P A T H N A M E - V
0015700 E R S I O N ) ) ( A 2 5 8 9
0015720 ( Q U O T E C O M P I L E R :
0015740 O P T I M I Z E R - L I S T ) )
0015760 ( A 2 5 9 1 ( C L : A D J O
0016000 I N ( \r Q U O T E d e f i n
0016020 l i n e - % % P A T H N A M E -
0016040 V E R S I O N ) ( G E T A 2
0016060 5 8 8 A 2 5 8 9 ) ) ) ) ( P
0016100 U T P R O P A 2 5 8 8 A 2 5
0016120 8 9 A 2 5 9 1 ) ) \r ( R E M P
0016140 R O P ( Q U O T E % % P A T
0016160 H N A M E - H O S T ) ( Q U O
0016200 T E S E T F - M E T H O D - E
0016220 X P A N D E R ) ) \r ( P U T P R
0016240 O P ( Q U O T E % % P A T H
0016260 N A M E - H O S T ) ( Q U O T
0016300 E S E T F - I N V E R S E )
0016320 ( Q U O T E % % % % S E T F -
0016340 % % P A T H N A M E - H O S T )
0016360 ) \r % % % % S E T F - % % P A T
0016400 H N A M E - H O S T D 1 \r ( L
0016420 ( 1 C L : : V A L U E 0
0016440 P A T H N A M E ) ) \0 \n \0 \0 \0
0016460 002 @ 006 \0 \0 A 024 \0 A 020 \0 N I L \r (
0016500 3 P A T H N A M E ) \r ( ) \r d
0016520 e f i n l i n e - % % % % S E T
0016540 F - % % P A T H N A M E - H O S
0016560 T D 1 \r ( L ( 2 $ $ C T X
0016600 1 $ $ E N V 0 $ $ W H O
0016620 L E ) ) \0 \r 001 \0 \0 003 @ 002 021 001 \0
0016640 o \0 \0 \0 H 032 020 \0 N I L \r N I L \r
0016660 ( 8 ( C L : L A M B D A (
0016700 P A T H N A M E C L : : V A L
0016720 U E ) ( C L : B L O C K % %
0016740 % % S E T F - % % P A T H N A M
0016760 E - H O S T ( C L : S E T F
0017000 ( F E T C H F I E L D ( Q U O
0017020 T E ( P A T H N A M E 0 P
0017040 O I N T E R ) ) P A T H N A M
0017060 E ) C L : : V A L U E ) ) ) )
0017100 \r ( L E T * ( ( A 2 5 9 3 (
0017120 Q U O T E % % % % S E T F - %
0017140 % P A T H N A M E - H O S T ) )
0017160 ( A 2 5 9 4 ( Q U O T E C
0017200 O M P I L E R : O P T I M I Z E
0017220 R - L I S T ) ) ( A 2 5 9 6
0017240 ( \r C L : A D J O I N ( Q U O
0017260 T E d e f i n l i n e - % % %
0017300 % S E T F - % % P A T H N A M E
0017320 - H O S T ) ( G E T A 2 5 9
0017340 3 A 2 5 9 4 ) ) ) ) ( P U T
0017360 P R O P A 2 5 9 3 A 2 5 9 4
0017400 A 2 5 9 6 ) ) \r ( R E M P R O
0017420 P ( Q U O T E % % P A T H N
0017440 A M E - D E V I C E ) ( Q U O
0017460 T E S E T F - M E T H O D - E
0017500 X P A N D E R ) ) \r ( P U T P R
0017520 O P ( Q U O T E % % P A T H
0017540 N A M E - D E V I C E ) ( Q U
0017560 O T E S E T F - I N V E R S E
0017600 ) ( Q U O T E % % % % S E T
0017620 F - % % P A T H N A M E - D E V
0017640 I C E ) ) \r % % % % S E T F - %
0017660 % P A T H N A M E - D E V I C E
0017700 D 1 \r ( L ( 1 C L : : V A
0017720 L U E 0 P A T H N A M E ) )
0017740 \0 \n \0 \0 \0 002 @ 006 \0 \0 A 024 002 A 020
0017760 \0 N I L \r ( 3 P A T H N A M E
0020000 ) \r ( ) \r d e f i n l i n e - %
0020020 % % % S E T F - % % P A T H N A
0020040 M E - D E V I C E D 1 \r ( L
0020060 ( 2 $ $ C T X 1 $ $ E N V
0020100 0 $ $ W H O L E ) ) \0 \r 001
0020120 \0 \0 003 @ 002 021 001 \0 o \0 \0 \0 H 032 020 \0
0020140 N I L \r N I L \r ( 8 ( C L :
0020160 L A M B D A ( P A T H N A M E
0020200 C L : : V A L U E ) ( C L :
0020220 B L O C K % % % % S E T F - %
0020240 % P A T H N A M E - D E V I C E
0020260 ( C L : S E T F ( F E T C H
0020300 F I E L D ( Q U O T E ( P A
0020320 T H N A M E 2 P O I N T E R
0020340 ) ) P A T H N A M E ) C L :
0020360 : V A L U E ) ) ) ) \r ( L E T *
0020400 ( ( A 2 5 9 8 ( Q U O T E
0020420 % % % % S E T F - % % P A T H N
0020440 A M E - D E V I C E ) ) ( A 2
0020460 5 9 9 ( Q U O T E C O M P I
0020500 L E R : O P T I M I Z E R - L I
0020520 S T ) ) ( A 2 6 0 1 ( \r C L
0020540 : A D J O I N ( Q U O T E d
0020560 e f i n l i n e - % % % % S E T
0020600 F - % % P A T H N A M E - D E V
0020620 I C E ) ( G E T A 2 5 9 8
0020640 A 2 5 9 9 ) ) ) ) ( P U T P R
0020660 O P A 2 5 9 8 A 2 5 9 9 A
0020700 2 6 0 1 \r ) ) \r ( R E M P R O P
0020720 ( Q U O T E % % P A T H N A
0020740 M E - D I R E C T O R Y ) ( Q
0020760 U O T E S E T F - M E T H O D
0021000 - E X P A N D E R ) ) \r ( P U T
0021020 P R O P ( Q U O T E % % P A
0021040 T H N A M E - D I R E C T O R Y
0021060 ) ( Q U O T E S E T F - I N
0021100 V E R S E ) ( Q U O T E % %
0021120 % % S E T F - % % P A T H N A M
0021140 E - D I R E C T O R Y ) ) \r % %
0021160 % % S E T F - % % P A T H N A M
0021200 E - D I R E C T O R Y D 1 \r (
0021220 L ( 1 C L : : V A L U E 0
0021240 P A T H N A M E ) ) \0 \n \0 \0
0021260 \0 002 @ 006 \0 \0 A 024 004 A 020 \0 N I L \r
0021300 ( 3 P A T H N A M E ) \r ( ) \r
0021320 d e f i n l i n e - % % % % S E
0021340 T F - % % P A T H N A M E - D I
0021360 R E C T O R Y D 1 \r ( L ( 2
0021400 $ $ C T X 1 $ $ E N V 0
0021420 $ $ W H O L E ) ) \0 \r 001 \0 \0
0021440 003 @ 002 021 001 \0 o \0 \0 \0 H 032 020 \0 N I
0021460 L \r N I L \r ( 8 ( C L : L A
0021500 M B D A ( P A T H N A M E C
0021520 L : : V A L U E ) ( C L : B L
0021540 O C K % % % % S E T F - % % P
0021560 A T H N A M E - D I R E C T O R
0021600 Y ( C L : S E T F ( F E T C
0021620 H F I E L D ( Q U O T E ( P
0021640 A T H N A M E 4 P O I N T E
0021660 R ) ) P A T H N A M E ) C L
0021700 : : V A L U E ) ) ) ) \r ( L E T
0021720 * ( ( A 2 6 0 3 ( Q U O T E
0021740 % % % % S E T F - % % P A T H
0021760 N A M E - D I R E C T O R Y ) )
0022000 ( A 2 6 0 4 ( Q U O T E C
0022020 O M P I L E R : O P T I M I Z E
0022040 R - L I S T ) ) ( A 2 6 0 6
0022060 ( \r C L : A D J O I N ( Q U O
0022100 T E d e f i n l i n e - % % %
0022120 % S E T F - % % P A T H N A M E
0022140 - D I R E C T O R Y ) ( G E T
0022160 A 2 6 0 3 A 2 6 0 4 ) ) ) )
0022200 ( P U T P R O P A 2 6 0 3
0022220 A 2 6 0 4 \r A 2 6 0 6 ) ) \r (
0022240 R E M P R O P ( Q U O T E %
0022260 % P A T H N A M E - N A M E )
0022300 ( Q U O T E S E T F - M E T H
0022320 O D - E X P A N D E R ) ) \r ( P
0022340 U T P R O P ( Q U O T E % %
0022360 P A T H N A M E - N A M E ) (
0022400 Q U O T E S E T F - I N V E R
0022420 S E ) ( Q U O T E % % % % S
0022440 E T F - % % P A T H N A M E - N
0022460 A M E ) ) \r % % % % S E T F - %
0022500 % P A T H N A M E - N A M E D
0022520 1 \r ( L ( 1 C L : : V A L U
0022540 E 0 P A T H N A M E ) ) \0
0022560 \n \0 \0 \0 002 @ 006 \0 \0 A 024 006 A 020 \0 N
0022600 I L \r ( 3 P A T H N A M E ) \r
0022620 ( ) \r d e f i n l i n e - % % %
0022640 % S E T F - % % P A T H N A M E
0022660 - N A M E D 1 \r ( L ( 2 $
0022700 $ C T X 1 $ $ E N V 0 $
0022720 $ W H O L E ) ) \0 \r 001 \0 \0 003 @
0022740 002 021 001 \0 o \0 \0 \0 H 032 020 \0 N I L \r
0022760 N I L \r ( 8 ( C L : L A M B
0023000 D A ( P A T H N A M E C L :
0023020 : V A L U E ) ( C L : B L O C
0023040 K % % % % S E T F - % % P A T
0023060 H N A M E - N A M E ( C L : S
0023100 E T F ( F E T C H F I E L D
0023120 ( Q U O T E ( P A T H N A M E
0023140 6 P O I N T E R ) ) P A T
0023160 H N A M E ) C L : : V A L U E
0023200 ) ) ) ) \r ( L E T * ( ( A 2 6
0023220 0 8 ( Q U O T E % % % % S E
0023240 T F - % % P A T H N A M E - N A
0023260 M E ) ) ( A 2 6 0 9 ( Q U O
0023300 T E C O M P I L E R : O P T I
0023320 M I Z E R - L I S T ) ) ( A 2
0023340 6 1 1 ( \r C L : A D J O I N
0023360 ( Q U O T E d e f i n l i n e
0023400 - % % % % S E T F - % % P A T H
0023420 N A M E - N A M E ) ( G E T
0023440 A 2 6 0 8 A 2 6 0 9 ) ) ) )
0023460 ( P U T P R O P A 2 6 0 8 A
0023500 2 6 0 9 A 2 6 1 1 ) ) \r ( R E
0023520 M P R O P ( Q U O T E % % P
0023540 A T H N A M E - T Y P E ) ( Q
0023560 U O T E S E T F - M E T H O D
0023600 - E X P A N D E R ) ) \r ( P U T
0023620 P R O P ( Q U O T E % % P A
0023640 T H N A M E - T Y P E ) ( Q U
0023660 O T E S E T F - I N V E R S E
0023700 ) ( Q U O T E % % % % S E T
0023720 F - % % P A T H N A M E - T Y P
0023740 E ) ) \r % % % % S E T F - % % P
0023760 A T H N A M E - T Y P E D 1 \r
0024000 ( L ( 1 C L : : V A L U E
0024020 0 P A T H N A M E ) ) \0 \n \0
0024040 \0 \0 002 @ 006 \0 \0 A 024 \b A 020 \0 N I L
0024060 \r ( 3 P A T H N A M E ) \r ( )
0024100 \r d e f i n l i n e - % % % % S
0024120 E T F - % % P A T H N A M E - T
0024140 Y P E D 1 \r ( L ( 2 $ $ C
0024160 T X 1 $ $ E N V 0 $ $ W
0024200 H O L E ) ) \0 \r 001 \0 \0 003 @ 002 021
0024220 001 \0 o \0 \0 \0 H 032 020 \0 N I L \r N I
0024240 L \r ( 8 ( C L : L A M B D A
0024260 ( P A T H N A M E C L : : V
0024300 A L U E ) ( C L : B L O C K
0024320 % % % % S E T F - % % P A T H N
0024340 A M E - T Y P E ( C L : S E T
0024360 F ( F E T C H F I E L D ( Q
0024400 U O T E ( P A T H N A M E 8
0024420 P O I N T E R ) ) P A T H N
0024440 A M E ) C L : : V A L U E ) )
0024460 ) ) \r ( L E T * ( ( A 2 6 1 3
0024500 ( Q U O T E % % % % S E T F
0024520 - % % P A T H N A M E - T Y P E
0024540 ) ) ( A 2 6 1 4 ( Q U O T E
0024560 C O M P I L E R : O P T I M I
0024600 Z E R - L I S T ) ) ( A 2 6 1
0024620 6 ( \r C L : A D J O I N ( Q
0024640 U O T E d e f i n l i n e - %
0024660 % % % S E T F - % % P A T H N A
0024700 M E - T Y P E ) ( G E T A 2
0024720 6 1 3 A 2 6 1 4 ) ) ) ) ( P
0024740 U T P R O P A 2 6 1 3 A 2 6
0024760 1 4 A 2 6 1 6 ) ) \r ( R E M P
0025000 R O P ( Q U O T E % % P A T
0025020 H N A M E - V E R S I O N ) (
0025040 Q U O T E S E T F - M E T H O
0025060 D - E X P A N D E R ) ) \r ( P U
0025100 T P R O P ( Q U O T E % % P
0025120 A T H N A M E - V E R S I O N )
0025140 ( Q U O T E S E T F - I N V
0025160 E R S E ) ( Q U O T E % % %
0025200 % S E T F - % % P A T H N A M E
0025220 - V E R S I O N ) ) \r % % % % S
0025240 E T F - % % P A T H N A M E - V
0025260 E R S I O N D 1 \r ( L ( 1
0025300 C L : : V A L U E 0 P A T H
0025320 N A M E ) ) \0 \n \0 \0 \0 002 @ 006 \0
0025340 \0 A 024 \n A 020 \0 N I L \r ( 3 P A
0025360 T H N A M E ) \r ( ) \r d e f i n
0025400 l i n e - % % % % S E T F - % %
0025420 P A T H N A M E - V E R S I O N
0025440 D 1 \r ( L ( 2 $ $ C T X
0025460 1 $ $ E N V 0 $ $ W H O L
0025500 E ) ) \0 \r 001 \0 \0 003 @ 002 021 001 \0 o
0025520 \0 \0 \0 H 032 020 \0 N I L \r N I L \r (
0025540 8 ( C L : L A M B D A ( P
0025560 A T H N A M E C L : : V A L U
0025600 E ) ( C L : B L O C K % % %
0025620 % S E T F - % % P A T H N A M E
0025640 - V E R S I O N ( C L : S E T
0025660 F ( F E T C H F I E L D ( Q
0025700 U O T E ( P A T H N A M E 1
0025720 0 P O I N T E R ) ) P A T H
0025740 N A M E ) C L : : V A L U E )
0025760 ) ) ) \r ( L E T * ( ( A 2 6 1
0026000 8 ( Q U O T E % % % % S E T
0026020 F - % % P A T H N A M E - V E R
0026040 S I O N ) ) ( A 2 6 1 9 ( Q
0026060 U O T E C O M P I L E R : O P
0026100 T I M I Z E R - L I S T ) ) (
0026120 A 2 6 2 1 ( \r C L : A D J O I
0026140 N ( Q U O T E d e f i n l i
0026160 n e - % % % % S E T F - % % P A
0026200 T H N A M E - V E R S I O N )
0026220 ( G E T A 2 6 1 8 A 2 6 1 9
0026240 ) ) ) ) ( P U T P R O P A 2
0026260 6 1 8 A 2 6 1 9 \r A 2 6 2 1
0026300 ) ) \r % % % % M A K E - P A T H
0026320 N A M E D 1 \r ( L ( 0 - a
0026340 r g s - ) ) 001 B 022 \0 002 \0 e 021 001
0026360 \0 H k 021 002 002 J d I 363 242 261 \0 254 277 h
0026400 022 021 361 020 021 020 021 H k 273 272 K d J 363 242
0026420 261 \0 254 277 h 274 H k 276 275 N d M 363 242 261
0026440 \0 262 277 h _ 016 277 H k _ 022 277 _ 020 277 O
0026460 022 d O 020 363 242 261 \0 260 277 h _ 024 277 H k
0026500 _ 030 277 _ 026 277 O 030 d O 026 363 242 261 \0 261
0026520 277 h _ 032 277 H k _ 036 277 _ 034 277 O 036 d
0026540 O 034 363 242 261 \0 262 277 h _ 277 ` \0 \0 037
0026560 _ " 006 \0 \0 I 024 \0 O " 006 \0 \0 L 024 002
0026600 O " 006 \0 \0 O 016 024 004 O " 006 \0 \0 O 024
0026620 024 006 O " 006 \0 \0 O 032 024 \b O " 006 \0 \0
0026640 O 024 \n O " 020 a g \0 \0 360 226 J k 330
0026660 a 261 377 O J l 002 324 Z 261 377 > a g \0 \0
0026700 360 226 K k 330 a 261 377 O K l 002 324 [ 261 377
0026720 > a g \0 \0 360 226 N k 330 a 261 377 I N l
0026740 002 324 ^ 261 377 8 a g \0 \0 360 227 O 022 k 330
0026760 a 261 377 J O 022 l 002 324 _ 022 261 377 6 a g
0027000 \0 \0 360 227 O 030 k 330 a 261 377 I O 030 l 002
0027020 324 _ 030 261 377 5 a g \0 \0 360 227 O 036 k 330
0027040 a 261 377 H O 036 l 002 324 _ 036 261 377 4 \0 N
0027060 I L \r ( 3 0 0 : V E R S I O N
0027100 2 7 6 : T Y P E 2 5 2 :
0027120 N A M E 2 3 1 : D I R E C T
0027140 O R Y 2 1 0 : D E V I C E
0027160 1 8 9 : H O S T 1 7 8 P A
0027200 T H N A M E 1 6 9 P A T H N
0027220 A M E 1 6 0 P A T H N A M E
0027240 1 5 1 P A T H N A M E 1 4
0027260 3 P A T H N A M E 1 3 5 P
0027300 A T H N A M E 1 2 9 | 004 003 P
0027320 A T H N A M E T Y P E # | ) \r (
0027340 ) \r C O P Y - P A T H N A M E
0027360 D 1 \r ( L ( 0 P A T H N A M
0027400 E ) ) \0 [ 001 \0 \0 001 @ 021 001 \0 H 303
0027420 \0 \0 262 B 023 ` \0 \0 037 021 001 \0 H 006 \0 \0
0027440 @ 311 \0 024 \0 H 006 \0 \0 @ 311 002 024 002 H 006
0027460 \0 \0 @ 311 004 024 004 H 006 \0 \0 @ 311 006 024 006
0027500 H 006 \0 \0 @ 311 \b 024 \b H 006 \0 \0 @ 311 \n
0027520 024 \n H 020 i g \0 \0 H g \0 \0 \f \0 \0 b
0027540 \0 023 260 250 \0 ( 8 4 C H E C K - T
0027560 Y P E - F A I L ) \r ( 8 1 P A
0027600 T H N A M E 7 7 P A T H N A
0027620 M E 6 6 P A T H N A M E 5
0027640 7 P A T H N A M E 4 8 P A
0027660 T H N A M E 3 9 P A T H N A
0027700 M E 3 0 P A T H N A M E 2
0027720 1 P A T H N A M E 1 3 | 004
0027740 003 P A T H N A M E T Y P E # |
0027760 7 P A T H N A M E ) \r ( ) \r d
0030000 e f i n l i n e - C O P Y - P A
0030020 T H N A M E D 1 \r ( L ( 2
0030040 $ $ C T X 1 $ $ E N V 0
0030060 $ $ W H O L E ) ) \0 \r 001 \0 \0 003
0030100 @ 002 021 001 \0 o \0 \0 \0 H 032 020 \0 N I L
0030120 \r N I L \r ( 8 ( C L : L A M
0030140 B D A ( P A T H N A M E ) (
0030160 C L : B L O C K C O P Y - P A
0030200 T H N A M E ( C L : C H E C K
0030220 - T Y P E P A T H N A M E P
0030240 A T H N A M E ) ( L E T ( (
0030260 C L : : N E W ( N C R E A T E
0030300 ( Q U O T E P A T H N A M E
0030320 ) ) ) ) ( C L : S E T F ( F
0030340 F E T C H F I E L D ( Q U O T
0030360 E ( P A T H N A M E 0 P O
0030400 I N T E R ) ) C L : : N E W )
0030420 ( F F E T C H F I E L D ( Q
0030440 U O T E ( P A T H N A M E 0
0030460 P O I N T E R ) ) P A T H N
0030500 A M E ) ) ( C L : S E T F (
0030520 F F E T C H F I E L D ( Q U O
0030540 T E ( P A T H N A M E 2 P
0030560 O I N T E R ) ) C L : : N E W
0030600 ) ( F F E T C H F I E L D (
0030620 Q U O T E ( P A T H N A M E
0030640 2 P O I N T E R ) ) P A T H
0030660 N A M E ) ) ( C L : S E T F
0030700 ( F F E T C H F I E L D ( Q U
0030720 O T E ( P A T H N A M E 4
0030740 P O I N T E R ) ) C L : : N E
0030760 W ) ( F F E T C H F I E L D
0031000 ( Q U O T E ( P A T H N A M E
0031020 4 P O I N T E R ) ) P A T
0031040 H N A M E ) ) ( C L : S E T F
0031060 ( F F E T C H F I E L D ( Q
0031100 U O T E ( P A T H N A M E 6
0031120 P O I N T E R ) ) C L : : N
0031140 E W ) ( F F E T C H F I E L D
0031160 ( Q U O T E ( P A T H N A M
0031200 E 6 P O I N T E R ) ) P A
0031220 T H N A M E ) ) ( C L : S E T
0031240 F ( F F E T C H F I E L D (
0031260 Q U O T E ( P A T H N A M E
0031300 8 P O I N T E R ) ) C L : :
0031320 N E W ) ( F F E T C H F I E L
0031340 D ( Q U O T E ( P A T H N A
0031360 M E 8 P O I N T E R ) ) P
0031400 A T H N A M E ) ) ( C L : S E
0031420 T F ( F F E T C H F I E L D
0031440 ( Q U O T E ( P A T H N A M E
0031460 1 0 P O I N T E R ) ) C L
0031500 : : N E W ) ( F F E T C H F I
0031520 E L D ( Q U O T E ( P A T H
0031540 N A M E 1 0 P O I N T E R )
0031560 ) P A T H N A M E ) ) C L :
0031600 : N E W ) ) ) ) \r ( L E T * (
0031620 ( A 2 6 2 6 ( Q U O T E C O
0031640 P Y - P A T H N A M E ) ) ( A
0031660 2 6 2 7 ( Q U O T E C O M P
0031700 I L E R : O P T I M I Z E R - L
0031720 I S T ) ) ( A 2 6 2 9 ( C L
0031740 : A D J O I N ( Q U O T E \r
0031760 d e f i n l i n e - C O P Y - P
0032000 A T H N A M E ) ( G E T A 2
0032020 6 2 6 A 2 6 2 7 ) ) ) ) ( P
0032040 U T P R O P A 2 6 2 6 A 2 6
0032060 2 7 A 2 6 2 9 ) ) \r % % P R I
0032100 N T - P A T H N A M E D 1 \r (
0032120 L ( 2 D 1 S T R E A M
0032140 0 S ) ) \0 021 \0 \0 \0 003 A o \0 \0
0032160 \0 g \0 \0 @ \t \0 \0 \f \0 \0 020 \0 ( 1 4
0032200 C L : F O R M A T 1 1 C L
0032220 : N A M E S T R I N G ) \r ( 7
0032240 P A T H N A M E ) \r ( 4 " #
0032260 . ( ~ S ~ S ) " ) \r C L : M A
0032300 K E - P A T H N A M E D 1 \r (
0032320 L ( 0 - a r g s - ) F 2
0032340 7 * D E F A U L T - P A T H N
0032360 A M E - D E F A U L T S * ) 001
0032400 367 033 001 002 \0 e 021 001 \0 H k 021 002 002 J d
0032420 I 363 242 261 001 017 277 h 022 021 361 020 021 240 032 i
0032440 272 H k 274 273 L d K 363 242 261 001 \r 277 h Z
0032460 275 i 276 H k _ 020 277 _ 016 277 O 020 d O 016
0032500 363 242 261 001 \n 277 h ^ _ 022 277 i _ 024 277 H
0032520 k _ 030 277 _ 026 277 O 030 d O 026 363 242 261 001
0032540 006 277 h _ 024 _ 032 277 i _ 034 277 H k _
0032560 277 _ 036 277 O d O 036 363 242 261 001 001 277 h
0032600 _ 034 _ " 277 i _ $ 277 H k _ ( 277 _ &
0032620 277 O ( d O & 363 242 261 \0 374 277 h _ $ _
0032640 * 277 i _ , 277 H k _ 0 277 _ . 277 O 0
0032660 d O . 363 242 261 \0 367 277 h _ , _ 2 277 I
0032700 265 \r J 263 N W 6 \t \0 \0 ] 260 G \t \0 \0
0032720 _ 4 277 J 245 O 4 \t \0 \0 275 N 247 O 4 \t
0032740 \0 \0 _ 022 277 O 024 247 O 4 \t \0 \0 _ 032 277
0032760 O 034 247 O 4 \t \0 \0 _ " 277 O $ 247 O 4
0033000 \t \0 \0 _ * 277 O , 247 O 4 \t \0 \0 _ 2
0033020 277 M 005 \a 242 261 \0 257 M g \0 \0 \n \0 \0 261
0033040 \0 246 a g \0 \0 360 226 J k 330 a 261 376 354 J
0033060 l 002 324 Z 261 376 333 a g \0 \0 360 226 L k 330
0033100 a 261 376 357 L l 002 324 \ 261 376 335 a g \0 \0
0033120 360 227 O 020 k 330 a 261 376 361 O 020 l 002 324 _
0033140 020 261 376 334 a g \0 \0 360 227 O 030 k 330 a 261
0033160 376 366 O 030 l 002 324 _ 030 261 376 340 a g \0 \0
0033200 360 227 O k 330 a 261 376 373 O l 002 324 _
0033220 261 376 345 a g \0 \0 360 227 O ( k 330 a 261
0033240 377 \0 O ( l 002 324 _ ( 261 376 352 a g \0 \0
0033260 360 227 O 0 k 330 a 261 377 005 O 0 l 002 324 _
0033300 0 261 376 357 M O 022 d 005 \a 230 277 O 022 g \0
0033320 \0 \n \0 \0 O 032 O " d 005 \a 230 277 O " g
0033340 \0 \0 \n \0 \0 O * d 005 \a 230 277 O * g \0
0033360 \0 \n \0 \0 O 2 \r 006 \0 \0 020 \0 ( 5 0 0
0033400 % % M A K E - P A T H N A M E
0033420 4 9 4 C O E R C E 4 7 9
0033440 C O E R C E 4 6 2 C O E R C
0033460 E 2 8 1 C O E R C E 2 6 4
0033500 % % P A T H N A M E - V E R S
0033520 I O N 2 5 3 % % P A T H N A
0033540 M E - T Y P E 2 4 2 % % P A
0033560 T H N A M E - N A M E 2 3 1
0033600 % % P A T H N A M E - D I R E C
0033620 T O R Y 2 2 0 % % P A T H N
0033640 A M E - D E V I C E 2 1 2 %
0033660 % P A T H N A M E - H O S T 2
0033700 0 2 P A T H N A M E 1 9 6
0033720 % % P A T H N A M E - H O S T )
0033740 \r ( 4 9 1 C L : S I M P L E -
0033760 S T R I N G 4 7 6 C L : S I
0034000 M P L E - S T R I N G 4 5 9
0034020 C L : S I M P L E - S T R I N G
0034040 4 2 6 : V E R S I O N 4 0
0034060 2 : T Y P E 3 7 8 : N A M
0034100 E 3 5 4 : D I R E C T O R Y
0034120 3 3 0 : D E V I C E 3 0 9
0034140 : H O S T 2 8 8 : D E F A
0034160 U L T S 2 7 8 C L : S I M P
0034200 L E - S T R I N G ) \r ( ) \r C L
0034220 : P A T H N A M E - H O S T D
0034240 1 \r ( L ( 0 P A T H N A M E
0034260 ) ) \0 016 \0 \0 \0 001 @ \t \0 \0 \t \0 \0
0034300 d 222 \t \0 \0 020 \0 ( 1 1 C L : S T
0034320 R I N G - U P C A S E 6 % %
0034340 P A T H N A M E - H O S T 3
0034360 P A T H N A M E ) \r N I L \r ( )
0034400 \r C L : P A T H N A M E - D E V
0034420 I C E D 1 \r ( L ( 0 P A T
0034440 H N A M E ) ) \0 016 \0 \0 \0 001 @ \t
0034460 \0 \0 \t \0 \0 d 222 \t \0 \0 020 \0 ( 1 1
0034500 C L : S T R I N G - U P C A S E
0034520 6 % % P A T H N A M E - D E
0034540 V I C E 3 P A T H N A M E )
0034560 \r N I L \r ( ) \r C L : P A T H N
0034600 A M E - D I R E C T O R Y D 1
0034620 \r ( L ( 0 P A T H N A M E )
0034640 ) \0 \v \0 \0 \0 001 @ \t \0 \0 d 222 \t \0
0034660 \0 020 \0 ( 8 C L : S T R I N G -
0034700 U P C A S E 3 % % P A T H N
0034720 A M E - D I R E C T O R Y ) \r N
0034740 I L \r ( ) \r C L : P A T H N A M
0034760 E - N A M E D 1 \r ( L ( 0
0035000 P A T H N A M E ) ) \0 016 \0 \0 \0
0035020 001 @ \t \0 \0 \t \0 \0 d 222 \t \0 \0 020 \0 (
0035040 1 1 C L : S T R I N G - U P C
0035060 A S E 6 % % P A T H N A M E
0035100 - N A M E 3 P A T H N A M E
0035120 ) \r N I L \r ( ) \r C L : P A T H
0035140 N A M E - T Y P E D 1 \r ( L
0035160 ( 0 P A T H N A M E ) ) \0 016
0035200 \0 \0 \0 001 @ \t \0 \0 \t \0 \0 d 222 \t \0 \0
0035220 020 \0 ( 1 1 C L : S T R I N G -
0035240 U P C A S E 6 % % P A T H N
0035260 A M E - T Y P E 3 P A T H N
0035300 A M E ) \r N I L \r ( ) \r C L : P
0035320 A T H N A M E - V E R S I O N
0035340 D 1 \r ( L ( 0 P A T H N A M
0035360 E ) ) \0 \t \0 \0 \0 001 @ \t \0 \0 \t \0
0035400 \0 020 \0 ( 6 % % P A T H N A M E
0035420 - V E R S I O N 3 P A T H N
0035440 A M E ) \r N I L \r ( ) \r P A T H
0035460 N A M E D 1 \r ( L ( 0 T H
0035500 I N G ) ) \0 \t \0 \0 \0 001 @ \t \0 \0
0035520 \t \0 \0 020 \0 ( 6 C L : V A L U E
0035540 S 3 C L : P A R S E - N A M
0035560 E S T R I N G ) \r N I L \r ( ) \r
0035600 C L : M E R G E - P A T H N A M
0035620 E S D 1 \r ( L ( 0 - a r g
0035640 s - ) F 8 * D E F A U L T
0035660 - P A T H N A M E - D E F A U L
0035700 T S * ) \0 x \b 001 002 \0 e 021 001 \0 k
0035720 a 021 a \a l 002 H 361 222 W 020 202 l 002 a 272
0035740 l 003 H 361 221 h 202 l 003 a 273 I \t \0 \0 274
0035760 J \t \0 \0 275 L \t \0 \0 276 L \t \0 \0 _ 016
0036000 277 L \t \0 \0 265 006 M \t \0 \0 O 016 265 006 M
0036020 \t \0 \0 L \t \0 \0 265 006 M \t \0 \0 N 265 006
0036040 M \t \0 \0 L \t \0 \0 265 006 M \t \0 \0 L \t
0036060 \0 \0 265 \v N 245 M \t \0 \0 265 003 K \r 006 \0
0036100 \0 020 \0 ( 1 1 7 % % M A K E - P
0036120 A T H N A M E 1 1 0 % % P A
0036140 T H N A M E - V E R S I O N 1
0036160 0 2 % % P A T H N A M E - V E
0036200 R S I O N 9 8 % % P A T H N
0036220 A M E - T Y P E 9 2 % % P A
0036240 T H N A M E - T Y P E 8 8 %
0036260 % P A T H N A M E - N A M E 8
0036300 1 % % P A T H N A M E - D I R
0036320 E C T O R Y 7 5 % % P A T H
0036340 N A M E - D I R E C T O R Y 7
0036360 1 % % P A T H N A M E - D E V
0036400 I C E 6 3 % % P A T H N A M
0036420 E - H O S T 5 7 % % P A T H
0036440 N A M E - H O S T 5 0 % % P
0036460 A T H N A M E - D E V I C E 4
0036500 5 % % P A T H N A M E - N A M
0036520 E 4 0 P A T H N A M E 3 5
0036540 P A T H N A M E ) \r N I L \r (
0036560 ) \r F I L E - N A M E D 1 \r (
0036600 L ( 0 F I L E ) ) \0 023 \0 \0
0036620 \0 001 @ \t \0 \0 d \t \0 \0 224 o \0 \0 \0 020
0036640 \t \0 \0 020 \0 ( 1 6 M K S T R I N
0036660 G 7 S T R E A M P 3 F U
0036700 L L N A M E ) \r N I L \r ( 1 2
0036720 " " ) \r C L : H O S T - N A M
0036740 E S T R I N G D 1 \r ( L ( 0
0036760 P A T H N A M E ) ) \0 017 \0 \0
0037000 \0 001 @ \t \0 \0 \t \0 \0 265 006 o \0 \0 \0 020
0037020 \0 ( 6 % % P A T H N A M E - H
0037040 O S T 3 P A T H N A M E ) \r
0037060 N I L \r ( 1 2 " " ) \r C L :
0037100 E N O U G H - N A M E S T R I N
0037120 G D 1 \r ( L ( 0 - a r g s
0037140 - ) F 1 2 * D E F A U L T
0037160 - P A T H N A M E - D E F A U L
0037200 T S * ) 001 017 \f 001 002 \0 e 021 001 \0 k
0037220 a 021 241 \v l 002 H 361 222 W 030 202 l 002 a 272
0037240 I \t \0 \0 273 J \t \0 \0 274 K \t \0 \0 275 K
0037260 \t \0 \0 276 K \t \0 \0 _ 016 277 K \t \0 \0 _
0037300 020 277 K \t \0 \0 _ 022 277 o \0 \0 \0 _ 024 277
0037320 h _ 026 277 M 265 003 202 261 \0 246 N 265 y O 016
0037340 265 S O 020 262 ( O 026 263 023 O 020 L \t \0 \0
0037360 265 006 o \0 \0 \0 \n \0 \0 262 023 g \0 \0 O 024
0037400 o \0 \0 \0 O 020 \f \0 \0 _ 024 277 O 022 242 261
0037420 \0 207 O 026 250 O 022 L \t \0 \0 : 263 z g \0
0037440 \0 O 024 o \0 \0 \0 O 022 265 006 o \0 \0 \0 \f
0037460 \0 \0 020 L \t \0 \0 265 006 o \0 \0 \0 \n \0 \0
0037500 262 242 g \0 \0 O 024 O 016 \v \0 \0 _ 024 277 i
0037520 _ 026 277 260 217 L \t \0 \0 265 006 o \0 \0 \0 \n
0037540 \0 \0 222 261 377 { g \0 \0 O 024 o \0 \0 \0 N
0037560 o \0 \0 \0 \r 005 \0 \0 _ 024 277 261 377 c L \t
0037600 \0 \0 265 006 o \0 \0 \0 \n \0 \0 242 261 377 O M
0037620 _ 024 277 261 377 H O 024 020 \0 ( 2 5 5 C
0037640 L : S T R I N G - N O T - E Q U
0037660 A L 2 4 6 % % P A T H N A M
0037700 E - D E V I C E 2 3 6 C L :
0037720 C O N C A T E N A T E 2 1 4
0037740 C L : E Q U A L P 2 0 5 % %
0037760 P A T H N A M E - D I R E C T O
0040000 R Y 1 9 2 C L : C O N C A T
0040020 E N A T E 1 8 0 C L : S T R
0040040 I N G - N O T - E Q U A L 1 7
0040060 1 % % P A T H N A M E - N A M
0040100 E 1 6 6 C L : C O N C A T E
0040120 N A T E 1 4 3 % % P A T H N
0040140 A M E - V E R S I O N 1 2 5
0040160 C L : C O N C A T E N A T E 1
0040200 0 9 C L : S T R I N G - N O T
0040220 - E Q U A L 1 0 0 % % P A T
0040240 H N A M E - T Y P E 5 8 % %
0040260 P A T H N A M E - V E R S I O N
0040300 5 1 % % P A T H N A M E - T
0040320 Y P E 4 4 % % P A T H N A M
0040340 E - N A M E 3 9 % % P A T H
0040360 N A M E - D I R E C T O R Y 3
0040400 4 % % P A T H N A M E - D E V
0040420 I C E 2 9 P A T H N A M E
0040440 2 4 P A T H N A M E ) \r ( 2 2
0040460 1 C L : S I M P L E - S T R I
0040500 N G 1 8 5 C L : S I M P L E
0040520 - S T R I N G 1 4 9 C L : S
0040540 I M P L E - S T R I N G 1 1 4
0040560 C L : S I M P L E - S T R I N
0040600 G ) \r ( 2 5 2 " " 2 3 2
0040620 " > " 2 2 7 " < " 2 1 1
0040640 " " 1 7 7 " " 1 6 3 " "
0040660 1 5 5 " ; " 1 2 0 " . "
0040700 1 0 6 " " 6 5 " " ) \r %
0040720 % N U M E R I C - S T R I N G -
0040740 P D 1 \r ( P 1 C H A R I
0040760 0 S T R I N G ) \0 I 006 \0 \0
0041000 001 @ \t \0 \0 264 A @ 021 Q 005 H 310 003 k 331
0041020 273 H 311 \0 274 K H 310 002 330 272 H 312 \0 C j
0041040 360 221 h 200 i 275 K k 330 [ J 361 263 033 M 225
0041060 L K 320 310 \0 202 L K 302 271 l 0 I 361 245 I
0041100 l 9 361 262 343 h 020 i 020 \0 ( 3 C L :
0041120 S T R I N G P ) \r N I L \r ( ) \r
0041140 C L : N A M E S T R I N G D 1
0041160 \r ( L ( 0 P A T H N A M E )
0041200 ) \0 335 \a \0 \0 001 @ d \t \0 \0 232 277 @
0041220 d 311 004 244 o \0 \0 \0 020 \t \0 \0 b \0 d \t
0041240 \0 \0 021 a 006 @ \t \0 \0 271 @ \t \0 \0 272 @
0041260 \t \0 \0 273 @ \t \0 \0 274 @ \t \0 \0 275 h 276
0041300 H 237 g \0 \0 o \0 \0 \0 H o \0 \0 \0 \f \0
0041320 \0 276 I 230 g \0 \0 N I \v \0 \0 276 J 262 037
0041340 g \0 \0 N o \0 \0 \0 J d g \0 \0 360 224 277
0041360 o \0 \0 \0 o \0 \0 \0 \r 005 \0 \0 276 K 262 026
0041400 g \0 \0 N K d g \0 \0 360 224 277 o \0 \0 \0
0041420 \v \0 \0 276 L 262 032 g \0 \0 N o \0 \0 \0 L
0041440 d g \0 \0 360 224 277 o \0 \0 \0 \f \0 \0 276 M
0041460 262 2 g \0 \0 N M d g \0 \0 360 226 277 o \0
0041500 \0 \0 260 034 g \0 \0 360 241 M 244 o \0 \0 \0 215
0041520 g \0 \0 o \0 \0 \0 M \t \0 \0 \v \0 \0 \v \0
0041540 \0 020 N 020 \0 ( 2 1 6 C L : C O N
0041560 C A T E N A T E 2 1 3 C L :
0041600 C O N C A T E N A T E 2 1 0
0041620 C L : P R I N C - T O - S T R I
0041640 N G 1 6 5 C L : C O N C A T
0041660 E N A T E 1 3 8 C L : C O N
0041700 C A T E N A T E 1 1 5 C L :
0041720 C O N C A T E N A T E 8 3 C
0041740 L : C O N C A T E N A T E 7 2
0041760 C L : C O N C A T E N A T E
0042000 5 2 % % P A T H N A M E - V E
0042020 R S I O N 4 7 % % P A T H N
0042040 A M E - T Y P E 4 2 % % P A
0042060 T H N A M E - N A M E 3 7 %
0042100 % P A T H N A M E - D I R E C T
0042120 O R Y 3 2 % % P A T H N A M
0042140 E - D E V I C E 2 5 % % P A
0042160 T H N A M E - H O S T 1 9 P
0042200 A T H N A M E 4 S T R E A M
0042220 P ) \r ( 2 0 2 C L : S I M P L
0042240 E - S T R I N G 1 9 0 : N E
0042260 W E S T 1 7 8 : W I L D 1
0042300 7 2 C L : S I M P L E - S T R
0042320 I N G 1 5 5 : W I L D 1 4
0042340 5 C L : S I M P L E - S T R I
0042360 N G 1 2 8 : W I L D 1 2 2
0042400 C L : S I M P L E - S T R I N
0042420 G 1 0 0 : W I L D 9 0 C
0042440 L : S I M P L E - S T R I N G
0042460 7 8 C L : S I M P L E - S T R
0042500 I N G 6 0 C L : S I M P L E
0042520 - S T R I N G ) \r ( 2 0 6 "
0042540 ; " 1 9 8 " " 1 8 5 " ;
0042560 * " 1 6 2 " * " 1 5 0 "
0042600 . " 1 3 5 " * " 1 1 1 "
0042620 > " 1 0 7 " * " 9 5 " <
0042640 " 6 9 " } " 6 4 " { "
0042660 1 5 " " ) \r C L : P A R S E -
0042700 N A M E S T R I N G D 1 \r ( L
0042720 ( 0 - a r g s - ) F 1 6
0042740 * D E F A U L T - P A T H N A
0042760 M E - D E F A U L T S * ) 001 210
0043000 020 001 002 \0 e 021 001 \0 k a 021 341 017 l 002 H
0043020 361 221 h 202 l 002 a 272 l 003 H 361 222 W 202
0043040 l 003 a 273 H l 004 275 274 M d L 363 262 M 277
0043060 j 276 H l 004 _ 020 277 _ 016 277 O 020 d O 016
0043100 363 262 L 277 h _ 022 277 H l 004 _ 026 277 _ 024
0043120 277 O 026 d O 024 363 262 L 277 K 242 W 273 J
0043140 244 K \t \0 \0 272 I _ 030 d \t \0 \0 262 F 277
0043160 I g \0 \0 \n \0 \0 Y 260 f a g \0 \0 360 225
0043200 M k 330 a 260 255 M l 002 324 ] 260 237 a g \0
0043220 \0 360 226 O 020 k 330 a 260 255 O 020 l 002 324 _
0043240 020 260 234 a g \0 \0 360 263 262 O 026 l 002 324 _
0043260 026 260 242 303 \0 \0 225 I N \n \0 \0 020 O 030 d
0043300 303 \0 \0 227 277 I \t \0 \0 Y 260 024 303 \0 \0 225
0043320 I \t \0 \0 Y 207 o \0 \0 \0 I \n \0 \0 277 O
0043340 022 246 I \t \0 \0 _ 022 277 I N O 022 \v \0 \0
0043360 \t \0 \0 \t \0 \0 _ 032 002 _ 034 277 g \0 \0 O
0043400 034 g \0 \0 ' g \0 \0 O 034 g \0 \0 ' g \0
0043420 \0 O 034 g \0 \0 ' d o \0 \0 \0 \n \0 \0 223
0043440 277 g \0 \0 g \0 \0 O 034 g \0 \0 ' d o \0
0043460 \0 \0 \n \0 \0 223 277 g \0 \0 g \0 \0 O 034 g
0043500 \0 \0 ' d o \0 \0 \0 \n \0 \0 223 277 g \0 \0
0043520 g \0 \0 O 034 g \0 \0 ' _ 036 233 O 036 d o
0043540 \0 \0 \0 \n \0 \0 225 277 g \0 \0 260 023 o \0 \0
0043560 \0 \n \0 \0 223 g \0 \0 204 O 036 \t \0 \0 \r \f
0043600 \0 \0 N O 032 001 324 \n \0 \0 020 \0 ( 3 8 9
0043620 C L : V A L U E S 3 8 1 C
0043640 L : M A K E - P A T H N A M E
0043660 3 7 7 M K A T O M 3 6 7 C
0043700 L : E Q U A L 3 5 3 C L : E
0043720 Q U A L 3 2 6 S T R I N G -
0043740 E Q U A L 3 0 4 S T R I N G
0043760 - E Q U A L 2 8 2 S T R I N
0044000 G - E Q U A L 2 4 1 P A R S
0044020 E - N A M E S T R I N G 1 2 3
0044040 8 M K S T R I N G 2 3 5 C
0044060 L : S U B S E Q 2 2 5 C L :
0044100 L E N G T H 2 1 7 C L : E R
0044120 R O R 2 0 7 C L : S Y M B O
0044140 L - N A M E 1 9 6 F I L E -
0044160 N A M E 1 8 3 C L : V A L U
0044200 E S 1 1 4 C O E R C E 1 0
0044220 4 C L : S T R I N G P 9 6
0044240 % % P A T H N A M E - H O S T )
0044260 \r ( 3 7 1 : W I L D 3 5 8
0044300 : N E W E S T 3 3 9 V E R S
0044320 I O N 3 3 4 : V E R S I O N
0044340 3 3 1 : W I L D 3 1 7 T
0044360 Y P E 3 1 2 : T Y P E 3 0
0044400 9 : W I L D 2 9 5 N A M E
0044420 2 9 0 : N A M E 2 8 7 :
0044440 W I L D 2 7 3 D I R E C T O
0044460 R Y 2 6 8 : D I R E C T O R
0044500 Y 2 6 4 D E V I C E 2 5 9
0044520 : D E V I C E 2 5 5 H O S
0044540 T 2 5 0 : H O S T 2 0 2
0044560 L I T A T O M 1 9 0 S T R E
0044600 A M 1 7 7 P A T H N A M E
0044620 1 6 2 : J U N K - A L L O W E
0044640 D 1 4 0 : E N D 1 2 1 :
0044660 S T A R T 1 1 1 C L : S I M
0044700 P L E - S T R I N G ) \r ( 3 6
0044720 4 " * " 3 5 0 " " 3 2 3
0044740 " * " 3 0 1 " * " 2 7 9
0044760 " * " 2 1 3 " T h i s i
0045000 s o f a n i n a p p r o p
0045020 r i a t e t y p e f o r p
0045040 a r s e - n a m e s t r i n g :
0045060 ~ S " ) \r P A R S E - N A M E
0045100 S T R I N G 1 D 1 \r ( L ( 0
0045120 F I L E ) ) 002 217 \f \0 \0 001 k 021
0045140 201 \b @ 265 006 H h 032 020 004 l 004 360 263 - @
0045160 d \t \0 \0 263 ' 277 @ d 3 020 263 d 303 \0
0045200 \0 262 025 277 @ 311 004 265 \f H g \0 \0 @ h 032
0045220 032 032 020 b \0 204 \t \0 \0 277 @ k \n \0 \0 d
0045240 l { 360 223 277 l } 217 d l [ 360 223 277 l ]
0045260 206 l ( 360 262 < l ) @ l 002 \v \0 \0 265 003
0045300 j k 331 Y 262 , @ l 002 I \v \0 \0 265 006 o
0045320 \0 \0 \0 g \0 \0 M 032 032 275 I d m 377 360 227
0045340 277 H M \t \0 \0 032 020 l 002 330 270 i _ 016 277
0045360 l : @ H \v \0 \0 Y 264 036 @ H I \v \0 \0
0045400 265 006 o \0 \0 \0 g \0 \0 M 032 032 275 I k 330
0045420 270 i _ 016 277 h g \0 \0 360 262 l g \0 \0 @
0045440 H \n \0 \0 265 \t H M \t \0 \0 032 020 d l /
0045460 360 244 d l < 360 224 277 H k 330 201 277 H 021 022
0045500 \v @ m 377 \n \0 \0 d l / 360 245 d l > 360
0045520 262 024 277 O 024 H 360 230 O 016 245 g \0 \0 _ 022
0045540 277 m 376 202 277 m 377 _ 026 277 @ O 024 O 026 \v
0045560 \0 \0 265 006 o \0 \0 \0 O 022 M 032 032 ] 023 H
0045600 M \t \0 \0 032 020 @ H \n \0 \0 d l / 360 234
0045620 277 l / @ H k 330 \v \0 \0 Y 260 032 d l <
0045640 360 244 d l > 360 233 277 l > @ H k 330 \v \0
0045660 \0 Y 201 277 h 262 ! @ H k 330 I k 331 \v \0
0045700 \0 265 006 o \0 \0 \0 g \0 \0 M 032 032 275 I k
0045720 330 270 i _ 016 277 @ H Y \n \0 \0 ^ 265 003 202
0045740 261 \0 237 H M \t \0 \0 032 020 @ H I k 331 \v
0045760 \0 \0 265 006 o \0 \0 \0 K 256 N l . 360 243 g
0046000 \0 \0 274 g \0 \0 [ 260 M L 265 022 N l . 360
0046020 243 g \0 \0 200 i 274 g \0 \0 260 : g \0 \0 360
0046040 264 \a @ H \n \0 \0 d l P 360 225 277 g \0 \0
0046060 260 $ d l A 360 231 277 H k 324 270 g \0 \0 260
0046100 025 d l T 360 244 d l S 360 224 277 g \0 \0 203
0046120 277 g \0 \0 M 032 032 275 N 242 261 \0 213 I k 330
0046140 X 260 024 l ' 360 224 I k 324 Y 210 N l / 360
0046160 244 N l > 360 277 @ I k 324 Y \n \0 \0 ^ l
0046200 . 360 254 N d l ! 360 247 d l ; 360 242 265 325
0046220 N l . 360 262 K 263 035 o \0 \0 \0 @ I k
0046240 330 \v \0 \0 Z 235 @ J k 330 \n \0 \0 Z 224 J
0046260 3 262 304 O 020 242 261 377 3 @ H O 020 k 331
0046300 \v \0 \0 265 006 o \0 \0 \0 g \0 \0 M 032 032 275
0046320 O 020 k 330 270 h _ 020 277 N 222 261 377 017 H I
0046340 360 242 261 377 \b H M \t \0 \0 032 020 \0 ( 6 5
0046360 1 D R E V E R S E 6 1 2 S
0046400 U B S T R I N G 5 9 0 N T H
0046420 C H A R 5 8 1 S T R P O S
0046440 5 4 3 N T H C H A R C O D E
0046460 4 5 6 N T H C H A R C O D E
0046500 4 0 3 S U B S T R I N G 3 9
0046520 3 D R E V E R S E 3 8 1 N
0046540 T H C H A R C O D E 3 5 4 S
0046560 U B S T R I N G 3 3 8 L A S
0046600 T C H P O S 3 1 5 L A S T C
0046620 H P O S 3 0 0 N T H C H A R
0046640 C O D E 2 9 3 D R E V E R S
0046660 E 2 7 5 S U B S T R I N G
0046700 2 3 2 N T H C H A R C O D E
0046720 2 0 4 D R E V E R S E 1 9 7
0046740 N T H C H A R C O D E 1 6 1
0046760 S U B S T R I N G 1 5 2 L
0047000 A S T C H P O S 1 3 5 D R E
0047020 V E R S E 1 1 0 S U B S T R
0047040 I N G 9 5 \ U P F . N E X T
0047060 P O S 6 4 N T H C H A R C O
0047100 D E 5 8 \ I L L E G A L . A
0047120 R G 2 1 C L : S T R I N G P
0047140 ) \r ( 6 2 1 S U B D I R E C T
0047160 O R Y 5 0 1 V E R S I O N
0047200 4 9 6 T E M P O R A R Y 4 8
0047220 0 A C C O U N T 4 6 5 P R
0047240 O T E C T I O N 4 4 8 ; 4
0047260 4 3 T Y P E 4 3 7 ; 4 2
0047300 3 N A M E 4 1 9 ; 3 6 3
0047320 D I R E C T O R Y 2 5 5 S
0047340 U B D I R E C T O R Y 1 9 2
0047360 D I R E C T O R Y 1 8 6 R E
0047400 T U R N 1 7 0 D E V I C E
0047420 1 1 9 H O S T 4 6 N A M E
0047440 3 4 S T R E A M ) \r ( 6 1
0047460 8 " " 5 7 4 " . " 4 0 9
0047500 " " 3 6 0 " " 2 8 1 "
0047520 " 1 6 7 " " 1 1 6 " " )
0047540 \r C L : T R U E N A M E D 1 \r
0047560 ( L ( 0 P A T H N A M E ) )
0047600 \0 - 001 \0 \0 001 @ d \t \0 \0 237 277 @ d
0047620 311 004 251 277 o \0 \0 \0 @ \n \0 \0 020 \t \0 \0
0047640 021 001 \0 H 265 016 o \0 \0 \0 @ \t \0 \0 \n \0
0047660 \0 H 020 \0 ( 4 1 C L : E R R O R
0047700 3 8 C L : N A M E S T R I N
0047720 G 2 4 C L : P R O B E - F I
0047740 L E 2 0 C L : E R R O R 4
0047760 S T R E A M P ) \r N I L \r (
0050000 3 4 " T h e f i l e ~ S
0050020 d o e s n o t e x i s t . "
0050040 1 6 " T h e s t r e a m
0050060 ~ S h a s n o c o r r e s
0050100 p o n d i n g n a m e d f i
0050120 l e . " ) \r % % M A K E - P A T
0050140 H N A M E D 1 \r ( L ( 5 V
0050160 E R S I O N 4 T Y P E 3
0050200 N A M E 2 D I R E C T O R Y
0050220 1 D E V I C E 0 H O S T
0050240 ) ) \0 036 \0 \0 \0 006 g \0 \0 @ g \0 \0
0050260 A g \0 \0 B g \0 \0 C g \0 \0 D g \0 \0
0050300 E \r \f \0 \0 020 \0 ( 2 7 % % % % M
0050320 A K E - P A T H N A M E ) \r ( 2
0050340 2 : V E R S I O N 1 8 : T
0050360 Y P E 1 4 : N A M E 1 0
0050400 : D I R E C T O R Y 6 : D E
0050420 V I C E 2 : H O S T ) \r ( )
0050440 \r % % P A T H N A M E - E Q U A
0050460 L D 1 \r ( L ( 1 P A T H N
0050500 A M E 2 0 P A T H N A M E 1
0050520 ) ) \0 N \0 \0 \0 002 @ \t \0 \0 A \t \0
0050540 \0 \n \0 \0 264 A @ \t \0 \0 A \t \0 \0 \n \0
0050560 \0 264 4 @ \t \0 \0 A \t \0 \0 \n \0 \0 264 '
0050600 @ \t \0 \0 A \t \0 \0 \n \0 \0 264 032 @ \t \0
0050620 \0 A \t \0 \0 \n \0 \0 264 \r @ \t \0 \0 A \t
0050640 \0 \0 \n \0 \0 020 \0 ( 7 5 C L : E Q
0050660 U A L 7 2 % % P A T H N A M
0050700 E - V E R S I O N 6 8 % % P
0050720 A T H N A M E - V E R S I O N
0050740 6 2 C L : E Q U A L 5 9 %
0050760 % P A T H N A M E - T Y P E 5
0051000 5 % % P A T H N A M E - T Y P
0051020 E 4 9 C L : E Q U A L 4 6
0051040 % % P A T H N A M E - N A M E
0051060 4 2 % % P A T H N A M E - N
0051100 A M E 3 6 C L : E Q U A L
0051120 3 3 % % P A T H N A M E - D I
0051140 R E C T O R Y 2 9 % % P A T
0051160 H N A M E - D I R E C T O R Y
0051200 2 3 C L : E Q U A L 2 0 %
0051220 % P A T H N A M E - D E V I C E
0051240 1 6 % % P A T H N A M E - D
0051260 E V I C E 1 0 C L : E Q U A
0051300 L 7 % % P A T H N A M E - H
0051320 O S T 3 % % P A T H N A M E
0051340 - H O S T ) \r N I L \r ( ) \r ( C
0051360 L : P R O C L A I M ( Q U O T
0051400 E ( C L : S P E C I A L * D
0051420 E F A U L T - P A T H N A M E -
0051440 D E F A U L T S * ) ) ) \r ( O R
0051460 ( B O U N D P ( Q U O T E
0051500 * D E F A U L T - P A T H N A M
0051520 E - D E F A U L T S * ) ) ( S
0051540 E T Q * D E F A U L T - P A T
0051560 H N A M E - D E F A U L T S *
0051600 ( P R O G N ( \r C L : M A K E
0051620 - P A T H N A M E ( Q U O T E
0051640 : H O S T ) " { D S K } "
0051660 ( Q U O T E : D E V I C E )
0051700 N I L ( Q U O T E : D I R E
0051720 C T O R Y ) N I L ( Q U O T
0051740 E : N A M E ) N I L ( \r Q
0051760 U O T E : T Y P E ) N I L
0052000 ( Q U O T E : V E R S I O N )
0052020 ( Q U O T E : N E W E S T )
0052040 ) ) ) ) \r I N T E R L I S P - N
0052060 A M E S T R I N G D 1 \r ( L
0052100 ( 0 P A T H N A M E ) ) \0 \t
0052120 \0 \0 \0 001 @ \t \0 \0 \t \0 \0 020 \0 ( 6
0052140 M K S T R I N G 3 C L : N A
0052160 M E S T R I N G ) \r N I L \r ( )
0052200 \r U N P A C K P A T H N A M E .
0052220 S T R I N G D 1 \r ( L ( 3
0052240 A T O M F L G 2 D I R F L G
0052260 1 O N E F I E L D F L G 0
0052300 F I L E ) ) 001 \f 001 \0 \0 004 A 265
0052320 034 021 020 \0 @ \t \0 \0 X 264 003 202 261 \0 201 g
0052340 \0 \0 C 262 t H \t \0 \0 260 o d 003 233 277 A
0052360 o \0 \0 \0 \n \0 \0 001 b 002 g \0 \0 360 225 @
0052400 \t \0 \0 260 H A d g \0 \0 360 226 277 @ \t \0
0052420 \0 260 : g \0 \0 360 225 @ \t \0 \0 260 / A d
0052440 g \0 \0 360 226 277 @ \t \0 \0 260 ! g \0 \0 360
0052460 225 @ \t \0 \0 260 026 A d g \0 \0 360 225 277 @
0052500 \t \0 \0 206 g \0 \0 360 264 003 h 021 001 \0 C 224
0052520 H \t \0 \0 020 H 020 H H h 032 032 032 @ \t \0
0052540 \0 X 264 020 g \0 \0 C 224 H \t \0 \0 200 H h
0052560 032 032 @ \t \0 \0 X 264 020 g \0 \0 C 224 H \t
0052600 \0 \0 200 H h 032 032 @ \t \0 \0 X 264 020 g \0
0052620 \0 C 224 H \t \0 \0 200 H h 032 032 @ \t \0 \0
0052640 X 264 020 g \0 \0 C 224 H \t \0 \0 200 H h 032
0052660 032 @ \t \0 \0 X 264 023 g \0 \0 C 224 H \t \0
0052700 \0 203 H \t \0 \0 h 032 032 \n \0 \0 \n \0 \0 \n
0052720 \0 \0 \n \0 \0 \n \0 \0 020 \0 ( 2 6 5 \
0052740 A P P E N D 2 2 6 2 \ A P P
0052760 E N D 2 2 5 9 \ A P P E N D
0053000 2 2 5 6 \ A P P E N D 2 2
0053020 5 3 \ A P P E N D 2 2 4 7
0053040 M K S T R I N G 2 4 2 M K A
0053060 T O M 2 3 0 C L : P A T H N
0053100 A M E - V E R S I O N 2 2 1
0053120 M K A T O M 2 0 9 C L : P A
0053140 T H N A M E - T Y P E 2 0 0
0053160 M K A T O M 1 8 8 C L : P A
0053200 T H N A M E - N A M E 1 7 9
0053220 M K A T O M 1 6 7 C L : P A
0053240 T H N A M E - D I R E C T O R Y
0053260 1 5 8 M K A T O M 1 4 6
0053300 C L : P A T H N A M E - D E V I
0053320 C E 1 3 3 M K A T O M 1 1
0053340 6 C L : P A T H N A M E - V E
0053360 R S I O N 1 0 2 C L : P A T
0053400 H N A M E - T Y P E 9 1 C L
0053420 : P A T H N A M E - N A M E 7
0053440 7 C L : P A T H N A M E - D I
0053460 R E C T O R Y 6 6 C L : P A
0053500 T H N A M E - D E V I C E 5 2
0053520 C L : P A T H N A M E - H O S
0053540 T 4 0 C L : I N T E R S E C
0053560 T I O N 2 6 M K A T O M 9
0053600 C L : P A T H N A M E - H O S
0053620 T ) \r ( 2 3 6 V E R S I O N
0053640 2 1 5 E X T E N S I O N 1 9
0053660 4 N A M E 1 7 3 D I R E C
0053700 T O R Y 1 5 2 D E V I C E
0053720 1 2 0 O T H E R W I S E 1 0
0053740 9 V E R S I O N 9 6 E X T
0053760 E N S I O N 8 4 N A M E 7
0054000 1 D I R E C T O R Y 5 9 D
0054020 E V I C E 4 6 H O S T 1 9
0054040 H O S T ) \r ( 3 7 ( H O S
0054060 T D E V I C E D I R E C T O
0054100 R Y N A M E E X T E N S I O
0054120 N V E R S I O N ) ) \r C L : F
0054140 I L E - N A M E S T R I N G D
0054160 1 \r ( L ( 0 P A T H N A M E
0054200 ) ) \0 n 003 \0 \0 001 @ \t \0 \0 021 ! 002
0054220 g \0 \0 H \t \0 \0 265 006 o \0 \0 \0 o \0 \0
0054240 \0 H \t \0 \0 265 006 o \0 \0 \0 \f \0 \0 271 H
0054260 \t \0 \0 Z 262 @ g \0 \0 I J d g \0 \0 360
0054300 226 277 o \0 \0 \0 260 * g \0 \0 360 225 o \0 \0
0054320 \0 260 037 J 265 \b o \0 \0 \0 260 026 g \0 \0 360
0054340 264 020 g \0 \0 o \0 \0 \0 J \t \0 \0 \v \0 \0
0054360 \v \0 \0 020 I 020 \0 ( 1 0 5 C L : C
0054400 O N C A T E N A T E 1 0 2 C
0054420 L : C O N C A T E N A T E 9 9
0054440 C L : P R I N C - T O - S T R
0054460 I N G 4 1 % % P A T H N A M
0054500 E - V E R S I O N 3 6 C L :
0054520 C O N C A T E N A T E 2 7 %
0054540 % P A T H N A M E - T Y P E 1
0054560 3 % % P A T H N A M E - N A M
0054600 E 3 P A T H N A M E ) \r ( 9
0054620 1 C L : S I M P L E - S T R I
0054640 N G 8 5 O T H E R W I S E
0054660 6 5 : N E W E S T 5 3 : W
0054700 I L D 4 7 C L : S I M P L E
0054720 - S T R I N G 9 C L : S I M
0054740 P L E - S T R I N G ) \r ( 9 5
0054760 " ; " 8 0 " " 7 1 " ;
0055000 " 6 0 " ; * " 3 3 " "
0055020 2 3 " . " 1 9 " " ) \r C L
0055040 : D I R E C T O R Y - N A M E S
0055060 T R I N G D 1 \r ( L ( 0 P
0055100 A T H N A M E ) ) \0 017 \0 \0 \0 001
0055120 @ \t \0 \0 \t \0 \0 265 006 o \0 \0 \0 020 \0 (
0055140 6 % % P A T H N A M E - D I R
0055160 E C T O R Y 3 P A T H N A M
0055200 E ) \r N I L \r ( 1 2 " " ) \r
0055220 C N D I R D 1 \r ( P 1 R E
0055240 A L - H O S T / D I R - P A T H
0055260 N A M E P 0 R E A L - H O
0055300 S T / D I R I 0 H O S T /
0055320 D I R F 2 * D E F A U L T
0055340 - P A T H N A M E - D E F A U L
0055360 T S * ) \0 4 002 001 \0 001 @ i g \0 \0
0055400 \v \0 \0 021 001 \0 H d 222 \t \0 \0 021 001 001 H
0055420 262 024 R I \t \0 \0 \n \0 \0 277 R I \t \0 \0
0055440 \n \0 \0 207 o \0 \0 \0 @ \n \0 \0 H 020 \0 (
0055460 4 8 E R R O R 3 9 % % % %
0055500 S E T F - % % P A T H N A M E -
0055520 D I R E C T O R Y 3 6 % % P
0055540 A T H N A M E - D I R E C T O R
0055560 Y 3 0 % % % % S E T F - % %
0055600 P A T H N A M E - H O S T 2 7
0055620 % % P A T H N A M E - H O S T
0055640 1 6 P A T H N A M E 7 D
0055660 I R E C T O R Y N A M E ) \r ( 4
0055700 A S K ) \r ( 4 4 " N o n -
0055720 e x i s t e n t d i r e c t o
0055740 r y " ) \r D I R E C T O R Y N A
0055760 M E D 1 \r ( P 4 H O S T
0056000 P 2 F D E V P 1 D N
0056020 P 0 C O N N E C T E D - D I
0056040 R E C T O R Y I 2 C R E A
0056060 T E ? I 1 S T R P T R I
0056100 0 D I R N A M E F 5 *
0056120 D E F A U L T - P A T H N A M E
0056140 - D E F A U L T S * ) \0 t 005 001
0056160 \0 003 U \t \0 \0 021 1 003 @ d i 360 223 277 H
0056200 260 S 251 ` \0 \0 265 M g \0 \0 260 H @ g \0
0056220 \0 \n \0 \0 021 001 004 L 265 025 g \0 \0 @ g \0
0056240 \0 H \f \0 \0 b \0 g \0 \0 \n \0 \0 \t \0 \0
0056260 022 Z d 262 ( 311 006 273 @ J B l 003 K 016 Y
0056300 d 262 032 i 360 235 g \0 \0 J 311 \0 g \0 \0 @
0056320 \f \0 \0 271 A 265 \a I \t \0 \0 020 i 360 262 371
0056340 I \t \0 \0 020 \0 ( 1 1 3 M K A T O
0056360 M 1 0 4 M K S T R I N G 9
0056400 6 P A C K F I L E N A M E . S
0056420 T R I N G 6 1 \ G E T D E V
0056440 I C E F R O M H O S T N A M E
0056460 5 8 F I L E N A M E F I E L D
0056500 5 0 P A C K F I L E N A M E
0056520 . S T R I N G 3 3 F I L E N
0056540 A M E F I E L D 3 I N T E R
0056560 L I S P - N A M E S T R I N G )
0056600 \r ( 9 2 D I R E C T O R Y 8
0056620 6 H O S T 5 5 H O S T 4
0056640 6 D I R E C T O R Y 4 2 D
0056660 I R E C T O R Y 3 0 H O S T
0056700 2 4 { D S K } 1 9 L O G
0056720 I N H O S T / D I R ) \r ( ) \r D
0056740 I R E C T O R Y N A M E P D 1
0056760 \r ( P 1 F D E V P 0 D
0057000 N I 1 H O S T N A M E I
0057020 0 D I R N A M E F 3 *
0057040 D E F A U L T - P A T H N A M E
0057060 - D E F A U L T S * ) \0 2 003 001
0057100 \0 002 A 230 g \0 \0 @ g \0 \0 A 212 g \0 \0
0057120 @ g \0 \0 S \t \0 \0 \f \0 \0 021 ! 002 H i
0057140 \n \0 \0 Y d 233 311 006 272 H I l 002 J 016 264
0057160 003 i 020 \0 ( 3 2 \ G E T D E V I
0057200 C E F R O M N A M E 2 4 P A
0057220 C K F I L E N A M E . S T R I N
0057240 G 2 1 I N T E R L I S P - N
0057260 A M E S T R I N G ) \r ( 1 7 D
0057300 I R E C T O R Y 1 3 D I R E
0057320 C T O R Y 8 H O S T 4 D
0057340 I R E C T O R Y ) \r ( ) \r H O S
0057360 T N A M E P D 1 \r ( P 3 D
0057400 P 0 N I 0 N A M E )
0057420 \0 f 004 \0 \0 001 021 001 @ d 004 l 004 360
0057440 223 \t \0 \0 212 005 \a 264 ? @ \t \0 \0 \t \0 \0
0057460 X \t \0 \0 l { 360 262 030 H l 002 g \0 \0 H
0057500 l 002 \v \0 \0 d 262 k 331 \v \0 \0 X 200 H
0057520 ` \0 \0 \n \0 \0 255 ` \0 \0 021 021 003 J 003 265
0057540 \b h 022 264 003 i 020 001 [ 311 020 271 H k I 016
0057560 225 K 265 360 i 260 355 J 002 Z 260 344 \0 ( 6 2
0057600 M E M B 5 3 S U B A T O M
0057620 4 5 S T R P O S 2 8 C H
0057640 C O N 1 2 4 M K A T O M 2
0057660 1 U - C A S E 1 2 U - C A
0057700 S E ) \r ( 6 6 \ F I L E D E V
0057720 I C E S 5 9 \ F I L E D E V
0057740 I C E N A M E S 3 9 } ) \r (
0057760 ) \r \ A D D . C O N N E C T E D
0060000 . D I R D 1 \r ( I 0 F I L
0060020 E N A M E F 0 * D E F A U
0060040 L T - P A T H N A M E - D E F A
0060060 U L T S * ) \0 % \0 001 \0 001 @ d 004
0060100 l 004 360 244 005 \a 262 031 @ g \0 \0 \n \0 \0 256
0060120 g \0 \0 @ g \0 \0 P \t \0 \0 \f \0 \0 020 @
0060140 020 \0 ( 3 2 P A C K F I L E N A
0060160 M E 2 9 I N T E R L I S P -
0060200 N A M E S T R I N G 1 7 F I
0060220 L E N A M E F I E L D ) \r ( 2 5
0060240 D I R E C T O R Y 2 1 B O
0060260 D Y 1 4 H O S T ) \r ( ) \r (
0060300 P U T P R O P S C M L P A T H
0060320 N A M E F I L E T Y P E C L
0060340 : C O M P I L E - F I L E ) \r (
0060360 P U T P R O P S C M L P A T H
0060400 N A M E C O P Y R I G H T (
0060420 " X e r o x C o r p o r a t i
0060440 o n " 1 9 8 6 ) ) \r N I L \r
0060457