equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1988 by Claus Gittinger |
4 COPYRIGHT (c) 1988 by Claus Gittinger |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
1451 |
1453 |
1452 ^ self theNonMetaclass |
1454 ^ self theNonMetaclass |
1453 |
1455 |
1454 ! ! |
1456 ! ! |
1455 |
1457 |
1456 |
|
1457 !Behavior methodsFor:'RefactoringBrowser'! |
1458 !Behavior methodsFor:'RefactoringBrowser'! |
1458 |
1459 |
1459 realClass |
1460 realClass |
1460 "for compatibility with RBAbstractClass" |
1461 "for compatibility with RBAbstractClass" |
1461 |
1462 |
4323 SmallInteger hasInstances |
4324 SmallInteger hasInstances |
4324 " |
4325 " |
4325 ! |
4326 ! |
4326 |
4327 |
4327 hasSharedInstances |
4328 hasSharedInstances |
4328 "return true if this class has shared instances, that is, instances |
4329 "return true if this class can share instances when stored binary, |
4329 with the same value are identical. |
4330 that is, instances with the same value can be stored by reference. |
4330 False is returned here, only redefined in classes which have unified |
4331 False is returned here, only redefined in classes which have unified |
4331 instances (or should be treated so)." |
4332 instances (or should be treated so)." |
4332 |
4333 |
4333 ^ false |
4334 ^ false |
4334 ! |
4335 ! |