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