$ od -c -N 50000 [eris]<Lisp>KOTO>LISPUSERS>DIRECTORYTOOLS.DCOM!1
0000000 ( F I L E C R E A T E D " 2 0
0000020 - F e b - 8 5 1 4 : 1 5 : 4 2
0000040 " ( " c o m p i l e d o n
0000060 " { D A N T E } < W O G U L I
0000100 S > D I R E C T O R Y T O O L S
0000120 . ; 9 ) \r " 2 0 - D e c - 8 4
0000140 1 2 : 0 7 : 2 2 " r e c o m
0000160 p i l e d c h a n g e s : C
0000200 H A R C O D E . T O . S T R I N
0000220 G D I R E C T O R Y . T R E E
0000240 M I D D L E . D I R . C O M M
0000260 A N D \r D I R . F R O M . G R
0000300 A P H Q U I C K . L I S T i
0000320 n " I N T E R L I S P - D 1
0000340 0 - J a n - 8 5 . . . " d a
0000360 t e d " 1 0 - J a n - 8 5 1
0000400 3 : 2 8 : 5 5 " ) \r ( F I L E C
0000420 R E A T E D " 2 0 - F e b - 8
0000440 5 1 4 : 1 5 : 0 3 " { D A N
0000460 T E } < W O G U L I S > D I R E
0000500 C T O R Y T O O L S . ; 9 1 3
0000520 1 1 8 c h a n g e s t o :
0000540 ( F N S \r D I R E C T O R Y .
0000560 T R E E Q U I C K . L I S T
0000600 C H A R C O D E . T O . S T R I
0000620 N G M I D D L E . D I R . C O
0000640 M M A N D D I R . F R O M . G
0000660 R A P H ) ( V A R S \r D I R
0000700 E C T O R Y T O O L S C O M S )
0000720 p r e v i o u s d a t e :
0000740 " 1 5 - F e b - 8 5 1 6 : 1 7
0000760 : 0 6 " { D A N T E } < W O G
0001000 U L I S > D I R E C T O R Y T O
0001020 O L S . ; 7 ) \r C H A R C O D E
0001040 . T O . S T R I N G D 1 \r ( P
0001060 3 X P 2 N P 0 S
0001100 T R I 0 L I S T ) \0 & 004
0001120 \0 \0 001 @ \t \0 \0 \t \0 \0 021 001 \0 @ k 021
0001140 022 003 I 003 265 004 H 020 001 273 H J K + 277 I
0001160 002 271 J k 330 272 260 354 \0 ( 6 A L L O
0001200 C S T R I N G 3 L E N G T H
0001220 ) \r N I L \r ( ) \r G R A P H . D
0001240 I R E C T O R Y D 1 \r ( P 0
0001260 T R E E I 2 C A S E . S
0001300 E N S I T I V E ? I 1 W I
0001320 N D O W I 0 F I L E G R O
0001340 U P ) \0 257 001 \0 \0 003 021 020 \0 @ g \0
0001360 \0 \n \0 \0 \t \0 \0 263 035 o \0 \0 \0 i \n \0
0001400 \0 277 @ g \0 \0 \n \0 \0 i \n \0 \0 277 i \t
0001420 \0 \0 h 020 A \t \0 \0 253 l d d \n \0 \0 \t
0001440 \0 \0 b 002 200 A g \0 \0 o \0 \0 \0 \v \0 \0
0001460 g \0 \0 @ d 262 032 d i 360 263 025 d 005 001 245
0001500 d 005 002 241 005 003 265 \t g \0 \0 @ h 032 032 A
0001520 d 262 032 d i 360 263 025 d 005 001 245 d 005 002 241
0001540 005 003 265 \t g \0 \0 A h 032 032 B d 262 032 d
0001560 i 360 263 025 d 005 001 245 d 005 002 241 005 003 265 \t
0001600 g \0 \0 B h 032 032 h 032 032 032 032 g \0 \0 o
0001620 \0 \0 \0 \v \0 \0 A 020 \0 ( 2 5 3 Q A
0001640 D D . P R O C E S S 1 0 5 Q
0001660 P U T W I N D O W P R O P 6 7
0001700 Q C R E A T E W 6 4 Q G E
0001720 T R E G I O N 5 5 Q W I N D
0001740 O W P 4 7 Q T E R P R I 4
0001760 2 Q P R I N 1 3 6 Q F I L
0002000 E N A M E F I E L D 2 6 Q P
0002020 R I N 1 1 4 Q H O S T N A M
0002040 E P 1 1 Q F I L E N A M E F
0002060 I E L D ) \r ( 2 4 4 Q N A M E
0002100 2 3 0 Q Q U O T E 1 7 4 Q
0002120 Q U O T E 1 4 0 Q Q U O T
0002140 E 1 1 0 Q G R A P H . D I R
0002160 E C T O R Y 1 7 6 Q T I T L
0002200 E 3 3 Q H O S T 6 H O S
0002220 T ) \r ( 2 5 0 Q " D I R E C
0002240 T O R Y G R A P H E R " 1 0
0002260 2 Q " S E A R C H I N G F O
0002300 R S U B D I R S . . . " 2 2
0002320 Q " I c a n n o t f i n
0002340 d h o s t : " ) \r G R A P H
0002360 . D I R E C T O R Y 1 D 1 \r (
0002400 P 0 T R E E I 2 C A S
0002420 E . S E N S I T I V E ? I 1
0002440 W I N D O W I 0 F I L E
0002460 G R O U P ) \0 E 001 \0 \0 003 021 020 \0
0002500 @ d 003 243 B \n \0 \0 X d 001 263 030 277 o \0
0002520 \0 \0 A \n \0 \0 277 @ A \n \0 \0 277 A \t \0
0002540 \0 h 020 \t \0 \0 A g \0 \0 g \0 \0 \f \0 \0
0002560 A g \0 \0 o \0 \0 \0 @ \n \0 \0 \v \0 \0 h
0002600 020 \0 ( 1 0 1 Q P U T W I N D O
0002620 W P R O P 7 6 Q C O N C A T
0002640 6 2 Q S H O W G R A P H 5
0002660 0 Q L A Y O U T S E X P R 4
0002700 3 Q T E R P R I 3 6 Q P R
0002720 I N 1 3 0 Q P R I N 1 1 2
0002740 Q D I R E C T O R Y . T R E E
0002760 ) \r ( 6 6 Q T I T L E 5 7 Q
0003000 M I D D L E . D I R . C O M M
0003020 A N D 5 4 Q L E F T . D I R
0003040 . C O M M A N D ) \r ( 7 2 Q
0003060 " S u b D i r e c t o r i e s
0003100 o f : " 2 4 Q " T h e r e
0003120 a r e n o f i l e s i n
0003140 t h e g r o u p : " ) \r D I
0003160 R E C T O R Y . T R E E D 1 \r
0003200 ( P 6 S T R P 4 H O S
0003220 T P 3 T E M P P 2 D
0003240 I R S P 1 N E X T D I R
0003260 P 0 F I L E G R O U P I
0003300 1 C A S E . S E N S I T I V E
0003320 ? I 0 F I L E S P E C )
0003340 \0 232 \n \0 \0 002 @ \t \0 \0 \t \0 \0 021 A 004
0003360 H \t \0 \0 Y 262 X L 263 033 o \0 \0 \0 I d
0003400 003 222 \t \0 \0 g \0 \0 \n \0 \0 o \0 \0 \0 \v
0003420 \0 \0 274 \b \0 \0 277 I d 003 222 \t \0 \0 \t \0
0003440 \0 271 A 244 I \t \0 \0 271 J 021 021 006 M 003 265
0003460 \f h 022 263 275 I J 032 272 260 267 001 ^ I \n \0
0003500 \0 225 N 265 357 i 260 354 M 002 ] 260 343 021 0 \t
0003520 J 260 034 d 001 \t \0 \0 _ 016 277 O 020 265 \t O
0003540 016 h 032 _ 022 202 O 016 & _ 020 277 002 003 265 345
0003560 O 022 022 Z L h 032 J \t \0 \0 \n \0 \0 020 \0
0003600 ( 2 2 7 Q \ A P P E N D 2 2
0003620 2 4 Q M E R G E . D I R 1 6
0003640 1 Q F I X D I R 1 3 2 Q S
0003660 T R E Q U A L 1 0 1 Q U - C
0003700 A S E 7 2 Q G E T . D I R .
0003720 F R O M . S T R I N G 6 7 Q
0003740 C H A R C O D E . T O . S T R I
0003760 N G 5 7 Q B L O C K 5 3 Q
0004000 C O N C A T 4 4 Q F I L E
0004020 N A M E F I E L D 3 6 Q C H
0004040 A R C O D E . T O . S T R I N G
0004060 1 5 Q \ G E N E R A T E N E
0004100 X T F I L E 6 \ G E N E R A
0004120 T E F I L E S 3 D I R E C T
0004140 O R Y . F I L L . P A T T E R N
0004160 ) \r ( 4 1 Q H O S T ) \r ( 5
0004200 0 Q " } " 2 7 Q " { " ) \r
0004220 L E F T . D I R . C O M M A N D
0004240 D 1 \r ( I 1 W I N D O W
0004260 I 0 N O D E ) \0 201 002 \0 \0 002
0004300 @ 264 x ` \0 \0 310 \0 l @ 345 j 360 263 m `
0004320 \0 \0 310 \0 l \b 345 j 360 263 a ` \0 \0 037 g
0004340 \0 \0 @ A h 032 032 o \0 \0 \0 h 032 032 032 g
0004360 \0 \0 @ A h 032 032 o \0 \0 \0 h 032 032 032 h
0004400 032 032 021 002 001 H d I 024 004 277 022 d g \0 \0
0004420 024 026 277 d g \0 \0 024 277 d g \0 \0 024 034
0004440 277 j d n 177 377 d h 032 032 032 032 021 002 001 H
0004460 d I 024 \n 277 022 \t \0 \0 020 @ A \n \0 \0 020
0004500 \0 ( 1 7 6 Q M I D D L E . D I
0004520 R . C O M M A N D 1 7 0 Q M
0004540 E N U ) \r ( 1 3 5 Q D E F A U
0004560 L T M E N U H E L D F N 1 2 6
0004600 Q C L R P R O M P T 1 1 7 Q
0004620 L E F T . D I R . G R A P H .
0004640 F N S 6 1 Q L i s t % F i
0004660 l e s 4 1 Q F i l e B r o w
0004700 s e r 3 5 Q 004 003 M E N U T Y
0004720 P E # 2 1 Q \ E M . K B D A
0004740 D 3 5 \ E M . K B D A D 2 )
0004760 \r ( 7 2 Q " W i l l d o
0005000 a q u i c k l i s t i n g
0005020 o f t h e f i l e s u n d
0005040 e r s u b d i r e c t o r y .
0005060 " 5 2 Q " W i l l b r i n
0005100 g u p F I L E B R O W S E R
0005120 o n t h e s e l e c t e d
0005140 s u b d i r e c t o r y . " )
0005160 \r M I D D L E . D I R . C O M M
0005200 A N D D 1 \r ( P 3 X I
0005220 1 W I N D O W I 0 N O D
0005240 E ) \0 K 004 \0 \0 002 @ 264 @ 021 0 002 @
0005260 A \n \0 \0 \t \0 \0 260 / d 001 021 001 003 K l
0005300 \n \0 \0 235 l % \t \0 \0 l \t \0 \0 \n
0005320 \0 \0 203 K \t \0 \0 \t \0 \0 022 X 003 226 I 265
0005340 \f H Z Y 277 002 003 265 322 J 020 \t \0 \0 Y H
0005360 031 260 363 \0 ( 1 0 4 Q L A S T 6
0005400 0 Q B K S Y S B U F 5 5 Q
0005420 C H A R A C T E R 5 0 Q C O
0005440 N C A T 4 5 Q C H A R A C T
0005460 E R 4 0 Q C H A R A C T E R
0005500 3 2 Q E Q U A L 1 5 Q C
0005520 H C O N 1 2 Q D I R . F R O
0005540 M . G R A P H ) \r N I L \r ( ) \r
0005560 L E F T . D I R . G R A P H . F
0005600 N S D 1 \r ( P 0 D I R . P
0005620 A T T I 2 B U T T O N I
0005640 1 M E N U I 0 I T E M
0005660 ) \0 v 003 \0 \0 003 021 0 002 @ d 262 o 002
0005700 001 001 @ 002 001 002 001 \n \0 \0 270 @ 001 d g \0
0005720 \0 360 226 277 H \t \0 \0 260 S g \0 \0 360 264 N
0005740 g \0 \0 @ 002 001 001 Y d 262 032 d i 360 263 025
0005760 d 005 001 245 d 005 002 241 005 003 265 \t g \0 \0 I
0006000 h 032 032 @ 002 001 002 001 Z d 262 032 d i 360 263
0006020 025 d 005 001 245 d 005 002 241 005 003 265 \t g \0 \0
0006040 J h 032 032 h 032 032 032 \t \0 \0 h 020 \0 ( 1
0006060 6 2 Q A D D . P R O C E S S
0006100 3 7 Q F I L E B R O W S E R
0006120 2 1 Q D I R . F R O M . G R A
0006140 P H ) \r ( 1 4 7 Q Q U O T E
0006160 1 0 6 Q Q U O T E 5 2 Q Q
0006200 U I C K . L I S T 4 4 Q L i
0006220 s t % F i l e s 3 0 Q F i
0006240 l e B r o w s e r ) \r ( ) \r D I
0006260 R . F R O M . G R A P H D 1 \r
0006300 ( P 2 C U R R E N T . N O D
0006320 E P 1 A L L N O D E S P
0006340 0 R E S U L T I 1 W I
0006360 N D O W I 0 N O D E ) \0
0006400 226 \b \0 \0 002 @ 002 002 002 002 002 002 002 002 002 002
0006420 001 265 004 @ 001 h 032 A g \0 \0 \n \0 \0 001 @
0006440 021 # 004 J 002 002 002 002 002 002 002 002 001 001 Z 262
0006460 2 I h 274 [ 003 265 030 h Z 002 002 002 002 002 002
0006500 002 002 002 002 001 265 004 J 001 H 032 270 260 327 001 274
0006520 J L 001 \n \0 \0 225 L 265 341 i 260 336 K 002 260
0006540 325 H 001 o \0 \0 \0 h 032 032 021 0 \a H 260 026
0006560 d 001 o \0 \0 \0 h 032 032 ] 003 227 N 265 025 M
0006600 _ 016 ^ 277 002 003 265 352 O 016 022 \n \0 \0 \t \0
0006620 \0 020 \t \0 \0 ^ M 031 260 353 \0 ( 2 1 7 Q
0006640 L A S T 2 1 3 Q C O N C A
0006660 T L I S T 2 1 0 Q \ A P P E
0006700 N D 2 1 2 0 Q E Q U A L 3
0006720 0 Q G E T W I N D O W U S E R
0006740 P R O P ) \r ( 2 5 Q G R A P H
0006760 ) \r ( 1 6 0 Q " > " 1 4 1
0007000 Q " < " ) \r Q U I C K . L I S
0007020 T D 1 \r ( P 2 F I L E G R
0007040 O U P P 1 S T A R T P
0007060 0 D I R . P A T T I 1 W
0007100 I N D O W I 0 N O D E F
0007120 3 N E X T D I R ) \0 T 003 001
0007140 \0 002 @ A \n \0 \0 021 ! 002 H \t \0 \0 \t \0
0007160 \0 Z H \t \0 \0 k 330 Y h g \0 \0 H \v \0
0007200 \0 J \t \0 \0 c 006 262 037 \b \0 \0 277 S d 003
0007220 222 \t \0 \0 I m 377 \v \0 \0 i \n \0 \0 277 i
0007240 \t \0 \0 277 260 335 o \0 \0 \0 i \n \0 \0 277 i
0007260 \t \0 \0 h 020 \0 ( 1 2 0 Q T E R P
0007300 R I 1 1 3 Q P R I N 1 1 0
0007320 0 Q T E R P R I 7 3 Q P R
0007340 I N 1 6 7 Q S U B S T R I N
0007360 G 6 1 Q C H A R C O D E . T
0007400 O . S T R I N G 5 1 Q B L O
0007420 C K 4 2 Q \ G E N E R A T E
0007440 N E X T F I L E 3 6 Q P U T
0007460 W I N D O W P R O P 2 3 Q N
0007500 C H A R S 1 6 Q \ G E N E R
0007520 A T E F I L E S 1 3 Q D I R
0007540 E C T O R Y . F I L L . P A T T
0007560 E R N 4 D I R . F R O M . G
0007600 R A P H ) \r ( 3 2 Q T I T L E
0007620 ) \r ( 1 0 7 Q " = = = d o
0007640 n e = = = " ) \r G E T . D I R
0007660 . F R O M . S T R I N G D 1 \r
0007700 ( P 3 X P 1 L A S T
0007720 P 0 F I R S T I 0 S T
0007740 R I N G ) \0 = 004 \0 \0 001 021 001 o
0007760 \0 \0 \0 @ \n \0 \0 X k @ \t \0 \0 021 002 003
0010000 J K 361 263 033 o \0 \0 \0 @ K d \v \0 \0 \n
0010020 \0 \0 224 K 265 \v i 206 K k 331 273 260 344 h 022
0010040 Y @ H I \v \0 \0 020 \0 ( 7 2 Q S U
0010060 B S T R I N G 4 5 Q S T R E
0010100 Q U A L 4 2 Q S U B S T R I
0010120 N G 2 0 Q N C H A R S 1 2
0010140 Q S T R P O S ) \r N I L \r (
0010160 3 4 Q " > " 6 " < " ) \r M
0010200 E R G E . D I R D 1 \r ( P 1
0010220 1 Q Y P 4 X P 0 T
0010240 E M P I 0 L I S T ) \0 222
0010260 \n \0 \0 001 021 020 \0 @ \t \0 \0 k \n \0 \0 221
0010300 @ 020 021 0 003 @ 217 d 001 001 271 J 265 \a I h
0010320 032 [ 201 I & 272 002 003 265 357 K 022 X d d \n
0010340 \0 \0 X 021 @ 004 H 260 Y d 001 \ h 032 @ 021
0010360 A \t M 003 265 024 N 022 \t \0 \0 \n \0 \0 271 J
0010400 265 < I h 032 [ 260 8 001 _ 022 277 L O 022 001
0010420 \n \0 \0 262 034 O 022 \t \0 \0 k 361 262 023 O 022
0010440 002 _ 020 277 O 016 265 016 O 020 h 032 _ 016 276 M
0010460 002 ] 260 301 O 020 & _ 016 277 260 365 I & 272 002
0010500 003 265 250 K 020 \0 ( 1 4 5 Q L E N G
0010520 T H 1 3 6 Q S T R E Q U A L
0010540 1 1 1 Q \ A P P E N D 2 1
0010560 0 6 Q M E R G E . D I R 5 5
0010600 Q I N T E R S E C T I O N 1
0010620 2 Q E Q U A L 6 L E N G T
0010640 H ) \r N I L \r ( ) \r F I X D I R
0010660 D 1 \r ( P 1 4 Q S T R P
0010700 1 3 Q X P 7 L A S T
0010720 P 3 X P 1 S P A C E S
0010740 P 0 N U M I 0 S T R
0010760 I N G ) \0 ~ \r \0 \0 001 j 021 021 001 @
0011000 \t \0 \0 l 002 021 2 006 K J 361 263 ' o \0 \0
0011020 \0 @ K d \v \0 \0 \n \0 \0 233 K k 331 276 M
0011040 265 \r N h 032 ] 274 K k 330 [ 260 336 N & 275
0011060 260 367 L 022 Y d l 002 021 R \f N 003 265 005 O
0011100 020 020 001 _ 026 277 @ O 016 O 026 \v \0 \0 _ 030
0011120 277 O 026 l 002 330 _ 016 277 O 030 _ 024 277 O 022
0011140 265 020 O 024 h 032 _ 022 _ 020 277 N 002 ^ 260 316
0011160 O 024 & _ 022 277 260 365 \0 ( 1 2 2 Q S
0011200 U B S T R I N G 3 6 Q S T R
0011220 E Q U A L 3 3 Q S U B S T R
0011240 I N G 7 N C H A R S ) \r N I
0011260 L \r ( 2 5 Q " > " ) \r ( P R
0011300 E T T Y C O M P R I N T D I R
0011320 E C T O R Y T O O L S C O M S )
0011340 \r ( R P A Q Q D I R E C T O R
0011360 Y T O O L S C O M S ( ( F I L
0011400 E S G R A P H E R F I L E B
0011420 R O W S E R ) ( * G R A P H
0011440 . D I R E C T O R Y i s t h
0011460 e o n l y f u n c t i o n
0011500 \r i n t e n d e d f o r u s
0011520 e r s t o c a l l . ) ( F
0011540 N S C H A R C O D E . T O . S
0011560 T R I N G G R A P H . D I R E
0011600 C T O R Y G R A P H . D I R E
0011620 C T O R Y 1 D I R E C T O R Y
0011640 . T R E E \r L E F T . D I R .
0011660 C O M M A N D M I D D L E . D
0011700 I R . C O M M A N D L E F T .
0011720 D I R . G R A P H . F N S D I
0011740 R . F R O M . G R A P H Q U I
0011760 C K . L I S T G E T . D I R .
0012000 F R O M . S T R I N G \r M E R
0012020 G E . D I R F I X D I R ) ) )
0012040 \r ( F I L E S L O A D G R A P
0012060 H E R F I L E B R O W S E R )
0012100 \r ( P U T P R O P S D I R E C
0012120 T O R Y T O O L S C O P Y R I
0012140 G H T ( " J i m W o g u l i
0012160 s & X e r o x C o r p o r
0012200 a t i o n " 1 9 8 5 ) ) \r N I
0012220 L \r
0012222