equal
deleted
inserted
replaced
147 |
147 |
148 ^ String new:size |
148 ^ String new:size |
149 ! ! |
149 ! ! |
150 |
150 |
151 |
151 |
|
152 |
|
153 |
152 !Symbol class methodsFor:'queries'! |
154 !Symbol class methodsFor:'queries'! |
153 |
155 |
154 findInterned:aString |
156 findInterned:aString |
155 "for ST-80 compatibility - if the argument, aString is known |
157 "for ST-80 compatibility - if the argument, aString is known |
156 as Symbol, return this symbol. Otherwise return nil." |
158 as Symbol, return this symbol. Otherwise return nil." |
239 (#theFooMessage << #myMessages) |
241 (#theFooMessage << #myMessages) |
240 (#theFooMessage << #myMessages >> 'cannot read subclass of metaclass') |
242 (#theFooMessage << #myMessages >> 'cannot read subclass of metaclass') |
241 (#theFooMessage >> 'cannot read subclass of metaclass') |
243 (#theFooMessage >> 'cannot read subclass of metaclass') |
242 " |
244 " |
243 ! ! |
245 ! ! |
|
246 |
244 |
247 |
245 !Symbol methodsFor:'accessing'! |
248 !Symbol methodsFor:'accessing'! |
246 |
249 |
247 basicAt:index put:something |
250 basicAt:index put:something |
248 "report an error if an interned symbol is about to be changed |
251 "report an error if an interned symbol is about to be changed |
588 |
591 |
589 asSymbolIfInterned |
592 asSymbolIfInterned |
590 "If a symbol with the receiver's characters is already known, return it. Otherwise, return nil. |
593 "If a symbol with the receiver's characters is already known, return it. Otherwise, return nil. |
591 Since I am a symbol - just return myself" |
594 Since I am a symbol - just return myself" |
592 |
595 |
|
596 ^ self |
|
597 ! |
|
598 |
|
599 asSymbolIfInternedOrSelf |
593 ^ self |
600 ^ self |
594 ! ! |
601 ! ! |
595 |
602 |
596 !Symbol methodsFor:'copying'! |
603 !Symbol methodsFor:'copying'! |
597 |
604 |
930 ! |
937 ! |
931 |
938 |
932 version_SVN |
939 version_SVN |
933 ^ '$ Id: Symbol.st 10648 2011-06-23 15:55:10Z vranyj1 $' |
940 ^ '$ Id: Symbol.st 10648 2011-06-23 15:55:10Z vranyj1 $' |
934 ! ! |
941 ! ! |
|
942 |