Browse Source

super initialize

Herbert Vojčík 12 years ago
parent
commit
f358c1e61b

+ 1 - 0
js/Trapped-Backend.deploy.js

@@ -17,6 +17,7 @@ smalltalk.method({
 selector: "initialize",
 fn: function (){
 var self=this;
+smalltalk.send(self,"_initialize",[],smalltalk.Object);
 self["@getBlock"]=(function(){
 return smalltalk.send(self,"_error_",["No getter block."]);
 });

+ 4 - 3
js/Trapped-Backend.js

@@ -24,6 +24,7 @@ selector: "initialize",
 category: 'initialization',
 fn: function (){
 var self=this;
+smalltalk.send(self,"_initialize",[],smalltalk.Object);
 self["@getBlock"]=(function(){
 return smalltalk.send(self,"_error_",["No getter block."]);
 });
@@ -32,8 +33,8 @@ return smalltalk.send(self,"_error_",["No putter block."]);
 });
 return self},
 args: [],
-source: "initialize\x0a\x0agetBlock := [ self error: 'No getter block.' ].\x0aputBlock := [ self error: 'No putter block.' ].",
-messageSends: ["error:"],
+source: "initialize\x0a\x09super initialize.\x0a\x09getBlock := [ self error: 'No getter block.' ].\x0a\x09putBlock := [ self error: 'No putter block.' ].",
+messageSends: ["initialize", "error:"],
 referencedClasses: []
 }),
 smalltalk.EavModel);
@@ -164,7 +165,7 @@ smalltalk.addMethod(
 "_on_",
 smalltalk.method({
 selector: "on:",
-category: 'initialization',
+category: 'instance creation',
 fn: function (anObject){
 var self=this;
 var $1;

+ 1 - 0
js/Trapped-Frontend.deploy.js

@@ -65,6 +65,7 @@ smalltalk.method({
 selector: "initialize",
 fn: function (){
 var self=this;
+smalltalk.send(self,"_initialize",[],smalltalk.TrappedSingleton);
 self["@registry"]=smalltalk.HashedCollection._fromPairs_([]);
 return self}
 }),

+ 3 - 2
js/Trapped-Frontend.js

@@ -86,11 +86,12 @@ selector: "initialize",
 category: 'initialization',
 fn: function (){
 var self=this;
+smalltalk.send(self,"_initialize",[],smalltalk.TrappedSingleton);
 self["@registry"]=smalltalk.HashedCollection._fromPairs_([]);
 return self},
 args: [],
-source: "initialize\x0a\x09registry := #{}.",
-messageSends: [],
+source: "initialize\x0a\x09super initialize.\x0a\x09registry := #{}.",
+messageSends: ["initialize"],
 referencedClasses: []
 }),
 smalltalk.Trapped);

+ 4 - 4
st/Trapped-Backend.st

@@ -32,9 +32,9 @@ putBlock := aBlock
 !EavModel methodsFor: 'initialization'!
 
 initialize
-
-getBlock := [ self error: 'No getter block.' ].
-putBlock := [ self error: 'No putter block.' ].
+	super initialize.
+	getBlock := [ self error: 'No getter block.' ].
+	putBlock := [ self error: 'No putter block.' ].
 ! !
 
 Object subclass: #Isolator
@@ -67,7 +67,7 @@ model: anEavModel read: aBlock
 aBlock value: (anEavModel on: self) deepCopy
 ! !
 
-!Isolator class methodsFor: 'initialization'!
+!Isolator class methodsFor: 'instance creation'!
 
 on: anObject
 ^self new root: anObject

+ 1 - 0
st/Trapped-Frontend.st

@@ -57,6 +57,7 @@ start
 !Trapped methodsFor: 'initialization'!
 
 initialize
+	super initialize.
 	registry := #{}.
 ! !