695 "/ ^ self renameTo:newName |
695 "/ ^ self renameTo:newName |
696 |
696 |
697 "Created: / 18.6.1998 / 22:08:45 / cg" |
697 "Created: / 18.6.1998 / 22:08:45 / cg" |
698 ! ! |
698 ! ! |
699 |
699 |
|
700 !Class methodsFor:'Compatibility-Squeak'! |
|
701 |
|
702 classVarNamed: aSymbol put: anObject |
|
703 "Set the value of class variable named `aSymbol` to `anObject`. |
|
704 |
|
705 Warning: This method is here for Squeak/Pharo compatibility. |
|
706 Do not use it in Smalltalk/X code" |
|
707 |
|
708 self classVarAt: aSymbol put: anObject |
|
709 |
|
710 "Created: / 25-07-2015 / 07:25:19 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
711 "Modified (format): / 27-07-2015 / 09:59:04 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
712 ! |
|
713 |
|
714 classVariableNamed: aSymbol |
|
715 "Returns the value of class variable named `aSymbol`. |
|
716 |
|
717 Warning: This method is here for Squeak/Pharo compatibility. |
|
718 Do not use it in Smalltalk/X code" |
|
719 |
|
720 ^ self classVarAt: aSymbol |
|
721 |
|
722 "Created: / 27-07-2015 / 09:44:07 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
723 ! |
|
724 |
|
725 classVariables |
|
726 "Return an array of class variable names. |
|
727 |
|
728 Warning: This method is here for Squeak/Pharo compatibility. |
|
729 Do not use it in Smalltalk/X code" |
|
730 |
|
731 ^ self classVarNames |
|
732 |
|
733 "Created: / 27-07-2015 / 09:36:01 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
734 ! |
|
735 |
|
736 instanceVariables |
|
737 "Return an array of instance variable names. |
|
738 |
|
739 Warning: This method is here for Squeak/Pharo compatibility. |
|
740 Do not use it in Smalltalk/X code" |
|
741 |
|
742 ^ self instVarNames |
|
743 |
|
744 "Created: / 27-07-2015 / 09:35:29 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
745 ! ! |
700 |
746 |
701 !Class methodsFor:'accessing'! |
747 !Class methodsFor:'accessing'! |
702 |
748 |
703 addClassVarName:aString |
749 addClassVarName:aString |
704 "add a class variable if not already there and initialize it with nil. |
750 "add a class variable if not already there and initialize it with nil. |