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