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