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