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