Duplicate ivars in subclasses.

lang/src/Compiler-AST.js

@@ -1240,7 +1240,7 @@ $globals.JSStatementNode);
 
 
 
-$core.addClass("MethodNode", $globals.ASTNode, ["selector", "arguments", "source", "pragmas", "scope", "classReferences", "sendIndexes"], "Compiler-AST");
+$core.addClass("MethodNode", $globals.ASTNode, ["selector", "arguments", "pragmas", "scope", "classReferences", "sendIndexes"], "Compiler-AST");
 //>>excludeStart("ide", pragmas.excludeIdeData);
 $globals.MethodNode.comment="I represent an method node.\x0a\x0aA method node must be the root and only method node of a valid AST.";
 //>>excludeEnd("ide");
@@ -1592,43 +1592,6 @@ catch(e) {if(e===$early)return e[0]; throw e}
 }; }),
 $globals.MethodNode);
 
-$core.addMethod(
-$core.method({
-selector: "source",
-protocol: "accessing",
-//>>excludeStart("ide", pragmas.excludeIdeData);
-args: [],
-source: "source\x0a\x09^ source",
-referencedClasses: [],
-//>>excludeEnd("ide");
-pragmas: [],
-messageSends: []
-}, function ($methodClass){ return function (){
-var self=this,$self=this;
-return $self.source;
-
-}; }),
-$globals.MethodNode);
-
-$core.addMethod(
-$core.method({
-selector: "source:",
-protocol: "accessing",
-//>>excludeStart("ide", pragmas.excludeIdeData);
-args: ["aString"],
-source: "source: aString\x0a\x09source := aString",
-referencedClasses: [],
-//>>excludeEnd("ide");
-pragmas: [],
-messageSends: []
-}, function ($methodClass){ return function (aString){
-var self=this,$self=this;
-$self.source=aString;
-return self;
-
-}; }),
-$globals.MethodNode);
-
 
 
 $core.addClass("ReturnNode", $globals.ASTNode, ["scope"], "Compiler-AST");

lang/src/Compiler-AST.st

@@ -321,7 +321,7 @@ acceptDagVisitor: aVisitor
 ! !
 
 ASTNode subclass: #MethodNode
-	slots: {#selector. #arguments. #source. #pragmas. #scope. #classReferences. #sendIndexes}
+	slots: {#selector. #arguments. #pragmas. #scope. #classReferences. #sendIndexes}
 	package: 'Compiler-AST'!
 !MethodNode commentStamp!
 I represent an method node.
@@ -391,14 +391,6 @@ sequenceNode
 		each isSequenceNode ifTrue: [ ^ each ] ].
 		
 	^ nil
-!
-
-source
-	^ source
-!
-
-source: aString
-	source := aString
 ! !
 
 !MethodNode methodsFor: 'visiting'!

lang/src/Compiler-IR.js

@@ -1983,7 +1983,7 @@ $globals.IRClosure);
 
 
 
-$core.addClass("IRMethod", $globals.IRClosureInstruction, ["theClass", "source", "selector", "pragmas", "classReferences", "sendIndexes", "requiresSmalltalkContext", "internalVariables"], "Compiler-IR");
+$core.addClass("IRMethod", $globals.IRClosureInstruction, ["theClass", "source", "selector", "pragmas", "classReferences", "sendIndexes", "internalVariables"], "Compiler-IR");
 //>>excludeStart("ide", pragmas.excludeIdeData);
 $globals.IRMethod.comment="I am a method instruction";
 //>>excludeEnd("ide");

lang/src/Compiler-IR.st

@@ -481,7 +481,7 @@ acceptDagVisitor: aVisitor
 ! !
 
 IRClosureInstruction subclass: #IRMethod
-	slots: {#theClass. #source. #selector. #pragmas. #classReferences. #sendIndexes. #requiresSmalltalkContext. #internalVariables}
+	slots: {#theClass. #source. #selector. #pragmas. #classReferences. #sendIndexes. #internalVariables}
 	package: 'Compiler-IR'!
 !IRMethod commentStamp!
 I am a method instruction!