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