$ od -c -N 50000 [Indigo]<Loops>RELEASE>1-MAY-84>LOOPSMETHODS.DCOM!2
0000000 ( F I L E C R E A T E D " 5
0000020 - M a y - 8 4 0 5 : 4 9 : 2 3
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 M E
0000120 T H O D S . ; 2 6 ) \r " 9 -
0000140 A p r - 8 4 1 6 : 2 8 : 0 8 "
0000160 r e c o m p i l e d e x p r
0000200 s : n o t h i n g i n L O
0000220 O P S . S Y S O U T d a t e d
0000240 " 1 - M a y - 8 4 1 0 : 2
0000260 6 : 1 1 " ) \r ( F I L E C R E A
0000300 T E D " 5 - M a y - 8 4 0
0000320 5 : 4 8 : 4 9 " { I N D I G O
0000340 } < L O O P S > S O U R C E S >
0000360 L O O P S M E T H O D S . ; 2 6
0000400 3 7 2 7 4 c h a n g e s t
0000420 o : ( M A C R O S _ ) \r p
0000440 r e v i o u s d a t e : " 2
0000460 6 - A p r - 8 4 1 0 : 0 8 : 0
0000500 8 " { I N D I G O } < L O O P
0000520 S > S O U R C E S > L O O P S M
0000540 E T H O D S . ; 2 5 ) \r A d d M
0000560 e t h o d D 1 \r ( P 4 \ I
0000600 N T E R R U P T A B L E P 2
0000620 s e l s P 1 f r e e P o
0000640 s P 0 i n d e x I 2
0000660 m e t h o d I 1 s e l e c
0000700 t o r I 0 c l a s s ) \0
0000720 M 005 \0 \0 003 021 @ 003 A @ 006 \0 \0 311 030 265
0000740 005 277 h 202 \n \0 \0 X 226 @ H B \v \0 \0 020
0000760 \b \0 \0 021 020 004 @ 006 \0 \0 311 030 Z \t \0 \0
0001000 Y @ 006 \0 \0 J A I \v \0 \0 024 030 @ 006 \0
0001020 \0 @ 006 \0 \0 311 032 B I \v \0 \0 [ 024 032 K
0001040 020 \0 ( 1 0 6 Q \ A d d B l o c
0001060 k E n t r y 6 5 Q \ A d d B
0001100 l o c k E n t r y 5 2 Q \ F
0001120 r e e E n t r y I n d e x 3 5
0001140 Q F l u s h M e t h o d C a c
0001160 h e 3 1 Q P u t M e t h o d
0001200 N t h 2 1 Q \ F i n d E n t
0001220 r y I n d e x ) \r ( 7 7 Q c l
0001240 a s s 7 3 Q c l a s s 5 7
0001260 Q c l a s s 4 4 Q c l a s
0001300 s 7 c l a s s ) \r ( ) \r A p
0001320 p l y M e t h o d D 1 \r ( P
0001340 0 c l a s s F o r M e t h o d
0001360 I 3 c l a s s I 2 a
0001400 r g L i s t I 1 s e l e c
0001420 t o r I 0 o b j e c t )
0001440 \0 252 \a \0 \0 004 021 001 C 265 005 @ 311 \0 Y
0001460 021 A 006 I 004 ` \0 \0 360 242 h 260 y ` \0 \0
0001500 262 + I 323 A 323 346 l 376 345 273 I d ` \0 \0
0001520 K 320 311 \0 360 262 027 277 A ` \0 \0 K 320 311 \0
0001540 360 230 ` \0 \0 K 320 311 \0 260 K I 006 \0 \0 311
0001560 022 276 A J 006 \0 \0 311 030 265 005 277 h 202 \n \0
0001600 \0 ] 251 N 001 N 002 276 Z 264 + 260 347 J M \n
0001620 \0 \0 274 ` \0 \0 262 035 ` \0 \0 K 320 I 316 \0
0001640 277 ` \0 \0 K 320 A 316 \0 277 ` \0 \0 K 320 L
0001660 316 \0 277 L 022 265 023 A o \0 \0 \0 C 265 005 @
0001700 311 \0 \n \0 \0 \n \0 \0 @ B 032 \n \0 \0 020 \0
0001720 ( 2 4 7 Q A P P L Y 2 4 1 Q
0001740 E R R O R 2 3 6 Q C O N C
0001760 A T 1 5 3 Q G e t N t h M e
0002000 t h o d 1 3 2 Q \ F i n d E
0002020 n t r y I n d e x ) \r ( 2 0 6 Q
0002040 M e t h o d B l o c k 1 7 5
0002060 Q S e l e c t o r B l o c k
0002100 1 6 4 Q C l a s s B l o c k
0002120 1 5 7 Q U s e M e t h o d C a
0002140 c h e F l g 1 2 0 Q c l a s
0002160 s 1 1 0 Q c l a s s 7 6 Q
0002200 M e t h o d B l o c k 6 5 Q
0002220 S e l e c t o r B l o c k 5
0002240 1 Q C l a s s B l o c k 3 1
0002260 Q U s e M e t h o d C a c h e
0002300 F l g 2 1 Q 004 003 c l a s s T
0002320 Y P E # ) \r ( 2 2 5 Q " n o
0002340 t a s e l e c t o r i n
0002360 " ) \r A p p l y M e t h o d I n
0002400 T t y P r o c e s s D 1 \r ( I
0002420 4 w a i t F l g I 3 c
0002440 l a s s I 2 a r g L i s t
0002460 I 1 s e l e c t o r I
0002500 0 o b j e c t ) \0 037 \0 \0 \0 005
0002520 g \0 \0 @ g \0 \0 A h 032 032 g \0 \0 B h
0002540 032 032 C h 032 032 032 032 032 D \n \0 \0 020 \0 (
0002560 3 4 Q E V A L . I N . T T Y .
0002600 P R O C E S S ) \r ( 1 5 Q Q U
0002620 O T E 6 Q U O T E 2 A p
0002640 p l y M e t h o d ) \r N I L \r D
0002660 e f M e t h O b j D 1 \r ( P
0002700 2 p P 1 s e l f P 0
0002720 m e t h N a m e I 6 o t
0002740 h e r I V s I 5 m e t h o
0002760 d P r o p s I 4 d c m I
0003000 3 a r g I 2 f n I
0003020 1 s e l I 0 c N a m e )
0003040 \0 r 003 \0 \0 \a @ A \n \0 \0 021 021 001 H
0003060 \t \0 \0 265 \v g \0 \0 \t \0 \0 \t \0 \0 Y d
0003100 H h 032 \n \0 \0 I g \0 \0 @ \v \0 \0 I g
0003120 \0 \0 A \v \0 \0 I g \0 \0 C \v \0 \0 I g
0003140 \0 \0 D \v \0 \0 I g \0 \0 B \v \0 \0 E 262
0003160 033 E 260 025 d 021 001 002 I g \0 \0 J 002 001 J
0003200 001 \f \0 \0 023 002 002 003 265 354 F 225 F I \n \0
0003220 \0 277 I \t \0 \0 h 020 \0 ( 1 5 6 Q I
0003240 n s t a l l M e t h o d 1 5 1
0003260 Q F i l l I n s t 1 3 4 Q
0003300 P u t V a l u e 1 0 6 Q P u
0003320 t V a l u e 7 6 Q P u t V a
0003340 l u e 6 6 Q P u t V a l u e
0003360 5 6 Q P u t V a l u e 4 6
0003400 Q P u t V a l u e 3 6 Q N
0003420 a m e O b j e c t 2 6 Q B l
0003440 a n k I n s t a n c e 2 3 Q
0003460 G e t O b j e c t R e c 1 3 Q
0003500 G e t O b j e c t R e c 4
0003520 M e t h N a m e ) \r ( 1 2 4 Q
0003540 m e t h o d 1 0 2 Q m e t h
0003560 o d 7 2 Q d o c 6 2 Q a
0003600 r g s 5 2 Q s e l e c t o r
0003620 4 2 Q c l a s s N a m e 2
0003640 0 Q M e t h o d ) \r N I L \r D
0003660 e f i n e M e t h o d D 1 \r (
0003700 P 5 m e t h O b j P 4
0003720 m e t h N a m e P 3 e d i
0003740 t F l g P 2 f i l e P
0003760 1 f n N a m e P 0 c l a
0004000 s s N a m e I 3 e x p r
0004020 I 2 a r g s O r F n I 1
0004040 s e l e c t o r I 0 c l
0004060 a s s F 1 2 Q L A S T W O
0004100 R D ) \0 353 \n 001 \0 004 A 004 l 004 360 250
0004120 A o \0 \0 \0 \n \0 \0 277 @ \t \0 \0 021 221 \t
0004140 H g \0 \0 A \v \0 \0 \ @ A i \v \0 \0 ]
0004160 B 265 003 C h 360 [ 262 024 g \0 \0 h 032 b 004
0004200 277 o \0 \0 \0 \t \0 \0 b 006 277 B 265 c C 265
0004220 017 B b 006 277 g \0 \0 h 032 b 004 277 C 003 231
0004240 C 001 003 245 C h 032 b 006 277 g \0 \0 B C 032
0004260 032 \t \0 \0 b 006 277 L Y C h 032 032 h 032 \t
0004300 \0 \0 277 @ A I \v \0 \0 M g \0 \0 I \v \0
0004320 \0 L g \0 \0 \n \0 \0 263 ! H g \0 \0 \n \0
0004340 \0 001 Z 262 026 L g \0 \0 J \v \0 \0 260 023 004
0004360 l 004 360 262 233 B Y 260 313 L g \0 \0 \n \0 \0
0004400 277 K 262 025 @ _ 016 g \0 \0 \n \0 \0 276 O 016
0004420 A l 002 N 017 016 277 @ _ 022 g \0 \0 \n \0 \0
0004440 _ 020 277 O 022 A h 032 i l 003 O 020 017 016 277
0004460 I c 024 020 \0 ( 3 2 5 Q F e t c h
0004500 M e t h o d O r H e l p 3 0 2
0004520 Q F e t c h M e t h o d O r H
0004540 e l p 2 6 5 Q M A R K A S C
0004560 H A N G E D 2 4 2 Q A D D T
0004600 O F I L E 2 2 6 Q W H E R E
0004620 I S 2 1 5 Q W H E R E I S
0004640 2 0 6 Q P u t V a l u e 1 7
0004660 6 Q A d d M e t h o d 1 6 7
0004700 Q D E F I N E 1 5 1 Q F I
0004720 X E D I T D A T E 7 5 Q C O
0004740 P Y 4 4 Q G e t M e t h o d
0004760 O b j 3 5 Q P A C K * 2 2
0005000 Q C l a s s N a m e 1 5 Q
0005020 E R R O R ) \r ( 3 2 2 Q C o m
0005040 m e n t M e t h o d s 2 7 7 Q
0005060 E d i t M e t h o d 2 6 2 Q
0005100 M E T H O D S 2 3 6 Q M E
0005120 T H O D S 2 2 3 Q C L A S S
0005140 E S 2 1 2 Q M E T H O D S
0005160 2 0 2 Q m e t h o d 1 4 2 Q
0005200 L A M B D A 1 1 5 Q s e l
0005220 f 6 1 Q s e l f 3 1 Q %
0005240 . ) \r ( 7 2 Q ( ( * N e w
0005260 m e t h o d t e m p l a t e )
0005300 s e l f ) 1 2 Q " i s n
0005320 o t a L I A T O M , s o
0005340 c a n n o t b e a s e l e
0005360 c t o r " ) \r D e l e t e M e t
0005400 h o d D 1 \r ( P 1 2 Q \ I
0005420 N T E R R U P T A B L E P 7
0005440 s e l P 6 f r e e P o s
0005460 P 5 f n P 4 p l P
0005500 3 i n d e x P 2 m e t
0005520 h O b j P 1 m e t h N a m
0005540 e P 0 m e t h N a m e I
0005560 2 p r o p I 1 s e l e
0005600 c t o r I 0 c l a s s )
0005620 \0 371 \v \0 \0 003 @ A \n \0 \0 @ A \n \0 \0
0005640 021 202 \t @ \t \0 \0 b \0 277 A @ 006 \0 \0 311
0005660 030 265 005 277 h 202 \n \0 \0 [ 263 024 @ o \0 \0
0005700 \0 A o \0 \0 \0 \f \0 \0 b 002 277 260 327 B d
0005720 i 360 262 C 277 h b 004 277 ` \0 \0 \t \0 \0 277
0005740 l \a \t \0 \0 ` \0 \0 \n \0 \0 277 o \0 \0 \0
0005760 ` \0 \0 \n \0 \0 277 @ A \n \0 \0 ] ` \0 \0
0006000 \n \0 \0 277 ` \0 \0 \t \0 \0 277 M H 360 244 M
0006020 \t \0 \0 277 B 262 ( @ A \n \0 \0 272 B J g
0006040 \0 \0 \n \0 \0 034 232 J B g \0 \0 \v \0 \0 277
0006060 260 \ J g \0 \0 B \v \0 \0 277 260 Q @ A \n
0006100 \0 \0 g \0 \0 \n \0 \0 277 \b \0 \0 277 H \t \0
0006120 \0 262 031 H \t \0 \0 _ 022 g \0 \0 \n \0 \0 _
0006140 020 277 O 022 k O 020 017 016 277 021 020 \n @ 006 \0
0006160 \0 311 030 _ 016 \t \0 \0 276 O 016 K N \v \0 \0
0006200 277 @ 006 \0 \0 311 032 K N \v \0 \0 h 020 \0 (
0006220 3 6 5 Q \ D e l e t e N t h E
0006240 n t r y 3 5 1 Q \ D e l e t
0006260 e N t h E n t r y 3 4 1 Q \
0006300 F r e e E n t r y I n d e x 3
0006320 1 0 Q F e t c h M e t h o d O
0006340 r H e l p 3 0 0 Q $ ! 2 7
0006360 2 Q $ ! 2 6 5 Q F l u s h
0006400 M e t h o d C a c h e 2 6 1 Q
0006420 D E L F R O M F I L E 2 5 3
0006440 Q M e t h N a m e 2 4 3 Q
0006460 D e l e t e I V 2 3 0 Q P u
0006500 t V a l u e O n l y 2 1 6 Q
0006520 G e t C l a s s V a l u e 2 0
0006540 5 Q G e t M e t h o d O b j
0006560 1 7 4 Q D E L D E F 1 6 3 Q
0006600 T E R P R I 1 5 4 Q P R I
0006620 N 1 1 4 5 Q G e t M e t h o
0006640 d 1 3 7 Q P R I N 1 1 2 4
0006660 Q P R I N 1 1 1 6 Q C H A
0006700 R A C T E R 1 1 0 Q C L E A
0006720 R W 6 2 Q H E L P C H E C K
0006740 4 2 Q \ F i n d E n t r y I
0006760 n d e x 2 0 Q G e t C l a s
0007000 s R e c 1 1 Q M e t h N a m
0007020 e 4 M e t h N a m e ) \r ( 3
0007040 5 6 Q c l a s s 3 3 2 Q c
0007060 l a s s 3 0 5 Q D e s t r o
0007100 y 2 5 6 Q M E T H O D S 2
0007120 3 7 Q m e t h o d 2 2 5 Q
0007140 ? 2 1 3 Q i v P r o p e r t
0007160 i e s 1 6 0 Q P R O M P T W
0007200 I N D O W 1 5 1 Q P R O M P
0007220 T W I N D O W 1 3 4 Q P R O
0007240 M P T W I N D O W 1 2 1 Q P
0007260 R O M P T W I N D O W 1 0 5 Q
0007300 P R O M P T W I N D O W 3 0
0007320 Q c l a s s ) \r ( 1 3 1 Q
0007340 " D e l e t i n g f u n c t i
0007360 o n d e f i n i t i o n f o
0007400 r " 5 7 Q " T y p e \r R E
0007420 T U R N ' s e l e c t o r N a
0007440 m e \r t o t r y a g a i n "
0007460 5 2 Q " d o e s n o t
0007500 c o n t a i n t h e s e l e
0007520 c t o r " ) \r D o F r i n g e
0007540 M e t h o d s D 1 \r ( I 0
0007560 o b j % s e l e c t o r % .
0007600 . a r g s ) 001 235 017 \0 003 001 021 0 002
0007620 @ 260 024 d 001 \t \0 \0 270 I 265 \a H h 032 Z
0007640 201 H & 271 002 003 265 355 J 022 021 A 004 H 001 Z
0007660 H 002 001 Y J H 002 002 032 X J d 004 ` \0 \0
0007700 360 246 d 004 ` \0 \0 360 222 311 \0 202 \t \0 \0 [
0007720 d 021 A \t K 004 ` \0 \0 360 243 h 261 \0 206 `
0007740 \0 \0 262 + K 323 I 323 346 l 376 345 276 K d `
0007760 \0 \0 N 320 311 \0 360 262 027 277 I ` \0 \0 N 320
0010000 311 \0 360 230 ` \0 \0 N 320 311 \0 260 W K 006 \0
0010020 \0 311 022 _ 022 277 I M 006 \0 \0 311 030 265 005 277
0010040 h 202 \n \0 \0 _ 020 255 O 022 001 O 022 002 _ 022
0010060 277 ] 264 0 260 342 M O 020 \n \0 \0 _ 016 277 `
0010100 \0 \0 262 036 ` \0 \0 N 320 K 316 \0 277 ` \0 \0
0010120 N 320 I 316 \0 277 ` \0 \0 N 320 O 016 316 \0 277
0010140 O 016 022 265 \v K 006 \0 \0 311 036 261 \0 256 H \n
0010160 \0 \0 277 261 \0 255 d 001 \ 021 A 016 L 004 ` \0
0010200 \0 360 243 h 261 \0 221 ` \0 \0 262 0 L 323 I 323
0010220 346 l 376 345 _ 026 277 L d ` \0 \0 O 026 320 311
0010240 \0 360 262 031 277 I ` \0 \0 O 026 320 311 \0 360 231
0010260 ` \0 \0 O 026 320 311 \0 260 ] L 006 \0 \0 311 022
0010300 _ 034 277 I O 024 006 \0 \0 311 030 265 005 277 h 202
0010320 \n \0 \0 _ 032 256 O 034 001 O 034 002 _ 034 277 _
0010340 024 264 4 260 340 O 024 O 032 \n \0 \0 _ 030 277 `
0010360 \0 \0 262 ! ` \0 \0 O 026 320 L 316 \0 277 ` \0
0010400 \0 O 026 320 I 316 \0 277 ` \0 \0 O 026 320 O 030
0010420 316 \0 277 O 030 022 265 \f 002 003 265 003 202 261 377 Y
0010440 h 020 H \n \0 \0 277 260 361 \0 ( 6 3 0 Q
0010460 A P P L Y 5 3 6 Q G e t N t
0010500 h M e t h o d 5 0 5 Q \ F i
0010520 n d E n t r y I n d e x 3 4 4
0010540 Q A P P L Y 2 5 6 Q G e t
0010560 N t h M e t h o d 2 2 7 Q \
0010600 F i n d E n t r y I n d e x 1
0010620 0 1 Q G e t L i s p C l a s s
0010640 1 2 Q E V A L ) \r ( 5 7 5 Q
0010660 M e t h o d B l o c k 5 6 3
0010700 Q S e l e c t o r B l o c k
0010720 5 5 1 Q C l a s s B l o c k
0010740 5 4 4 Q U s e M e t h o d C a
0010760 c h e F l g 4 7 3 Q c l a s
0011000 s 4 6 0 Q c l a s s 4 4 5
0011020 Q M e t h o d B l o c k 4 3
0011040 3 Q S e l e c t o r B l o c k
0011060 4 1 6 Q C l a s s B l o c k
0011100 3 7 4 Q U s e M e t h o d C
0011120 a c h e F l g 3 6 3 Q 004 003 c
0011140 l a s s T Y P E # 3 3 3 Q c
0011160 l a s s 3 1 3 Q M e t h o d
0011200 B l o c k 3 0 2 Q S e l e c
0011220 t o r B l o c k 2 7 1 Q C l
0011240 a s s B l o c k 2 6 4 Q U s
0011260 e M e t h o d C a c h e F l g
0011300 2 1 5 Q c l a s s 2 0 3 Q
0011320 c l a s s 1 7 1 Q M e t h o
0011340 d B l o c k 1 6 0 Q S e l e
0011360 c t o r B l o c k 1 4 4 Q C
0011400 l a s s B l o c k 1 2 4 Q U
0011420 s e M e t h o d C a c h e F l g
0011440 1 1 3 Q 004 003 c l a s s T Y P
0011460 E # 7 1 Q 004 003 c l a s s T Y
0011500 P E # 6 2 Q 004 003 i n s t a n
0011520 c e T Y P E # ) \r ( ) \r D o M e
0011540 t h o d D 1 \r ( L ( 0 o b
0011560 j % s e l e c t o r % c l a
0011600 s s % . . a r g s ) P 0
0011620 c l a s s F o r M e t h o d )
0011640 001 016 \n \0 003 001 021 P 004 021 0 \a @ 260 025 d
0011660 001 \t \0 \0 275 N 265 \b M h 032 _ 016 201 M &
0011700 276 002 003 265 354 O 016 022 Y d 001 I 002 271 Z I
0011720 002 001 265 032 d d 004 ` \0 \0 360 250 277 d 004 `
0011740 \0 \0 360 223 J 311 \0 203 J \t \0 \0 I 001 274 [
0011760 021 A \t K 004 ` \0 \0 360 243 h 261 \0 206 ` \0
0012000 \0 262 + K 323 L 323 346 l 376 345 276 K d ` \0
0012020 \0 N 320 311 \0 360 262 027 277 L ` \0 \0 N 320 311
0012040 \0 360 230 ` \0 \0 N 320 311 \0 260 W K 006 \0 \0
0012060 311 022 _ 022 277 L M 006 \0 \0 311 030 265 005 277 h
0012100 202 \n \0 \0 _ 020 255 O 022 001 O 022 002 _ 022 277
0012120 ] 264 0 260 342 M O 020 \n \0 \0 _ 016 277 ` \0
0012140 \0 262 036 ` \0 \0 N 320 K 316 \0 277 ` \0 \0 N
0012160 320 L 316 \0 277 ` \0 \0 N 320 O 016 316 \0 277 O
0012200 016 022 265 ( I 001 o \0 \0 \0 I 002 001 265 027 J
0012220 d 004 ` \0 \0 360 246 d 004 ` \0 \0 360 222 311 \0
0012240 202 \t \0 \0 \n \0 \0 \n \0 \0 J I 002 002 032 \n
0012260 \0 \0 020 \0 ( 4 1 3 Q A P P L Y
0012300 4 0 3 Q E R R O R 4 0 0 Q
0012320 C O N C A T 3 7 5 Q G e t L
0012340 i s p C l a s s 2 6 4 Q G e
0012360 t N t h M e t h o d 2 3 5 Q
0012400 \ F i n d E n t r y I n d e x
0012420 1 0 5 Q G e t L i s p C l a s
0012440 s 1 5 Q E V A L ) \r ( 3 6 5
0012460 Q 004 003 c l a s s T Y P E # 3
0012500 5 6 Q 004 003 i n s t a n c e T Y
0012520 P E # 3 2 1 Q M e t h o d B
0012540 l o c k 3 1 0 Q S e l e c t
0012560 o r B l o c k 2 7 7 Q C l a
0012600 s s B l o c k 2 7 2 Q U s e
0012620 M e t h o d C a c h e F l g 2
0012640 2 3 Q c l a s s 2 1 1 Q c
0012660 l a s s 1 7 7 Q M e t h o d
0012700 B l o c k 1 6 6 Q S e l e c
0012720 t o r B l o c k 1 5 2 Q C l
0012740 a s s B l o c k 1 3 2 Q U s
0012760 e M e t h o d C a c h e F l g
0013000 1 2 1 Q 004 003 c l a s s T Y P E
0013020 # 7 3 Q 004 003 c l a s s T Y P
0013040 E # 6 3 Q 004 003 i n s t a n c
0013060 e T Y P E # ) \r ( 3 4 3 Q "
0013100 n o t a s e l e c t o r f
0013120 o r " ) \r I V F u n c t i o n
0013140 D 1 \r ( P 0 f n N a m e
0013160 I 1 i v N a m e I 0 o
0013200 b j ) \0 037 001 \0 \0 002 @ A \n \0 \0 021
0013220 001 \0 H \t \0 \0 264 003 H o \0 \0 \0 @ A H
0013240 \f \0 \0 \t \0 \0 h 020 \0 ( 3 3 Q T
0013260 3 0 Q L o o p s H e l p 1 3
0013300 Q D E F I N E D P 4 G e t
0013320 V a l u e ) \r N I L \r ( 2 2 Q
0013340 " N o i v f u n c t i o n
0013360 " ) \r I n s t a l l M e t h o d
0013400 D 1 \r ( I 0 s e l f ) \0
0013420 035 \0 \0 \0 001 @ g \0 \0 \n \0 \0 \t \0 \0 @
0013440 g \0 \0 \n \0 \0 @ g \0 \0 \n \0 \0 \v \0 \0
0013460 020 \0 ( 3 2 Q A d d M e t h o d
0013500 2 7 Q G e t V a l u e 2 0
0013520 Q G e t V a l u e 1 1 Q G
0013540 e t O b j e c t R e c 6 G e
0013560 t V a l u e ) \r ( 2 4 Q m e t
0013600 h o d 1 5 Q s e l e c t o r
0013620 3 c l a s s N a m e ) \r N I
0013640 L \r L o o p s H e l p D 1 \r (
0013660 I 3 m e s s 4 I 2 m e
0013700 s s 3 I 1 m e s s 2 I
0013720 0 m e s s 1 F 0 L o o p
0013740 s D e b u g F l g ) \0 = \0 001 \0
0013760 004 P 245 @ A \n \0 \0 277 @ 230 @ \t \0 \0 223
0014000 \b \0 \0 277 A 230 A \t \0 \0 223 \b \0 \0 277 B
0014020 230 B \t \0 \0 223 \b \0 \0 277 C 230 C \t \0 \0
0014040 223 \b \0 \0 277 o \0 \0 \0 \t \0 \0 020 \0 ( 7
0014060 2 Q H E L P 6 2 Q T E R P
0014100 R I 5 6 Q P R I N 2 4 7 Q
0014120 T E R P R I 4 3 Q P R I N
0014140 2 3 4 Q T E R P R I 3 0 Q
0014160 P R I N 2 2 1 Q T E R P R
0014200 I 1 5 Q P R I N 2 6 E R
0014220 R O R ) \r N I L \r ( 6 7 Q "
0014240 L o o p s H e l p " ) \r M E T
0014260 H D 1 \r ( P 5 m e t h N a
0014300 m e P 4 f n N a m e P
0014320 3 s e l P 2 c N a m e
0014340 P 1 s e l f P 0 d e s
0014360 c r I 0 m e t h D e s c r
0014400 ) \0 ; 006 \0 003 001 @ 021 Q 005 H 001 H 002
0014420 270 Z H 001 H 002 270 [ J K \n \0 \0 ] H 001
0014440 \ 265 026 M 274 J K L H 001 H 002 001 h H 002
0014460 002 \r \a \0 \0 h 020 004 l 004 360 262 350 H 002 270
0014500 260 345 \0 ( 5 4 Q D e f M e t h O
0014520 b j 2 4 Q M e t h N a m e )
0014540 \r N I L \r N I L \r M e t h N a m
0014560 e D 1 \r ( I 1 s e l e c t
0014600 o r I 0 c l a s s O r N a
0014620 m e ) \0 025 \0 \0 \0 002 @ d 004 ` \0 \0
0014640 360 222 \t \0 \0 o \0 \0 \0 A \v \0 \0 020 \0 (
0014660 2 2 Q P A C K * 1 2 Q C l
0014700 a s s N a m e ) \r ( 5 004 003 c l
0014720 a s s T Y P E # ) \r ( 1 6 Q
0014740 " . " ) \r M o v e M e t h o d
0014760 D 1 \r ( P 7 p r o p P 4
0015000 n e w L o c a l F n P 3
0015020 o l d D e f P 2 l o c a l
0015040 F n P 1 n e w C l a s s
0015060 P 0 o l d C l a s s I 4
0015100 f i l e s I 3 n e w S e
0015120 l e c t o r I 2 s e l e c
0015140 t o r I 1 n e w C l a s s
0015160 N a m e I 0 o l d C l a s
0015200 s N a m e ) \0 244 \b \0 \0 005 @ h i
0015220 \v \0 \0 b \0 A 265 005 d b 002 h i \v \0 \0
0015240 b 002 C 243 B b 006 277 @ \t \0 \0 A \t \0 \0
0015260 @ \t \0 \0 B \n \0 \0 021 C 006 J 263 030 B i
0015300 \n \0 \0 277 o \0 \0 \0 i \n \0 \0 277 @ i \n
0015320 \0 \0 h 020 @ J \n \0 \0 262 031 J \t \0 \0 002
0015340 273 J \t \0 \0 277 A C K 001 K 002 002 \f \0 \0
0015360 \ 205 I B J \v \0 \0 277 H ^ g \0 \0 \n \0
0015400 \0 275 N g \0 \0 B l 003 M 017 016 260 027 d 001
0015420 021 001 \a I C H B O 016 \v \0 \0 O 016 \f \0
0015440 \0 023 002 003 265 352 H B \n \0 \0 L 265 003 J 020
0015460 \0 ( 2 3 5 Q D e l e t e M e t
0015500 h o d 2 2 3 Q P u t M e t h
0015520 o d O n l y 2 1 6 Q G e t M
0015540 e t h o d O n l y 1 6 3 Q F
0015560 e t c h M e t h o d O r H e l p
0015600 1 5 2 Q A d d M e t h o d
0015620 1 4 2 Q D M 1 2 7 Q D E L
0015640 D E F 1 2 1 Q G E T D E F
0015660 1 1 3 Q S T R P O S 1 0 4 Q
0015700 P R I N 1 7 6 Q P R I N 1
0015720 6 5 Q P R I N 1 5 2 Q F
0015740 i n d L o c a l M e t h o d 4
0015760 6 Q G e t C l a s s R e c 4
0016000 2 Q G e t C l a s s R e c 3
0016020 6 Q G e t C l a s s R e c 2
0016040 2 Q G o o d C l a s s N a m e
0016060 5 G o o d C l a s s N a m e
0016100 ) \r ( 1 7 0 Q M e t h o d 1
0016120 6 0 Q L i s t ) \r ( 7 2 Q
0016140 " n o t f o u n d i n "
0016160 ) \r R e n a m e M e t h o d D
0016200 1 \r ( P 5 n e w M e t h N a
0016220 m e P 4 l o c a l F n P
0016240 3 o l d D e f P 2 n e
0016260 w L o c a l F n P 1 c l a
0016300 s s P 0 c l a s s N a m e
0016320 I 2 n e w S e l e c t o r
0016340 I 1 o l d S e l e c t o r
0016360 I 0 c l a s s O r N a m e
0016400 ) \0 224 \b \0 \0 003 021 200 \a @ d 004 ` \0
0016420 \0 360 264 \b Y \t \0 \0 270 210 i \v \0 \0 X \t
0016440 \0 \0 271 I A \n \0 \0 \ d 263 030 A i \n \0
0016460 \0 277 o \0 \0 \0 i \n \0 \0 277 H i \n \0 \0
0016500 h 020 H L \n \0 \0 237 L \t \0 \0 002 [ 250 L
0016520 o \0 \0 \0 \n \0 \0 277 I A i \v \0 \0 _ 016
0016540 g \0 \0 \n \0 \0 276 O 016 I A \n \0 \0 H B
0016560 \n \0 \0 ] B l 004 N 017 016 277 K 237 I A \n
0016600 \0 \0 277 H B K 001 K 002 \f \0 \0 213 I A \n
0016620 \0 \0 277 H B L \v \0 \0 M 020 \0 ( 2 2 0
0016640 Q D M 2 1 1 Q D e l e t e
0016660 M e t h o d 2 0 3 Q D M 1
0016700 7 1 Q D e l e t e M e t h o d
0016720 1 5 2 Q M e t h N a m e 1
0016740 4 5 Q M e t h N a m e 1 3 5
0016760 Q F e t c h M e t h o d O r H
0017000 e l p 1 2 5 Q G e t M e t h
0017020 o d O b j 1 1 6 Q E R R O R
0017040 1 0 3 Q G E T D E F 7 6 Q
0017060 S T R P O S 6 7 Q P R I N
0017100 1 6 1 Q P R I N 1 5 0 Q
0017120 P R I N 1 3 7 Q F i n d L o
0017140 c a l M e t h o d 3 1 Q G e
0017160 t C l a s s R e c 2 5 Q G o
0017200 o d C l a s s N a m e 1 7 Q
0017220 C l a s s N a m e ) \r ( 1 3 2 Q
0017240 C h a n g e N a m e 1 0 Q
0017260 004 003 c l a s s T Y P E # ) \r (
0017300 1 1 3 Q " d e f n c a n n
0017320 o t b e f o u n d f o r
0017340 R e n a m e M e t h o d " 5 5
0017360 Q " n o t f o u n d i n
0017400 " ) \r _ S u p e r F r i n g e
0017420 D 1 \r ( I 0 o b j % s e
0017440 l e c t o r % . . a r g s )
0017460 \0 346 \t \0 003 001 021 @ 003 @ 001 \t \0 \0 X @
0017500 002 001 Y 021 0 006 @ 002 260 023 d 001 \t \0 \0 274
0017520 M 265 \a L h 032 ^ 201 L & 275 002 003 265 355 N
0017540 022 Z H J 032 Z H I g \0 \0 \v \0 \0 d 006
0017560 \0 \0 311 036 261 \0 227 d 001 [ 021 A \b K 004 `
0017600 \0 \0 360 243 h 261 \0 202 ` \0 \0 262 + K 323 I
0017620 323 346 l 376 345 275 K d ` \0 \0 M 320 311 \0 360
0017640 262 027 277 I ` \0 \0 M 320 311 \0 360 230 ` \0 \0
0017660 M 320 311 \0 260 S K 006 \0 \0 311 022 _ 020 277 I
0017700 L 006 \0 \0 311 030 265 005 277 h 202 \n \0 \0 _ 016
0017720 255 O 020 001 O 020 002 _ 020 277 \ 264 , 260 342 L
0017740 O 016 \n \0 \0 276 ` \0 \0 262 035 ` \0 \0 M 320
0017760 K 316 \0 277 ` \0 \0 M 320 I 316 \0 277 ` \0 \0
0020000 M 320 N 316 \0 277 N 022 265 \f 002 003 265 003 202 261
0020020 377 h h 020 J \n \0 \0 277 260 361 \0 ( 3 4 1
0020040 Q A P P L Y 2 5 6 Q G e t
0020060 N t h M e t h o d 2 2 7 Q \
0020100 F i n d E n t r y I n d e x 6
0020120 7 Q G e t C a l l e r C l a s
0020140 s 3 0 Q E V A L 7 E V A
0020160 L ) \r ( 3 1 1 Q M e t h o d B
0020200 l o c k 3 0 0 Q S e l e c t
0020220 o r B l o c k 2 6 7 Q C l a
0020240 s s B l o c k 2 6 2 Q U s e
0020260 M e t h o d C a c h e F l g 2
0020300 1 5 Q c l a s s 2 0 3 Q c
0020320 l a s s 1 7 1 Q M e t h o d
0020340 B l o c k 1 6 0 Q S e l e c
0020360 t o r B l o c k 1 4 4 Q C l
0020400 a s s B l o c k 1 2 4 Q U s
0020420 e M e t h o d C a c h e F l g
0020440 1 1 3 Q 004 003 c l a s s T Y P E
0020460 # 7 3 Q c l a s s 6 4 Q
0020500 _ S u p e r F r i n g e ) \r ( )
0020520 \r F i n d L o c a l M e t h o d
0020540 D 1 \r ( P 0 i n d e x I
0020560 1 s e l e c t o r I 0
0020600 c l a s s ) \0 034 001 \0 \0 002 A @ 006
0020620 \0 \0 311 030 265 005 277 h 202 \n \0 \0 021 001 \0 H
0020640 264 \a @ H \n \0 \0 020 \0 ( 3 1 Q G e
0020660 t N t h M e t h o d 1 6 Q \
0020700 F i n d E n t r y I n d e x ) \r
0020720 ( 4 c l a s s ) \r N I L \r F i
0020740 n d S e l e c t o r I n d e x
0020760 D 1 \r ( I 1 s e l e c t o r
0021000 I 0 c l a s s ) \0 017 \0 \0
0021020 \0 002 A @ 006 \0 \0 311 030 d 240 020 \n \0 \0 020
0021040 \0 ( 1 4 Q \ F i n d E n t r y
0021060 I n d e x ) \r ( 4 c l a s s )
0021100 \r N I L \r F i x @ $ D 1 \r ( P
0021120 2 A T O M P 1 F O R M
0021140 P 0 F I R S T C H A R I
0021160 1 t a i l I 0 a t o m
0021200 ) \0 M 003 \0 \0 002 @ k \n \0 \0 021 ! 002
0021220 H g \0 \0 360 246 H g \0 \0 360 262 " @ l 002
0021240 \n \0 \0 Z 235 H J h 032 032 271 A 003 236 A I
0021260 030 277 211 H g \0 \0 360 223 A 003 265 004 I 020 001
0021300 003 262 374 H A 001 032 271 A I 030 277 A d 002 002
0021320 031 277 260 353 \0 ( 3 2 Q S U B A T O
0021340 M 4 N T H C H A R ) \r ( 5 6
0021360 Q @ 2 1 Q @ 1 3 Q $ )
0021400 \r N I L \r F l u s h M e t h o d
0021420 C a c h e D 1 \r ( F 0 \ V
0021440 M E M P A G E P ) \0 031 \0 001 \0 \0
0021460 ` \0 \0 264 024 ` \0 \0 004 P 360 264 \f ` \0 \0
0021500 d l 377 320 \n \0 \0 020 \0 ( 2 6 Q \ Z
0021520 E R O W O R D S ) \r ( 1 7 Q C
0021540 l a s s B l o c k 7 C l a s
0021560 s B l o c k 2 U s e M e t h
0021600 o d C a c h e F l g ) \r ( ) \r F
0021620 u l l I n s t a l l M e t h o d
0021640 D 1 \r ( I 0 s e l f ) \0
0021660 023 002 \0 \0 001 @ 021 021 001 H g \0 \0 \n \0 \0
0021700 271 H k I 017 016 020 \0 ( 1 2 Q F e t
0021720 c h M e t h o d O r H e l p ) \r
0021740 ( 7 O l d I n s t a n c e ) \r
0021760 N I L \r F e t c h M e t h o d
0022000 D 1 \r ( P 4 s u p e r s P
0022020 3 i n d e x P 2 m e t
0022040 h P 1 p o s P 0 c l
0022060 a s s I 1 s e l e c t o r
0022100 I 0 c l a s s R e c ) \0
0022120 204 005 \0 \0 002 @ 021 A 004 @ 004 ` \0 \0 360 241
0022140 h 020 ` \0 \0 262 * @ 323 A 323 346 l 376 345 271
0022160 @ d ` \0 \0 I 320 311 \0 360 262 026 277 A ` \0
0022200 \0 I 320 311 \0 360 227 ` \0 \0 I 320 311 \0 020 @
0022220 006 \0 \0 311 022 274 A H 006 \0 \0 311 030 265 005 277
0022240 h 202 \n \0 \0 [ 251 L 001 L 002 274 X 264 * 260
0022260 347 H K \n \0 \0 272 ` \0 \0 262 034 ` \0 \0 I
0022300 320 @ 316 \0 277 ` \0 \0 I 320 A 316 \0 277 ` \0
0022320 \0 I 320 J 316 \0 J 020 \0 ( 1 4 0 Q G
0022340 e t N t h M e t h o d 1 1 7 Q
0022360 \ F i n d E n t r y I n d e x
0022400 ) \r ( 1 7 3 Q M e t h o d B l
0022420 o c k 1 6 2 Q S e l e c t o
0022440 r B l o c k 1 5 1 Q C l a s
0022460 s B l o c k 1 4 4 Q U s e M
0022500 e t h o d C a c h e F l g 1 0
0022520 5 Q c l a s s 7 5 Q c l a
0022540 s s 6 4 Q M e t h o d B l o
0022560 c k 5 3 Q S e l e c t o r B
0022600 l o c k 3 7 Q C l a s s B l
0022620 o c k 1 7 Q U s e M e t h o
0022640 d C a c h e F l g 1 0 Q 004 003
0022660 c l a s s T Y P E # ) \r ( ) \r F
0022700 e t c h M e t h o d O r H e l p
0022720 D 1 \r ( P 1 2 Q o b j %
0022740 P 1 1 Q s u p e r s P
0022760 1 0 Q i n d e x P 7 m e
0023000 t h P 6 p o s P 5 c
0023020 l a s s P 0 c l a s s I
0023040 1 s e l e c t o r I 0
0023060 s e l f ) 002 _ 020 \0 \0 002 021 P 004 @
0023100 d 004 ` \0 \0 360 246 d 004 ` \0 \0 360 222 311 \0
0023120 202 \t \0 \0 270 H 242 261 001 s H 021 A \t M 004
0023140 ` \0 \0 360 243 h 261 \0 206 ` \0 \0 262 + M 323
0023160 A 323 346 l 376 345 276 M d ` \0 \0 N 320 311 \0
0023200 360 262 027 277 A ` \0 \0 N 320 311 \0 360 230 ` \0
0023220 \0 N 320 311 \0 260 W M 006 \0 \0 311 022 _ 022 277
0023240 A M 006 \0 \0 311 030 265 005 277 h 202 \n \0 \0 _
0023260 020 255 O 022 001 O 022 002 _ 022 277 ] 264 0 260 342
0023300 M O 020 \n \0 \0 _ 016 277 ` \0 \0 262 036 ` \0
0023320 \0 N 320 M 316 \0 277 ` \0 \0 N 320 A 316 \0 277
0023340 ` \0 \0 N 320 O 016 316 \0 277 O 016 022 265 003 202
0023360 261 001 251 H 021 A \t M 004 ` \0 \0 360 243 h 261
0023400 \0 216 ` \0 \0 262 / M 323 g \0 \0 323 346 l 376
0023420 345 276 M d ` \0 \0 N 320 311 \0 360 262 031 277 `
0023440 \0 \0 N 320 311 \0 g \0 \0 360 230 ` \0 \0 N 320
0023460 311 \0 260 [ M 006 \0 \0 311 022 _ 022 277 g \0 \0
0023500 M 006 \0 \0 311 030 265 005 277 h 202 \n \0 \0 _ 020
0023520 255 O 022 001 O 022 002 _ 022 277 ] 264 2 260 340 M
0023540 O 020 \n \0 \0 _ 016 277 ` \0 \0 262 ` \0 \0
0023560 N 320 M 316 \0 277 ` \0 \0 N 320 g \0 \0 316 \0
0023600 277 ` \0 \0 N 320 O 016 316 \0 277 O 016 022 262 030
0023620 @ Z g \0 \0 \n \0 \0 271 J A l 002 I 017 016
0023640 b 002 222 261 376 262 g \0 \0 A g \0 \0 360 223 g
0023660 \0 \0 200 @ A g \0 \0 h 032 032 032 032 o \0 \0
0023700 \0 \n \0 \0 265 003 202 261 \0 322 @ 021 001 \n ` \0
0023720 \0 265 006 O 024 311 \0 [ 021 A 017 K 004 ` \0 \0
0023740 360 243 h 261 \0 231 ` \0 \0 262 4 K 323 g \0 \0
0023760 323 346 l 376 345 _ 030 277 K d ` \0 \0 O 030 320
0024000 311 \0 360 262 033 277 ` \0 \0 O 030 320 311 \0 g \0
0024020 \0 360 231 ` \0 \0 O 030 320 311 \0 260 a K 006 \0
0024040 \0 311 022 _ 036 277 g \0 \0 O 026 006 \0 \0 311 030
0024060 265 005 277 h 202 \n \0 \0 _ 034 256 O 036 001 O 036
0024100 002 _ 036 277 _ 026 264 6 260 336 O 026 O 034 \n \0
0024120 \0 _ 032 277 ` \0 \0 262 # ` \0 \0 O 030 320 K
0024140 316 \0 277 ` \0 \0 O 030 320 g \0 \0 316 \0 277 `
0024160 \0 \0 O 030 320 O 032 316 \0 277 O 032 022 265 \f g
0024200 \0 \0 o \0 \0 \0 \n \0 \0 274 O 024 A l 002 L
0024220 017 016 022 027 \0 \0 g \0 \0 020 \0 ( 1 1 1 4
0024240 Q E R R O R 1 0 2 4 Q G e
0024260 t N t h M e t h o d 7 7 3 Q
0024300 \ F i n d E n t r y I n d e x
0024320 6 0 7 Q L o o p s H e l p 5
0024340 3 3 Q F e t c h M e t h o d O
0024360 r H e l p 4 5 0 Q G e t N t
0024400 h M e t h o d 4 2 1 Q \ F i
0024420 n d E n t r y I n d e x 2 1 1
0024440 Q G e t N t h M e t h o d 1
0024460 6 2 Q \ F i n d E n t r y I n
0024500 d e x 2 7 Q G e t L i s p C
0024520 l a s s ) \r ( 1 1 3 4 Q G e t
0024540 L a s t D e f a u l t V a l u e
0024560 1 1 3 1 Q L a s t D e f a u
0024600 l t V a l u e 1 1 0 5 Q N o
0024620 O b j e c t F o r M s g 1 0 6
0024640 5 Q M e t h o d B l o c k 1
0024660 0 5 7 Q N o O b j e c t F o r
0024700 M s g 1 0 5 1 Q S e l e c t
0024720 o r B l o c k 1 0 3 7 Q C l
0024740 a s s B l o c k 1 0 3 2 Q U
0024760 s e M e t h o d C a c h e F l g
0025000 7 6 1 Q c l a s s 7 5 4 Q
0025020 N o O b j e c t F o r M s g
0025040 7 4 4 Q c l a s s 7 3 1 Q
0025060 M e t h o d B l o c k 7 2 4 Q
0025100 N o O b j e c t F o r M s g
0025120 7 1 4 Q S e l e c t o r B l o
0025140 c k 7 0 0 Q C l a s s B l o
0025160 c k 6 6 3 Q N o O b j e c t
0025200 F o r M s g 6 5 4 Q U s e M
0025220 e t h o d C a c h e F l g 6 4
0025240 3 Q 004 003 c l a s s T Y P E #
0025260 6 2 4 Q D e f a u l t O b j e
0025300 c t 5 7 3 Q - - 5 6 5 Q
0025320 * * * 5 6 0 Q P r i n t O n
0025340 5 5 4 Q _ 5 3 0 Q M e s
0025360 s a g e N o t U n d e r s t o o
0025400 d 5 0 7 Q M e t h o d B l o
0025420 c k 5 0 1 Q M e s s a g e N
0025440 o t U n d e r s t o o d 4 7 4
0025460 Q S e l e c t o r B l o c k
0025500 4 6 3 Q C l a s s B l o c k
0025520 4 5 6 Q U s e M e t h o d C a
0025540 c h e F l g 4 0 7 Q c l a s
0025560 s 4 0 3 Q M e s s a g e N o
0025600 t U n d e r s t o o d 3 7 3 Q
0025620 c l a s s 3 6 1 Q M e t h
0025640 o d B l o c k 3 5 4 Q M e s
0025660 s a g e N o t U n d e r s t o o
0025700 d 3 4 5 Q S e l e c t o r B
0025720 l o c k 3 3 2 Q C l a s s B
0025740 l o c k 3 1 7 Q M e s s a g
0025760 e N o t U n d e r s t o o d 3
0026000 1 0 Q U s e M e t h o d C a c
0026020 h e F l g 2 7 7 Q 004 003 c l a
0026040 s s T Y P E # 2 4 6 Q M e t
0026060 h o d B l o c k 2 3 5 Q S e
0026100 l e c t o r B l o c k 2 2 4 Q
0026120 C l a s s B l o c k 2 1 7 Q
0026140 U s e M e t h o d C a c h e F
0026160 l g 1 5 0 Q c l a s s 1 3
0026200 6 Q c l a s s 1 2 4 Q M e
0026220 t h o d B l o c k 1 1 3 Q S
0026240 e l e c t o r B l o c k 7 7 Q
0026260 C l a s s B l o c k 5 7 Q
0026300 U s e M e t h o d C a c h e F l
0026320 g 4 6 Q 004 003 c l a s s T Y P
0026340 E # 1 7 Q 004 003 c l a s s T Y
0026360 P E # 1 0 Q 004 003 i n s t a n
0026400 c e T Y P E # ) \r ( 1 1 1 1 Q
0026420 " n o t f o u n d f o r
0026440 D o M e t h o d " 6 0 4 Q "
0026460 n o t u n d e r s t o o d " )
0026500 \r G e t C a l l e r C l a s s
0026520 D 1 \r ( P 5 s t k P o s P
0026540 4 s u p e r s L i s t P
0026560 3 i n d e x P 2 f n P
0026600 1 c l a s s P 0 c a l
0026620 l e r N a m e I 2 f r o m
0026640 C a l l e r I 1 s e l e c
0026660 t o r I 0 o b j e c t )
0026700 \0 n 006 \0 \0 003 B 021 Q 005 m 377 M 265 003 H
0026720 h M \f \0 \0 ] 265 023 A o \0 \0 \0 B 265 006
0026740 o \0 \0 \0 \v \0 \0 277 M \t \0 \0 270 @ d 004
0026760 ` \0 \0 360 246 d 004 ` \0 \0 360 222 311 \0 202 \t
0027000 \0 \0 Y 006 \0 \0 311 022 274 A I 006 \0 \0 311 030
0027020 265 005 277 h 202 \n \0 \0 [ 236 H I K \n \0 \0
0027040 Z 360 225 M \t \0 \0 I 020 L 001 L 002 274 Y 262
0027060 233 260 330 \0 ( 1 4 0 Q R E L S T K
0027100 1 3 1 Q G e t N t h M e t h
0027120 o d 1 2 1 Q \ F i n d E n t
0027140 r y I n d e x 7 3 Q G e t L
0027160 i s p C l a s s 4 5 Q S T K
0027200 N A M E 4 0 Q L o o p s H e
0027220 l p 1 6 Q R E A L S T K N T
0027240 H ) \r ( 1 0 7 Q c l a s s 7
0027260 7 Q c l a s s 6 3 Q 004 003 c
0027300 l a s s T Y P E # 5 4 Q 004 003
0027320 i n s t a n c e T Y P E # ) \r (
0027340 3 5 Q " _ S u p e r " 2 6
0027360 Q " N o c a l l e r f o u
0027400 n d i n " ) \r G e t N t h M
0027420 e t h o d D 1 \r ( P 0 m e
0027440 t h s I 1 n I 0 c l
0027460 a s s ) \0 033 001 \0 \0 002 @ 006 \0 \0 311
0027500 032 021 001 \0 H d 003 227 A k 330 \n \0 \0 001 020
0027520 A 320 311 \0 020 \0 ( 2 2 Q F N T H )
0027540 \r ( 3 c l a s s ) \r N I L \r G
0027560 e t S u p e r M e t h o d D 1
0027600 \r ( P 5 s t k P o s P 4
0027620 c l a s s P 3 s u p e r
0027640 s L i s t P 2 f l g P
0027660 1 f n P 0 i n d e x I
0027700 2 c a l l e r N a m e I
0027720 1 s e l e c t o r I 0 o
0027740 b j e c t ) \0 206 006 \0 \0 003 021 ` 005
0027760 B 263 * g \0 \0 b 004 277 m 377 M 265 003 B h
0030000 M \f \0 \0 ] d 255 \t \0 \0 277 o \0 \0 \0 A
0030020 \n \0 \0 277 M \t \0 \0 b 004 277 @ d 004 ` \0
0030040 \0 360 246 d 004 ` \0 \0 360 222 311 \0 202 \t \0 \0
0030060 \ 006 \0 \0 311 022 273 A L 006 \0 \0 311 030 265 005
0030100 277 h 202 \n \0 \0 X 232 B L H \n \0 \0 Y 360
0030120 232 i 272 K 001 K 002 273 \ 232 260 335 J 262 366 M
0030140 \t \0 \0 I 020 J 262 223 A o \0 \0 \0 \n \0 \0
0030160 h 020 \0 ( 2 0 2 Q L o o p s H e
0030200 l p 1 6 5 Q R E L S T K 1
0030220 4 0 Q G e t N t h M e t h o d
0030240 1 3 0 Q \ F i n d E n t r y
0030260 I n d e x 1 0 2 Q G e t L i
0030300 s p C l a s s 5 2 Q S T K N
0030320 A M E 4 5 Q L o o p s H e l
0030340 p 3 4 Q R E L S T K 2 6 Q
0030360 R E A L S T K N T H ) \r ( 1 1
0030400 6 Q c l a s s 1 0 6 Q c l
0030420 a s s 7 2 Q 004 003 c l a s s T
0030440 Y P E # 6 3 Q 004 003 i n s t a
0030460 n c e T Y P E # 1 0 Q G e t
0030500 S u p e r M e t h o d ) \r ( 1
0030520 7 7 Q " n o t u n d e r s t
0030540 o o d i n _ S u p e r " 4
0030560 1 Q " N o c a l l e r f o
0030600 u n d i n _ S u p e r f o
0030620 r : \r " ) \r P r i n t M e t h s
0030640 D 1 \r ( P 2 s e l f P
0030660 1 n a m e I 1 f i l e
0030700 I 0 m e t h L i s t ) 001 023
0030720 \t \0 \0 002 ` \0 \0 A \n \0 \0 277 o \0 \0 \0
0030740 A \n \0 \0 @ 021 201 \b H 003 265 \r 023 o \0 \0
0030760 \0 A \n \0 \0 @ 020 001 Y \t \0 \0 Z 242 261 \0
0031000 337 A \t \0 \0 277 o \0 \0 \0 A \n \0 \0 277 `
0031020 \0 \0 A \n \0 \0 277 I A \n \0 \0 277 k A \n
0031040 \0 \0 277 ` \0 \0 A \n \0 \0 277 I J g \0 \0
0031060 \n \0 \0 360 251 J g \0 \0 \n \0 \0 h 032 200 h
0031100 J g \0 \0 \n \0 \0 J g \0 \0 \n \0 \0 h 032
0031120 032 J 004 ` \0 \0 360 251 J o \0 \0 \0 \n \0 \0
0031140 260 [ g \0 \0 J 311 006 275 274 j 273 L M 001 360
0031160 221 K 205 M 002 ] 263 035 h _ 020 262 035 J 311 \b
0031200 265 \t J \t \0 \0 277 260 366 311 \0 O 020 340 320 311
0031220 \0 260 * K k 330 260 325 g \0 \0 J 006 \0 \0 311
0031240 \n \n \0 \0 265 ? J _ 016 g \0 \0 \n \0 \0 276
0031260 O 016 g \0 \0 h l 003 N 017 016 002 \n \0 \0 \n
0031300 \0 \0 A \t \0 \0 i d h A \r 006 \0 \0 277 o
0031320 \0 \0 \0 A \n \0 \0 277 A \t \0 \0 277 H 002 X
0031340 261 377 \t 002 260 327 \0 ( 4 0 7 Q T E R
0031360 P R I 4 0 2 Q P R I N 1 3
0031400 7 1 Q P R I N T D E F 3 6 1
0031420 Q P O S I T I O N 3 5 5 Q
0031440 \ N C O N C 2 3 5 2 Q \ N C
0031460 O N C 2 3 3 2 Q F e t c h M
0031500 e t h o d O r H e l p 3 1 7 Q
0031520 A S S O C 2 6 1 Q R e a d
0031540 L e a f O b j 2 1 3 Q E R R
0031560 O R 1 7 1 Q G e t V a l u e
0031600 1 6 2 Q G e t V a l u e 1
0031620 4 7 Q G e t V a l u e 1 3 6
0031640 Q G e t V a l u e 1 2 5 Q
0031660 C H A N G E F O N T 1 1 5 Q
0031700 S P A C E S 1 0 7 Q P R I N
0031720 1 1 0 1 Q C H A N G E F O N
0031740 T 7 1 Q P R I N 1 6 0 Q
0031760 T E R P R I 4 7 Q G e t O b
0032000 j e c t R e c 4 0 Q P R I N
0032020 1 1 7 Q P R I N 1 6 C H
0032040 A N G E F O N T ) \r ( 3 4 0 Q
0032060 m e t h o d 3 2 7 Q I V M i
0032100 s s i n g 3 1 2 Q i n s t a
0032120 n c e 3 0 6 Q m e t h o d
0032140 2 2 0 Q m e t h o d 2 0 1 Q
0032160 004 003 i n s t a n c e T Y P E #
0032200 1 6 6 Q d o c 1 5 7 Q a
0032220 r g s 1 4 4 Q m e t h o d
0032240 1 3 3 Q m e t h o d 1 2 1 Q
0032260 D E F A U L T F O N T 7 5 Q
0032300 L A M B D A F O N T 2 D E
0032320 F A U L T F O N T ) \r ( 3 7 6 Q
0032340 " ) " 2 1 0 Q " n o t i
0032360 n s t a n c e f o r F e t c
0032400 h I V D e s c r " 6 5 Q " (
0032420 " 3 4 Q " ] \r \r " 1 3 Q
0032440 " [ D e f M e t h s " ) \r P u
0032460 t M e t h o d N t h D 1 \r ( P
0032500 0 m e t h s I 2 f n
0032520 I 1 n I 0 c l a s s )
0032540 \0 * 001 \0 \0 003 @ 006 \0 \0 311 032 021 001 \0
0032560 H 265 \v @ o \0 \0 \0 \n \0 \0 020 003 231 H A
0032600 k 330 \n \0 \0 B 030 020 H A 320 B 024 \0 B 020
0032620 \0 ( 3 5 Q F N T H 2 3 Q E
0032640 R R O R ) \r ( 3 c l a s s ) \r
0032660 ( 2 0 Q " n o m e t h o d s
0032700 i n c l a s s " ) \r _ D 1
0032720 \r ( I 0 o b j e c t % s e
0032740 l e c t o r % . . a r g s )
0032760 \0 i 005 \0 003 001 @ 001 021 021 001 H d 004 l 004
0033000 360 262 # d - g \0 \0 360 262 033 277 H @ \n \0
0033020 \0 \t \0 \0 265 023 o \0 \0 \0 H \n \0 \0 277 H
0033040 \t \0 \0 202 \t \0 \0 Y 265 \f H o \0 \0 \0 \n
0033060 \0 \0 277 I @ 002 001 \n \0 \0 I 021 0 004 @ 002
0033100 260 023 d 001 \t \0 \0 272 K 265 \a J h 032 \ 201
0033120 J & 273 002 003 265 355 L 022 032 \n \0 \0 020 \0 (
0033140 1 4 6 Q A P P L Y 1 2 0 Q
0033160 E V A L 1 0 3 Q F e t c h M
0033200 e t h o d O r H e l p 7 3 Q
0033220 E R R O R 6 0 Q E V A L 5
0033240 4 Q G e t O b j e c t R e c
0033260 4 7 Q W R I T E 3 5 Q E V
0033300 A L 3 2 Q F i x @ $ ) \r ( 2
0033320 1 Q N O B I N D ) \r ( 7 0 Q
0033340 " i s N I L . " 4 3 Q "
0033360 U s i n g $ " ) \r _ ! D 1 \r
0033400 ( P 2 c l a s s F o r M e t
0033420 h o d P 1 o b j e c t ^
0033440 P 0 o b j F o r m I 0
0033460 o b j e c t % s e l e c t o r
0033500 % . . a r g s ) \0 e 006 \0 003 001
0033520 @ 001 021 021 001 H d 004 l 004 360 262 032 - Y d
0033540 g \0 \0 360 262 025 277 o \0 \0 \0 H \n \0 \0 277
0033560 H \t \0 \0 202 \t \0 \0 Y 250 H o \0 \0 \0 \n
0033600 \0 \0 277 021 020 002 I @ 002 001 \t \0 \0 \n \0 \0
0033620 I 021 0 005 @ 002 260 023 d 001 \t \0 \0 273 L 265
0033640 \a K h 032 ] 201 K & 274 002 003 265 355 M 022 032
0033660 \n \0 \0 020 \0 ( 1 4 2 Q A P P L Y
0033700 1 1 4 Q E V A L 7 7 Q F
0033720 e t c h M e t h o d O r H e l p
0033740 7 4 Q E V A L 6 1 Q E R
0033760 R O R 4 7 Q E V A L 4 3 Q
0034000 G e t O b j e c t R e c 3 6
0034020 Q W R I T E ) \r ( 2 2 Q N O
0034040 B I N D ) \r ( 5 6 Q " i s
0034060 N I L . " 3 2 Q " U s i n g
0034100 $ " ) \r _ S u p e r D 1 \r (
0034120 I 0 F O R M @ ) \0 G 004 \0 003
0034140 001 m 377 g \0 \0 \n \0 \0 @ 001 \t \0 \0 @ 002
0034160 001 021 0 002 @ 002 260 023 d 001 \t \0 \0 270 I 265
0034200 \a H h 032 Z 201 H & 271 002 003 265 355 J 022 021
0034220 004 003 I J H \t \0 \0 H \t \0 \0 277 \v \0 \0
0034240 I K 032 \n \0 \0 020 \0 ( 1 0 4 Q A P
0034260 P L Y 7 6 Q G e t S u p e r
0034300 M e t h o d 7 2 Q R E L S T
0034320 K 6 6 Q S T K N A M E 3 3
0034340 Q E V A L 1 4 Q E V A L
0034360 7 R E A L S T K N T H ) \r ( 4
0034400 _ S u p e r ) \r N I L \r _ _
0034420 D 1 \r ( P 2 o b j P 1
0034440 c l a s s F o r M e t h o d P
0034460 0 o b j F o r m I 0 S
0034500 E N D % F O R M ) \0 E 006 \0 003
0034520 001 @ 001 021 ! 002 H d 004 l 004 360 235 - Z d
0034540 g \0 \0 360 231 277 H \t \0 \0 202 \t \0 \0 Z @
0034560 002 001 \n \0 \0 J 021 0 005 @ 002 215 d 001 273 L
0034600 265 \a K h 032 ] 201 K & 274 002 003 265 360 M 022
0034620 032 \n \0 \0 020 \0 ( 1 0 2 Q A P P L
0034640 Y 4 3 Q F e t c h M e t h o
0034660 d O r H e l p 3 4 Q E V A L
0034700 3 0 Q G e t O b j e c t R e
0034720 c ) \r ( 2 1 Q N O B I N D ) \r
0034740 N I L \r D C M D 1 \r ( P 0
0034760 a r g L i s t I 1 s e l e
0035000 c t o r I 0 c l a s s N a
0035020 m e ) \0 K 001 \0 \0 002 @ \t \0 \0 265 \n
0035040 @ o \0 \0 \0 \n \0 \0 A \n \0 \0 \t \0 \0 021
0035060 001 \0 @ A H d 002 g \0 \0 g \0 \0 g \0 \0
0035100 g \0 \0 g \0 \0 A h 032 032 032 032 032 g \0 \0
0035120 g \0 \0 A g \0 \0 032 032 032 h 032 032 \v \0 \0
0035140 \f \0 \0 020 \0 ( 1 1 0 Q D M 1 0
0035160 5 Q S U B S T 2 4 Q A R G
0035200 L I S T 2 1 Q G e t M e t h
0035220 o d 1 5 Q E R R O R 3 G
0035240 e t C l a s s R e c ) \r ( 7 4 Q
0035260 a r g L 7 0 Q s e l f 6
0035300 5 Q _ S u p e r F r i n g e
0035320 5 3 Q f o r 5 0 Q m e t h
0035340 o d 4 5 Q C o m b i n e d
0035360 4 2 Q * 3 7 Q a r g L ) \r
0035400 ( 1 2 Q " n o t a d e f i
0035420 n e d c l a s s " ) \r ( P R E
0035440 T T Y C O M P R I N T L O O P
0035460 S M E T H O D S C O M S ) \r ( R
0035500 P A Q Q L O O P S M E T H O D
0035520 S C O M S ( ( * C o p y r i
0035540 g h t ( c ) 1 9 8 3 b y
0035560 X e r o x C o r p o r a t i o
0035600 n ) ( M A C R O S * M E T
0035620 H O D M A C R O S ) ( M A C R
0035640 O S * \r O T H E R L O O P S
0035660 M A C R O S ) ( F N S * M
0035700 E T H O D S F N S ) ( G L O B
0035720 A L V A R S U s e M e t h o d
0035740 C a c h e F l g C l a s s B l
0035760 o c k S e l e c t o r B l o c
0036000 k \r M e t h o d B l o c k )
0036020 ( V A R S ( L o o p s D e b u
0036040 g F l g T ) ( U s e M e t h
0036060 o d C a c h e F l g T ) ( C
0036100 l a s s B l o c k ( N C R E A
0036120 T E ( Q U O T E V M E M P A
0036140 G E P ) ) ) ( \r S e l e c t o
0036160 r B l o c k ( N C R E A T E
0036200 ( Q U O T E V M E M P A G E P
0036220 ) ) ) ( M e t h o d B l o c k
0036240 ( N C R E A T E ( Q U O T E
0036260 V M E M P A G E P ) ) ) ) (
0036300 P ( M O V D ( Q U O T E \r
0036320 _ ) ( Q U O T E S E N D ) )
0036340 ) ( P ( A D D T O V A R N
0036360 L A M A _ _ _ S u p e r _
0036400 ! _ _ S u p e r F r i n g e
0036420 D o M e t h o d D o F r i n
0036440 g e M e t h o d s ) ) ( D E C
0036460 L A R E : \r D O N T E V A L @
0036500 L O A D D O E V A L @ C O M P
0036520 I L E D O N T C O P Y C O M
0036540 P I L E R V A R S ( A D D V A
0036560 R S ( N L A M A _ _ _ S u
0036600 p e r _ ! _ _ S u p e r F
0036620 r i n g e M E T H \r D o M e
0036640 t h o d D o F r i n g e M e t
0036660 h o d s ) ( N L A M L ) ( L
0036700 A M A ) ) ) ) ) \r ( R P A Q Q
0036720 M E T H O D M A C R O S ( A V
0036740 A p p l y * D O A P P L Y *
0036760 D o M e t h o d F e t c h M e
0037000 t h o d F i n d S e l e c t o
0037020 r I n d e x M a p S u p e r s
0037040 F o r m ? S E N D \r S E N D
0037060 S U P E R _ _ ! _ I V _
0037100 N e w _ P r o t o _ S u p e
0037120 r _ T r y ) ) \r ( P U T P R O
0037140 P S A V A p p l y * M A C R
0037160 O ( ( F R S T . R E S T )
0037200 ( C O N D ( ( L I S T P F
0037220 R S T ) ( E V A L F R S T )
0037240 ) ( T ( D O A P P L Y * F
0037260 R S T . R E S T ) ) ) ) ) \r
0037300 ( P U T P R O P S D O A P P L
0037320 Y * M A C R O ( a r g ( C
0037340 O N S ( Q U O T E A P P L Y
0037360 * ) a r g ) ) ) \r ( P U T P R
0037400 O P S D o M e t h o d M A C
0037420 R O ( ( o b j a c t i o n
0037440 c l a s s . a r g s ) ( P
0037460 R O G ( ( o b j % o b j )
0037500 ) ( R E T U R N ( D O A P P
0037520 L Y * ( O R ( \r F e t c h M
0037540 e t h o d ( O R c l a s s
0037560 ( f e t c h C L A S S o f
0037600 o b j % ) ) a c t i o n )
0037620 ( E R R O R a c t i o n " n
0037640 o t f o u n d f o r D o M
0037660 e t h o d " ) ) o b j % \r
0037700 . a r g s ) ) ) ) ) \r ( P U T
0037720 P R O P S F e t c h M e t h o
0037740 d M A C R O ( O P E N L A M
0037760 B D A ( c l a s s R e c s e
0040000 l e c t o r ) ( * d g b :
0040020 " 9 - J U N - 8 3 2 2 : 2 7
0040040 " ) ( * R e t u r n s t h
0040060 e \r f u n c t i o n f o r
0040100 s e l e c t o r o r N I L )
0040120 ( P R O G ( p o s m e t h
0040140 i n d e x s u p e r s ( c
0040160 l a s s c l a s s R e c ) )
0040200 ( O R ( t y p e ? c l a s s
0040220 c l a s s R e c \r ) ( R E T
0040240 U R N ) ) ( O R U s e M e t
0040260 h o d C a c h e F l g ( G O
0040300 O N ) ) ( S E T Q p o s (
0040320 L O G A N D 2 5 4 ( L O G X
0040340 O R ( \ L O L O C c l a s s
0040360 R e c ) ( \ L O L O C \r s e
0040400 l e c t o r ) ) ) ) ( * p o
0040420 s i s a n e v e n p o s
0040440 t i o n o n t h e p a g e
0040460 , c o m p u t e d f r o m
0040500 t h e x o r o f t h e s
0040520 e l e c t o r a n d t h e
0040540 \r c l a s s R e c a d d r e s
0040560 s e s ) ( C O N D ( ( A N D
0040600 ( E Q c l a s s R e c ( \
0040620 G E T B A S E P T R C l a s s
0040640 B l o c k p o s ) ) ( E Q
0040660 s e l e c t o r ( \ G E T B A
0040700 S E P T R \r S e l e c t o r B
0040720 l o c k p o s ) ) ) ( R E T
0040740 U R N ( \ G E T B A S E P T R
0040760 M e t h o d B l o c k p o s
0041000 ) ) ) ) O N ( S E T Q s u
0041020 p e r s ( f e t c h s u p e
0041040 r s o f \r c l a s s R e c )
0041060 ) L P ( C O N D ( ( S E T
0041100 Q i n d e x ( F i n d S e l
0041120 e c t o r I n d e x c l a s s
0041140 s e l e c t o r ) ) ( G O
0041160 O U T ) ) ( ( S E T Q c l a
0041200 s s ( p o p \r s u p e r s )
0041220 ) ( G O L P ) ) ( T ( R
0041240 E T U R N N I L ) ) ) O U T
0041260 ( S E T Q m e t h ( G e t
0041300 N t h M e t h o d c l a s s
0041320 i n d e x ) ) ( C O N D ( \r
0041340 U s e M e t h o d C a c h e F l
0041360 g ( \ P U T B A S E P T R C
0041400 l a s s B l o c k p o s c l
0041420 a s s R e c ) ( \ P U T B A S
0041440 E P T R S e l e c t o r B l o
0041460 c k p o s s e l e c t o r )
0041500 ( \r \ P U T B A S E P T R M
0041520 e t h o d B l o c k p o s m
0041540 e t h ) ) ) ( R E T U R N m
0041560 e t h ) ) ) ) \r ( P U T P R O P
0041600 S F i n d S e l e c t o r I n
0041620 d e x M A C R O ( O P E N L
0041640 A M B D A ( c l a s s s e l
0041660 e c t o r ) ( P R O G N I L
0041700 ( * P r o g i s o n l y
0041720 s o o n e c a n \r b o m
0041740 b o u t i n c a s e o f
0041760 N I L s e l e c t o r s o
0042000 f c l a s s ) ( R E T U R N
0042020 ( \ F i n d E n t r y I n d e
0042040 x s e l e c t o r ( O R (
0042060 f e t c h s e l e c t o r s
0042100 o f \r c l a s s ) ( R E T U
0042120 R N ) ) ) ) ) ) ) \r ( P U T P R
0042140 O P S M a p S u p e r s F o r
0042160 m ? M A C R O ( ( m a p p i
0042200 n g F o r m c l a s s R e c
0042220 . p r o g A r g s ) ( * d
0042240 g b : " 1 2 - J A N - 8 2 1
0042260 4 : 5 5 " ) ( * M a p s \r
0042300 t h r o u g h a c l a s s
0042320 a n d i t s s u p e r s i
0042340 n o r d e r . R e t u r n s
0042360 i f f o r m h a s r e t
0042400 u r n s t a t e m e n t , o
0042420 r N I L w h e n f i n i s
0042440 h e d % . \r f o r m c a n
0042460 u s e c l a s s a s f r
0042500 e e v a r i a b l e ) ( P R
0042520 O G ( s u p e r s ( c l a s
0042540 s c l a s s R e c ) . p r
0042560 o g A r g s ) ( C O N D ( (
0042600 N U L L c l a s s ) ( \r R E
0042620 T U R N N I L ) ) ) ( S E T
0042640 Q s u p e r s ( S u p e r s
0042660 c l a s s ) ) L P m a p p
0042700 i n g F o r m ( * t h i s
0042720 i s w h e r e t h e s u b
0042740 s t i t u t i o n g o e s )
0042760 O N ( \r C O N D ( ( S E T Q
0043000 c l a s s ( p o p s u p e
0043020 r s ) ) ( * I f t h e r e
0043040 i s a S u p e r , i t e
0043060 r a t e a r o u n d t h e
0043100 L o o p ) ( G O L P ) ) )
0043120 ( * R e t u r n s \r N o t S
0043140 e t V a l u e i f n o t f
0043160 o u n d ) ( R E T U R N N o
0043200 t S e t V a l u e ) ) ) ) \r ( P
0043220 U T P R O P S S E N D M A C
0043240 R O ( ( o b j a c t i o n
0043260 . a r g s ) ( _ o b j a
0043300 c t i o n . a r g s ) ) ) \r
0043320 ( P U T P R O P S S E N D S U
0043340 P E R M A C R O ( ( o b j
0043360 a c t i o n . a r g s ) (
0043400 _ S u p e r o b j a c t i o
0043420 n . a r g s ) ) ) \r ( P U T
0043440 P R O P S _ M A C R O ( m
0043460 e s s F o r m ( R E S E T V A
0043500 R N O S P E L L F L G T (
0043520 D W I M I F Y ( B Q U O T E
0043540 ( P R O G ( ( o b j e c t F o
0043560 r _ M a c r o , ( C A R \r
0043600 m e s s F o r m ) ) ) ( D E C
0043620 L A R E ( L O C A L V A R S
0043640 o b j e c t F o r _ M a c r o )
0043660 ) ( R E T U R N ( A P P L Y
0043700 * ( F e t c h M e t h o d O r
0043720 H e l p o b j e c t F o r _ M
0043740 a c r o ( \r Q U O T E , (
0043760 C A D R m e s s F o r m ) ) )
0044000 o b j e c t F o r _ M a c r o
0044020 , . ( C D D R m e s s F o
0044040 r m ) ) ) ) ) T ) ) ) ) \r ( P
0044060 U T P R O P S _ ! M A C R O
0044100 ( ( o b j a c t i o n .
0044120 a r g s ) ( P R O G ( ( o B
0044140 j o b j ) ) ( R E T U R N
0044160 ( P R O G ( c l a s s F o r M
0044200 e t h o d ) ( R E T U R N (
0044220 \r D O A P P L Y * ( F e t c h
0044240 M e t h o d O r H e l p o B j
0044260 a c t i o n ) o B j . a
0044300 r g s ) ) ) ) ) ) ) \r ( P U T P
0044320 R O P S _ I V M A C R O (
0044340 m e s s F o r m ( D W I M I F
0044360 Y ( B Q U O T E ( P R O G
0044400 ( ( o B j , ( C A R m e s
0044420 s F o r m ) ) ) ( D E C L A R
0044440 E ( L O C A L V A R S o B j
0044460 ) \r ) ( R E T U R N ( A P P
0044500 L Y * ( I V F u n c t i o n
0044520 o B j ( Q U O T E , ( C A
0044540 D R m e s s F o r m ) ) ) o
0044560 B j , . ( C D D R m e s s
0044600 F o r m ) ) ) ) ) T ) ) ) \r (
0044620 P U T P R O P S _ N e w M A
0044640 C R O ( f o r m ( C O N D
0044660 ( ( N U L L ( C D R f o r m
0044700 ) ) ( L I S T ( Q U O T E
0044720 _ ) ( C A R f o r m ) ( Q
0044740 U O T E N e w ) ) ) ( T (
0044760 \r S U B P A I R ( Q U O T E
0045000 ( o b j a c t i o n . a r
0045020 g s ) ) f o r m ( Q U O T E
0045040 ( P R O G ( c l a s s F o r
0045060 M e t h o d ( o b j % ( _
0045100 o b j N e w ) ) ) ( D O A
0045120 P P L Y * ( \r F e t c h M e t
0045140 h o d O r H e l p o b j %
0045160 ( Q U O T E a c t i o n ) )
0045200 o b j % . a r g s ) ( R
0045220 E T U R N o b j % ) ) ) ) )
0045240 ) ) ) \r ( P U T P R O P S _ P
0045260 r o t o M A C R O ( ( o b j
0045300 . a r g s ) ( _ ( _ o
0045320 b j P r o t o t y p e ) .
0045340 a r g s ) ) ) \r ( P U T P R O P
0045360 S _ S u p e r M A C R O (
0045400 ( o b j a c t i o n . a r
0045420 g s ) ( P R O G ( ( o b j %
0045440 o b j ) ) ( D E C L A R E
0045460 ( L O C A L V A R S . T )
0045500 ) ( R E T U R N ( \r D O A P
0045520 P L Y * ( G e t S u p e r M e
0045540 t h o d o b j % ( Q U O T
0045560 E a c t i o n ) ) o b j %
0045600 . a r g s ) ) ) ) ) \r ( P U
0045620 T P R O P S _ T r y M A C R
0045640 O ( ( o b j a c t i o n .
0045660 a r g s ) ( P R O G ( ( o
0045700 b j % o b j ) ) ( R E T U
0045720 R N ( D O A P P L Y * ( O R
0045740 ( F e t c h M e t h o d o b
0045760 j % \r ( Q U O T E a c t i
0046000 o n ) ) ( R E T U R N ( Q U
0046020 O T E N o t S e n t ) ) ) o
0046040 b j % . a r g s ) ) ) ) )
0046060 \r ( R P A Q Q O T H E R L O O
0046100 P S M A C R O S ( E x t r a c
0046120 t O b j M a p S u p e r s F o
0046140 r m M a p S u p e r s U n l e
0046160 s s B a d L i s t M e n u G e
0046200 t O r C r e a t e \r N e x t S
0046220 u p e r C l a s s ) ) \r ( P U T
0046240 P R O P S E x t r a c t O b j
0046260 M A C R O ( ( d a t u m )
0046300 ( O R ( C A R ( L I S T P
0046320 d a t u m ) ) d a t u m ) ) )
0046340 \r ( P U T P R O P S M a p S u
0046360 p e r s F o r m M A C R O (
0046400 ( m a p p i n g F o r m c l a
0046420 s s R e c . p r o g A r g s
0046440 ) ( * d g b : " 1 2 - J A
0046460 N - 8 2 1 4 : 5 5 " ) ( *
0046500 M a p s \r t h r o u g h a
0046520 c l a s s a n d i t s s u
0046540 p e r s i n o r d e r . R
0046560 e t u r n s i f f o r m h
0046600 a s r e t u r n s t a t e m
0046620 e n t , o r N I L w h e n
0046640 f i n i s h e d % . \r f o
0046660 r m c a n u s e c l a s s
0046700 a s f r e e v a r i a b l
0046720 e ) ( P R O G ( s u p e r s
0046740 ( c l a s s c l a s s R e c
0046760 ) . p r o g A r g s ) ( C
0047000 O N D ( ( N U L L c l a s s
0047020 ) ( \r R E T U R N N I L ) )
0047040 ) ( S E T Q s u p e r s (
0047060 S u p e r s c l a s s ) ) L
0047100 P m a p p i n g F o r m ( *
0047120 t h i s i s w h e r e t
0047140 h e s u b s t i t u t i o n
0047160 g o e s ) O N ( \r C O N D
0047200 ( ( S E T Q c l a s s ( p o
0047220 p s u p e r s ) ) ( * I f
0047240 t h e r e i s a S u p e
0047260 r , i t e r a t e a r o u n
0047300 d t h e L o o p ) ( G O
0047320 L P ) ) ) ( * R e t u r n s
0047340 \r N I L i f n o t f o u
0047360 n d ) ( R E T U R N N I L )
0047400 ) ) ) \r ( P U T P R O P S M a
0047420 p S u p e r s U n l e s s B a d
0047440 L i s t M A C R O ( ( b a d
0047460 L i s t m a p p i n g F o r m
0047500 c l a s s R e c . p r o g
0047520 A r g s ) ( * d g b : \r "
0047540 1 2 - J A N - 8 2 1 4 : 5 5 "
0047560 ) ( * M a p s t h r o u g
0047600 h a c l a s s a n d i t
0047620 s s u p e r s i n o r d e
0047640 r . R e t u r n s i f f o
0047660 r m h a s r e t u r n \r s
0047700 t a t e m e n t , o r N I L
0047720 w h e n f i n i s h e d %
0047740 . f o r m c a n u s e c
0047760 l a s s a s f r e e v a r
0050000 i a b l e ) ( P R O G ( s u
0050020 p e r s ( c l a s s c l a s
0050040 s R e c ) \r . p r o g A r g
0050060 s ) ( C O N D ( ( N U L L
0050100 c l a s s ) ( R E T U R N N
0050120 I L ) ) ) ( S E T Q s u p e
0050140 r s ( S u p e r s c l a s s
0050160 ) ) L P ( * S k i p i f
0050200 s u p e r i s o n \r b a
0050220 d L i s t . ) ( O R ( F M E
0050240 M B ( C l a s s N a m e c l
0050260 a s s ) b a d L i s t ) m a
0050300 p p i n g F o r m ) ( * t h
0050320 i s i s w h e r e t h e
0050340 s u b s t i t u t i o n g o e
0050360 s ) \r O N ( C O N D ( ( S
0050400 E T Q c l a s s ( p o p s
0050420 u p e r s ) ) ( G O L P ) )
0050440 ) ( * R e t u r n s N I L
0050460 i f n o t f o u n d ) (
0050500 R E T U R N N I L ) ) ) ) \r (
0050520 P U T P R O P S M e n u G e t
0050540 O r C r e a t e M A C R O (
0050560 ( n a m e i t e m s ) ( C O
0050600 N D ( ( t y p e ? M E N U
0050620 ( G E T T O P V A L ( Q U O T
0050640 E n a m e ) ) ) n a m e )
0050660 ( T ( \r S E T T O P V A L (
0050700 Q U O T E n a m e ) ( c r e
0050720 a t e M E N U C H A N G E O
0050740 F F S E T F L G _ T I T E
0050760 M S _ i t e m s ) ) ) ) ) )
0051000 \r ( P U T P R O P S N e x t S
0051020 u p e r C l a s s M A C R O
0051040 ( N I L ( C O N D ( ( S E T
0051060 Q c l a s s ( p o p s u p
0051100 e r s ) ) ( * * T h i s
0051120 c o d e a s s u m e s t h a
0051140 t L P i s \r a d e f i n
0051160 e d P R O G l a b e l a n
0051200 d s u p e r s a n d c l a
0051220 s s a r e b o u n d ) ( *
0051240 I f t h e r e i s a S
0051260 u p e r , i t e r a t e a r
0051300 o u n d t h e L o o p ) \r
0051320 ( G O L P ) ) ) ) ) \r ( R P A
0051340 Q Q M E T H O D S F N S ( A
0051360 d d M e t h o d A p p l y M e
0051400 t h o d A p p l y M e t h o d
0051420 I n T t y P r o c e s s D e f
0051440 M e t h O b j D e f i n e M e
0051460 t h o d D e l e t e M e t h o
0051500 d \r D o F r i n g e M e t h o
0051520 d s D o M e t h o d I V F u
0051540 n c t i o n I n s t a l l M e
0051560 t h o d L o o p s H e l p M
0051600 E T H M e t h N a m e M o v
0051620 e M e t h o d R e n a m e M e
0051640 t h o d \r _ S u p e r F r i n
0051660 g e F i n d L o c a l M e t h
0051700 o d F i n d S e l e c t o r I
0051720 n d e x F i x @ $ F l u s h
0051740 M e t h o d C a c h e F u l l
0051760 I n s t a l l M e t h o d F e
0052000 t c h M e t h o d \r F e t c h
0052020 M e t h o d O r H e l p G e t
0052040 C a l l e r C l a s s G e t N
0052060 t h M e t h o d G e t S u p e
0052100 r M e t h o d P r i n t M e t
0052120 h s P u t M e t h o d N t h
0052140 _ _ ! _ S u p e r _ _ \r
0052160 D C M ) ) \r ( R P A Q Q L o o
0052200 p s D e b u g F l g T ) \r ( R
0052220 P A Q Q U s e M e t h o d C a
0052240 c h e F l g T ) \r ( R P A Q
0052260 C l a s s B l o c k ( N C R E
0052300 A T E ( Q U O T E V M E M P
0052320 A G E P ) ) ) \r ( R P A Q S e
0052340 l e c t o r B l o c k ( N C R
0052360 E A T E ( Q U O T E V M E M
0052400 P A G E P ) ) ) \r ( R P A Q M
0052420 e t h o d B l o c k ( N C R E
0052440 A T E ( Q U O T E V M E M P
0052460 A G E P ) ) ) \r ( M O V D ( Q
0052500 U O T E _ ) ( Q U O T E S
0052520 E N D ) ) \r ( A D D T O V A R
0052540 N L A M A _ _ _ S u p e r
0052560 _ ! _ _ S u p e r F r i n g
0052600 e D o M e t h o d D o F r i
0052620 n g e M e t h o d s ) \r N I L \r
0052640