Metaclass.st
changeset 23298 b31d956df2bb
parent 23297 3190f7027522
child 24063 6193bcaef956
--- a/Metaclass.st	Sun Aug 26 19:20:32 2018 +0200
+++ b/Metaclass.st	Sun Aug 26 19:20:51 2018 +0200
@@ -131,6 +131,15 @@
     "Created: / 1.11.1997 / 13:16:45 / cg"
 ! !
 
+!Metaclass methodsFor:'Compatibility-Squeak'!
+
+instanceVariableString:aString
+    "for compatibility"
+
+    self instanceVariableNames:aString
+
+    "Created: / 26-08-2018 / 16:29:13 / Claus Gittinger"
+! !
 
 !Metaclass methodsFor:'autoload check'!
 
@@ -163,14 +172,6 @@
     builder := ClassBuilder new.
     builder oldMetaclass:self instanceVariableNames:aString.
     builder rebuildForChangedClassInstanceVariables.
-!
-
-instanceVariableString:aString
-    "for compatibility"
-
-    self instanceVariableNames:aString
-
-    "Created: / 26-08-2018 / 16:29:13 / Claus Gittinger"
 ! !
 
 !Metaclass methodsFor:'compiler interface'!
@@ -979,6 +980,10 @@
 
 !Metaclass class methodsFor:'documentation'!
 
+version
+    ^ '$Header$'
+!
+
 version_CVS
     ^ '$Header$'
 ! !