$ od -c -N 50000 [eris]<LispCore>CML>MORGUE>CMLPATHNAME.DCOM!1
0000000 ( F I L E C R E A T E D " 3 1
0000020 - A u g - 8 5 2 2 : 1 0 : 4 9
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 > L I B R A R Y > C M L P A T
0000120 H N A M E . ; 3 ) \r " 1 6 - A
0000140 u g - 8 5 0 6 : 2 0 : 2 6 "
0000160 t c o m p l ' d i n " I N T
0000200 E R L I S P - D 1 6 - A u g -
0000220 8 5 . . . " d a t e d " 1
0000240 6 - A u g - 8 5 0 8 : 0 1 : 0
0000260 7 " ) \r ( F I L E C R E A T E D
0000300 " 3 1 - A u g - 8 5 2 2 : 1
0000320 0 : 3 3 " { E R I S } < L I S
0000340 P C O R E > L I B R A R Y > C M
0000360 L P A T H N A M E . ; 3 8 8 0
0000400 0 c h a n g e s t o : ( M
0000420 A C R O S \r D E F P A T H N A
0000440 M E P R I N T E R P A T H N A
0000460 M E P \ P A T H N A M E - D E
0000500 V I C E \ P A T H N A M E - D
0000520 I R E C T O R Y \ P A T H N A
0000540 M E - H O S T \ P A T H N A M
0000560 E - N A M E \r \ P A T H N A M
0000600 E - O S T Y P E \ P A T H N A
0000620 M E - T Y P E \ P A T H N A M
0000640 E - V E R S I O N ) ( V A R S
0000660 C M L P A T H N A M E C O M S
0000700 ) ( R E C O R D S P A T H N
0000720 A M E ) p r e v i o u s \r d
0000740 a t e : " 1 3 - A u g - 8 5
0000760 2 3 : 5 5 : 2 2 " { E R I S }
0001000 < L I S P C O R E > L I B R A R
0001020 Y > C M L P A T H N A M E . ; 2
0001040 ) \r N A M E S T R I N G D 1 \r
0001060 ( P 0 O S T Y P E I 0
0001100 P A T H N A M E F 2 * P A
0001120 T H N A M E - P R I N T E R - F
0001140 U N C T I O N S * ) \0 4 002 001 \0
0001160 001 @ 005 \a 221 @ 020 @ 004 ` \0 \0 360 264 & @
0001200 006 \0 \0 311 \f 265 \v @ 006 \0 \0 311 \0 \t \0 \0
0001220 021 021 001 H 265 \a @ \t \0 \0 020 R 035 271 @ k
0001240 I 017 016 020 \0 ( 5 0 Q \ P A T H N
0001260 A M E - D E F A U L T - P R I N
0001300 T E R 3 6 Q G E T O S T Y P
0001320 E ) \r ( 3 1 Q P A T H N A M E
0001340 2 1 Q P A T H N A M E 1 2
0001360 Q 004 003 P A T H N A M E T Y P E
0001400 # ) \r ( ) \r P A T H N A M E D
0001420 1 \r ( I 0 P A T H N A M E )
0001440 \0 / \0 \0 \0 001 @ d 240 020 004 ` \0 \0 360
0001460 221 @ 020 @ \t \0 \0 227 @ \t \0 \0 b \0 260 352
0001500 @ 005 \a 247 @ d 004 l 004 360 225 277 @ \t \0 \0
0001520 020 \t \0 \0 020 \0 ( 5 4 Q \ I L L E
0001540 G A L . A R G 5 0 Q \ P A T
0001560 H N A M E - C O E R C E 2 4 Q
0001600 F U L L N A M E 1 7 Q S T
0001620 R E A M P ) \r ( 7 004 003 P A T H
0001640 N A M E T Y P E # ) \r ( ) \r P A
0001660 T H N A M E - D E V I C E D 1
0001700 \r ( I 0 P A T H N A M E )
0001720 \0 022 \0 \0 \0 001 @ d 004 ` \0 \0 360 242 \t \0
0001740 \0 006 \0 \0 311 002 020 \0 ( 1 2 Q P A T
0001760 H N A M E ) \r ( 1 5 Q P A T H
0002000 N A M E 5 004 003 P A T H N A M
0002020 E T Y P E # ) \r ( ) \r P A T H N
0002040 A M E - D I R E C T O R Y D 1
0002060 \r ( I 0 P A T H N A M E )
0002100 \0 022 \0 \0 \0 001 @ d 004 ` \0 \0 360 242 \t \0
0002120 \0 006 \0 \0 311 004 020 \0 ( 1 2 Q P A T
0002140 H N A M E ) \r ( 1 5 Q P A T H
0002160 N A M E 5 004 003 P A T H N A M
0002200 E T Y P E # ) \r ( ) \r P A T H N
0002220 A M E - H O S T D 1 \r ( I 0
0002240 P A T H N A M E ) \0 022 \0 \0 \0
0002260 001 @ d 004 ` \0 \0 360 242 \t \0 \0 006 \0 \0 311
0002300 \0 020 \0 ( 1 2 Q P A T H N A M E
0002320 ) \r ( 1 5 Q P A T H N A M E
0002340 5 004 003 P A T H N A M E T Y P E
0002360 # ) \r ( ) \r P A T H N A M E - N
0002400 A M E D 1 \r ( I 0 P A T H
0002420 N A M E ) \0 022 \0 \0 \0 001 @ d 004 `
0002440 \0 \0 360 242 \t \0 \0 006 \0 \0 311 006 020 \0 ( 1
0002460 2 Q P A T H N A M E ) \r ( 1 5
0002500 Q P A T H N A M E 5 004 003 P
0002520 A T H N A M E T Y P E # ) \r ( )
0002540 \r P A T H N A M E - O S T Y P E
0002560 D 1 \r ( I 0 P A T H N A M
0002600 E ) \0 022 \0 \0 \0 001 @ d 004 ` \0 \0 360
0002620 242 \t \0 \0 006 \0 \0 311 \f 020 \0 ( 1 2 Q
0002640 P A T H N A M E ) \r ( 1 5 Q P
0002660 A T H N A M E 5 004 003 P A T H
0002700 N A M E T Y P E # ) \r ( ) \r P A
0002720 T H N A M E - T Y P E D 1 \r (
0002740 I 0 P A T H N A M E ) \0 022
0002760 \0 \0 \0 001 @ d 004 ` \0 \0 360 242 \t \0 \0 006
0003000 \0 \0 311 \b 020 \0 ( 1 2 Q P A T H N
0003020 A M E ) \r ( 1 5 Q P A T H N A
0003040 M E 5 004 003 P A T H N A M E T
0003060 Y P E # ) \r ( ) \r P A T H N A M
0003100 E - V E R S I O N D 1 \r ( I
0003120 0 P A T H N A M E ) \0 022 \0 \0
0003140 \0 001 @ d 004 ` \0 \0 360 242 \t \0 \0 006 \0 \0
0003160 311 \n 020 \0 ( 1 2 Q P A T H N A M
0003200 E ) \r ( 1 5 Q P A T H N A M E
0003220 5 004 003 P A T H N A M E T Y P
0003240 E # ) \r ( ) \r T R U E N A M E
0003260 D 1 \r ( I 0 P A T H N A M E
0003300 ) \0 ) \0 \0 \0 001 @ d 240 020 \t \0 \0 227
0003320 @ \t \0 \0 \t \0 \0 020 @ 005 \a 247 @ d 004 l
0003340 004 360 230 277 @ \t \0 \0 \t \0 \0 020 \t \0 \0 020
0003360 \0 ( 4 6 Q \ I L L E G A L . A
0003400 R G 4 2 Q \ P A T H N A M E
0003420 - C O E R C E 3 7 Q I N F I
0003440 L E P 1 6 Q P A T H N A M E
0003460 1 3 Q F U L L N A M E 6
0003500 S T R E A M P ) \r N I L \r ( ) \r
0003520 \ P A T H N A M E - C O E R C E
0003540 D 1 \r ( P 2 C O M P O N E
0003560 N T P 1 P A T H N A M E
0003600 P 0 U N P A C K E D . N A M
0003620 E I 0 N A M E ) \0 242 003 \0
0003640 \0 001 @ \t \0 \0 \t \0 \0 ` \0 \0 037 021 022 002
0003660 H 261 \0 211 d Z 001 d g \0 \0 360 262 033 277 I
0003700 006 \0 \0 J 002 001 024 \0 277 I 006 \0 \0 J 002 001
0003720 \t \0 \0 024 \f 260 b d g \0 \0 360 233 277 I 006
0003740 \0 \0 J 002 001 024 002 260 P d g \0 \0 360 233 277
0003760 I 006 \0 \0 J 002 001 024 004 260 > d g \0 \0 360
0004000 233 277 I 006 \0 \0 J 002 001 024 006 260 , d g \0
0004020 \0 360 233 277 I 006 \0 \0 J 002 001 024 \b 260 032 g
0004040 \0 \0 360 231 I 006 \0 \0 J 002 001 024 \n 210 o \0
0004060 \0 \0 J 001 \n \0 \0 277 002 002 003 265 003 202 261 377
0004100 v I 020 \0 ( 2 2 4 Q E R R O R
0004120 6 0 Q G E T O S T Y P E 6
0004140 U N P A C K F I L E N A M E . S
0004160 T R I N G 3 M K S T R I N G
0004200 ) \r ( 2 0 5 Q P A T H N A M E
0004220 1 7 7 Q V E R S I O N 1 6
0004240 5 Q P A T H N A M E 1 5 6 Q
0004260 E X T E N S I O N 1 4 3 Q
0004300 P A T H N A M E 1 3 4 Q N A
0004320 M E 1 2 1 Q P A T H N A M E
0004340 1 1 2 Q D I R E C T O R Y
0004360 7 7 Q P A T H N A M E 7 0 Q
0004400 D E V I C E 5 2 Q P A T H
0004420 N A M E 4 0 Q P A T H N A M
0004440 E 3 0 Q H O S T 1 1 Q 004
0004460 003 P A T H N A M E T Y P E # ) \r
0004500 ( 2 1 7 Q " U n e x p e c t
0004520 e d p a t h n a m e c o m p
0004540 o n e n t " ) \r \ P A T H N A M
0004560 E - D E F A U L T - P R I N T E
0004600 R D 1 \r ( I 0 P A T H N A
0004620 M E ) \0 B \0 \0 \0 001 o \0 \0 \0 @ 006
0004640 \0 \0 311 \0 o \0 \0 \0 @ 006 \0 \0 311 002 o \0
0004660 \0 \0 @ 006 \0 \0 311 004 o \0 \0 \0 @ 006 \0 \0
0004700 311 006 o \0 \0 \0 @ 006 \0 \0 311 \b o \0 \0 \0
0004720 @ 006 \0 \0 311 \n \r \f \0 \0 020 \0 ( 7 7 Q
0004740 C O N C A T ) \r ( 7 1 Q P A
0004760 T H N A M E 5 7 Q P A T H N
0005000 A M E 4 5 Q P A T H N A M E
0005020 3 3 Q P A T H N A M E 2 1
0005040 Q P A T H N A M E 7 P A T
0005060 H N A M E ) \r ( 6 5 Q " V
0005100 E R S I O N " 5 3 Q " T
0005120 Y P E " 4 1 Q " N A M E
0005140 " 2 7 Q " D I R E C T O
0005160 R Y " 1 5 Q " D E V I C
0005200 E " 3 " H O S T " ) \r \
0005220 P A T H N A M E - P R I N T E R
0005240 D 1 \r ( P 0 O S T Y P E
0005260 I 0 P A T H N A M E F 1
0005300 \ C M L . R E A D P R E F I X
0005320 ) \0 035 001 001 \0 001 @ 006 \0 \0 311 \f 021 001
0005340 \0 Q o \0 \0 \0 @ \t \0 \0 o \0 \0 \0 \f \0
0005360 \0 h 032 020 \0 ( 3 0 Q C O N C A T
0005400 2 1 Q N A M E S T R I N G )
0005420 \r ( 3 P A T H N A M E ) \r (
0005440 2 5 Q " ) " 1 5 Q " . ( P
0005460 A T H N A M E " ) \r ( P R E T
0005500 T Y C O M P R I N T C M L P A
0005520 T H N A M E C O M S ) \r ( R P A
0005540 Q Q C M L P A T H N A M E C O
0005560 M S ( ( M A C R O S D E F P
0005600 A T H N A M E P R I N T E R P
0005620 A T H N A M E P \ P A T H N A
0005640 M E - D E V I C E \ P A T H N
0005660 A M E - D I R E C T O R Y \r \
0005700 P A T H N A M E - H O S T \ P
0005720 A T H N A M E - N A M E \ P A
0005740 T H N A M E - O S T Y P E \ P
0005760 A T H N A M E - T Y P E \ P A
0006000 T H N A M E - V E R S I O N )
0006020 ( V A R S ( \r * P A T H N A M
0006040 E - P R I N T E R - F U N C T I
0006060 O N S * ( H A S H A R R A Y
0006100 1 0 1 . 1 ) ) ) ( R E C O R
0006120 D S P A T H N A M E ) ( F N
0006140 S N A M E S T R I N G P A T
0006160 H N A M E \r P A T H N A M E -
0006200 D E V I C E P A T H N A M E -
0006220 D I R E C T O R Y P A T H N A
0006240 M E - H O S T P A T H N A M E
0006260 - N A M E P A T H N A M E - O
0006300 S T Y P E P A T H N A M E - T
0006320 Y P E \r P A T H N A M E - V E
0006340 R S I O N T R U E N A M E \
0006360 P A T H N A M E - C O E R C E
0006400 \ P A T H N A M E - D E F A U L
0006420 T - P R I N T E R \ P A T H N
0006440 A M E - P R I N T E R ) ( P
0006460 ( \r D E F P A T H N A M E P R I
0006500 N T E R I N T E R L I S P {
0006520 H O S T } < D I R E C T
0006540 O R Y > N A M E % . T Y
0006560 P E ; V E R S I O N ) ( D
0006600 E F P A T H N A M E P R I N T E
0006620 R U N I X { \r H O S T }
0006640 / D I R E C T O R Y / N
0006660 A M E % . T Y P E ; V E
0006700 R S I O N ) ( D E F P A T H N
0006720 A M E P R I N T E R V M S {
0006740 H O S T } " [ " D I R E
0006760 C T O R Y " ] " N A M E \r
0007000 % . T Y P E ; V E R S I O
0007020 N ) ( D E F P A T H N A M E P
0007040 R I N T E R T O P S - 2 0 {
0007060 H O S T } < D I R E C T
0007100 O R Y > N A M E % . T Y
0007120 P E % . V E R S I O N ) (
0007140 \r D E F P A T H N A M E P R I N
0007160 T E R N S % ( H O S T %
0007200 ) D I R E C T O R Y / N A
0007220 M E % . T Y P E ! V E R
0007240 S I O N ) ( D E F P A T H N A
0007260 M E P R I N T E R \r S Y M B O
0007300 L I C S - 3 6 0 0 H O S T :
0007320 > D I R E C T O R Y > N
0007340 A M E % . T Y P E % . V
0007360 E R S I O N ) ) ) ) \r ( D E F M
0007400 A C R O D E F P A T H N A M E
0007420 P R I N T E R ( O S T Y P E
0007440 & R E S T A R G S ) ( B Q U
0007460 O T E ( P R O G N ( D E F U
0007500 N ( \ , ( P A C K * ( Q U
0007520 O T E \ N A M E S T R I N G -
0007540 ) \r O S T Y P E ) ) ( P A T
0007560 H N A M E ) ( C O N C A T (
0007600 \ , @ ( f o r X i n A R
0007620 G S c o l l e c t ( C O N D
0007640 ( ( F M E M B X ( Q U O T
0007660 E ( H O S T D E V I C E D
0007700 I R E C T O R Y \r N A M E T
0007720 Y P E V E R S I O N ) ) ) (
0007740 B Q U O T E ( ( \ , ( P A C
0007760 K * ( Q U O T E \ P A T H N
0010000 A M E - ) X ) ) P A T H N A
0010020 M E ) ) ) ( T ( K W O T E
0010040 X ) ) ) ) ) ) ) ( \r P U T H A
0010060 S H ( Q U O T E ( \ , O S
0010100 T Y P E ) ) ( P A C K * ( Q
0010120 U O T E \ N A M E S T R I N G
0010140 - ) ( Q U O T E ( \ , O S
0010160 T Y P E ) ) ) \r * P A T H N A
0010200 M E - P R I N T E R - F U N C T
0010220 I O N S * ) ) ) ) \r ( D E F M A
0010240 C R O P A T H N A M E P ( X
0010260 ) ( B Q U O T E ( T Y P E N
0010300 A M E P ( \ , X ) ( Q U O
0010320 T E P A T H N A M E ) ) ) ) \r
0010340 ( D E F M A C R O \ P A T H N
0010360 A M E - D E V I C E ( P A T H
0010400 N A M E ) ( B Q U O T E ( f
0010420 e t c h ( P A T H N A M E D
0010440 E V I C E ) o f ( \ , P A
0010460 T H N A M E ) ) ) ) \r ( D E F M
0010500 A C R O \ P A T H N A M E - D
0010520 I R E C T O R Y ( P A T H N A
0010540 M E ) ( B Q U O T E ( f e t
0010560 c h ( P A T H N A M E D I R
0010600 E C T O R Y ) o f ( \ , P
0010620 A T H N A M E ) ) ) ) \r ( D E F
0010640 M A C R O \ P A T H N A M E -
0010660 H O S T ( P A T H N A M E )
0010700 ( B Q U O T E ( f e t c h (
0010720 P A T H N A M E H O S T ) o
0010740 f ( \ , P A T H N A M E ) )
0010760 ) ) \r ( D E F M A C R O \ P A
0011000 T H N A M E - N A M E ( P A T
0011020 H N A M E ) ( B Q U O T E (
0011040 f e t c h ( P A T H N A M E
0011060 N A M E ) o f ( \ , P A T
0011100 H N A M E ) ) ) ) \r ( D E F M A
0011120 C R O \ P A T H N A M E - O S
0011140 T Y P E ( P A T H N A M E )
0011160 ( B Q U O T E ( f e t c h (
0011200 P A T H N A M E O S T Y P E )
0011220 o f ( \ , P A T H N A M E
0011240 ) ) ) ) \r ( D E F M A C R O \
0011260 P A T H N A M E - T Y P E ( P
0011300 A T H N A M E ) ( B Q U O T E
0011320 ( f e t c h ( P A T H N A M
0011340 E T Y P E ) o f ( \ , P
0011360 A T H N A M E ) ) ) ) \r ( D E F
0011400 M A C R O \ P A T H N A M E -
0011420 V E R S I O N ( P A T H N A M
0011440 E ) ( B Q U O T E ( f e t c
0011460 h ( P A T H N A M E V E R S
0011500 I O N ) o f ( \ , P A T H
0011520 N A M E ) ) ) ) \r ( R P A Q *
0011540 P A T H N A M E - P R I N T E R
0011560 - F U N C T I O N S * ( H A S
0011600 H A R R A Y 1 0 1 . 1 ) ) \r
0011620 ( D A T A T Y P E P A T H N A
0011640 M E ( H O S T D E V I C E
0011660 D I R E C T O R Y N A M E T
0011700 Y P E V E R S I O N O S T Y
0011720 P E ) ) \r ( / D E C L A R E D A
0011740 T A T Y P E ( Q U O T E P A
0011760 T H N A M E ) ( Q U O T E (
0012000 P O I N T E R P O I N T E R
*
0012060 P O I N T E R ) ) ( \r Q U O T
0012100 E ( ( P A T H N A M E 0 P
0012120 O I N T E R ) ( P A T H N A M
0012140 E 2 P O I N T E R ) ( P A
0012160 T H N A M E 4 P O I N T E R
0012200 ) ( P A T H N A M E 6 P O
0012220 I N T E R ) ( P A T H N A M E
0012240 8 \r P O I N T E R ) ( P A
0012260 T H N A M E 1 0 P O I N T E
0012300 R ) ( P A T H N A M E 1 2
0012320 P O I N T E R ) ) ) ( Q U O T
0012340 E 1 4 ) ) \r ( D E F P A T H N
0012360 A M E P R I N T E R I N T E R
0012400 L I S P { H O S T } <
0012420 D I R E C T O R Y > N A M E
0012440 % . T Y P E ; V E R S I
0012460 O N ) \r ( D E F P A T H N A M E
0012500 P R I N T E R U N I X { H
0012520 O S T } / D I R E C T O R
0012540 Y / N A M E % . T Y P E
0012560 ; V E R S I O N ) \r ( D E F
0012600 P A T H N A M E P R I N T E R
0012620 V M S { H O S T } " [ "
0012640 D I R E C T O R Y " ] " N
0012660 A M E % . T Y P E ; V E
0012700 R S I O N ) \r ( D E F P A T H N
0012720 A M E P R I N T E R T O P S -
0012740 2 0 { H O S T } < D I
0012760 R E C T O R Y > N A M E %
0013000 . T Y P E % . V E R S I O
0013020 N ) \r ( D E F P A T H N A M E P
0013040 R I N T E R N S % ( H O S
0013060 T % ) D I R E C T O R Y /
0013100 N A M E % . T Y P E !
0013120 V E R S I O N ) \r ( D E F P A T
0013140 H N A M E P R I N T E R S Y M
0013160 B O L I C S - 3 6 0 0 H O S T
0013200 : > D I R E C T O R Y >
0013220 N A M E % . T Y P E % .
0013240 V E R S I O N ) \r ( P U T P R
0013260 O P S C M L P A T H N A M E
0013300 C O P Y R I G H T ( " X e r o
0013320 x C o r p o r a t i o n " 1
0013340 9 8 5 ) ) \r N I L \r
0013352