smalltalk.addPackage('Compiler-AST', {}); smalltalk.addClass('Node', smalltalk.Object, ['position', 'nodes', 'shouldBeInlined', 'shouldBeAliased'], 'Compiler-AST'); smalltalk.Node.comment="I am the abstract root class of the abstract syntax tree.\x0a\x0aposition: holds a point containing lline- and column number of the symbol location in the original source file" smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.Node)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitNode: self", messageSends: ["visitNode:"], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_addNode_", smalltalk.method({ selector: "addNode:", category: 'accessing', fn: function (aNode){ var self=this; return smalltalk.withContext(function($ctx) { _st(_st(self)._nodes())._add_(aNode); return self}, self, "addNode:", [aNode], smalltalk.Node)}, args: ["aNode"], source: "addNode: aNode\x0a\x09self nodes add: aNode", messageSends: ["add:", "nodes"], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_isAssignmentNode", smalltalk.method({ selector: "isAssignmentNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return false; }, self, "isAssignmentNode", [], smalltalk.Node)}, args: [], source: "isAssignmentNode\x0a\x09^ false", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_isBlockNode", smalltalk.method({ selector: "isBlockNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return false; }, self, "isBlockNode", [], smalltalk.Node)}, args: [], source: "isBlockNode\x0a\x09^false", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_isBlockSequenceNode", smalltalk.method({ selector: "isBlockSequenceNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return false; }, self, "isBlockSequenceNode", [], smalltalk.Node)}, args: [], source: "isBlockSequenceNode\x0a\x09^false", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_isReturnNode", smalltalk.method({ selector: "isReturnNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return false; }, self, "isReturnNode", [], smalltalk.Node)}, args: [], source: "isReturnNode\x0a\x09^false", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_isSendNode", smalltalk.method({ selector: "isSendNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return false; }, self, "isSendNode", [], smalltalk.Node)}, args: [], source: "isSendNode\x0a\x09^false", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_isValueNode", smalltalk.method({ selector: "isValueNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return false; }, self, "isValueNode", [], smalltalk.Node)}, args: [], source: "isValueNode\x0a\x09^false", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_nodes", smalltalk.method({ selector: "nodes", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@nodes"]) == nil || $receiver == undefined){ self["@nodes"]=_st((smalltalk.Array || Array))._new(); $1=self["@nodes"]; } else { $1=self["@nodes"]; }; return $1; }, self, "nodes", [], smalltalk.Node)}, args: [], source: "nodes\x0a\x09^nodes ifNil: [nodes := Array new]", messageSends: ["ifNil:", "new"], referencedClasses: ["Array"] }), smalltalk.Node); smalltalk.addMethod( "_nodes_", smalltalk.method({ selector: "nodes:", category: 'building', fn: function (aCollection){ var self=this; return smalltalk.withContext(function($ctx) { self["@nodes"]=aCollection; return self}, self, "nodes:", [aCollection], smalltalk.Node)}, args: ["aCollection"], source: "nodes: aCollection\x0a\x09nodes := aCollection", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_position", smalltalk.method({ selector: "position", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@position"]) == nil || $receiver == undefined){ self["@position"]=_st((0)).__at((0)); $1=self["@position"]; } else { $1=self["@position"]; }; return $1; }, self, "position", [], smalltalk.Node)}, args: [], source: "position\x0a\x09^position ifNil: [position := 0@0]", messageSends: ["ifNil:", "@"], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_position_", smalltalk.method({ selector: "position:", category: 'building', fn: function (aPosition){ var self=this; return smalltalk.withContext(function($ctx) { self["@position"]=aPosition; return self}, self, "position:", [aPosition], smalltalk.Node)}, args: ["aPosition"], source: "position: aPosition\x0a\x09position := aPosition", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_shouldBeAliased", smalltalk.method({ selector: "shouldBeAliased", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@shouldBeAliased"]) == nil || $receiver == undefined){ $1=false; } else { $1=self["@shouldBeAliased"]; }; return $1; }, self, "shouldBeAliased", [], smalltalk.Node)}, args: [], source: "shouldBeAliased\x0a\x09^ shouldBeAliased ifNil: [ false ]", messageSends: ["ifNil:"], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_shouldBeAliased_", smalltalk.method({ selector: "shouldBeAliased:", category: 'accessing', fn: function (aBoolean){ var self=this; return smalltalk.withContext(function($ctx) { self["@shouldBeAliased"]=aBoolean; return self}, self, "shouldBeAliased:", [aBoolean], smalltalk.Node)}, args: ["aBoolean"], source: "shouldBeAliased: aBoolean\x0a\x09shouldBeAliased := aBoolean", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_shouldBeInlined", smalltalk.method({ selector: "shouldBeInlined", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@shouldBeInlined"]) == nil || $receiver == undefined){ $1=false; } else { $1=self["@shouldBeInlined"]; }; return $1; }, self, "shouldBeInlined", [], smalltalk.Node)}, args: [], source: "shouldBeInlined\x0a\x09^ shouldBeInlined ifNil: [ false ]", messageSends: ["ifNil:"], referencedClasses: [] }), smalltalk.Node); smalltalk.addMethod( "_shouldBeInlined_", smalltalk.method({ selector: "shouldBeInlined:", category: 'accessing', fn: function (aBoolean){ var self=this; return smalltalk.withContext(function($ctx) { self["@shouldBeInlined"]=aBoolean; return self}, self, "shouldBeInlined:", [aBoolean], smalltalk.Node)}, args: ["aBoolean"], source: "shouldBeInlined: aBoolean\x0a\x09shouldBeInlined := aBoolean", messageSends: [], referencedClasses: [] }), smalltalk.Node); smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitAssignmentNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.AssignmentNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitAssignmentNode: self", messageSends: ["visitAssignmentNode:"], referencedClasses: [] }), smalltalk.AssignmentNode); smalltalk.addMethod( "_isAssignmentNode", smalltalk.method({ selector: "isAssignmentNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return true; }, self, "isAssignmentNode", [], smalltalk.AssignmentNode)}, args: [], source: "isAssignmentNode\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.AssignmentNode); smalltalk.addMethod( "_left", smalltalk.method({ selector: "left", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@left"]; }, self, "left", [], smalltalk.AssignmentNode)}, args: [], source: "left\x0a\x09^left", messageSends: [], referencedClasses: [] }), smalltalk.AssignmentNode); smalltalk.addMethod( "_left_", smalltalk.method({ selector: "left:", category: 'accessing', fn: function (aNode){ var self=this; return smalltalk.withContext(function($ctx) { self["@left"]=aNode; return self}, self, "left:", [aNode], smalltalk.AssignmentNode)}, args: ["aNode"], source: "left: aNode\x0a\x09left := aNode", messageSends: [], referencedClasses: [] }), smalltalk.AssignmentNode); smalltalk.addMethod( "_nodes", smalltalk.method({ selector: "nodes", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st((smalltalk.Array || Array))._with_with_(_st(self)._left(),_st(self)._right()); return $1; }, self, "nodes", [], smalltalk.AssignmentNode)}, args: [], source: "nodes\x0a\x09^ Array with: self left with: self right", messageSends: ["with:with:", "left", "right"], referencedClasses: ["Array"] }), smalltalk.AssignmentNode); smalltalk.addMethod( "_right", smalltalk.method({ selector: "right", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@right"]; }, self, "right", [], smalltalk.AssignmentNode)}, args: [], source: "right\x0a\x09^right", messageSends: [], referencedClasses: [] }), smalltalk.AssignmentNode); smalltalk.addMethod( "_right_", smalltalk.method({ selector: "right:", category: 'accessing', fn: function (aNode){ var self=this; return smalltalk.withContext(function($ctx) { self["@right"]=aNode; return self}, self, "right:", [aNode], smalltalk.AssignmentNode)}, args: ["aNode"], source: "right: aNode\x0a\x09right := aNode", messageSends: [], referencedClasses: [] }), smalltalk.AssignmentNode); smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters', 'scope'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitBlockNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.BlockNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitBlockNode: self", messageSends: ["visitBlockNode:"], referencedClasses: [] }), smalltalk.BlockNode); smalltalk.addMethod( "_isBlockNode", smalltalk.method({ selector: "isBlockNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return true; }, self, "isBlockNode", [], smalltalk.BlockNode)}, args: [], source: "isBlockNode\x0a\x09^true", messageSends: [], referencedClasses: [] }), smalltalk.BlockNode); smalltalk.addMethod( "_parameters", smalltalk.method({ selector: "parameters", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@parameters"]) == nil || $receiver == undefined){ self["@parameters"]=_st((smalltalk.Array || Array))._new(); $1=self["@parameters"]; } else { $1=self["@parameters"]; }; return $1; }, self, "parameters", [], smalltalk.BlockNode)}, args: [], source: "parameters\x0a\x09^parameters ifNil: [parameters := Array new]", messageSends: ["ifNil:", "new"], referencedClasses: ["Array"] }), smalltalk.BlockNode); smalltalk.addMethod( "_parameters_", smalltalk.method({ selector: "parameters:", category: 'accessing', fn: function (aCollection){ var self=this; return smalltalk.withContext(function($ctx) { self["@parameters"]=aCollection; return self}, self, "parameters:", [aCollection], smalltalk.BlockNode)}, args: ["aCollection"], source: "parameters: aCollection\x0a\x09parameters := aCollection", messageSends: [], referencedClasses: [] }), smalltalk.BlockNode); smalltalk.addMethod( "_scope", smalltalk.method({ selector: "scope", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@scope"]; }, self, "scope", [], smalltalk.BlockNode)}, args: [], source: "scope\x0a\x09^ scope", messageSends: [], referencedClasses: [] }), smalltalk.BlockNode); smalltalk.addMethod( "_scope_", smalltalk.method({ selector: "scope:", category: 'accessing', fn: function (aLexicalScope){ var self=this; return smalltalk.withContext(function($ctx) { self["@scope"]=aLexicalScope; return self}, self, "scope:", [aLexicalScope], smalltalk.BlockNode)}, args: ["aLexicalScope"], source: "scope: aLexicalScope\x0a\x09scope := aLexicalScope", messageSends: [], referencedClasses: [] }), smalltalk.BlockNode); smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitCascadeNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.CascadeNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitCascadeNode: self", messageSends: ["visitCascadeNode:"], referencedClasses: [] }), smalltalk.CascadeNode); smalltalk.addMethod( "_receiver", smalltalk.method({ selector: "receiver", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@receiver"]; }, self, "receiver", [], smalltalk.CascadeNode)}, args: [], source: "receiver\x0a\x09^receiver", messageSends: [], referencedClasses: [] }), smalltalk.CascadeNode); smalltalk.addMethod( "_receiver_", smalltalk.method({ selector: "receiver:", category: 'accessing', fn: function (aNode){ var self=this; return smalltalk.withContext(function($ctx) { self["@receiver"]=aNode; return self}, self, "receiver:", [aNode], smalltalk.CascadeNode)}, args: ["aNode"], source: "receiver: aNode\x0a\x09receiver := aNode", messageSends: [], referencedClasses: [] }), smalltalk.CascadeNode); smalltalk.addClass('DynamicArrayNode', smalltalk.Node, [], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitDynamicArrayNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.DynamicArrayNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitDynamicArrayNode: self", messageSends: ["visitDynamicArrayNode:"], referencedClasses: [] }), smalltalk.DynamicArrayNode); smalltalk.addClass('DynamicDictionaryNode', smalltalk.Node, [], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitDynamicDictionaryNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.DynamicDictionaryNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitDynamicDictionaryNode: self", messageSends: ["visitDynamicDictionaryNode:"], referencedClasses: [] }), smalltalk.DynamicDictionaryNode); smalltalk.addClass('JSStatementNode', smalltalk.Node, ['source'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitJSStatementNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.JSStatementNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitJSStatementNode: self", messageSends: ["visitJSStatementNode:"], referencedClasses: [] }), smalltalk.JSStatementNode); smalltalk.addMethod( "_source", smalltalk.method({ selector: "source", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@source"]) == nil || $receiver == undefined){ $1=""; } else { $1=self["@source"]; }; return $1; }, self, "source", [], smalltalk.JSStatementNode)}, args: [], source: "source\x0a\x09^source ifNil: ['']", messageSends: ["ifNil:"], referencedClasses: [] }), smalltalk.JSStatementNode); smalltalk.addMethod( "_source_", smalltalk.method({ selector: "source:", category: 'accessing', fn: function (aString){ var self=this; return smalltalk.withContext(function($ctx) { self["@source"]=aString; return self}, self, "source:", [aString], smalltalk.JSStatementNode)}, args: ["aString"], source: "source: aString\x0a\x09source := aString", messageSends: [], referencedClasses: [] }), smalltalk.JSStatementNode); smalltalk.addClass('MethodNode', smalltalk.Node, ['selector', 'arguments', 'source', 'scope', 'classReferences', 'messageSends', 'superSends'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitMethodNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.MethodNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitMethodNode: self", messageSends: ["visitMethodNode:"], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_arguments", smalltalk.method({ selector: "arguments", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@arguments"]) == nil || $receiver == undefined){ $1=[]; } else { $1=self["@arguments"]; }; return $1; }, self, "arguments", [], smalltalk.MethodNode)}, args: [], source: "arguments\x0a\x09^arguments ifNil: [#()]", messageSends: ["ifNil:"], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_arguments_", smalltalk.method({ selector: "arguments:", category: 'accessing', fn: function (aCollection){ var self=this; return smalltalk.withContext(function($ctx) { self["@arguments"]=aCollection; return self}, self, "arguments:", [aCollection], smalltalk.MethodNode)}, args: ["aCollection"], source: "arguments: aCollection\x0a\x09arguments := aCollection", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_classReferences", smalltalk.method({ selector: "classReferences", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@classReferences"]; }, self, "classReferences", [], smalltalk.MethodNode)}, args: [], source: "classReferences\x0a\x09^ classReferences", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_classReferences_", smalltalk.method({ selector: "classReferences:", category: 'accessing', fn: function (aCollection){ var self=this; return smalltalk.withContext(function($ctx) { self["@classReferences"]=aCollection; return self}, self, "classReferences:", [aCollection], smalltalk.MethodNode)}, args: ["aCollection"], source: "classReferences: aCollection\x0a\x09classReferences := aCollection", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_messageSends", smalltalk.method({ selector: "messageSends", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@messageSends"]; }, self, "messageSends", [], smalltalk.MethodNode)}, args: [], source: "messageSends\x0a\x09^ messageSends", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_messageSends_", smalltalk.method({ selector: "messageSends:", category: 'accessing', fn: function (aCollection){ var self=this; return smalltalk.withContext(function($ctx) { self["@messageSends"]=aCollection; return self}, self, "messageSends:", [aCollection], smalltalk.MethodNode)}, args: ["aCollection"], source: "messageSends: aCollection\x0a\x09messageSends := aCollection", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_scope", smalltalk.method({ selector: "scope", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@scope"]; }, self, "scope", [], smalltalk.MethodNode)}, args: [], source: "scope\x0a\x09^ scope", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_scope_", smalltalk.method({ selector: "scope:", category: 'accessing', fn: function (aMethodScope){ var self=this; return smalltalk.withContext(function($ctx) { self["@scope"]=aMethodScope; return self}, self, "scope:", [aMethodScope], smalltalk.MethodNode)}, args: ["aMethodScope"], source: "scope: aMethodScope\x0a\x09scope := aMethodScope", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_selector", smalltalk.method({ selector: "selector", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@selector"]; }, self, "selector", [], smalltalk.MethodNode)}, args: [], source: "selector\x0a\x09^selector", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_selector_", smalltalk.method({ selector: "selector:", category: 'accessing', fn: function (aString){ var self=this; return smalltalk.withContext(function($ctx) { self["@selector"]=aString; return self}, self, "selector:", [aString], smalltalk.MethodNode)}, args: ["aString"], source: "selector: aString\x0a\x09selector := aString", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_source", smalltalk.method({ selector: "source", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@source"]; }, self, "source", [], smalltalk.MethodNode)}, args: [], source: "source\x0a\x09^source", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_source_", smalltalk.method({ selector: "source:", category: 'accessing', fn: function (aString){ var self=this; return smalltalk.withContext(function($ctx) { self["@source"]=aString; return self}, self, "source:", [aString], smalltalk.MethodNode)}, args: ["aString"], source: "source: aString\x0a\x09source := aString", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_superSends", smalltalk.method({ selector: "superSends", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@superSends"]; }, self, "superSends", [], smalltalk.MethodNode)}, args: [], source: "superSends\x0a\x09^ superSends", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addMethod( "_superSends_", smalltalk.method({ selector: "superSends:", category: 'accessing', fn: function (aCollection){ var self=this; return smalltalk.withContext(function($ctx) { self["@superSends"]=aCollection; return self}, self, "superSends:", [aCollection], smalltalk.MethodNode)}, args: ["aCollection"], source: "superSends: aCollection\x0a\x09superSends := aCollection", messageSends: [], referencedClasses: [] }), smalltalk.MethodNode); smalltalk.addClass('ReturnNode', smalltalk.Node, ['scope'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitReturnNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.ReturnNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitReturnNode: self", messageSends: ["visitReturnNode:"], referencedClasses: [] }), smalltalk.ReturnNode); smalltalk.addMethod( "_isReturnNode", smalltalk.method({ selector: "isReturnNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return true; }, self, "isReturnNode", [], smalltalk.ReturnNode)}, args: [], source: "isReturnNode\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.ReturnNode); smalltalk.addMethod( "_nonLocalReturn", smalltalk.method({ selector: "nonLocalReturn", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(_st(_st(self)._scope())._isMethodScope())._not(); return $1; }, self, "nonLocalReturn", [], smalltalk.ReturnNode)}, args: [], source: "nonLocalReturn\x0a\x09^ self scope isMethodScope not", messageSends: ["not", "isMethodScope", "scope"], referencedClasses: [] }), smalltalk.ReturnNode); smalltalk.addMethod( "_scope", smalltalk.method({ selector: "scope", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@scope"]; }, self, "scope", [], smalltalk.ReturnNode)}, args: [], source: "scope\x0a\x09^ scope", messageSends: [], referencedClasses: [] }), smalltalk.ReturnNode); smalltalk.addMethod( "_scope_", smalltalk.method({ selector: "scope:", category: 'accessing', fn: function (aLexicalScope){ var self=this; return smalltalk.withContext(function($ctx) { self["@scope"]=aLexicalScope; return self}, self, "scope:", [aLexicalScope], smalltalk.ReturnNode)}, args: ["aLexicalScope"], source: "scope: aLexicalScope\x0a\x09scope := aLexicalScope", messageSends: [], referencedClasses: [] }), smalltalk.ReturnNode); smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver', 'superSend', 'index'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitSendNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.SendNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitSendNode: self", messageSends: ["visitSendNode:"], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_arguments", smalltalk.method({ selector: "arguments", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@arguments"]) == nil || $receiver == undefined){ self["@arguments"]=[]; $1=self["@arguments"]; } else { $1=self["@arguments"]; }; return $1; }, self, "arguments", [], smalltalk.SendNode)}, args: [], source: "arguments\x0a\x09^arguments ifNil: [arguments := #()]", messageSends: ["ifNil:"], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_arguments_", smalltalk.method({ selector: "arguments:", category: 'accessing', fn: function (aCollection){ var self=this; return smalltalk.withContext(function($ctx) { self["@arguments"]=aCollection; return self}, self, "arguments:", [aCollection], smalltalk.SendNode)}, args: ["aCollection"], source: "arguments: aCollection\x0a\x09arguments := aCollection", messageSends: [], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_cascadeNodeWithMessages_", smalltalk.method({ selector: "cascadeNodeWithMessages:", category: 'accessing', fn: function (aCollection){ var self=this; return smalltalk.withContext(function($ctx) { var $1,$2,$4,$5,$3; var first; $1=_st((smalltalk.SendNode || SendNode))._new(); _st($1)._selector_(_st(self)._selector()); _st($1)._arguments_(_st(self)._arguments()); $2=_st($1)._yourself(); first=$2; $4=_st((smalltalk.CascadeNode || CascadeNode))._new(); _st($4)._receiver_(_st(self)._receiver()); _st($4)._nodes_(_st(_st((smalltalk.Array || Array))._with_(first)).__comma(aCollection)); $5=_st($4)._yourself(); $3=$5; return $3; }, self, "cascadeNodeWithMessages:", [aCollection], smalltalk.SendNode)}, args: ["aCollection"], source: "cascadeNodeWithMessages: aCollection\x0a\x09| first |\x0a\x09first := SendNode new\x0a\x09 selector: self selector;\x0a\x09 arguments: self arguments;\x0a\x09 yourself.\x0a\x09^CascadeNode new\x0a\x09 receiver: self receiver;\x0a\x09 nodes: (Array with: first), aCollection;\x0a\x09 yourself", messageSends: ["selector:", "selector", "new", "arguments:", "arguments", "yourself", "receiver:", "receiver", "nodes:", ",", "with:"], referencedClasses: ["SendNode", "CascadeNode", "Array"] }), smalltalk.SendNode); smalltalk.addMethod( "_index", smalltalk.method({ selector: "index", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@index"]; }, self, "index", [], smalltalk.SendNode)}, args: [], source: "index\x0a\x09^ index", messageSends: [], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_index_", smalltalk.method({ selector: "index:", category: 'accessing', fn: function (anInteger){ var self=this; return smalltalk.withContext(function($ctx) { self["@index"]=anInteger; return self}, self, "index:", [anInteger], smalltalk.SendNode)}, args: ["anInteger"], source: "index: anInteger\x0a\x09index := anInteger", messageSends: [], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_isSendNode", smalltalk.method({ selector: "isSendNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return true; }, self, "isSendNode", [], smalltalk.SendNode)}, args: [], source: "isSendNode\x0a\x09^ true", messageSends: [], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_nodes", smalltalk.method({ selector: "nodes", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $2,$3,$1; $2=_st((smalltalk.Array || Array))._withAll_(_st(self)._arguments()); _st($2)._add_(_st(self)._receiver()); $3=_st($2)._yourself(); $1=$3; return $1; }, self, "nodes", [], smalltalk.SendNode)}, args: [], source: "nodes\x0a\x09^ (Array withAll: self arguments)\x0a\x09\x09add: self receiver;\x0a\x09\x09yourself", messageSends: ["add:", "receiver", "withAll:", "arguments", "yourself"], referencedClasses: ["Array"] }), smalltalk.SendNode); smalltalk.addMethod( "_receiver", smalltalk.method({ selector: "receiver", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@receiver"]; }, self, "receiver", [], smalltalk.SendNode)}, args: [], source: "receiver\x0a\x09^receiver", messageSends: [], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_receiver_", smalltalk.method({ selector: "receiver:", category: 'accessing', fn: function (aNode){ var self=this; return smalltalk.withContext(function($ctx) { self["@receiver"]=aNode; return self}, self, "receiver:", [aNode], smalltalk.SendNode)}, args: ["aNode"], source: "receiver: aNode\x0a\x09receiver := aNode", messageSends: [], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_selector", smalltalk.method({ selector: "selector", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@selector"]; }, self, "selector", [], smalltalk.SendNode)}, args: [], source: "selector\x0a\x09^selector", messageSends: [], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_selector_", smalltalk.method({ selector: "selector:", category: 'accessing', fn: function (aString){ var self=this; return smalltalk.withContext(function($ctx) { self["@selector"]=aString; return self}, self, "selector:", [aString], smalltalk.SendNode)}, args: ["aString"], source: "selector: aString\x0a\x09selector := aString", messageSends: [], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_superSend", smalltalk.method({ selector: "superSend", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@superSend"]) == nil || $receiver == undefined){ $1=false; } else { $1=self["@superSend"]; }; return $1; }, self, "superSend", [], smalltalk.SendNode)}, args: [], source: "superSend\x0a\x09^ superSend ifNil: [ false ]", messageSends: ["ifNil:"], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_superSend_", smalltalk.method({ selector: "superSend:", category: 'accessing', fn: function (aBoolean){ var self=this; return smalltalk.withContext(function($ctx) { self["@superSend"]=aBoolean; return self}, self, "superSend:", [aBoolean], smalltalk.SendNode)}, args: ["aBoolean"], source: "superSend: aBoolean\x0a\x09superSend := aBoolean", messageSends: [], referencedClasses: [] }), smalltalk.SendNode); smalltalk.addMethod( "_valueForReceiver_", smalltalk.method({ selector: "valueForReceiver:", category: 'accessing', fn: function (anObject){ var self=this; return smalltalk.withContext(function($ctx) { var $2,$4,$3,$5,$1; $2=_st((smalltalk.SendNode || SendNode))._new(); $4=_st(self)._receiver(); if(($receiver = $4) == nil || $receiver == undefined){ $3=anObject; } else { $3=_st(_st(self)._receiver())._valueForReceiver_(anObject); }; _st($2)._receiver_($3); _st($2)._selector_(_st(self)._selector()); _st($2)._arguments_(_st(self)._arguments()); $5=_st($2)._yourself(); $1=$5; return $1; }, self, "valueForReceiver:", [anObject], smalltalk.SendNode)}, args: ["anObject"], source: "valueForReceiver: anObject\x0a\x09^SendNode new\x0a\x09 receiver: (self receiver \x0a\x09\x09ifNil: [anObject]\x0a\x09\x09ifNotNil: [self receiver valueForReceiver: anObject]);\x0a\x09 selector: self selector;\x0a\x09 arguments: self arguments;\x0a\x09 yourself", messageSends: ["receiver:", "ifNil:ifNotNil:", "valueForReceiver:", "receiver", "new", "selector:", "selector", "arguments:", "arguments", "yourself"], referencedClasses: ["SendNode"] }), smalltalk.SendNode); smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps', 'scope'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitSequenceNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.SequenceNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitSequenceNode: self", messageSends: ["visitSequenceNode:"], referencedClasses: [] }), smalltalk.SequenceNode); smalltalk.addMethod( "_asBlockSequenceNode", smalltalk.method({ selector: "asBlockSequenceNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $2,$3,$1; $2=_st((smalltalk.BlockSequenceNode || BlockSequenceNode))._new(); _st($2)._nodes_(_st(self)._nodes()); _st($2)._temps_(_st(self)._temps()); $3=_st($2)._yourself(); $1=$3; return $1; }, self, "asBlockSequenceNode", [], smalltalk.SequenceNode)}, args: [], source: "asBlockSequenceNode\x0a\x09^BlockSequenceNode new\x0a\x09 nodes: self nodes;\x0a\x09 temps: self temps;\x0a\x09 yourself", messageSends: ["nodes:", "nodes", "new", "temps:", "temps", "yourself"], referencedClasses: ["BlockSequenceNode"] }), smalltalk.SequenceNode); smalltalk.addMethod( "_scope", smalltalk.method({ selector: "scope", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@scope"]; }, self, "scope", [], smalltalk.SequenceNode)}, args: [], source: "scope\x0a\x09^ scope", messageSends: [], referencedClasses: [] }), smalltalk.SequenceNode); smalltalk.addMethod( "_scope_", smalltalk.method({ selector: "scope:", category: 'accessing', fn: function (aLexicalScope){ var self=this; return smalltalk.withContext(function($ctx) { self["@scope"]=aLexicalScope; return self}, self, "scope:", [aLexicalScope], smalltalk.SequenceNode)}, args: ["aLexicalScope"], source: "scope: aLexicalScope\x0a\x09scope := aLexicalScope", messageSends: [], referencedClasses: [] }), smalltalk.SequenceNode); smalltalk.addMethod( "_temps", smalltalk.method({ selector: "temps", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@temps"]) == nil || $receiver == undefined){ $1=[]; } else { $1=self["@temps"]; }; return $1; }, self, "temps", [], smalltalk.SequenceNode)}, args: [], source: "temps\x0a\x09^temps ifNil: [#()]", messageSends: ["ifNil:"], referencedClasses: [] }), smalltalk.SequenceNode); smalltalk.addMethod( "_temps_", smalltalk.method({ selector: "temps:", category: 'accessing', fn: function (aCollection){ var self=this; return smalltalk.withContext(function($ctx) { self["@temps"]=aCollection; return self}, self, "temps:", [aCollection], smalltalk.SequenceNode)}, args: ["aCollection"], source: "temps: aCollection\x0a\x09temps := aCollection", messageSends: [], referencedClasses: [] }), smalltalk.SequenceNode); smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitBlockSequenceNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.BlockSequenceNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitBlockSequenceNode: self", messageSends: ["visitBlockSequenceNode:"], referencedClasses: [] }), smalltalk.BlockSequenceNode); smalltalk.addMethod( "_isBlockSequenceNode", smalltalk.method({ selector: "isBlockSequenceNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return true; }, self, "isBlockSequenceNode", [], smalltalk.BlockSequenceNode)}, args: [], source: "isBlockSequenceNode\x0a\x09^true", messageSends: [], referencedClasses: [] }), smalltalk.BlockSequenceNode); smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitValueNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.ValueNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitValueNode: self", messageSends: ["visitValueNode:"], referencedClasses: [] }), smalltalk.ValueNode); smalltalk.addMethod( "_isValueNode", smalltalk.method({ selector: "isValueNode", category: 'testing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return true; }, self, "isValueNode", [], smalltalk.ValueNode)}, args: [], source: "isValueNode\x0a\x09^true", messageSends: [], referencedClasses: [] }), smalltalk.ValueNode); smalltalk.addMethod( "_value", smalltalk.method({ selector: "value", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@value"]; }, self, "value", [], smalltalk.ValueNode)}, args: [], source: "value\x0a\x09^value", messageSends: [], referencedClasses: [] }), smalltalk.ValueNode); smalltalk.addMethod( "_value_", smalltalk.method({ selector: "value:", category: 'accessing', fn: function (anObject){ var self=this; return smalltalk.withContext(function($ctx) { self["@value"]=anObject; return self}, self, "value:", [anObject], smalltalk.ValueNode)}, args: ["anObject"], source: "value: anObject\x0a\x09value := anObject", messageSends: [], referencedClasses: [] }), smalltalk.ValueNode); smalltalk.addClass('VariableNode', smalltalk.ValueNode, ['assigned', 'binding'], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitVariableNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.VariableNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitVariableNode: self", messageSends: ["visitVariableNode:"], referencedClasses: [] }), smalltalk.VariableNode); smalltalk.addMethod( "_alias", smalltalk.method({ selector: "alias", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(_st(self)._binding())._alias(); return $1; }, self, "alias", [], smalltalk.VariableNode)}, args: [], source: "alias\x0a\x09^ self binding alias", messageSends: ["alias", "binding"], referencedClasses: [] }), smalltalk.VariableNode); smalltalk.addMethod( "_assigned", smalltalk.method({ selector: "assigned", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { var $1; if(($receiver = self["@assigned"]) == nil || $receiver == undefined){ $1=false; } else { $1=self["@assigned"]; }; return $1; }, self, "assigned", [], smalltalk.VariableNode)}, args: [], source: "assigned\x0a\x09^assigned ifNil: [false]", messageSends: ["ifNil:"], referencedClasses: [] }), smalltalk.VariableNode); smalltalk.addMethod( "_assigned_", smalltalk.method({ selector: "assigned:", category: 'accessing', fn: function (aBoolean){ var self=this; return smalltalk.withContext(function($ctx) { self["@assigned"]=aBoolean; return self}, self, "assigned:", [aBoolean], smalltalk.VariableNode)}, args: ["aBoolean"], source: "assigned: aBoolean\x0a\x09assigned := aBoolean", messageSends: [], referencedClasses: [] }), smalltalk.VariableNode); smalltalk.addMethod( "_beAssigned", smalltalk.method({ selector: "beAssigned", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { _st(_st(self)._binding())._validateAssignment(); self["@assigned"]=true; return self}, self, "beAssigned", [], smalltalk.VariableNode)}, args: [], source: "beAssigned\x0a\x09self binding validateAssignment.\x0a\x09assigned := true", messageSends: ["validateAssignment", "binding"], referencedClasses: [] }), smalltalk.VariableNode); smalltalk.addMethod( "_binding", smalltalk.method({ selector: "binding", category: 'accessing', fn: function (){ var self=this; return smalltalk.withContext(function($ctx) { return self["@binding"]; }, self, "binding", [], smalltalk.VariableNode)}, args: [], source: "binding\x0a\x09^ binding", messageSends: [], referencedClasses: [] }), smalltalk.VariableNode); smalltalk.addMethod( "_binding_", smalltalk.method({ selector: "binding:", category: 'accessing', fn: function (aScopeVar){ var self=this; return smalltalk.withContext(function($ctx) { self["@binding"]=aScopeVar; return self}, self, "binding:", [aScopeVar], smalltalk.VariableNode)}, args: ["aScopeVar"], source: "binding: aScopeVar\x0a\x09binding := aScopeVar", messageSends: [], referencedClasses: [] }), smalltalk.VariableNode); smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler-AST'); smalltalk.addMethod( "_accept_", smalltalk.method({ selector: "accept:", category: 'visiting', fn: function (aVisitor){ var self=this; return smalltalk.withContext(function($ctx) { var $1; $1=_st(aVisitor)._visitClassReferenceNode_(self); return $1; }, self, "accept:", [aVisitor], smalltalk.ClassReferenceNode)}, args: ["aVisitor"], source: "accept: aVisitor\x0a\x09^ aVisitor visitClassReferenceNode: self", messageSends: ["visitClassReferenceNode:"], referencedClasses: [] }), smalltalk.ClassReferenceNode);