equal
deleted
inserted
replaced
751 ^ myClass comment |
751 ^ myClass comment |
752 |
752 |
753 "Created: 2.4.1997 / 00:51:35 / stefan" |
753 "Created: 2.4.1997 / 00:51:35 / stefan" |
754 ! |
754 ! |
755 |
755 |
|
756 environment |
|
757 "return the namespace I am contained in; ST-80 compatible name" |
|
758 |
|
759 myClass isNil ifTrue:[^ nil]. |
|
760 ^ myClass environment |
|
761 |
|
762 "Created: / 12-01-2018 / 14:04:01 / stefan" |
|
763 ! |
|
764 |
756 getPackage |
765 getPackage |
757 "return my package-id" |
766 "return my package-id" |
758 |
767 |
759 ^ myClass getPackage |
768 ^ myClass getPackage |
760 |
769 |