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