Recompiled all js files

js/Benchfib.deploy.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Benchfib');
 smalltalk.addClass('Benchfib', smalltalk.Object, [], 'Benchfib');
 
 smalltalk.addMethod(
-"_main",
 smalltalk.method({
 selector: "main",
 fn: function (){
@@ -17,7 +16,6 @@ smalltalk.Benchfib.klass);
 
 
 smalltalk.addMethod(
-"_benchFib",
 smalltalk.method({
 selector: "benchFib",
 fn: function (){
@@ -36,7 +34,6 @@ messageSends: ["ifTrue:ifFalse:", "+", "benchFib", "-", "<"]}),
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_benchmark",
 smalltalk.method({
 selector: "benchmark",
 fn: function (){
@@ -85,7 +82,6 @@ messageSends: ["to:do:", "new", "timesRepeat:", "add:", "ifTrue:", "+", "whileTr
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_jsbenchFib",
 smalltalk.method({
 selector: "jsbenchFib",
 fn: function (){
@@ -100,7 +96,6 @@ messageSends: []}),
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_jsbenchmark",
 smalltalk.method({
 selector: "jsbenchmark",
 fn: function (){
@@ -133,7 +128,6 @@ messageSends: []}),
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_jstinyBenchmarks",
 smalltalk.method({
 selector: "jstinyBenchmarks",
 fn: function (){
@@ -178,7 +172,6 @@ messageSends: ["whileTrue:", "*", "millisecondsToRun:", "jsbenchmark", "<", "+",
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_tinyBenchmarks",
 smalltalk.method({
 selector: "tinyBenchmarks",
 fn: function (){

js/Benchfib.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Benchfib');
 smalltalk.addClass('Benchfib', smalltalk.Object, [], 'Benchfib');
 
 smalltalk.addMethod(
-"_main",
 smalltalk.method({
 selector: "main",
 category: 'not yet classified',
@@ -22,7 +21,6 @@ smalltalk.Benchfib.klass);
 
 
 smalltalk.addMethod(
-"_benchFib",
 smalltalk.method({
 selector: "benchFib",
 category: '*Benchfib',
@@ -46,7 +44,6 @@ referencedClasses: []
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_benchmark",
 smalltalk.method({
 selector: "benchmark",
 category: '*Benchfib',
@@ -100,7 +97,6 @@ referencedClasses: ["Array"]
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_jsbenchFib",
 smalltalk.method({
 selector: "jsbenchFib",
 category: '*Benchfib',
@@ -120,7 +116,6 @@ referencedClasses: []
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_jsbenchmark",
 smalltalk.method({
 selector: "jsbenchmark",
 category: '*Benchfib',
@@ -158,7 +153,6 @@ referencedClasses: []
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_jstinyBenchmarks",
 smalltalk.method({
 selector: "jstinyBenchmarks",
 category: '*Benchfib',
@@ -208,7 +202,6 @@ referencedClasses: ["Date"]
 smalltalk.Number);
 
 smalltalk.addMethod(
-"_tinyBenchmarks",
 smalltalk.method({
 selector: "tinyBenchmarks",
 category: '*Benchfib',

js/Compiler-AST.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Compiler-AST');
 smalltalk.addClass('Node', smalltalk.Object, ['position', 'nodes', 'shouldBeInlined', 'shouldBeAliased'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -15,7 +14,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_addNode_",
 smalltalk.method({
 selector: "addNode:",
 fn: function (aNode){
@@ -27,7 +25,6 @@ messageSends: ["add:", "nodes"]}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isAssignmentNode",
 smalltalk.method({
 selector: "isAssignmentNode",
 fn: function (){
@@ -39,7 +36,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isBlockNode",
 smalltalk.method({
 selector: "isBlockNode",
 fn: function (){
@@ -51,7 +47,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isBlockSequenceNode",
 smalltalk.method({
 selector: "isBlockSequenceNode",
 fn: function (){
@@ -63,7 +58,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isImmutable",
 smalltalk.method({
 selector: "isImmutable",
 fn: function (){
@@ -75,7 +69,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isNode",
 smalltalk.method({
 selector: "isNode",
 fn: function (){
@@ -87,7 +80,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isReturnNode",
 smalltalk.method({
 selector: "isReturnNode",
 fn: function (){
@@ -99,7 +91,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isSendNode",
 smalltalk.method({
 selector: "isSendNode",
 fn: function (){
@@ -111,7 +102,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isValueNode",
 smalltalk.method({
 selector: "isValueNode",
 fn: function (){
@@ -123,7 +113,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_nodes",
 smalltalk.method({
 selector: "nodes",
 fn: function (){
@@ -144,7 +133,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_nodes_",
 smalltalk.method({
 selector: "nodes:",
 fn: function (aCollection){
@@ -156,7 +144,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_position",
 smalltalk.method({
 selector: "position",
 fn: function (){
@@ -176,7 +163,6 @@ messageSends: ["ifNil:", "@"]}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_position_",
 smalltalk.method({
 selector: "position:",
 fn: function (aPosition){
@@ -188,7 +174,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_shouldBeAliased",
 smalltalk.method({
 selector: "shouldBeAliased",
 fn: function (){
@@ -207,7 +192,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_shouldBeAliased_",
 smalltalk.method({
 selector: "shouldBeAliased:",
 fn: function (aBoolean){
@@ -219,7 +203,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_shouldBeInlined",
 smalltalk.method({
 selector: "shouldBeInlined",
 fn: function (){
@@ -238,7 +221,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_shouldBeInlined_",
 smalltalk.method({
 selector: "shouldBeInlined:",
 fn: function (aBoolean){
@@ -250,7 +232,6 @@ messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_subtreeNeedsAliasing",
 smalltalk.method({
 selector: "subtreeNeedsAliasing",
 fn: function (){
@@ -279,7 +260,6 @@ smalltalk.Node);
 
 smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -293,7 +273,6 @@ messageSends: ["visitAssignmentNode:"]}),
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_isAssignmentNode",
 smalltalk.method({
 selector: "isAssignmentNode",
 fn: function (){
@@ -305,7 +284,6 @@ messageSends: []}),
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_left",
 smalltalk.method({
 selector: "left",
 fn: function (){
@@ -319,7 +297,6 @@ messageSends: []}),
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_left_",
 smalltalk.method({
 selector: "left:",
 fn: function (aNode){
@@ -331,7 +308,6 @@ messageSends: []}),
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_nodes",
 smalltalk.method({
 selector: "nodes",
 fn: function (){
@@ -346,7 +322,6 @@ messageSends: ["with:with:", "left", "right"]}),
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_right",
 smalltalk.method({
 selector: "right",
 fn: function (){
@@ -360,7 +335,6 @@ messageSends: []}),
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_right_",
 smalltalk.method({
 selector: "right:",
 fn: function (aNode){
@@ -375,7 +349,6 @@ smalltalk.AssignmentNode);
 
 smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters', 'scope'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -389,7 +362,6 @@ messageSends: ["visitBlockNode:"]}),
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_isBlockNode",
 smalltalk.method({
 selector: "isBlockNode",
 fn: function (){
@@ -401,7 +373,6 @@ messageSends: []}),
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_parameters",
 smalltalk.method({
 selector: "parameters",
 fn: function (){
@@ -422,7 +393,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_parameters_",
 smalltalk.method({
 selector: "parameters:",
 fn: function (aCollection){
@@ -434,7 +404,6 @@ messageSends: []}),
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 fn: function (){
@@ -448,7 +417,6 @@ messageSends: []}),
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 fn: function (aLexicalScope){
@@ -460,7 +428,6 @@ messageSends: []}),
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_subtreeNeedsAliasing",
 smalltalk.method({
 selector: "subtreeNeedsAliasing",
 fn: function (){
@@ -480,7 +447,6 @@ smalltalk.BlockNode);
 
 smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -494,7 +460,6 @@ messageSends: ["visitCascadeNode:"]}),
 smalltalk.CascadeNode);
 
 smalltalk.addMethod(
-"_receiver",
 smalltalk.method({
 selector: "receiver",
 fn: function (){
@@ -508,7 +473,6 @@ messageSends: []}),
 smalltalk.CascadeNode);
 
 smalltalk.addMethod(
-"_receiver_",
 smalltalk.method({
 selector: "receiver:",
 fn: function (aNode){
@@ -523,7 +487,6 @@ smalltalk.CascadeNode);
 
 smalltalk.addClass('DynamicArrayNode', smalltalk.Node, [], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -540,7 +503,6 @@ smalltalk.DynamicArrayNode);
 
 smalltalk.addClass('DynamicDictionaryNode', smalltalk.Node, [], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -557,7 +519,6 @@ smalltalk.DynamicDictionaryNode);
 
 smalltalk.addClass('JSStatementNode', smalltalk.Node, ['source'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -571,7 +532,6 @@ messageSends: ["visitJSStatementNode:"]}),
 smalltalk.JSStatementNode);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 fn: function (){
@@ -590,7 +550,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.JSStatementNode);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 fn: function (aString){
@@ -605,7 +564,6 @@ smalltalk.JSStatementNode);
 
 smalltalk.addClass('MethodNode', smalltalk.Node, ['selector', 'arguments', 'source', 'scope', 'classReferences', 'messageSends', 'superSends'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -619,7 +577,6 @@ messageSends: ["visitMethodNode:"]}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_arguments",
 smalltalk.method({
 selector: "arguments",
 fn: function (){
@@ -638,7 +595,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_arguments_",
 smalltalk.method({
 selector: "arguments:",
 fn: function (aCollection){
@@ -650,7 +606,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_classReferences",
 smalltalk.method({
 selector: "classReferences",
 fn: function (){
@@ -664,7 +619,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_classReferences_",
 smalltalk.method({
 selector: "classReferences:",
 fn: function (aCollection){
@@ -676,7 +630,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_messageSends",
 smalltalk.method({
 selector: "messageSends",
 fn: function (){
@@ -690,7 +643,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_messageSends_",
 smalltalk.method({
 selector: "messageSends:",
 fn: function (aCollection){
@@ -702,7 +654,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 fn: function (){
@@ -716,7 +667,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 fn: function (aMethodScope){
@@ -728,7 +678,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 fn: function (){
@@ -742,7 +691,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 fn: function (aString){
@@ -754,7 +702,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 fn: function (){
@@ -768,7 +715,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 fn: function (aString){
@@ -780,7 +726,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_superSends",
 smalltalk.method({
 selector: "superSends",
 fn: function (){
@@ -794,7 +739,6 @@ messageSends: []}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_superSends_",
 smalltalk.method({
 selector: "superSends:",
 fn: function (aCollection){
@@ -809,7 +753,6 @@ smalltalk.MethodNode);
 
 smalltalk.addClass('ReturnNode', smalltalk.Node, ['scope'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -823,7 +766,6 @@ messageSends: ["visitReturnNode:"]}),
 smalltalk.ReturnNode);
 
 smalltalk.addMethod(
-"_isReturnNode",
 smalltalk.method({
 selector: "isReturnNode",
 fn: function (){
@@ -835,7 +777,6 @@ messageSends: []}),
 smalltalk.ReturnNode);
 
 smalltalk.addMethod(
-"_nonLocalReturn",
 smalltalk.method({
 selector: "nonLocalReturn",
 fn: function (){
@@ -849,7 +790,6 @@ messageSends: ["not", "isMethodScope", "scope"]}),
 smalltalk.ReturnNode);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 fn: function (){
@@ -863,7 +803,6 @@ messageSends: []}),
 smalltalk.ReturnNode);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 fn: function (aLexicalScope){
@@ -878,7 +817,6 @@ smalltalk.ReturnNode);
 
 smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver', 'superSend', 'index'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -892,7 +830,6 @@ messageSends: ["visitSendNode:"]}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_arguments",
 smalltalk.method({
 selector: "arguments",
 fn: function (){
@@ -912,7 +849,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_arguments_",
 smalltalk.method({
 selector: "arguments:",
 fn: function (aCollection){
@@ -924,7 +860,6 @@ messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_cascadeNodeWithMessages_",
 smalltalk.method({
 selector: "cascadeNodeWithMessages:",
 fn: function (aCollection){
@@ -951,7 +886,6 @@ messageSends: ["selector:", "selector", "new", "arguments:", "arguments", "yours
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_index",
 smalltalk.method({
 selector: "index",
 fn: function (){
@@ -965,7 +899,6 @@ messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_index_",
 smalltalk.method({
 selector: "index:",
 fn: function (anInteger){
@@ -977,7 +910,6 @@ messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_isSendNode",
 smalltalk.method({
 selector: "isSendNode",
 fn: function (){
@@ -989,7 +921,6 @@ messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_nodes",
 smalltalk.method({
 selector: "nodes",
 fn: function (){
@@ -1007,7 +938,6 @@ messageSends: ["add:", "receiver", "withAll:", "arguments", "yourself"]}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_receiver",
 smalltalk.method({
 selector: "receiver",
 fn: function (){
@@ -1021,7 +951,6 @@ messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_receiver_",
 smalltalk.method({
 selector: "receiver:",
 fn: function (aNode){
@@ -1033,7 +962,6 @@ messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 fn: function (){
@@ -1047,7 +975,6 @@ messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 fn: function (aString){
@@ -1059,7 +986,6 @@ messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_superSend",
 smalltalk.method({
 selector: "superSend",
 fn: function (){
@@ -1078,7 +1004,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_superSend_",
 smalltalk.method({
 selector: "superSend:",
 fn: function (aBoolean){
@@ -1090,7 +1015,6 @@ messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_valueForReceiver_",
 smalltalk.method({
 selector: "valueForReceiver:",
 fn: function (anObject){
@@ -1120,7 +1044,6 @@ smalltalk.SendNode);
 
 smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps', 'scope'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -1134,7 +1057,6 @@ messageSends: ["visitSequenceNode:"]}),
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_asBlockSequenceNode",
 smalltalk.method({
 selector: "asBlockSequenceNode",
 fn: function (){
@@ -1153,7 +1075,6 @@ messageSends: ["nodes:", "nodes", "new", "temps:", "temps", "yourself"]}),
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 fn: function (){
@@ -1167,7 +1088,6 @@ messageSends: []}),
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 fn: function (aLexicalScope){
@@ -1179,7 +1099,6 @@ messageSends: []}),
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_temps",
 smalltalk.method({
 selector: "temps",
 fn: function (){
@@ -1198,7 +1117,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_temps_",
 smalltalk.method({
 selector: "temps:",
 fn: function (aCollection){
@@ -1213,7 +1131,6 @@ smalltalk.SequenceNode);
 
 smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -1227,7 +1144,6 @@ messageSends: ["visitBlockSequenceNode:"]}),
 smalltalk.BlockSequenceNode);
 
 smalltalk.addMethod(
-"_isBlockSequenceNode",
 smalltalk.method({
 selector: "isBlockSequenceNode",
 fn: function (){
@@ -1242,7 +1158,6 @@ smalltalk.BlockSequenceNode);
 
 smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -1256,7 +1171,6 @@ messageSends: ["visitValueNode:"]}),
 smalltalk.ValueNode);
 
 smalltalk.addMethod(
-"_isImmutable",
 smalltalk.method({
 selector: "isImmutable",
 fn: function (){
@@ -1270,7 +1184,6 @@ messageSends: ["isImmutable", "value"]}),
 smalltalk.ValueNode);
 
 smalltalk.addMethod(
-"_isValueNode",
 smalltalk.method({
 selector: "isValueNode",
 fn: function (){
@@ -1282,7 +1195,6 @@ messageSends: []}),
 smalltalk.ValueNode);
 
 smalltalk.addMethod(
-"_value",
 smalltalk.method({
 selector: "value",
 fn: function (){
@@ -1296,7 +1208,6 @@ messageSends: []}),
 smalltalk.ValueNode);
 
 smalltalk.addMethod(
-"_value_",
 smalltalk.method({
 selector: "value:",
 fn: function (anObject){
@@ -1311,7 +1222,6 @@ smalltalk.ValueNode);
 
 smalltalk.addClass('VariableNode', smalltalk.ValueNode, ['assigned', 'binding'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -1325,7 +1235,6 @@ messageSends: ["visitVariableNode:"]}),
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 fn: function (){
@@ -1339,7 +1248,6 @@ messageSends: ["alias", "binding"]}),
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_assigned",
 smalltalk.method({
 selector: "assigned",
 fn: function (){
@@ -1358,7 +1266,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_assigned_",
 smalltalk.method({
 selector: "assigned:",
 fn: function (aBoolean){
@@ -1370,7 +1277,6 @@ messageSends: []}),
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_beAssigned",
 smalltalk.method({
 selector: "beAssigned",
 fn: function (){
@@ -1383,7 +1289,6 @@ messageSends: ["validateAssignment", "binding"]}),
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_binding",
 smalltalk.method({
 selector: "binding",
 fn: function (){
@@ -1397,7 +1302,6 @@ messageSends: []}),
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_binding_",
 smalltalk.method({
 selector: "binding:",
 fn: function (aScopeVar){
@@ -1409,7 +1313,6 @@ messageSends: []}),
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_isImmutable",
 smalltalk.method({
 selector: "isImmutable",
 fn: function (){
@@ -1424,7 +1327,6 @@ smalltalk.VariableNode);
 
 smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -1440,7 +1342,6 @@ smalltalk.ClassReferenceNode);
 
 
 smalltalk.addMethod(
-"_isNode",
 smalltalk.method({
 selector: "isNode",
 fn: function (){

js/Compiler-AST.js

@@ -2,7 +2,6 @@ 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',
@@ -21,7 +20,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_addNode_",
 smalltalk.method({
 selector: "addNode:",
 category: 'accessing',
@@ -38,7 +36,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isAssignmentNode",
 smalltalk.method({
 selector: "isAssignmentNode",
 category: 'testing',
@@ -55,7 +52,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isBlockNode",
 smalltalk.method({
 selector: "isBlockNode",
 category: 'testing',
@@ -72,7 +68,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isBlockSequenceNode",
 smalltalk.method({
 selector: "isBlockSequenceNode",
 category: 'testing',
@@ -89,7 +84,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isImmutable",
 smalltalk.method({
 selector: "isImmutable",
 category: 'testing',
@@ -106,7 +100,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isNode",
 smalltalk.method({
 selector: "isNode",
 category: 'testing',
@@ -123,7 +116,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isReturnNode",
 smalltalk.method({
 selector: "isReturnNode",
 category: 'testing',
@@ -140,7 +132,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isSendNode",
 smalltalk.method({
 selector: "isSendNode",
 category: 'testing',
@@ -157,7 +148,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isValueNode",
 smalltalk.method({
 selector: "isValueNode",
 category: 'testing',
@@ -174,7 +164,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_nodes",
 smalltalk.method({
 selector: "nodes",
 category: 'accessing',
@@ -200,7 +189,6 @@ referencedClasses: ["Array"]
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_nodes_",
 smalltalk.method({
 selector: "nodes:",
 category: 'building',
@@ -217,7 +205,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_position",
 smalltalk.method({
 selector: "position",
 category: 'accessing',
@@ -242,7 +229,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_position_",
 smalltalk.method({
 selector: "position:",
 category: 'building',
@@ -259,7 +245,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_shouldBeAliased",
 smalltalk.method({
 selector: "shouldBeAliased",
 category: 'accessing',
@@ -283,7 +268,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_shouldBeAliased_",
 smalltalk.method({
 selector: "shouldBeAliased:",
 category: 'accessing',
@@ -300,7 +284,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_shouldBeInlined",
 smalltalk.method({
 selector: "shouldBeInlined",
 category: 'accessing',
@@ -324,7 +307,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_shouldBeInlined_",
 smalltalk.method({
 selector: "shouldBeInlined:",
 category: 'accessing',
@@ -341,7 +323,6 @@ referencedClasses: []
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_subtreeNeedsAliasing",
 smalltalk.method({
 selector: "subtreeNeedsAliasing",
 category: 'testing',
@@ -375,7 +356,6 @@ smalltalk.Node);
 
 smalltalk.addClass('AssignmentNode', smalltalk.Node, ['left', 'right'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -394,7 +374,6 @@ referencedClasses: []
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_isAssignmentNode",
 smalltalk.method({
 selector: "isAssignmentNode",
 category: 'testing',
@@ -411,7 +390,6 @@ referencedClasses: []
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_left",
 smalltalk.method({
 selector: "left",
 category: 'accessing',
@@ -430,7 +408,6 @@ referencedClasses: []
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_left_",
 smalltalk.method({
 selector: "left:",
 category: 'accessing',
@@ -447,7 +424,6 @@ referencedClasses: []
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_nodes",
 smalltalk.method({
 selector: "nodes",
 category: 'accessing',
@@ -467,7 +443,6 @@ referencedClasses: ["Array"]
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_right",
 smalltalk.method({
 selector: "right",
 category: 'accessing',
@@ -486,7 +461,6 @@ referencedClasses: []
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_right_",
 smalltalk.method({
 selector: "right:",
 category: 'accessing',
@@ -506,7 +480,6 @@ smalltalk.AssignmentNode);
 
 smalltalk.addClass('BlockNode', smalltalk.Node, ['parameters', 'scope'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -525,7 +498,6 @@ referencedClasses: []
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_isBlockNode",
 smalltalk.method({
 selector: "isBlockNode",
 category: 'testing',
@@ -542,7 +514,6 @@ referencedClasses: []
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_parameters",
 smalltalk.method({
 selector: "parameters",
 category: 'accessing',
@@ -568,7 +539,6 @@ referencedClasses: ["Array"]
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_parameters_",
 smalltalk.method({
 selector: "parameters:",
 category: 'accessing',
@@ -585,7 +555,6 @@ referencedClasses: []
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 category: 'accessing',
@@ -604,7 +573,6 @@ referencedClasses: []
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 category: 'accessing',
@@ -621,7 +589,6 @@ referencedClasses: []
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_subtreeNeedsAliasing",
 smalltalk.method({
 selector: "subtreeNeedsAliasing",
 category: 'testing',
@@ -646,7 +613,6 @@ smalltalk.BlockNode);
 
 smalltalk.addClass('CascadeNode', smalltalk.Node, ['receiver'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -665,7 +631,6 @@ referencedClasses: []
 smalltalk.CascadeNode);
 
 smalltalk.addMethod(
-"_receiver",
 smalltalk.method({
 selector: "receiver",
 category: 'accessing',
@@ -684,7 +649,6 @@ referencedClasses: []
 smalltalk.CascadeNode);
 
 smalltalk.addMethod(
-"_receiver_",
 smalltalk.method({
 selector: "receiver:",
 category: 'accessing',
@@ -704,7 +668,6 @@ smalltalk.CascadeNode);
 
 smalltalk.addClass('DynamicArrayNode', smalltalk.Node, [], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -726,7 +689,6 @@ smalltalk.DynamicArrayNode);
 
 smalltalk.addClass('DynamicDictionaryNode', smalltalk.Node, [], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -748,7 +710,6 @@ smalltalk.DynamicDictionaryNode);
 
 smalltalk.addClass('JSStatementNode', smalltalk.Node, ['source'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -767,7 +728,6 @@ referencedClasses: []
 smalltalk.JSStatementNode);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 category: 'accessing',
@@ -791,7 +751,6 @@ referencedClasses: []
 smalltalk.JSStatementNode);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 category: 'accessing',
@@ -811,7 +770,6 @@ 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',
@@ -830,7 +788,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_arguments",
 smalltalk.method({
 selector: "arguments",
 category: 'accessing',
@@ -854,7 +811,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_arguments_",
 smalltalk.method({
 selector: "arguments:",
 category: 'accessing',
@@ -871,7 +827,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_classReferences",
 smalltalk.method({
 selector: "classReferences",
 category: 'accessing',
@@ -890,7 +845,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_classReferences_",
 smalltalk.method({
 selector: "classReferences:",
 category: 'accessing',
@@ -907,7 +861,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_messageSends",
 smalltalk.method({
 selector: "messageSends",
 category: 'accessing',
@@ -926,7 +879,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_messageSends_",
 smalltalk.method({
 selector: "messageSends:",
 category: 'accessing',
@@ -943,7 +895,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 category: 'accessing',
@@ -962,7 +913,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 category: 'accessing',
@@ -979,7 +929,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 category: 'accessing',
@@ -998,7 +947,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 category: 'accessing',
@@ -1015,7 +963,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 category: 'accessing',
@@ -1034,7 +981,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 category: 'accessing',
@@ -1051,7 +997,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_superSends",
 smalltalk.method({
 selector: "superSends",
 category: 'accessing',
@@ -1070,7 +1015,6 @@ referencedClasses: []
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_superSends_",
 smalltalk.method({
 selector: "superSends:",
 category: 'accessing',
@@ -1090,7 +1034,6 @@ smalltalk.MethodNode);
 
 smalltalk.addClass('ReturnNode', smalltalk.Node, ['scope'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -1109,7 +1052,6 @@ referencedClasses: []
 smalltalk.ReturnNode);
 
 smalltalk.addMethod(
-"_isReturnNode",
 smalltalk.method({
 selector: "isReturnNode",
 category: 'testing',
@@ -1126,7 +1068,6 @@ referencedClasses: []
 smalltalk.ReturnNode);
 
 smalltalk.addMethod(
-"_nonLocalReturn",
 smalltalk.method({
 selector: "nonLocalReturn",
 category: 'testing',
@@ -1145,7 +1086,6 @@ referencedClasses: []
 smalltalk.ReturnNode);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 category: 'accessing',
@@ -1164,7 +1104,6 @@ referencedClasses: []
 smalltalk.ReturnNode);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 category: 'accessing',
@@ -1184,7 +1123,6 @@ smalltalk.ReturnNode);
 
 smalltalk.addClass('SendNode', smalltalk.Node, ['selector', 'arguments', 'receiver', 'superSend', 'index'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -1203,7 +1141,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_arguments",
 smalltalk.method({
 selector: "arguments",
 category: 'accessing',
@@ -1228,7 +1165,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_arguments_",
 smalltalk.method({
 selector: "arguments:",
 category: 'accessing',
@@ -1245,7 +1181,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_cascadeNodeWithMessages_",
 smalltalk.method({
 selector: "cascadeNodeWithMessages:",
 category: 'accessing',
@@ -1277,7 +1212,6 @@ referencedClasses: ["SendNode", "CascadeNode", "Array"]
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_index",
 smalltalk.method({
 selector: "index",
 category: 'accessing',
@@ -1296,7 +1230,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_index_",
 smalltalk.method({
 selector: "index:",
 category: 'accessing',
@@ -1313,7 +1246,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_isSendNode",
 smalltalk.method({
 selector: "isSendNode",
 category: 'testing',
@@ -1330,7 +1262,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_nodes",
 smalltalk.method({
 selector: "nodes",
 category: 'accessing',
@@ -1353,7 +1284,6 @@ referencedClasses: ["Array"]
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_receiver",
 smalltalk.method({
 selector: "receiver",
 category: 'accessing',
@@ -1372,7 +1302,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_receiver_",
 smalltalk.method({
 selector: "receiver:",
 category: 'accessing',
@@ -1389,7 +1318,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 category: 'accessing',
@@ -1408,7 +1336,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 category: 'accessing',
@@ -1425,7 +1352,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_superSend",
 smalltalk.method({
 selector: "superSend",
 category: 'accessing',
@@ -1449,7 +1375,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_superSend_",
 smalltalk.method({
 selector: "superSend:",
 category: 'accessing',
@@ -1466,7 +1391,6 @@ referencedClasses: []
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_valueForReceiver_",
 smalltalk.method({
 selector: "valueForReceiver:",
 category: 'accessing',
@@ -1501,7 +1425,6 @@ smalltalk.SendNode);
 
 smalltalk.addClass('SequenceNode', smalltalk.Node, ['temps', 'scope'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -1520,7 +1443,6 @@ referencedClasses: []
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_asBlockSequenceNode",
 smalltalk.method({
 selector: "asBlockSequenceNode",
 category: 'testing',
@@ -1544,7 +1466,6 @@ referencedClasses: ["BlockSequenceNode"]
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 category: 'accessing',
@@ -1563,7 +1484,6 @@ referencedClasses: []
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 category: 'accessing',
@@ -1580,7 +1500,6 @@ referencedClasses: []
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_temps",
 smalltalk.method({
 selector: "temps",
 category: 'accessing',
@@ -1604,7 +1523,6 @@ referencedClasses: []
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_temps_",
 smalltalk.method({
 selector: "temps:",
 category: 'accessing',
@@ -1624,7 +1542,6 @@ smalltalk.SequenceNode);
 
 smalltalk.addClass('BlockSequenceNode', smalltalk.SequenceNode, [], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -1643,7 +1560,6 @@ referencedClasses: []
 smalltalk.BlockSequenceNode);
 
 smalltalk.addMethod(
-"_isBlockSequenceNode",
 smalltalk.method({
 selector: "isBlockSequenceNode",
 category: 'testing',
@@ -1663,7 +1579,6 @@ smalltalk.BlockSequenceNode);
 
 smalltalk.addClass('ValueNode', smalltalk.Node, ['value'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -1682,7 +1597,6 @@ referencedClasses: []
 smalltalk.ValueNode);
 
 smalltalk.addMethod(
-"_isImmutable",
 smalltalk.method({
 selector: "isImmutable",
 category: 'testing',
@@ -1701,7 +1615,6 @@ referencedClasses: []
 smalltalk.ValueNode);
 
 smalltalk.addMethod(
-"_isValueNode",
 smalltalk.method({
 selector: "isValueNode",
 category: 'testing',
@@ -1718,7 +1631,6 @@ referencedClasses: []
 smalltalk.ValueNode);
 
 smalltalk.addMethod(
-"_value",
 smalltalk.method({
 selector: "value",
 category: 'accessing',
@@ -1737,7 +1649,6 @@ referencedClasses: []
 smalltalk.ValueNode);
 
 smalltalk.addMethod(
-"_value_",
 smalltalk.method({
 selector: "value:",
 category: 'accessing',
@@ -1757,7 +1668,6 @@ smalltalk.ValueNode);
 
 smalltalk.addClass('VariableNode', smalltalk.ValueNode, ['assigned', 'binding'], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -1776,7 +1686,6 @@ referencedClasses: []
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 category: 'accessing',
@@ -1795,7 +1704,6 @@ referencedClasses: []
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_assigned",
 smalltalk.method({
 selector: "assigned",
 category: 'accessing',
@@ -1819,7 +1727,6 @@ referencedClasses: []
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_assigned_",
 smalltalk.method({
 selector: "assigned:",
 category: 'accessing',
@@ -1836,7 +1743,6 @@ referencedClasses: []
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_beAssigned",
 smalltalk.method({
 selector: "beAssigned",
 category: 'accessing',
@@ -1854,7 +1760,6 @@ referencedClasses: []
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_binding",
 smalltalk.method({
 selector: "binding",
 category: 'accessing',
@@ -1873,7 +1778,6 @@ referencedClasses: []
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_binding_",
 smalltalk.method({
 selector: "binding:",
 category: 'accessing',
@@ -1890,7 +1794,6 @@ referencedClasses: []
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_isImmutable",
 smalltalk.method({
 selector: "isImmutable",
 category: 'testing',
@@ -1910,7 +1813,6 @@ smalltalk.VariableNode);
 
 smalltalk.addClass('ClassReferenceNode', smalltalk.VariableNode, [], 'Compiler-AST');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -1931,7 +1833,6 @@ smalltalk.ClassReferenceNode);
 
 
 smalltalk.addMethod(
-"_isNode",
 smalltalk.method({
 selector: "isNode",
 category: '*Compiler-AST',

js/Compiler-Core.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Compiler-Core');
 smalltalk.addClass('AbstractCodeGenerator', smalltalk.Object, ['currentClass', 'source'], 'Compiler-Core');
 smalltalk.addMethod(
-"_classNameFor_",
 smalltalk.method({
 selector: "classNameFor:",
 fn: function (aClass){
@@ -25,7 +24,6 @@ messageSends: ["ifTrue:ifFalse:", ",", "name", "instanceClass", "isNil", "isMeta
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_compileNode_",
 smalltalk.method({
 selector: "compileNode:",
 fn: function (aNode){
@@ -37,7 +35,6 @@ messageSends: ["subclassResponsibility"]}),
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_currentClass",
 smalltalk.method({
 selector: "currentClass",
 fn: function (){
@@ -51,7 +48,6 @@ messageSends: []}),
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_currentClass_",
 smalltalk.method({
 selector: "currentClass:",
 fn: function (aClass){
@@ -63,7 +59,6 @@ messageSends: []}),
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_pseudoVariables",
 smalltalk.method({
 selector: "pseudoVariables",
 fn: function (){
@@ -77,7 +72,6 @@ messageSends: []}),
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_safeVariableNameFor_",
 smalltalk.method({
 selector: "safeVariableNameFor:",
 fn: function (aString){
@@ -97,7 +91,6 @@ messageSends: ["ifTrue:ifFalse:", ",", "includes:", "reservedWords", "current"]}
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 fn: function (){
@@ -116,7 +109,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 fn: function (aString){
@@ -131,7 +123,6 @@ smalltalk.AbstractCodeGenerator);
 
 smalltalk.addClass('CodeGenerator', smalltalk.AbstractCodeGenerator, [], 'Compiler-Core');
 smalltalk.addMethod(
-"_compileNode_",
 smalltalk.method({
 selector: "compileNode:",
 fn: function (aNode){
@@ -151,7 +142,6 @@ messageSends: ["visit:", "semanticAnalyzer", "translator", "irTranslator", "cont
 smalltalk.CodeGenerator);
 
 smalltalk.addMethod(
-"_irTranslator",
 smalltalk.method({
 selector: "irTranslator",
 fn: function (){
@@ -166,7 +156,6 @@ messageSends: ["new"]}),
 smalltalk.CodeGenerator);
 
 smalltalk.addMethod(
-"_semanticAnalyzer",
 smalltalk.method({
 selector: "semanticAnalyzer",
 fn: function (){
@@ -181,7 +170,6 @@ messageSends: ["on:", "currentClass"]}),
 smalltalk.CodeGenerator);
 
 smalltalk.addMethod(
-"_translator",
 smalltalk.method({
 selector: "translator",
 fn: function (){
@@ -203,7 +191,6 @@ smalltalk.CodeGenerator);
 
 smalltalk.addClass('Compiler', smalltalk.Object, ['currentClass', 'source', 'unknownVariables', 'codeGeneratorClass'], 'Compiler-Core');
 smalltalk.addMethod(
-"_codeGeneratorClass",
 smalltalk.method({
 selector: "codeGeneratorClass",
 fn: function (){
@@ -223,7 +210,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_codeGeneratorClass_",
 smalltalk.method({
 selector: "codeGeneratorClass:",
 fn: function (aClass){
@@ -235,7 +221,6 @@ messageSends: []}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compile_",
 smalltalk.method({
 selector: "compile:",
 fn: function (aString){
@@ -249,7 +234,6 @@ messageSends: ["compileNode:", "parse:"]}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compile_forClass_",
 smalltalk.method({
 selector: "compile:forClass:",
 fn: function (aString,aClass){
@@ -265,7 +249,6 @@ messageSends: ["currentClass:", "source:", "compile:"]}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compileExpression_",
 smalltalk.method({
 selector: "compileExpression:",
 fn: function (aString){
@@ -282,7 +265,6 @@ messageSends: ["currentClass:", "source:", ",", "compileNode:", "parse:", "sourc
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compileExpression_on_",
 smalltalk.method({
 selector: "compileExpression:on:",
 fn: function (aString,anObject){
@@ -298,7 +280,6 @@ messageSends: ["currentClass:", "class", "source:", ",", "compileNode:", "parse:
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compileNode_",
 smalltalk.method({
 selector: "compileNode:",
 fn: function (aNode){
@@ -319,7 +300,6 @@ messageSends: ["new", "codeGeneratorClass", "source:", "source", "currentClass:"
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_currentClass",
 smalltalk.method({
 selector: "currentClass",
 fn: function (){
@@ -333,7 +313,6 @@ messageSends: []}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_currentClass_",
 smalltalk.method({
 selector: "currentClass:",
 fn: function (aClass){
@@ -345,7 +324,6 @@ messageSends: []}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_eval_",
 smalltalk.method({
 selector: "eval:",
 fn: function (aString){
@@ -357,7 +335,6 @@ messageSends: []}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_evaluateExpression_",
 smalltalk.method({
 selector: "evaluateExpression:",
 fn: function (aString){
@@ -372,7 +349,6 @@ messageSends: ["evaluateExpression:on:", "new"]}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_evaluateExpression_on_",
 smalltalk.method({
 selector: "evaluateExpression:on:",
 fn: function (aString,anObject){
@@ -392,7 +368,6 @@ messageSends: ["eval:", "compileExpression:on:", "category:", "addCompiledMethod
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_install_forClass_category_",
 smalltalk.method({
 selector: "install:forClass:category:",
 fn: function (aString,aBehavior,anotherString){
@@ -407,7 +382,6 @@ messageSends: ["installMethod:forClass:category:", "eval:", "compile:forClass:",
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_parse_",
 smalltalk.method({
 selector: "parse:",
 fn: function (aString){
@@ -422,7 +396,6 @@ messageSends: ["parse:", "current"]}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_parseExpression_",
 smalltalk.method({
 selector: "parseExpression:",
 fn: function (aString){
@@ -436,7 +409,6 @@ messageSends: ["parse:", ","]}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_recompile_",
 smalltalk.method({
 selector: "recompile:",
 fn: function (aClass){
@@ -457,7 +429,6 @@ messageSends: ["do:", "log:", ",", "selector", "name", "install:forClass:categor
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_recompileAll",
 smalltalk.method({
 selector: "recompileAll",
 fn: function (){
@@ -482,7 +453,6 @@ messageSends: ["do:", "show:", "cr", "valueWithTimeout:", "recompile:", "classes
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 fn: function (){
@@ -501,7 +471,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 fn: function (aString){
@@ -513,7 +482,6 @@ messageSends: []}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_unknownVariables",
 smalltalk.method({
 selector: "unknownVariables",
 fn: function (){
@@ -527,7 +495,6 @@ messageSends: []}),
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_unknownVariables_",
 smalltalk.method({
 selector: "unknownVariables:",
 fn: function (aCollection){
@@ -540,7 +507,6 @@ smalltalk.Compiler);
 
 
 smalltalk.addMethod(
-"_recompile_",
 smalltalk.method({
 selector: "recompile:",
 fn: function (aClass){
@@ -552,7 +518,6 @@ messageSends: ["recompile:", "new"]}),
 smalltalk.Compiler.klass);
 
 smalltalk.addMethod(
-"_recompileAll",
 smalltalk.method({
 selector: "recompileAll",
 fn: function (){
@@ -573,7 +538,6 @@ smalltalk.addClass('DoIt', smalltalk.Object, [], 'Compiler-Core');
 
 smalltalk.addClass('NodeVisitor', smalltalk.Object, [], 'Compiler-Core');
 smalltalk.addMethod(
-"_visit_",
 smalltalk.method({
 selector: "visit:",
 fn: function (aNode){
@@ -587,7 +551,6 @@ messageSends: ["accept:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitAll_",
 smalltalk.method({
 selector: "visitAll:",
 fn: function (aCollection){
@@ -604,7 +567,6 @@ messageSends: ["collect:", "visit:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitAssignmentNode_",
 smalltalk.method({
 selector: "visitAssignmentNode:",
 fn: function (aNode){
@@ -618,7 +580,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitBlockNode_",
 smalltalk.method({
 selector: "visitBlockNode:",
 fn: function (aNode){
@@ -632,7 +593,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitBlockSequenceNode_",
 smalltalk.method({
 selector: "visitBlockSequenceNode:",
 fn: function (aNode){
@@ -646,7 +606,6 @@ messageSends: ["visitSequenceNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitCascadeNode_",
 smalltalk.method({
 selector: "visitCascadeNode:",
 fn: function (aNode){
@@ -660,7 +619,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitClassReferenceNode_",
 smalltalk.method({
 selector: "visitClassReferenceNode:",
 fn: function (aNode){
@@ -674,7 +632,6 @@ messageSends: ["visitVariableNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitDynamicArrayNode_",
 smalltalk.method({
 selector: "visitDynamicArrayNode:",
 fn: function (aNode){
@@ -688,7 +645,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitDynamicDictionaryNode_",
 smalltalk.method({
 selector: "visitDynamicDictionaryNode:",
 fn: function (aNode){
@@ -702,7 +658,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitJSStatementNode_",
 smalltalk.method({
 selector: "visitJSStatementNode:",
 fn: function (aNode){
@@ -716,7 +671,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitMethodNode_",
 smalltalk.method({
 selector: "visitMethodNode:",
 fn: function (aNode){
@@ -730,7 +684,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitNode_",
 smalltalk.method({
 selector: "visitNode:",
 fn: function (aNode){
@@ -744,7 +697,6 @@ messageSends: ["visitAll:", "nodes"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitReturnNode_",
 smalltalk.method({
 selector: "visitReturnNode:",
 fn: function (aNode){
@@ -758,7 +710,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitSendNode_",
 smalltalk.method({
 selector: "visitSendNode:",
 fn: function (aNode){
@@ -772,7 +723,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitSequenceNode_",
 smalltalk.method({
 selector: "visitSequenceNode:",
 fn: function (aNode){
@@ -786,7 +736,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitValueNode_",
 smalltalk.method({
 selector: "visitValueNode:",
 fn: function (aNode){
@@ -800,7 +749,6 @@ messageSends: ["visitNode:"]}),
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitVariableNode_",
 smalltalk.method({
 selector: "visitVariableNode:",
 fn: function (aNode){

js/Compiler-Core.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Compiler-Core');
 smalltalk.addClass('AbstractCodeGenerator', smalltalk.Object, ['currentClass', 'source'], 'Compiler-Core');
 smalltalk.AbstractCodeGenerator.comment="I am the abstract super class of all code generators and provide their common API."
 smalltalk.addMethod(
-"_classNameFor_",
 smalltalk.method({
 selector: "classNameFor:",
 category: 'accessing',
@@ -31,7 +30,6 @@ referencedClasses: []
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_compileNode_",
 smalltalk.method({
 selector: "compileNode:",
 category: 'compiling',
@@ -48,7 +46,6 @@ referencedClasses: []
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_currentClass",
 smalltalk.method({
 selector: "currentClass",
 category: 'accessing',
@@ -67,7 +64,6 @@ referencedClasses: []
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_currentClass_",
 smalltalk.method({
 selector: "currentClass:",
 category: 'accessing',
@@ -84,7 +80,6 @@ referencedClasses: []
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_pseudoVariables",
 smalltalk.method({
 selector: "pseudoVariables",
 category: 'accessing',
@@ -103,7 +98,6 @@ referencedClasses: []
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_safeVariableNameFor_",
 smalltalk.method({
 selector: "safeVariableNameFor:",
 category: 'accessing',
@@ -128,7 +122,6 @@ referencedClasses: ["Smalltalk"]
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 category: 'accessing',
@@ -152,7 +145,6 @@ referencedClasses: []
 smalltalk.AbstractCodeGenerator);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 category: 'accessing',
@@ -173,7 +165,6 @@ smalltalk.AbstractCodeGenerator);
 smalltalk.addClass('CodeGenerator', smalltalk.AbstractCodeGenerator, [], 'Compiler-Core');
 smalltalk.CodeGenerator.comment="I am a basic code generator. I generate a valid JavaScript output, but no not perform any inlining.\x0aSee `InliningCodeGenerator` for an optimized JavaScript code generation."
 smalltalk.addMethod(
-"_compileNode_",
 smalltalk.method({
 selector: "compileNode:",
 category: 'compiling',
@@ -198,7 +189,6 @@ referencedClasses: []
 smalltalk.CodeGenerator);
 
 smalltalk.addMethod(
-"_irTranslator",
 smalltalk.method({
 selector: "irTranslator",
 category: 'compiling',
@@ -218,7 +208,6 @@ referencedClasses: ["IRJSTranslator"]
 smalltalk.CodeGenerator);
 
 smalltalk.addMethod(
-"_semanticAnalyzer",
 smalltalk.method({
 selector: "semanticAnalyzer",
 category: 'compiling',
@@ -238,7 +227,6 @@ referencedClasses: ["SemanticAnalyzer"]
 smalltalk.CodeGenerator);
 
 smalltalk.addMethod(
-"_translator",
 smalltalk.method({
 selector: "translator",
 category: 'compiling',
@@ -266,7 +254,6 @@ smalltalk.CodeGenerator);
 smalltalk.addClass('Compiler', smalltalk.Object, ['currentClass', 'source', 'unknownVariables', 'codeGeneratorClass'], 'Compiler-Core');
 smalltalk.Compiler.comment="I provide the public interface for compiling Amber source code into JavaScript.\x0a\x0aThe code generator used to produce JavaScript can be plugged with `#codeGeneratorClass`.\x0aThe default code generator is an instance of `InlinedCodeGenerator`"
 smalltalk.addMethod(
-"_codeGeneratorClass",
 smalltalk.method({
 selector: "codeGeneratorClass",
 category: 'accessing',
@@ -291,7 +278,6 @@ referencedClasses: ["InliningCodeGenerator"]
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_codeGeneratorClass_",
 smalltalk.method({
 selector: "codeGeneratorClass:",
 category: 'accessing',
@@ -308,7 +294,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compile_",
 smalltalk.method({
 selector: "compile:",
 category: 'compiling',
@@ -327,7 +312,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compile_forClass_",
 smalltalk.method({
 selector: "compile:forClass:",
 category: 'compiling',
@@ -348,7 +332,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compileExpression_",
 smalltalk.method({
 selector: "compileExpression:",
 category: 'compiling',
@@ -370,7 +353,6 @@ referencedClasses: ["DoIt"]
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compileExpression_on_",
 smalltalk.method({
 selector: "compileExpression:on:",
 category: 'compiling',
@@ -391,7 +373,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_compileNode_",
 smalltalk.method({
 selector: "compileNode:",
 category: 'compiling',
@@ -417,7 +398,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_currentClass",
 smalltalk.method({
 selector: "currentClass",
 category: 'accessing',
@@ -436,7 +416,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_currentClass_",
 smalltalk.method({
 selector: "currentClass:",
 category: 'accessing',
@@ -453,7 +432,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_eval_",
 smalltalk.method({
 selector: "eval:",
 category: 'compiling',
@@ -470,7 +448,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_evaluateExpression_",
 smalltalk.method({
 selector: "evaluateExpression:",
 category: 'compiling',
@@ -490,7 +467,6 @@ referencedClasses: ["DoIt"]
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_evaluateExpression_on_",
 smalltalk.method({
 selector: "evaluateExpression:on:",
 category: 'compiling',
@@ -515,7 +491,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_install_forClass_category_",
 smalltalk.method({
 selector: "install:forClass:category:",
 category: 'compiling',
@@ -535,7 +510,6 @@ referencedClasses: ["ClassBuilder"]
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_parse_",
 smalltalk.method({
 selector: "parse:",
 category: 'compiling',
@@ -555,7 +529,6 @@ referencedClasses: ["Smalltalk"]
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_parseExpression_",
 smalltalk.method({
 selector: "parseExpression:",
 category: 'compiling',
@@ -574,7 +547,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_recompile_",
 smalltalk.method({
 selector: "recompile:",
 category: 'compiling',
@@ -600,7 +572,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_recompileAll",
 smalltalk.method({
 selector: "recompileAll",
 category: 'compiling',
@@ -630,7 +601,6 @@ referencedClasses: ["Transcript", "Smalltalk"]
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 category: 'accessing',
@@ -654,7 +624,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 category: 'accessing',
@@ -671,7 +640,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_unknownVariables",
 smalltalk.method({
 selector: "unknownVariables",
 category: 'accessing',
@@ -690,7 +658,6 @@ referencedClasses: []
 smalltalk.Compiler);
 
 smalltalk.addMethod(
-"_unknownVariables_",
 smalltalk.method({
 selector: "unknownVariables:",
 category: 'accessing',
@@ -708,7 +675,6 @@ smalltalk.Compiler);
 
 
 smalltalk.addMethod(
-"_recompile_",
 smalltalk.method({
 selector: "recompile:",
 category: 'compiling',
@@ -725,7 +691,6 @@ referencedClasses: []
 smalltalk.Compiler.klass);
 
 smalltalk.addMethod(
-"_recompileAll",
 smalltalk.method({
 selector: "recompileAll",
 category: 'compiling',
@@ -753,7 +718,6 @@ smalltalk.DoIt.comment="`DoIt` is the class used to compile and evaluate express
 smalltalk.addClass('NodeVisitor', smalltalk.Object, [], 'Compiler-Core');
 smalltalk.NodeVisitor.comment="I am the abstract super class of all AST node visitors."
 smalltalk.addMethod(
-"_visit_",
 smalltalk.method({
 selector: "visit:",
 category: 'visiting',
@@ -772,7 +736,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitAll_",
 smalltalk.method({
 selector: "visitAll:",
 category: 'visiting',
@@ -794,7 +757,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitAssignmentNode_",
 smalltalk.method({
 selector: "visitAssignmentNode:",
 category: 'visiting',
@@ -813,7 +775,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitBlockNode_",
 smalltalk.method({
 selector: "visitBlockNode:",
 category: 'visiting',
@@ -832,7 +793,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitBlockSequenceNode_",
 smalltalk.method({
 selector: "visitBlockSequenceNode:",
 category: 'visiting',
@@ -851,7 +811,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitCascadeNode_",
 smalltalk.method({
 selector: "visitCascadeNode:",
 category: 'visiting',
@@ -870,7 +829,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitClassReferenceNode_",
 smalltalk.method({
 selector: "visitClassReferenceNode:",
 category: 'visiting',
@@ -889,7 +847,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitDynamicArrayNode_",
 smalltalk.method({
 selector: "visitDynamicArrayNode:",
 category: 'visiting',
@@ -908,7 +865,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitDynamicDictionaryNode_",
 smalltalk.method({
 selector: "visitDynamicDictionaryNode:",
 category: 'visiting',
@@ -927,7 +883,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitJSStatementNode_",
 smalltalk.method({
 selector: "visitJSStatementNode:",
 category: 'visiting',
@@ -946,7 +901,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitMethodNode_",
 smalltalk.method({
 selector: "visitMethodNode:",
 category: 'visiting',
@@ -965,7 +919,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitNode_",
 smalltalk.method({
 selector: "visitNode:",
 category: 'visiting',
@@ -984,7 +937,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitReturnNode_",
 smalltalk.method({
 selector: "visitReturnNode:",
 category: 'visiting',
@@ -1003,7 +955,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitSendNode_",
 smalltalk.method({
 selector: "visitSendNode:",
 category: 'visiting',
@@ -1022,7 +973,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitSequenceNode_",
 smalltalk.method({
 selector: "visitSequenceNode:",
 category: 'visiting',
@@ -1041,7 +991,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitValueNode_",
 smalltalk.method({
 selector: "visitValueNode:",
 category: 'visiting',
@@ -1060,7 +1009,6 @@ referencedClasses: []
 smalltalk.NodeVisitor);
 
 smalltalk.addMethod(
-"_visitVariableNode_",
 smalltalk.method({
 selector: "visitVariableNode:",
 category: 'visiting',

js/Compiler-Exceptions.deploy.js

@@ -13,7 +13,6 @@ smalltalk.addClass('InliningError', smalltalk.SemanticError, [], 'Compiler-Excep
 
 smalltalk.addClass('InvalidAssignmentError', smalltalk.SemanticError, ['variableName'], 'Compiler-Exceptions');
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 fn: function (){
@@ -27,7 +26,6 @@ messageSends: [",", "variableName"]}),
 smalltalk.InvalidAssignmentError);
 
 smalltalk.addMethod(
-"_variableName",
 smalltalk.method({
 selector: "variableName",
 fn: function (){
@@ -41,7 +39,6 @@ messageSends: []}),
 smalltalk.InvalidAssignmentError);
 
 smalltalk.addMethod(
-"_variableName_",
 smalltalk.method({
 selector: "variableName:",
 fn: function (aString){
@@ -56,7 +53,6 @@ smalltalk.InvalidAssignmentError);
 
 smalltalk.addClass('ShadowingVariableError', smalltalk.SemanticError, ['variableName'], 'Compiler-Exceptions');
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 fn: function (){
@@ -70,7 +66,6 @@ messageSends: [",", "variableName"]}),
 smalltalk.ShadowingVariableError);
 
 smalltalk.addMethod(
-"_variableName",
 smalltalk.method({
 selector: "variableName",
 fn: function (){
@@ -84,7 +79,6 @@ messageSends: []}),
 smalltalk.ShadowingVariableError);
 
 smalltalk.addMethod(
-"_variableName_",
 smalltalk.method({
 selector: "variableName:",
 fn: function (aString){
@@ -99,7 +93,6 @@ smalltalk.ShadowingVariableError);
 
 smalltalk.addClass('UnknownVariableError', smalltalk.SemanticError, ['variableName'], 'Compiler-Exceptions');
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 fn: function (){
@@ -113,7 +106,6 @@ messageSends: [",", "variableName"]}),
 smalltalk.UnknownVariableError);
 
 smalltalk.addMethod(
-"_variableName",
 smalltalk.method({
 selector: "variableName",
 fn: function (){
@@ -127,7 +119,6 @@ messageSends: []}),
 smalltalk.UnknownVariableError);
 
 smalltalk.addMethod(
-"_variableName_",
 smalltalk.method({
 selector: "variableName:",
 fn: function (aString){
@@ -142,7 +133,6 @@ smalltalk.UnknownVariableError);
 
 smalltalk.addClass('RethrowErrorHandler', smalltalk.ErrorHandler, [], 'Compiler-Exceptions');
 smalltalk.addMethod(
-"_basicSignal_",
 smalltalk.method({
 selector: "basicSignal:",
 fn: function (anError){
@@ -154,7 +144,6 @@ messageSends: []}),
 smalltalk.RethrowErrorHandler);
 
 smalltalk.addMethod(
-"_handleError_",
 smalltalk.method({
 selector: "handleError:",
 fn: function (anError){

js/Compiler-Exceptions.js

@@ -18,7 +18,6 @@ smalltalk.InliningError.comment="Instances of InliningError are signaled when us
 smalltalk.addClass('InvalidAssignmentError', smalltalk.SemanticError, ['variableName'], 'Compiler-Exceptions');
 smalltalk.InvalidAssignmentError.comment="I get signaled when a pseudo variable gets assigned."
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 category: 'accessing',
@@ -37,7 +36,6 @@ referencedClasses: []
 smalltalk.InvalidAssignmentError);
 
 smalltalk.addMethod(
-"_variableName",
 smalltalk.method({
 selector: "variableName",
 category: 'accessing',
@@ -56,7 +54,6 @@ referencedClasses: []
 smalltalk.InvalidAssignmentError);
 
 smalltalk.addMethod(
-"_variableName_",
 smalltalk.method({
 selector: "variableName:",
 category: 'accessing',
@@ -77,7 +74,6 @@ smalltalk.InvalidAssignmentError);
 smalltalk.addClass('ShadowingVariableError', smalltalk.SemanticError, ['variableName'], 'Compiler-Exceptions');
 smalltalk.ShadowingVariableError.comment="I get signaled when a variable in a block or method scope shadows a variable of the same name in an outer scope."
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 category: 'accessing',
@@ -96,7 +92,6 @@ referencedClasses: []
 smalltalk.ShadowingVariableError);
 
 smalltalk.addMethod(
-"_variableName",
 smalltalk.method({
 selector: "variableName",
 category: 'accessing',
@@ -115,7 +110,6 @@ referencedClasses: []
 smalltalk.ShadowingVariableError);
 
 smalltalk.addMethod(
-"_variableName_",
 smalltalk.method({
 selector: "variableName:",
 category: 'accessing',
@@ -136,7 +130,6 @@ smalltalk.ShadowingVariableError);
 smalltalk.addClass('UnknownVariableError', smalltalk.SemanticError, ['variableName'], 'Compiler-Exceptions');
 smalltalk.UnknownVariableError.comment="I get signaled when a variable is not defined.\x0aThe default behavior is to allow it, as this is how Amber currently is able to seamlessly send messages to JavaScript objects."
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 category: 'accessing',
@@ -155,7 +148,6 @@ referencedClasses: []
 smalltalk.UnknownVariableError);
 
 smalltalk.addMethod(
-"_variableName",
 smalltalk.method({
 selector: "variableName",
 category: 'accessing',
@@ -174,7 +166,6 @@ referencedClasses: []
 smalltalk.UnknownVariableError);
 
 smalltalk.addMethod(
-"_variableName_",
 smalltalk.method({
 selector: "variableName:",
 category: 'accessing',
@@ -195,7 +186,6 @@ smalltalk.UnknownVariableError);
 smalltalk.addClass('RethrowErrorHandler', smalltalk.ErrorHandler, [], 'Compiler-Exceptions');
 smalltalk.RethrowErrorHandler.comment="This class is used in the commandline version of the compiler.\x0aIt uses the handleError: message of ErrorHandler for printing the stacktrace and throws the error again as JS exception.\x0aAs a result Smalltalk errors are not swallowd by the Amber runtime and compilation can be aborted."
 smalltalk.addMethod(
-"_basicSignal_",
 smalltalk.method({
 selector: "basicSignal:",
 category: 'error handling',
@@ -212,7 +202,6 @@ referencedClasses: []
 smalltalk.RethrowErrorHandler);
 
 smalltalk.addMethod(
-"_handleError_",
 smalltalk.method({
 selector: "handleError:",
 category: 'error handling',

js/Compiler-Inlining.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Compiler-Inlining');
 smalltalk.addClass('IRInlinedAssignment', smalltalk.IRAssignment, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -15,7 +14,6 @@ messageSends: ["visitIRInlinedAssignment:"]}),
 smalltalk.IRInlinedAssignment);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 fn: function (){
@@ -30,7 +28,6 @@ smalltalk.IRInlinedAssignment);
 
 smalltalk.addClass('IRInlinedClosure', smalltalk.IRClosure, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -42,7 +39,6 @@ messageSends: ["visitIRInlinedClosure:"]}),
 smalltalk.IRInlinedClosure);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 fn: function (){
@@ -57,7 +53,6 @@ smalltalk.IRInlinedClosure);
 
 smalltalk.addClass('IRInlinedReturn', smalltalk.IRReturn, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -71,7 +66,6 @@ messageSends: ["visitIRInlinedReturn:"]}),
 smalltalk.IRInlinedReturn);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 fn: function (){
@@ -86,7 +80,6 @@ smalltalk.IRInlinedReturn);
 
 smalltalk.addClass('IRInlinedSend', smalltalk.IRSend, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -98,7 +91,6 @@ messageSends: ["visitInlinedSend:"]}),
 smalltalk.IRInlinedSend);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 fn: function (){
@@ -113,7 +105,6 @@ smalltalk.IRInlinedSend);
 
 smalltalk.addClass('IRInlinedIfFalse', smalltalk.IRInlinedSend, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -128,7 +119,6 @@ smalltalk.IRInlinedIfFalse);
 
 smalltalk.addClass('IRInlinedIfNilIfNotNil', smalltalk.IRInlinedSend, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -143,7 +133,6 @@ smalltalk.IRInlinedIfNilIfNotNil);
 
 smalltalk.addClass('IRInlinedIfTrue', smalltalk.IRInlinedSend, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -158,7 +147,6 @@ smalltalk.IRInlinedIfTrue);
 
 smalltalk.addClass('IRInlinedIfTrueIfFalse', smalltalk.IRInlinedSend, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -173,7 +161,6 @@ smalltalk.IRInlinedIfTrueIfFalse);
 
 smalltalk.addClass('IRInlinedSequence', smalltalk.IRBlockSequence, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 fn: function (aVisitor){
@@ -185,7 +172,6 @@ messageSends: ["visitIRInlinedSequence:"]}),
 smalltalk.IRInlinedSequence);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 fn: function (){
@@ -200,7 +186,6 @@ smalltalk.IRInlinedSequence);
 
 smalltalk.addClass('IRInliner', smalltalk.IRVisitor, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_assignmentInliner",
 smalltalk.method({
 selector: "assignmentInliner",
 fn: function (){
@@ -218,7 +203,6 @@ messageSends: ["translator:", "new", "yourself"]}),
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_returnInliner",
 smalltalk.method({
 selector: "returnInliner",
 fn: function (){
@@ -236,7 +220,6 @@ messageSends: ["translator:", "new", "yourself"]}),
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_sendInliner",
 smalltalk.method({
 selector: "sendInliner",
 fn: function (){
@@ -254,7 +237,6 @@ messageSends: ["translator:", "new", "yourself"]}),
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_shouldInlineAssignment_",
 smalltalk.method({
 selector: "shouldInlineAssignment:",
 fn: function (anIRAssignment){
@@ -274,7 +256,6 @@ messageSends: ["and:", "shouldInlineSend:", "last", "instructions", "isSend", "n
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_shouldInlineReturn_",
 smalltalk.method({
 selector: "shouldInlineReturn:",
 fn: function (anIRReturn){
@@ -294,7 +275,6 @@ messageSends: ["and:", "shouldInlineSend:", "first", "instructions", "isSend", "
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_shouldInlineSend_",
 smalltalk.method({
 selector: "shouldInlineSend:",
 fn: function (anIRSend){
@@ -312,7 +292,6 @@ messageSends: ["and:", "shouldInline:", "not", "isInlined"]}),
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_transformNonLocalReturn_",
 smalltalk.method({
 selector: "transformNonLocalReturn:",
 fn: function (anIRNonLocalReturn){
@@ -344,7 +323,6 @@ messageSends: ["ifTrue:", "removeNonLocalReturn:", "scope", "methodScope", "scop
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_visitIRAssignment_",
 smalltalk.method({
 selector: "visitIRAssignment:",
 fn: function (anIRAssignment){
@@ -363,7 +341,6 @@ messageSends: ["ifTrue:ifFalse:", "inlineAssignment:", "assignmentInliner", "vis
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_visitIRNonLocalReturn_",
 smalltalk.method({
 selector: "visitIRNonLocalReturn:",
 fn: function (anIRNonLocalReturn){
@@ -377,7 +354,6 @@ messageSends: ["transformNonLocalReturn:"]}),
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_visitIRReturn_",
 smalltalk.method({
 selector: "visitIRReturn:",
 fn: function (anIRReturn){
@@ -396,7 +372,6 @@ messageSends: ["ifTrue:ifFalse:", "inlineReturn:", "returnInliner", "visitIRRetu
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_visitIRSend_",
 smalltalk.method({
 selector: "visitIRSend:",
 fn: function (anIRSend){
@@ -418,7 +393,6 @@ smalltalk.IRInliner);
 
 smalltalk.addClass('IRInliningJSTranslator', smalltalk.IRJSTranslator, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_visitIRInlinedAssignment_",
 smalltalk.method({
 selector: "visitIRInlinedAssignment:",
 fn: function (anIRInlinedAssignment){
@@ -430,7 +404,6 @@ messageSends: ["visit:", "last", "instructions"]}),
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedClosure_",
 smalltalk.method({
 selector: "visitIRInlinedClosure:",
 fn: function (anIRInlinedClosure){
@@ -449,7 +422,6 @@ messageSends: ["nextPutVars:", "collect:", "asVariableName", "name", "tempDeclar
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfFalse_",
 smalltalk.method({
 selector: "visitIRInlinedIfFalse:",
 fn: function (anIRInlinedIfFalse){
@@ -469,7 +441,6 @@ messageSends: ["nextPutIf:with:", "nextPutAll:", "stream", "visit:", "first", "i
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfNil_",
 smalltalk.method({
 selector: "visitIRInlinedIfNil:",
 fn: function (anIRInlinedIfNil){
@@ -489,7 +460,6 @@ messageSends: ["nextPutIf:with:", "nextPutAll:", "stream", "visit:", "first", "i
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfNilIfNotNil_",
 smalltalk.method({
 selector: "visitIRInlinedIfNilIfNotNil:",
 fn: function (anIRInlinedIfNilIfNotNil){
@@ -512,7 +482,6 @@ messageSends: ["nextPutIfElse:with:with:", "nextPutAll:", "stream", "visit:", "f
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfTrue_",
 smalltalk.method({
 selector: "visitIRInlinedIfTrue:",
 fn: function (anIRInlinedIfTrue){
@@ -532,7 +501,6 @@ messageSends: ["nextPutIf:with:", "nextPutAll:", "stream", "visit:", "first", "i
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfTrueIfFalse_",
 smalltalk.method({
 selector: "visitIRInlinedIfTrueIfFalse:",
 fn: function (anIRInlinedIfTrueIfFalse){
@@ -555,7 +523,6 @@ messageSends: ["nextPutIfElse:with:with:", "nextPutAll:", "stream", "visit:", "f
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedNonLocalReturn_",
 smalltalk.method({
 selector: "visitIRInlinedNonLocalReturn:",
 fn: function (anIRInlinedReturn){
@@ -573,7 +540,6 @@ messageSends: ["nextPutStatementWith:", "visit:", "last", "instructions", "strea
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedReturn_",
 smalltalk.method({
 selector: "visitIRInlinedReturn:",
 fn: function (anIRInlinedReturn){
@@ -585,7 +551,6 @@ messageSends: ["visit:", "last", "instructions"]}),
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedSequence_",
 smalltalk.method({
 selector: "visitIRInlinedSequence:",
 fn: function (anIRInlinedSequence){
@@ -606,7 +571,6 @@ smalltalk.IRInliningJSTranslator);
 
 smalltalk.addClass('IRSendInliner', smalltalk.Object, ['send', 'translator'], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_ifFalse_",
 smalltalk.method({
 selector: "ifFalse:",
 fn: function (anIRInstruction){
@@ -621,7 +585,6 @@ messageSends: ["inlinedSend:with:", "new"]}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifFalse_ifTrue_",
 smalltalk.method({
 selector: "ifFalse:ifTrue:",
 fn: function (anIRInstruction,anotherIRInstruction){
@@ -635,7 +598,6 @@ messageSends: ["perform:withArguments:"]}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifNil_",
 smalltalk.method({
 selector: "ifNil:",
 fn: function (anIRInstruction){
@@ -659,7 +621,6 @@ messageSends: ["inlinedSend:with:with:", "new", "scope:", "copy", "scope", "add:
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifNil_ifNotNil_",
 smalltalk.method({
 selector: "ifNil:ifNotNil:",
 fn: function (anIRInstruction,anotherIRInstruction){
@@ -674,7 +635,6 @@ messageSends: ["inlinedSend:with:with:", "new"]}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifNotNil_",
 smalltalk.method({
 selector: "ifNotNil:",
 fn: function (anIRInstruction){
@@ -698,7 +658,6 @@ messageSends: ["inlinedSend:with:with:", "new", "scope:", "copy", "scope", "add:
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifNotNil_ifNil_",
 smalltalk.method({
 selector: "ifNotNil:ifNil:",
 fn: function (anIRInstruction,anotherIRInstruction){
@@ -713,7 +672,6 @@ messageSends: ["inlinedSend:with:with:", "new"]}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifTrue_",
 smalltalk.method({
 selector: "ifTrue:",
 fn: function (anIRInstruction){
@@ -728,7 +686,6 @@ messageSends: ["inlinedSend:with:", "new"]}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifTrue_ifFalse_",
 smalltalk.method({
 selector: "ifTrue:ifFalse:",
 fn: function (anIRInstruction,anotherIRInstruction){
@@ -743,7 +700,6 @@ messageSends: ["inlinedSend:with:with:", "new"]}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlineClosure_",
 smalltalk.method({
 selector: "inlineClosure:",
 fn: function (anIRClosure){
@@ -807,7 +763,6 @@ messageSends: ["inlinedClosure", "scope:", "scope", "do:", "add:", "tempDeclarat
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlineSend_",
 smalltalk.method({
 selector: "inlineSend:",
 fn: function (anIRSend){
@@ -822,7 +777,6 @@ messageSends: ["send:", "perform:withArguments:", "selector", "send", "allButFir
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlinedClosure",
 smalltalk.method({
 selector: "inlinedClosure",
 fn: function (){
@@ -837,7 +791,6 @@ messageSends: ["new"]}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlinedSend_with_",
 smalltalk.method({
 selector: "inlinedSend:with:",
 fn: function (inlinedSend,anIRInstruction){
@@ -865,7 +818,6 @@ messageSends: ["ifFalse:", "inliningError:", "isClosure", "=", "size", "argument
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlinedSend_with_with_",
 smalltalk.method({
 selector: "inlinedSend:with:with:",
 fn: function (inlinedSend,anIRInstruction,anotherIRInstruction){
@@ -895,7 +847,6 @@ messageSends: ["ifFalse:", "inliningError:", "isClosure", "visit:", "inlineClosu
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlinedSequence",
 smalltalk.method({
 selector: "inlinedSequence",
 fn: function (){
@@ -910,7 +861,6 @@ messageSends: ["new"]}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inliningError_",
 smalltalk.method({
 selector: "inliningError:",
 fn: function (aString){
@@ -923,7 +873,6 @@ messageSends: ["signal:"]}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_send",
 smalltalk.method({
 selector: "send",
 fn: function (){
@@ -937,7 +886,6 @@ messageSends: []}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_send_",
 smalltalk.method({
 selector: "send:",
 fn: function (anIRSend){
@@ -949,7 +897,6 @@ messageSends: []}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_translator",
 smalltalk.method({
 selector: "translator",
 fn: function (){
@@ -963,7 +910,6 @@ messageSends: []}),
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_translator_",
 smalltalk.method({
 selector: "translator:",
 fn: function (anASTTranslator){
@@ -976,7 +922,6 @@ smalltalk.IRSendInliner);
 
 
 smalltalk.addMethod(
-"_inlinedSelectors",
 smalltalk.method({
 selector: "inlinedSelectors",
 fn: function (){
@@ -990,7 +935,6 @@ messageSends: []}),
 smalltalk.IRSendInliner.klass);
 
 smalltalk.addMethod(
-"_shouldInline_",
 smalltalk.method({
 selector: "shouldInline:",
 fn: function (anIRInstruction){
@@ -1020,7 +964,6 @@ smalltalk.IRSendInliner.klass);
 
 smalltalk.addClass('IRAssignmentInliner', smalltalk.IRSendInliner, ['assignment'], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_assignment",
 smalltalk.method({
 selector: "assignment",
 fn: function (){
@@ -1034,7 +977,6 @@ messageSends: []}),
 smalltalk.IRAssignmentInliner);
 
 smalltalk.addMethod(
-"_assignment_",
 smalltalk.method({
 selector: "assignment:",
 fn: function (aNode){
@@ -1046,7 +988,6 @@ messageSends: []}),
 smalltalk.IRAssignmentInliner);
 
 smalltalk.addMethod(
-"_inlineAssignment_",
 smalltalk.method({
 selector: "inlineAssignment:",
 fn: function (anIRAssignment){
@@ -1070,7 +1011,6 @@ messageSends: ["assignment:", "new", "do:", "add:", "instructions", "replaceWith
 smalltalk.IRAssignmentInliner);
 
 smalltalk.addMethod(
-"_inlineClosure_",
 smalltalk.method({
 selector: "inlineClosure:",
 fn: function (anIRClosure){
@@ -1102,7 +1042,6 @@ smalltalk.IRAssignmentInliner);
 
 smalltalk.addClass('IRReturnInliner', smalltalk.IRSendInliner, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_inlineClosure_",
 smalltalk.method({
 selector: "inlineClosure:",
 fn: function (anIRClosure){
@@ -1130,7 +1069,6 @@ messageSends: ["inlineClosure:", "instructions", "last", "ifNotEmpty:", "ifFalse
 smalltalk.IRReturnInliner);
 
 smalltalk.addMethod(
-"_inlineReturn_",
 smalltalk.method({
 selector: "inlineReturn:",
 fn: function (anIRReturn){
@@ -1152,7 +1090,6 @@ messageSends: ["inlinedReturn", "do:", "add:", "instructions", "replaceWith:", "
 smalltalk.IRReturnInliner);
 
 smalltalk.addMethod(
-"_inlinedReturn",
 smalltalk.method({
 selector: "inlinedReturn",
 fn: function (){
@@ -1170,7 +1107,6 @@ smalltalk.IRReturnInliner);
 
 smalltalk.addClass('InliningCodeGenerator', smalltalk.CodeGenerator, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_compileNode_",
 smalltalk.method({
 selector: "compileNode:",
 fn: function (aNode){
@@ -1191,7 +1127,6 @@ messageSends: ["visit:", "semanticAnalyzer", "translator", "inliner", "irTransla
 smalltalk.InliningCodeGenerator);
 
 smalltalk.addMethod(
-"_inliner",
 smalltalk.method({
 selector: "inliner",
 fn: function (){
@@ -1206,7 +1141,6 @@ messageSends: ["new"]}),
 smalltalk.InliningCodeGenerator);
 
 smalltalk.addMethod(
-"_irTranslator",
 smalltalk.method({
 selector: "irTranslator",
 fn: function (){

js/Compiler-Inlining.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Compiler-Inlining');
 smalltalk.addClass('IRInlinedAssignment', smalltalk.IRAssignment, [], 'Compiler-Inlining');
 smalltalk.IRInlinedAssignment.comment="I represent an inlined assignment instruction."
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -21,7 +20,6 @@ referencedClasses: []
 smalltalk.IRInlinedAssignment);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 category: 'testing',
@@ -42,7 +40,6 @@ smalltalk.IRInlinedAssignment);
 smalltalk.addClass('IRInlinedClosure', smalltalk.IRClosure, [], 'Compiler-Inlining');
 smalltalk.IRInlinedClosure.comment="I represent an inlined closure instruction."
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -59,7 +56,6 @@ referencedClasses: []
 smalltalk.IRInlinedClosure);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 category: 'testing',
@@ -80,7 +76,6 @@ smalltalk.IRInlinedClosure);
 smalltalk.addClass('IRInlinedReturn', smalltalk.IRReturn, [], 'Compiler-Inlining');
 smalltalk.IRInlinedReturn.comment="I represent an inlined local return instruction."
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -99,7 +94,6 @@ referencedClasses: []
 smalltalk.IRInlinedReturn);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 category: 'testing',
@@ -120,7 +114,6 @@ smalltalk.IRInlinedReturn);
 smalltalk.addClass('IRInlinedSend', smalltalk.IRSend, [], 'Compiler-Inlining');
 smalltalk.IRInlinedSend.comment="I am the abstract super class of inlined message send instructions."
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -137,7 +130,6 @@ referencedClasses: []
 smalltalk.IRInlinedSend);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 category: 'testing',
@@ -157,7 +149,6 @@ smalltalk.IRInlinedSend);
 
 smalltalk.addClass('IRInlinedIfFalse', smalltalk.IRInlinedSend, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -177,7 +168,6 @@ smalltalk.IRInlinedIfFalse);
 
 smalltalk.addClass('IRInlinedIfNilIfNotNil', smalltalk.IRInlinedSend, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -197,7 +187,6 @@ smalltalk.IRInlinedIfNilIfNotNil);
 
 smalltalk.addClass('IRInlinedIfTrue', smalltalk.IRInlinedSend, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -217,7 +206,6 @@ smalltalk.IRInlinedIfTrue);
 
 smalltalk.addClass('IRInlinedIfTrueIfFalse', smalltalk.IRInlinedSend, [], 'Compiler-Inlining');
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -238,7 +226,6 @@ smalltalk.IRInlinedIfTrueIfFalse);
 smalltalk.addClass('IRInlinedSequence', smalltalk.IRBlockSequence, [], 'Compiler-Inlining');
 smalltalk.IRInlinedSequence.comment="I represent a (block) sequence inside an inlined closure instruction (instance of `IRInlinedClosure`)."
 smalltalk.addMethod(
-"_accept_",
 smalltalk.method({
 selector: "accept:",
 category: 'visiting',
@@ -255,7 +242,6 @@ referencedClasses: []
 smalltalk.IRInlinedSequence);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 category: 'testing',
@@ -276,7 +262,6 @@ smalltalk.IRInlinedSequence);
 smalltalk.addClass('IRInliner', smalltalk.IRVisitor, [], 'Compiler-Inlining');
 smalltalk.IRInliner.comment="I visit an IR tree, inlining message sends and block closures.\x0a\x0aMessage selectors that can be inlined are answered by `IRSendInliner >> #inlinedSelectors`"
 smalltalk.addMethod(
-"_assignmentInliner",
 smalltalk.method({
 selector: "assignmentInliner",
 category: 'factory',
@@ -299,7 +284,6 @@ referencedClasses: ["IRAssignmentInliner"]
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_returnInliner",
 smalltalk.method({
 selector: "returnInliner",
 category: 'factory',
@@ -322,7 +306,6 @@ referencedClasses: ["IRReturnInliner"]
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_sendInliner",
 smalltalk.method({
 selector: "sendInliner",
 category: 'factory',
@@ -345,7 +328,6 @@ referencedClasses: ["IRSendInliner"]
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_shouldInlineAssignment_",
 smalltalk.method({
 selector: "shouldInlineAssignment:",
 category: 'testing',
@@ -370,7 +352,6 @@ referencedClasses: []
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_shouldInlineReturn_",
 smalltalk.method({
 selector: "shouldInlineReturn:",
 category: 'testing',
@@ -395,7 +376,6 @@ referencedClasses: []
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_shouldInlineSend_",
 smalltalk.method({
 selector: "shouldInlineSend:",
 category: 'testing',
@@ -418,7 +398,6 @@ referencedClasses: ["IRSendInliner"]
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_transformNonLocalReturn_",
 smalltalk.method({
 selector: "transformNonLocalReturn:",
 category: 'visiting',
@@ -455,7 +434,6 @@ referencedClasses: ["IRReturn"]
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_visitIRAssignment_",
 smalltalk.method({
 selector: "visitIRAssignment:",
 category: 'visiting',
@@ -479,7 +457,6 @@ referencedClasses: []
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_visitIRNonLocalReturn_",
 smalltalk.method({
 selector: "visitIRNonLocalReturn:",
 category: 'visiting',
@@ -498,7 +475,6 @@ referencedClasses: []
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_visitIRReturn_",
 smalltalk.method({
 selector: "visitIRReturn:",
 category: 'visiting',
@@ -522,7 +498,6 @@ referencedClasses: []
 smalltalk.IRInliner);
 
 smalltalk.addMethod(
-"_visitIRSend_",
 smalltalk.method({
 selector: "visitIRSend:",
 category: 'visiting',
@@ -550,7 +525,6 @@ smalltalk.IRInliner);
 smalltalk.addClass('IRInliningJSTranslator', smalltalk.IRJSTranslator, [], 'Compiler-Inlining');
 smalltalk.IRInliningJSTranslator.comment="I am a specialized JavaScript translator able to write inlined IR instructions to JavaScript stream (`JSStream` instance)."
 smalltalk.addMethod(
-"_visitIRInlinedAssignment_",
 smalltalk.method({
 selector: "visitIRInlinedAssignment:",
 category: 'visiting',
@@ -567,7 +541,6 @@ referencedClasses: []
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedClosure_",
 smalltalk.method({
 selector: "visitIRInlinedClosure:",
 category: 'visiting',
@@ -591,7 +564,6 @@ referencedClasses: []
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfFalse_",
 smalltalk.method({
 selector: "visitIRInlinedIfFalse:",
 category: 'visiting',
@@ -616,7 +588,6 @@ referencedClasses: []
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfNil_",
 smalltalk.method({
 selector: "visitIRInlinedIfNil:",
 category: 'visiting',
@@ -641,7 +612,6 @@ referencedClasses: []
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfNilIfNotNil_",
 smalltalk.method({
 selector: "visitIRInlinedIfNilIfNotNil:",
 category: 'visiting',
@@ -669,7 +639,6 @@ referencedClasses: []
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfTrue_",
 smalltalk.method({
 selector: "visitIRInlinedIfTrue:",
 category: 'visiting',
@@ -694,7 +663,6 @@ referencedClasses: []
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedIfTrueIfFalse_",
 smalltalk.method({
 selector: "visitIRInlinedIfTrueIfFalse:",
 category: 'visiting',
@@ -722,7 +690,6 @@ referencedClasses: []
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedNonLocalReturn_",
 smalltalk.method({
 selector: "visitIRInlinedNonLocalReturn:",
 category: 'visiting',
@@ -745,7 +712,6 @@ referencedClasses: []
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedReturn_",
 smalltalk.method({
 selector: "visitIRInlinedReturn:",
 category: 'visiting',
@@ -762,7 +728,6 @@ referencedClasses: []
 smalltalk.IRInliningJSTranslator);
 
 smalltalk.addMethod(
-"_visitIRInlinedSequence_",
 smalltalk.method({
 selector: "visitIRInlinedSequence:",
 category: 'visiting',
@@ -789,7 +754,6 @@ smalltalk.IRInliningJSTranslator);
 smalltalk.addClass('IRSendInliner', smalltalk.Object, ['send', 'translator'], 'Compiler-Inlining');
 smalltalk.IRSendInliner.comment="I inline some message sends and block closure arguments. I heavily rely on #perform: to dispatch inlining methods."
 smalltalk.addMethod(
-"_ifFalse_",
 smalltalk.method({
 selector: "ifFalse:",
 category: 'inlining',
@@ -809,7 +773,6 @@ referencedClasses: ["IRInlinedIfFalse"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifFalse_ifTrue_",
 smalltalk.method({
 selector: "ifFalse:ifTrue:",
 category: 'inlining',
@@ -828,7 +791,6 @@ referencedClasses: []
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifNil_",
 smalltalk.method({
 selector: "ifNil:",
 category: 'inlining',
@@ -857,7 +819,6 @@ referencedClasses: ["IRInlinedIfNilIfNotNil", "IRClosure", "IRBlockSequence"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifNil_ifNotNil_",
 smalltalk.method({
 selector: "ifNil:ifNotNil:",
 category: 'inlining',
@@ -877,7 +838,6 @@ referencedClasses: ["IRInlinedIfNilIfNotNil"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifNotNil_",
 smalltalk.method({
 selector: "ifNotNil:",
 category: 'inlining',
@@ -906,7 +866,6 @@ referencedClasses: ["IRInlinedIfNilIfNotNil", "IRClosure", "IRBlockSequence"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifNotNil_ifNil_",
 smalltalk.method({
 selector: "ifNotNil:ifNil:",
 category: 'inlining',
@@ -926,7 +885,6 @@ referencedClasses: ["IRInlinedIfNilIfNotNil"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifTrue_",
 smalltalk.method({
 selector: "ifTrue:",
 category: 'inlining',
@@ -946,7 +904,6 @@ referencedClasses: ["IRInlinedIfTrue"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_ifTrue_ifFalse_",
 smalltalk.method({
 selector: "ifTrue:ifFalse:",
 category: 'inlining',
@@ -966,7 +923,6 @@ referencedClasses: ["IRInlinedIfTrueIfFalse"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlineClosure_",
 smalltalk.method({
 selector: "inlineClosure:",
 category: 'inlining',
@@ -1035,7 +991,6 @@ referencedClasses: ["IRTempDeclaration", "AliasVar", "IRVariable", "IRAssignment
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlineSend_",
 smalltalk.method({
 selector: "inlineSend:",
 category: 'inlining',
@@ -1055,7 +1010,6 @@ referencedClasses: []
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlinedClosure",
 smalltalk.method({
 selector: "inlinedClosure",
 category: 'factory',
@@ -1075,7 +1029,6 @@ referencedClasses: ["IRInlinedClosure"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlinedSend_with_",
 smalltalk.method({
 selector: "inlinedSend:with:",
 category: 'inlining',
@@ -1108,7 +1061,6 @@ referencedClasses: []
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlinedSend_with_with_",
 smalltalk.method({
 selector: "inlinedSend:with:with:",
 category: 'inlining',
@@ -1143,7 +1095,6 @@ referencedClasses: []
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inlinedSequence",
 smalltalk.method({
 selector: "inlinedSequence",
 category: 'factory',
@@ -1163,7 +1114,6 @@ referencedClasses: ["IRInlinedSequence"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_inliningError_",
 smalltalk.method({
 selector: "inliningError:",
 category: 'error handling',
@@ -1181,7 +1131,6 @@ referencedClasses: ["InliningError"]
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_send",
 smalltalk.method({
 selector: "send",
 category: 'accessing',
@@ -1200,7 +1149,6 @@ referencedClasses: []
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_send_",
 smalltalk.method({
 selector: "send:",
 category: 'accessing',
@@ -1217,7 +1165,6 @@ referencedClasses: []
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_translator",
 smalltalk.method({
 selector: "translator",
 category: 'accessing',
@@ -1236,7 +1183,6 @@ referencedClasses: []
 smalltalk.IRSendInliner);
 
 smalltalk.addMethod(
-"_translator_",
 smalltalk.method({
 selector: "translator:",
 category: 'accessing',
@@ -1254,7 +1200,6 @@ smalltalk.IRSendInliner);
 
 
 smalltalk.addMethod(
-"_inlinedSelectors",
 smalltalk.method({
 selector: "inlinedSelectors",
 category: 'accessing',
@@ -1273,7 +1218,6 @@ referencedClasses: []
 smalltalk.IRSendInliner.klass);
 
 smalltalk.addMethod(
-"_shouldInline_",
 smalltalk.method({
 selector: "shouldInline:",
 category: 'accessing',
@@ -1309,7 +1253,6 @@ smalltalk.IRSendInliner.klass);
 smalltalk.addClass('IRAssignmentInliner', smalltalk.IRSendInliner, ['assignment'], 'Compiler-Inlining');
 smalltalk.IRAssignmentInliner.comment="I inline message sends together with assignments by moving them around into the inline closure instructions.\x0a\x0a##Example\x0a\x0a\x09foo\x0a\x09\x09| a |\x0a\x09\x09a := true ifTrue: [ 1 ]\x0a\x0aWill produce:\x0a\x0a\x09if(smalltalk.assert(true) {\x0a\x09\x09a = 1;\x0a\x09};"
 smalltalk.addMethod(
-"_assignment",
 smalltalk.method({
 selector: "assignment",
 category: 'accessing',
@@ -1328,7 +1271,6 @@ referencedClasses: []
 smalltalk.IRAssignmentInliner);
 
 smalltalk.addMethod(
-"_assignment_",
 smalltalk.method({
 selector: "assignment:",
 category: 'accessing',
@@ -1345,7 +1287,6 @@ referencedClasses: []
 smalltalk.IRAssignmentInliner);
 
 smalltalk.addMethod(
-"_inlineAssignment_",
 smalltalk.method({
 selector: "inlineAssignment:",
 category: 'inlining',
@@ -1374,7 +1315,6 @@ referencedClasses: ["IRInlinedAssignment"]
 smalltalk.IRAssignmentInliner);
 
 smalltalk.addMethod(
-"_inlineClosure_",
 smalltalk.method({
 selector: "inlineClosure:",
 category: 'inlining',
@@ -1412,7 +1352,6 @@ smalltalk.IRAssignmentInliner);
 smalltalk.addClass('IRReturnInliner', smalltalk.IRSendInliner, [], 'Compiler-Inlining');
 smalltalk.IRReturnInliner.comment="I inline message sends with inlined closure together with a return instruction."
 smalltalk.addMethod(
-"_inlineClosure_",
 smalltalk.method({
 selector: "inlineClosure:",
 category: 'inlining',
@@ -1445,7 +1384,6 @@ referencedClasses: ["IRReturn"]
 smalltalk.IRReturnInliner);
 
 smalltalk.addMethod(
-"_inlineReturn_",
 smalltalk.method({
 selector: "inlineReturn:",
 category: 'inlining',
@@ -1472,7 +1410,6 @@ referencedClasses: []
 smalltalk.IRReturnInliner);
 
 smalltalk.addMethod(
-"_inlinedReturn",
 smalltalk.method({
 selector: "inlinedReturn",
 category: 'factory',
@@ -1496,7 +1433,6 @@ smalltalk.IRReturnInliner);
 smalltalk.addClass('InliningCodeGenerator', smalltalk.CodeGenerator, [], 'Compiler-Inlining');
 smalltalk.InliningCodeGenerator.comment="I am a specialized code generator that uses inlining to produce more optimized JavaScript output"
 smalltalk.addMethod(
-"_compileNode_",
 smalltalk.method({
 selector: "compileNode:",
 category: 'compiling',
@@ -1522,7 +1458,6 @@ referencedClasses: []
 smalltalk.InliningCodeGenerator);
 
 smalltalk.addMethod(
-"_inliner",
 smalltalk.method({
 selector: "inliner",
 category: 'compiling',
@@ -1542,7 +1477,6 @@ referencedClasses: ["IRInliner"]
 smalltalk.InliningCodeGenerator);
 
 smalltalk.addMethod(
-"_irTranslator",
 smalltalk.method({
 selector: "irTranslator",
 category: 'compiling',

js/Compiler-Interpreter.deploy.js

@@ -1,10 +1,9 @@
 smalltalk.addPackage('Compiler-Interpreter');
 smalltalk.addClass('AIContext', smalltalk.NodeVisitor, ['outerContext', 'pc', 'locals', 'method'], 'Compiler-Interpreter');
 smalltalk.addMethod(
-"_initializeFromMethodContext_",
 smalltalk.method({
 selector: "initializeFromMethodContext:",
-fn: function (aMethodContext) {
+fn: function (aMethodContext){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
@@ -21,12 +20,11 @@ _st(_st(aMethodContext)._locals())._keysAndValuesDo_((function(key,value){
 return smalltalk.withContext(function($ctx2) {
 return _st(_st(self)._locals())._at_put_(key,value);
 }, function($ctx2) {$ctx2.fillBlock({key:key,value:value},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"initializeFromMethodContext:",{aMethodContext:aMethodContext},smalltalk.AIContext)});},
+return self}, function($ctx1) {$ctx1.fill(self,"initializeFromMethodContext:",{aMethodContext:aMethodContext},smalltalk.AIContext)})},
 messageSends: ["pc:", "pc", "receiver:", "receiver", "method:", "method", "ifNotNil:", "outerContext:", "fromMethodContext:", "outerContext", "class", "keysAndValuesDo:", "at:put:", "locals"]}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_initializeLocals",
 smalltalk.method({
 selector: "initializeLocals",
 fn: function (){
@@ -40,10 +38,9 @@ messageSends: ["new", "at:put:"]}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_localAt_",
 smalltalk.method({
 selector: "localAt:",
-fn: function (aString) {
+fn: function (aString){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
@@ -52,24 +49,22 @@ return smalltalk.withContext(function($ctx2) {
 return nil;
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"localAt:",{aString:aString},smalltalk.AIContext)});},
+}, function($ctx1) {$ctx1.fill(self,"localAt:",{aString:aString},smalltalk.AIContext)})},
 messageSends: ["at:ifAbsent:", "locals"]}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_localAt_put_",
 smalltalk.method({
 selector: "localAt:put:",
-fn: function (aString, anObject) {
+fn: function (aString,anObject){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(_st(self)._locals())._at_put_(aString,anObject);
-return self}, function($ctx1) {$ctx1.fill(self,"localAt:put:",{aString:aString,anObject:anObject},smalltalk.AIContext)});},
+return self}, function($ctx1) {$ctx1.fill(self,"localAt:put:",{aString:aString,anObject:anObject},smalltalk.AIContext)})},
 messageSends: ["at:put:", "locals"]}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_locals",
 smalltalk.method({
 selector: "locals",
 fn: function (){
@@ -89,62 +84,57 @@ messageSends: ["ifNil:", "initializeLocals"]}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_method",
 smalltalk.method({
 selector: "method",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=self["@method"];
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"method",{},smalltalk.AIContext)});},
+}, function($ctx1) {$ctx1.fill(self,"method",{},smalltalk.AIContext)})},
 messageSends: []}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_method_",
 smalltalk.method({
 selector: "method:",
-fn: function (aCompiledMethod) {
+fn: function (aCompiledMethod){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@method"]=aCompiledMethod;
-return self}, function($ctx1) {$ctx1.fill(self,"method:",{aCompiledMethod:aCompiledMethod},smalltalk.AIContext)});},
+return self}, function($ctx1) {$ctx1.fill(self,"method:",{aCompiledMethod:aCompiledMethod},smalltalk.AIContext)})},
 messageSends: []}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_outerContext",
 smalltalk.method({
 selector: "outerContext",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=self["@outerContext"];
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"outerContext",{},smalltalk.AIContext)});},
+}, function($ctx1) {$ctx1.fill(self,"outerContext",{},smalltalk.AIContext)})},
 messageSends: []}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_outerContext_",
 smalltalk.method({
 selector: "outerContext:",
-fn: function (anAIContext) {
+fn: function (anAIContext){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@outerContext"]=anAIContext;
-return self}, function($ctx1) {$ctx1.fill(self,"outerContext:",{anAIContext:anAIContext},smalltalk.AIContext)});},
+return self}, function($ctx1) {$ctx1.fill(self,"outerContext:",{anAIContext:anAIContext},smalltalk.AIContext)})},
 messageSends: []}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_pc",
 smalltalk.method({
 selector: "pc",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$1;
@@ -156,50 +146,46 @@ $1=self["@pc"];
 $1=$2;
 };
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"pc",{},smalltalk.AIContext)});},
+}, function($ctx1) {$ctx1.fill(self,"pc",{},smalltalk.AIContext)})},
 messageSends: ["ifNil:"]}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_pc_",
 smalltalk.method({
 selector: "pc:",
-fn: function (anInteger) {
+fn: function (anInteger){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@pc"]=anInteger;
-return self}, function($ctx1) {$ctx1.fill(self,"pc:",{anInteger:anInteger},smalltalk.AIContext)});},
+return self}, function($ctx1) {$ctx1.fill(self,"pc:",{anInteger:anInteger},smalltalk.AIContext)})},
 messageSends: []}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_receiver",
 smalltalk.method({
 selector: "receiver",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(self)._localAt_("self");
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"receiver",{},smalltalk.AIContext)});},
+}, function($ctx1) {$ctx1.fill(self,"receiver",{},smalltalk.AIContext)})},
 messageSends: ["localAt:"]}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_receiver_",
 smalltalk.method({
 selector: "receiver:",
-fn: function (anObject) {
+fn: function (anObject){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._localAt_put_("self",anObject);
-return self}, function($ctx1) {$ctx1.fill(self,"receiver:",{anObject:anObject},smalltalk.AIContext)});},
+return self}, function($ctx1) {$ctx1.fill(self,"receiver:",{anObject:anObject},smalltalk.AIContext)})},
 messageSends: ["localAt:put:"]}),
 smalltalk.AIContext);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 fn: function (){
@@ -219,10 +205,9 @@ smalltalk.AIContext);
 
 
 smalltalk.addMethod(
-"_fromMethodContext_",
 smalltalk.method({
 selector: "fromMethodContext:",
-fn: function (aMethodContext) {
+fn: function (aMethodContext){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$3,$1;
@@ -231,17 +216,16 @@ _st($2)._initializeFromMethodContext_(aMethodContext);
 $3=_st($2)._yourself();
 $1=$3;
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"fromMethodContext:",{aMethodContext:aMethodContext},smalltalk.AIContext.klass)});},
+}, function($ctx1) {$ctx1.fill(self,"fromMethodContext:",{aMethodContext:aMethodContext},smalltalk.AIContext.klass)})},
 messageSends: ["initializeFromMethodContext:", "new", "yourself"]}),
 smalltalk.AIContext.klass);
 
 
 smalltalk.addClass('ASTDebugger', smalltalk.Object, ['interpreter', 'context'], 'Compiler-Interpreter');
 smalltalk.addMethod(
-"_buildAST",
 smalltalk.method({
 selector: "buildAST",
-fn: function () {
+fn: function (){
 var self=this;
 var ast;
 function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)}
@@ -252,83 +236,77 @@ ast=_st(_st($Smalltalk())._current())._parse_(_st(_st(self)._method())._source()
 _st(_st($SemanticAnalyzer())._on_(_st(_st(_st(self)._context())._receiver())._class()))._visit_(ast);
 $1=ast;
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"buildAST",{ast:ast},smalltalk.ASTDebugger)});},
+}, function($ctx1) {$ctx1.fill(self,"buildAST",{ast:ast},smalltalk.ASTDebugger)})},
 messageSends: ["parse:", "source", "method", "current", "visit:", "on:", "class", "receiver", "context"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_context",
 smalltalk.method({
 selector: "context",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=self["@context"];
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"context",{},smalltalk.ASTDebugger)});},
+}, function($ctx1) {$ctx1.fill(self,"context",{},smalltalk.ASTDebugger)})},
 messageSends: []}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_context_",
 smalltalk.method({
 selector: "context:",
-fn: function (aContext) {
+fn: function (aContext){
 var self=this;
 function $AIContext(){return smalltalk.AIContext||(typeof AIContext=="undefined"?nil:AIContext)}
 return smalltalk.withContext(function($ctx1) { 
 self["@context"]=_st($AIContext())._new();
-return self}, function($ctx1) {$ctx1.fill(self,"context:",{aContext:aContext},smalltalk.ASTDebugger)});},
+return self}, function($ctx1) {$ctx1.fill(self,"context:",{aContext:aContext},smalltalk.ASTDebugger)})},
 messageSends: ["new"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_defaultInterpreterClass",
 smalltalk.method({
 selector: "defaultInterpreterClass",
-fn: function () {
+fn: function (){
 var self=this;
 function $ASTSteppingInterpreter(){return smalltalk.ASTSteppingInterpreter||(typeof ASTSteppingInterpreter=="undefined"?nil:ASTSteppingInterpreter)}
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=$ASTSteppingInterpreter();
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"defaultInterpreterClass",{},smalltalk.ASTDebugger)});},
+}, function($ctx1) {$ctx1.fill(self,"defaultInterpreterClass",{},smalltalk.ASTDebugger)})},
 messageSends: []}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_initializeInterpreter",
 smalltalk.method({
 selector: "initializeInterpreter",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(_st(self)._interpreter())._interpret_(_st(_st(_st(self)._buildAST())._nodes())._first());
-return self}, function($ctx1) {$ctx1.fill(self,"initializeInterpreter",{},smalltalk.ASTDebugger)});},
+return self}, function($ctx1) {$ctx1.fill(self,"initializeInterpreter",{},smalltalk.ASTDebugger)})},
 messageSends: ["interpret:", "first", "nodes", "buildAST", "interpreter"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_initializeWithContext_",
 smalltalk.method({
 selector: "initializeWithContext:",
-fn: function (aMethodContext) {
+fn: function (aMethodContext){
 var self=this;
 function $AIContext(){return smalltalk.AIContext||(typeof AIContext=="undefined"?nil:AIContext)}
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._context_(_st($AIContext())._fromMethodContext_(aMethodContext));
 _st(self)._initializeInterpreter();
-return self}, function($ctx1) {$ctx1.fill(self,"initializeWithContext:",{aMethodContext:aMethodContext},smalltalk.ASTDebugger)});},
+return self}, function($ctx1) {$ctx1.fill(self,"initializeWithContext:",{aMethodContext:aMethodContext},smalltalk.ASTDebugger)})},
 messageSends: ["context:", "fromMethodContext:", "initializeInterpreter"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_interpreter",
 smalltalk.method({
 selector: "interpreter",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$1;
@@ -340,65 +318,60 @@ $1=self["@interpreter"];
 $1=$2;
 };
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter",{},smalltalk.ASTDebugger)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter",{},smalltalk.ASTDebugger)})},
 messageSends: ["ifNil:", "new", "defaultInterpreterClass"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_interpreter_",
 smalltalk.method({
 selector: "interpreter:",
-fn: function (anInterpreter) {
+fn: function (anInterpreter){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@interpreter"]=anInterpreter;
-return self}, function($ctx1) {$ctx1.fill(self,"interpreter:",{anInterpreter:anInterpreter},smalltalk.ASTDebugger)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpreter:",{anInterpreter:anInterpreter},smalltalk.ASTDebugger)})},
 messageSends: []}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_method",
 smalltalk.method({
 selector: "method",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(_st(self)._context())._method();
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"method",{},smalltalk.ASTDebugger)});},
+}, function($ctx1) {$ctx1.fill(self,"method",{},smalltalk.ASTDebugger)})},
 messageSends: ["method", "context"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_restart",
 smalltalk.method({
 selector: "restart",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._shouldBeImplemented();
-return self}, function($ctx1) {$ctx1.fill(self,"restart",{},smalltalk.ASTDebugger)});},
+return self}, function($ctx1) {$ctx1.fill(self,"restart",{},smalltalk.ASTDebugger)})},
 messageSends: ["shouldBeImplemented"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_resume",
 smalltalk.method({
 selector: "resume",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._shouldBeImplemented();
-return self}, function($ctx1) {$ctx1.fill(self,"resume",{},smalltalk.ASTDebugger)});},
+return self}, function($ctx1) {$ctx1.fill(self,"resume",{},smalltalk.ASTDebugger)})},
 messageSends: ["shouldBeImplemented"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_step",
 smalltalk.method({
 selector: "step",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st((function(){
@@ -415,40 +388,37 @@ return smalltalk.withContext(function($ctx2) {
 _st(_st(self)._interpreter())._step();
 return _st(self)._step();
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"step",{},smalltalk.ASTDebugger)});},
+return self}, function($ctx1) {$ctx1.fill(self,"step",{},smalltalk.ASTDebugger)})},
 messageSends: ["whileFalse:", "step", "interpreter", "or:", "not", "atEnd", "and:", "stopOnStepping", "nextNode", "notNil"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_stepInto",
 smalltalk.method({
 selector: "stepInto",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._shouldBeImplemented();
-return self}, function($ctx1) {$ctx1.fill(self,"stepInto",{},smalltalk.ASTDebugger)});},
+return self}, function($ctx1) {$ctx1.fill(self,"stepInto",{},smalltalk.ASTDebugger)})},
 messageSends: ["shouldBeImplemented"]}),
 smalltalk.ASTDebugger);
 
 smalltalk.addMethod(
-"_stepOver",
 smalltalk.method({
 selector: "stepOver",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._step();
-return self}, function($ctx1) {$ctx1.fill(self,"stepOver",{},smalltalk.ASTDebugger)});},
+return self}, function($ctx1) {$ctx1.fill(self,"stepOver",{},smalltalk.ASTDebugger)})},
 messageSends: ["step"]}),
 smalltalk.ASTDebugger);
 
 
 smalltalk.addMethod(
-"_context_",
 smalltalk.method({
 selector: "context:",
-fn: function (aMethodContext) {
+fn: function (aMethodContext){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$3,$1;
@@ -457,17 +427,16 @@ _st($2)._initializeWithContext_(aMethodContext);
 $3=_st($2)._yourself();
 $1=$3;
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"context:",{aMethodContext:aMethodContext},smalltalk.ASTDebugger.klass)});},
+}, function($ctx1) {$ctx1.fill(self,"context:",{aMethodContext:aMethodContext},smalltalk.ASTDebugger.klass)})},
 messageSends: ["initializeWithContext:", "new", "yourself"]}),
 smalltalk.ASTDebugger.klass);
 
 
 smalltalk.addClass('ASTInterpreter', smalltalk.Object, ['currentNode', 'context', 'shouldReturn', 'result'], 'Compiler-Interpreter');
 smalltalk.addMethod(
-"_assign_to_",
 smalltalk.method({
 selector: "assign:to:",
-fn: function (aNode, anObject) {
+fn: function (aNode,anObject){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$1;
@@ -478,15 +447,14 @@ $1=_st(_st(_st(self)._context())._receiver())._instVarAt_put_(_st(aNode)._value(
 $1=_st(_st(self)._context())._localAt_put_(_st(aNode)._value(),anObject);
 };
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"assign:to:",{aNode:aNode,anObject:anObject},smalltalk.ASTInterpreter)});},
+}, function($ctx1) {$ctx1.fill(self,"assign:to:",{aNode:aNode,anObject:anObject},smalltalk.ASTInterpreter)})},
 messageSends: ["ifTrue:ifFalse:", "instVarAt:put:", "value", "receiver", "context", "localAt:put:", "isInstanceVar", "binding"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_context",
 smalltalk.method({
 selector: "context",
-fn: function () {
+fn: function (){
 var self=this;
 function $AIContext(){return smalltalk.AIContext||(typeof AIContext=="undefined"?nil:AIContext)}
 return smalltalk.withContext(function($ctx1) { 
@@ -499,54 +467,50 @@ $1=self["@context"];
 $1=$2;
 };
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"context",{},smalltalk.ASTInterpreter)});},
+}, function($ctx1) {$ctx1.fill(self,"context",{},smalltalk.ASTInterpreter)})},
 messageSends: ["ifNil:", "new"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_context_",
 smalltalk.method({
 selector: "context:",
-fn: function (anAIContext) {
+fn: function (anAIContext){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@context"]=anAIContext;
-return self}, function($ctx1) {$ctx1.fill(self,"context:",{anAIContext:anAIContext},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"context:",{anAIContext:anAIContext},smalltalk.ASTInterpreter)})},
 messageSends: []}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_continue_value_",
 smalltalk.method({
 selector: "continue:value:",
-fn: function (aBlock, anObject) {
+fn: function (aBlock,anObject){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@result"]=anObject;
 _st(aBlock)._value_(anObject);
-return self}, function($ctx1) {$ctx1.fill(self,"continue:value:",{aBlock:aBlock,anObject:anObject},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"continue:value:",{aBlock:aBlock,anObject:anObject},smalltalk.ASTInterpreter)})},
 messageSends: ["value:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_currentNode",
 smalltalk.method({
 selector: "currentNode",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=self["@currentNode"];
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"currentNode",{},smalltalk.ASTInterpreter)});},
+}, function($ctx1) {$ctx1.fill(self,"currentNode",{},smalltalk.ASTInterpreter)})},
 messageSends: []}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_eval_",
 smalltalk.method({
 selector: "eval:",
-fn: function (aString) {
+fn: function (aString){
 var self=this;
 var source,function_;
 function $String(){return smalltalk.String||(typeof String=="undefined"?nil:String)}
@@ -572,28 +536,26 @@ return $2;
 function_=_st(_st($Compiler())._new())._eval_(source);
 $3=_st(function_)._valueWithPossibleArguments_(_st(_st(_st(self)._context())._locals())._values());
 return $3;
-}, function($ctx1) {$ctx1.fill(self,"eval:",{aString:aString,source:source,function_:function_},smalltalk.ASTInterpreter)});},
+}, function($ctx1) {$ctx1.fill(self,"eval:",{aString:aString,source:source,function_:function_},smalltalk.ASTInterpreter)})},
 messageSends: ["streamContents:", "nextPutAll:", "do:separatedBy:", "keys", "locals", "context", "eval:", "new", "valueWithPossibleArguments:", "values"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 smalltalk.Object.fn.prototype._initialize.apply(_st(self), []);
 self["@shouldReturn"]=false;
-return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.ASTInterpreter)})},
 messageSends: ["initialize"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpret_",
 smalltalk.method({
 selector: "interpret:",
-fn: function (aNode) {
+fn: function (aNode){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@shouldReturn"]=false;
@@ -602,15 +564,14 @@ return smalltalk.withContext(function($ctx2) {
 self["@result"]=value;
 return self["@result"];
 }, function($ctx2) {$ctx2.fillBlock({value:value},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"interpret:",{aNode:aNode},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpret:",{aNode:aNode},smalltalk.ASTInterpreter)})},
 messageSends: ["interpret:continue:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpret_continue_",
 smalltalk.method({
 selector: "interpret:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3;
@@ -630,28 +591,26 @@ return _st(self)._continue_value_(aBlock,value);
 } else {
 _st(self)._continue_value_(aBlock,aNode);
 };
-return self}, function($ctx1) {$ctx1.fill(self,"interpret:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpret:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["ifTrue:", "ifTrue:ifFalse:", "interpretNode:continue:", "continue:value:", "isNode"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretAll_continue_",
 smalltalk.method({
 selector: "interpretAll:continue:",
-fn: function (aCollection, aBlock) {
+fn: function (aCollection,aBlock){
 var self=this;
 function $OrderedCollection(){return smalltalk.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)}
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._interpretAll_continue_result_(aCollection,aBlock,_st($OrderedCollection())._new());
-return self}, function($ctx1) {$ctx1.fill(self,"interpretAll:continue:",{aCollection:aCollection,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretAll:continue:",{aCollection:aCollection,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpretAll:continue:result:", "new"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretAll_continue_result_",
 smalltalk.method({
 selector: "interpretAll:continue:result:",
-fn: function (nodes, aBlock, aCollection) {
+fn: function (nodes,aBlock,aCollection){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
@@ -664,27 +623,25 @@ return smalltalk.withContext(function($ctx2) {
 return _st(self)._interpretAll_continue_result_(_st(nodes)._allButFirst(),aBlock,_st(aCollection).__comma([value]));
 }, function($ctx2) {$ctx2.fillBlock({value:value},$ctx1)})}));
 };
-return self}, function($ctx1) {$ctx1.fill(self,"interpretAll:continue:result:",{nodes:nodes,aBlock:aBlock,aCollection:aCollection},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretAll:continue:result:",{nodes:nodes,aBlock:aBlock,aCollection:aCollection},smalltalk.ASTInterpreter)})},
 messageSends: ["ifTrue:ifFalse:", "continue:value:", "interpret:continue:", "first", "interpretAll:continue:result:", "allButFirst", ",", "isEmpty"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretAssignmentNode_continue_",
 smalltalk.method({
 selector: "interpretAssignmentNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._interpret_continue_(_st(aNode)._right(),(function(value){
 return smalltalk.withContext(function($ctx2) {
 return _st(self)._continue_value_(aBlock,_st(self)._assign_to_(_st(aNode)._left(),value));
 }, function($ctx2) {$ctx2.fillBlock({value:value},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretAssignmentNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretAssignmentNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpret:continue:", "right", "continue:value:", "assign:to:", "left"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretBlockNode_continue_",
 smalltalk.method({
 selector: "interpretBlockNode:continue:",
 fn: function (aNode,aBlock){
@@ -706,22 +663,20 @@ messageSends: ["continue:value:", "withBlockContext:", "interpret:", "first", "n
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretBlockSequenceNode_continue_",
 smalltalk.method({
 selector: "interpretBlockSequenceNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._interpretSequenceNode_continue_(aNode,aBlock);
-return self}, function($ctx1) {$ctx1.fill(self,"interpretBlockSequenceNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretBlockSequenceNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpretSequenceNode:continue:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretCascadeNode_continue_",
 smalltalk.method({
 selector: "interpretCascadeNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._interpret_continue_(_st(aNode)._receiver(),(function(receiver){
@@ -738,43 +693,40 @@ return _st(self)._continue_value_(aBlock,val);
 }, function($ctx4) {$ctx4.fillBlock({val:val},$ctx1)})}));
 }, function($ctx3) {$ctx3.fillBlock({},$ctx1)})}));
 }, function($ctx2) {$ctx2.fillBlock({receiver:receiver},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretCascadeNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretCascadeNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpret:continue:", "receiver", "do:", "receiver:", "nodes", "interpretAll:continue:", "allButLast", "last", "continue:value:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretClassReferenceNode_continue_",
 smalltalk.method({
 selector: "interpretClassReferenceNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)}
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._continue_value_(aBlock,_st(_st($Smalltalk())._current())._at_(_st(aNode)._value()));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretClassReferenceNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretClassReferenceNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["continue:value:", "at:", "value", "current"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretDynamicArrayNode_continue_",
 smalltalk.method({
 selector: "interpretDynamicArrayNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._interpretAll_continue_(_st(aNode)._nodes(),(function(array){
 return smalltalk.withContext(function($ctx2) {
 return _st(self)._continue_value_(aBlock,array);
 }, function($ctx2) {$ctx2.fillBlock({array:array},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretDynamicArrayNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretDynamicArrayNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpretAll:continue:", "nodes", "continue:value:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretDynamicDictionaryNode_continue_",
 smalltalk.method({
 selector: "interpretDynamicDictionaryNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 function $HashedCollection(){return smalltalk.HashedCollection||(typeof HashedCollection=="undefined"?nil:HashedCollection)}
 return smalltalk.withContext(function($ctx1) { 
@@ -789,55 +741,51 @@ return _st(hashedCollection)._add_(each);
 }, function($ctx3) {$ctx3.fillBlock({each:each},$ctx1)})}));
 return _st(self)._continue_value_(aBlock,hashedCollection);
 }, function($ctx2) {$ctx2.fillBlock({array:array,hashedCollection:hashedCollection},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretDynamicDictionaryNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretDynamicDictionaryNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpretAll:continue:", "nodes", "new", "do:", "add:", "continue:value:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretJSStatementNode_continue_",
 smalltalk.method({
 selector: "interpretJSStatementNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@shouldReturn"]=true;
 _st(self)._continue_value_(aBlock,_st(self)._eval_(_st(aNode)._source()));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretJSStatementNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretJSStatementNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["continue:value:", "eval:", "source"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretMethodNode_continue_",
 smalltalk.method({
 selector: "interpretMethodNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._interpretAll_continue_(_st(aNode)._nodes(),(function(array){
 return smalltalk.withContext(function($ctx2) {
 return _st(self)._continue_value_(aBlock,_st(array)._first());
 }, function($ctx2) {$ctx2.fillBlock({array:array},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretMethodNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretMethodNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpretAll:continue:", "nodes", "continue:value:", "first"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretNode_continue_",
 smalltalk.method({
 selector: "interpretNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(aNode)._interpreter_continue_(self,aBlock);
-return self}, function($ctx1) {$ctx1.fill(self,"interpretNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpreter:continue:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretReturnNode_continue_",
 smalltalk.method({
 selector: "interpretReturnNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._interpret_continue_(_st(_st(aNode)._nodes())._first(),(function(value){
@@ -846,15 +794,14 @@ self["@shouldReturn"]=true;
 self["@shouldReturn"];
 return _st(self)._continue_value_(aBlock,value);
 }, function($ctx2) {$ctx2.fillBlock({value:value},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretReturnNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretReturnNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpret:continue:", "first", "nodes", "continue:value:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretSendNode_continue_",
 smalltalk.method({
 selector: "interpretSendNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._interpret_continue_(_st(aNode)._receiver(),(function(receiver){
@@ -868,42 +815,39 @@ return _st(self)._continue_value_(aBlock,_st(message)._sendTo_(receiver));
 }, function($ctx4) {$ctx4.fillBlock({message:message},$ctx1)})}));
 }, function($ctx3) {$ctx3.fillBlock({args:args},$ctx1)})}));
 }, function($ctx2) {$ctx2.fillBlock({receiver:receiver},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretSendNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretSendNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpret:continue:", "receiver", "interpretAll:continue:", "arguments", "messageFromSendNode:arguments:do:", "pc:", "+", "pc", "context", "continue:value:", "sendTo:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretSequenceNode_continue_",
 smalltalk.method({
 selector: "interpretSequenceNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._interpretAll_continue_(_st(aNode)._nodes(),(function(array){
 return smalltalk.withContext(function($ctx2) {
 return _st(self)._continue_value_(aBlock,_st(array)._last());
 }, function($ctx2) {$ctx2.fillBlock({array:array},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"interpretSequenceNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretSequenceNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["interpretAll:continue:", "nodes", "continue:value:", "last"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretValueNode_continue_",
 smalltalk.method({
 selector: "interpretValueNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self)._continue_value_(aBlock,_st(aNode)._value());
-return self}, function($ctx1) {$ctx1.fill(self,"interpretValueNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretValueNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["continue:value:", "value"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_interpretVariableNode_continue_",
 smalltalk.method({
 selector: "interpretVariableNode:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$4,$3;
@@ -916,15 +860,14 @@ $3=_st(_st(_st(self)._context())._receiver())._instVarAt_(_st(aNode)._value());
 $3=_st(_st(self)._context())._localAt_(_st(aNode)._value());
 };
 _st($1)._continue_value_($2,$3);
-return self}, function($ctx1) {$ctx1.fill(self,"interpretVariableNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpretVariableNode:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["continue:value:", "ifTrue:ifFalse:", "instVarAt:", "value", "receiver", "context", "localAt:", "isInstanceVar", "binding"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_messageFromSendNode_arguments_do_",
 smalltalk.method({
 selector: "messageFromSendNode:arguments:do:",
-fn: function (aSendNode, aCollection, aBlock) {
+fn: function (aSendNode,aCollection,aBlock){
 var self=this;
 function $Message(){return smalltalk.Message||(typeof Message=="undefined"?nil:Message)}
 return smalltalk.withContext(function($ctx1) { 
@@ -934,29 +877,27 @@ _st($1)._selector_(_st(aSendNode)._selector());
 _st($1)._arguments_(aCollection);
 $2=_st($1)._yourself();
 _st(self)._continue_value_(aBlock,$2);
-return self}, function($ctx1) {$ctx1.fill(self,"messageFromSendNode:arguments:do:",{aSendNode:aSendNode,aCollection:aCollection,aBlock:aBlock},smalltalk.ASTInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"messageFromSendNode:arguments:do:",{aSendNode:aSendNode,aCollection:aCollection,aBlock:aBlock},smalltalk.ASTInterpreter)})},
 messageSends: ["continue:value:", "selector:", "selector", "new", "arguments:", "yourself"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_result",
 smalltalk.method({
 selector: "result",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=self["@result"];
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"result",{},smalltalk.ASTInterpreter)});},
+}, function($ctx1) {$ctx1.fill(self,"result",{},smalltalk.ASTInterpreter)})},
 messageSends: []}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_shouldReturn",
 smalltalk.method({
 selector: "shouldReturn",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$1;
@@ -967,12 +908,11 @@ $1=false;
 $1=$2;
 };
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"shouldReturn",{},smalltalk.ASTInterpreter)});},
+}, function($ctx1) {$ctx1.fill(self,"shouldReturn",{},smalltalk.ASTInterpreter)})},
 messageSends: ["ifNil:"]}),
 smalltalk.ASTInterpreter);
 
 smalltalk.addMethod(
-"_withBlockContext_",
 smalltalk.method({
 selector: "withBlockContext:",
 fn: function (aBlock){
@@ -997,10 +937,9 @@ smalltalk.ASTInterpreter);
 
 smalltalk.addClass('ASTSteppingInterpreter', smalltalk.ASTInterpreter, ['continuation', 'nextNode'], 'Compiler-Interpreter');
 smalltalk.addMethod(
-"_atEnd",
 smalltalk.method({
 selector: "atEnd",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
@@ -1009,30 +948,28 @@ return smalltalk.withContext(function($ctx2) {
 return _st(_st(self)._nextNode()).__eq_eq(_st(self)._currentNode());
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"atEnd",{},smalltalk.ASTSteppingInterpreter)});},
+}, function($ctx1) {$ctx1.fill(self,"atEnd",{},smalltalk.ASTSteppingInterpreter)})},
 messageSends: ["or:", "==", "currentNode", "nextNode", "shouldReturn"]}),
 smalltalk.ASTSteppingInterpreter);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 smalltalk.ASTInterpreter.fn.prototype._initialize.apply(_st(self), []);
 self["@continuation"]=(function(){
 return smalltalk.withContext(function($ctx2) {
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})});
-return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.ASTSteppingInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.ASTSteppingInterpreter)})},
 messageSends: ["initialize"]}),
 smalltalk.ASTSteppingInterpreter);
 
 smalltalk.addMethod(
-"_interpret_continue_",
 smalltalk.method({
 selector: "interpret:continue:",
-fn: function (aNode, aBlock) {
+fn: function (aNode,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@nextNode"]=aNode;
@@ -1040,329 +977,305 @@ self["@continuation"]=(function(){
 return smalltalk.withContext(function($ctx2) {
 return smalltalk.ASTInterpreter.fn.prototype._interpret_continue_.apply(_st(self), [aNode,aBlock]);
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})});
-return self}, function($ctx1) {$ctx1.fill(self,"interpret:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTSteppingInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"interpret:continue:",{aNode:aNode,aBlock:aBlock},smalltalk.ASTSteppingInterpreter)})},
 messageSends: ["interpret:continue:"]}),
 smalltalk.ASTSteppingInterpreter);
 
 smalltalk.addMethod(
-"_nextNode",
 smalltalk.method({
 selector: "nextNode",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=self["@nextNode"];
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"nextNode",{},smalltalk.ASTSteppingInterpreter)});},
+}, function($ctx1) {$ctx1.fill(self,"nextNode",{},smalltalk.ASTSteppingInterpreter)})},
 messageSends: []}),
 smalltalk.ASTSteppingInterpreter);
 
 smalltalk.addMethod(
-"_step",
 smalltalk.method({
 selector: "step",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(self["@continuation"])._value();
-return self}, function($ctx1) {$ctx1.fill(self,"step",{},smalltalk.ASTSteppingInterpreter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"step",{},smalltalk.ASTSteppingInterpreter)})},
 messageSends: ["value"]}),
 smalltalk.ASTSteppingInterpreter);
 
 
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.Node)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.Node)})},
 messageSends: ["interpretNode:continue:"]}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_isSteppingNode",
 smalltalk.method({
 selector: "isSteppingNode",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 return false;
-}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.Node)});},
+}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.Node)})},
 messageSends: []}),
 smalltalk.Node);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretAssignmentNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.AssignmentNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.AssignmentNode)})},
 messageSends: ["interpretAssignmentNode:continue:"]}),
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_isSteppingNode",
 smalltalk.method({
 selector: "isSteppingNode",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 return true;
-}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.AssignmentNode)});},
+}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.AssignmentNode)})},
 messageSends: []}),
 smalltalk.AssignmentNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretBlockNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.BlockNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.BlockNode)})},
 messageSends: ["interpretBlockNode:continue:"]}),
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_isSteppingNode",
 smalltalk.method({
 selector: "isSteppingNode",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 return true;
-}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.BlockNode)});},
+}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.BlockNode)})},
 messageSends: []}),
 smalltalk.BlockNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretCascadeNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.CascadeNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.CascadeNode)})},
 messageSends: ["interpretCascadeNode:continue:"]}),
 smalltalk.CascadeNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretDynamicArrayNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.DynamicArrayNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.DynamicArrayNode)})},
 messageSends: ["interpretDynamicArrayNode:continue:"]}),
 smalltalk.DynamicArrayNode);
 
 smalltalk.addMethod(
-"_isSteppingNode",
 smalltalk.method({
 selector: "isSteppingNode",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 return true;
-}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.DynamicArrayNode)});},
+}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.DynamicArrayNode)})},
 messageSends: []}),
 smalltalk.DynamicArrayNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretDynamicDictionaryNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.DynamicDictionaryNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.DynamicDictionaryNode)})},
 messageSends: ["interpretDynamicDictionaryNode:continue:"]}),
 smalltalk.DynamicDictionaryNode);
 
 smalltalk.addMethod(
-"_isSteppingNode",
 smalltalk.method({
 selector: "isSteppingNode",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 return true;
-}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.DynamicDictionaryNode)});},
+}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.DynamicDictionaryNode)})},
 messageSends: []}),
 smalltalk.DynamicDictionaryNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretJSStatementNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.JSStatementNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.JSStatementNode)})},
 messageSends: ["interpretJSStatementNode:continue:"]}),
 smalltalk.JSStatementNode);
 
 smalltalk.addMethod(
-"_isSteppingNode",
 smalltalk.method({
 selector: "isSteppingNode",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 return true;
-}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.JSStatementNode)});},
+}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.JSStatementNode)})},
 messageSends: []}),
 smalltalk.JSStatementNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretMethodNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.MethodNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.MethodNode)})},
 messageSends: ["interpretMethodNode:continue:"]}),
 smalltalk.MethodNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretReturnNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.ReturnNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.ReturnNode)})},
 messageSends: ["interpretReturnNode:continue:"]}),
 smalltalk.ReturnNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretSendNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.SendNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.SendNode)})},
 messageSends: ["interpretSendNode:continue:"]}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_isSteppingNode",
 smalltalk.method({
 selector: "isSteppingNode",
-fn: function () {
+fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 return true;
-}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.SendNode)});},
+}, function($ctx1) {$ctx1.fill(self,"isSteppingNode",{},smalltalk.SendNode)})},
 messageSends: []}),
 smalltalk.SendNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretSequenceNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.SequenceNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.SequenceNode)})},
 messageSends: ["interpretSequenceNode:continue:"]}),
 smalltalk.SequenceNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretBlockSequenceNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.BlockSequenceNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.BlockSequenceNode)})},
 messageSends: ["interpretBlockSequenceNode:continue:"]}),
 smalltalk.BlockSequenceNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretValueNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.ValueNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.ValueNode)})},
 messageSends: ["interpretValueNode:continue:"]}),
 smalltalk.ValueNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretVariableNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.VariableNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.VariableNode)})},
 messageSends: ["interpretVariableNode:continue:"]}),
 smalltalk.VariableNode);
 
 smalltalk.addMethod(
-"_interpreter_continue_",
 smalltalk.method({
 selector: "interpreter:continue:",
-fn: function (anInterpreter, aBlock) {
+fn: function (anInterpreter,aBlock){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(anInterpreter)._interpretClassReferenceNode_continue_(self,aBlock);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.ClassReferenceNode)});},
+}, function($ctx1) {$ctx1.fill(self,"interpreter:continue:",{anInterpreter:anInterpreter,aBlock:aBlock},smalltalk.ClassReferenceNode)})},
 messageSends: ["interpretClassReferenceNode:continue:"]}),
 smalltalk.ClassReferenceNode);
 

js/Compiler-Semantic.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Compiler-Semantic');
 smalltalk.addClass('LexicalScope', smalltalk.Object, ['node', 'instruction', 'temps', 'args', 'outerScope'], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_addArg_",
 smalltalk.method({
 selector: "addArg:",
 fn: function (aString){
@@ -15,7 +14,6 @@ messageSends: ["at:put:", "on:", "args", "scope:", "at:"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_addTemp_",
 smalltalk.method({
 selector: "addTemp:",
 fn: function (aString){
@@ -29,7 +27,6 @@ messageSends: ["at:put:", "on:", "temps", "scope:", "at:"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 fn: function (){
@@ -43,7 +40,6 @@ messageSends: [",", "asString", "scopeLevel"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_allVariableNames",
 smalltalk.method({
 selector: "allVariableNames",
 fn: function (){
@@ -57,7 +53,6 @@ messageSends: [",", "keys", "temps", "args"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_args",
 smalltalk.method({
 selector: "args",
 fn: function (){
@@ -78,7 +73,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_bindingFor_",
 smalltalk.method({
 selector: "bindingFor:",
 fn: function (aStringOrNode){
@@ -101,7 +95,6 @@ messageSends: ["at:ifAbsent:", "value", "temps", "args", "pseudoVars"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_canInlineNonLocalReturns",
 smalltalk.method({
 selector: "canInlineNonLocalReturns",
 fn: function (){
@@ -118,7 +111,6 @@ messageSends: ["and:", "canInlineNonLocalReturns", "outerScope", "isInlined"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_instruction",
 smalltalk.method({
 selector: "instruction",
 fn: function (){
@@ -132,7 +124,6 @@ messageSends: []}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_instruction_",
 smalltalk.method({
 selector: "instruction:",
 fn: function (anIRInstruction){
@@ -144,7 +135,6 @@ messageSends: []}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_isBlockScope",
 smalltalk.method({
 selector: "isBlockScope",
 fn: function (){
@@ -158,7 +148,6 @@ messageSends: ["not", "isMethodScope"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 fn: function (){
@@ -175,7 +164,6 @@ messageSends: ["and:", "isInlined", "instruction", "notNil"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_isMethodScope",
 smalltalk.method({
 selector: "isMethodScope",
 fn: function (){
@@ -187,7 +175,6 @@ messageSends: []}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_lookupVariable_",
 smalltalk.method({
 selector: "lookupVariable:",
 fn: function (aNode){
@@ -215,7 +202,6 @@ messageSends: ["bindingFor:", "ifNil:", "ifNotNil:", "lookupVariable:", "outerSc
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_methodScope",
 smalltalk.method({
 selector: "methodScope",
 fn: function (){
@@ -234,7 +220,6 @@ messageSends: ["ifNotNil:", "methodScope", "outerScope"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_node",
 smalltalk.method({
 selector: "node",
 fn: function (){
@@ -248,7 +233,6 @@ messageSends: []}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_node_",
 smalltalk.method({
 selector: "node:",
 fn: function (aNode){
@@ -260,7 +244,6 @@ messageSends: []}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_outerScope",
 smalltalk.method({
 selector: "outerScope",
 fn: function (){
@@ -274,7 +257,6 @@ messageSends: []}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_outerScope_",
 smalltalk.method({
 selector: "outerScope:",
 fn: function (aLexicalScope){
@@ -286,7 +268,6 @@ messageSends: []}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_pseudoVars",
 smalltalk.method({
 selector: "pseudoVars",
 fn: function (){
@@ -300,7 +281,6 @@ messageSends: ["pseudoVars", "methodScope"]}),
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_scopeLevel",
 smalltalk.method({
 selector: "scopeLevel",
 fn: function (){
@@ -326,7 +306,6 @@ messageSends: ["ifNil:", "outerScope", "ifTrue:", "scopeLevel", "isInlined", "+"
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_temps",
 smalltalk.method({
 selector: "temps",
 fn: function (){
@@ -350,7 +329,6 @@ smalltalk.LexicalScope);
 
 smalltalk.addClass('MethodLexicalScope', smalltalk.LexicalScope, ['iVars', 'pseudoVars', 'unknownVariables', 'localReturn', 'nonLocalReturns'], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_addIVar_",
 smalltalk.method({
 selector: "addIVar:",
 fn: function (aString){
@@ -364,7 +342,6 @@ messageSends: ["at:put:", "on:", "iVars", "scope:", "at:"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_addNonLocalReturn_",
 smalltalk.method({
 selector: "addNonLocalReturn:",
 fn: function (aScope){
@@ -376,7 +353,6 @@ messageSends: ["add:", "nonLocalReturns"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_allVariableNames",
 smalltalk.method({
 selector: "allVariableNames",
 fn: function (){
@@ -390,7 +366,6 @@ messageSends: [",", "keys", "iVars", "allVariableNames"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_bindingFor_",
 smalltalk.method({
 selector: "bindingFor:",
 fn: function (aNode){
@@ -412,7 +387,6 @@ messageSends: ["ifNil:", "at:ifAbsent:", "value", "iVars", "bindingFor:"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_canInlineNonLocalReturns",
 smalltalk.method({
 selector: "canInlineNonLocalReturns",
 fn: function (){
@@ -424,7 +398,6 @@ messageSends: []}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_hasLocalReturn",
 smalltalk.method({
 selector: "hasLocalReturn",
 fn: function (){
@@ -438,7 +411,6 @@ messageSends: ["localReturn"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_hasNonLocalReturn",
 smalltalk.method({
 selector: "hasNonLocalReturn",
 fn: function (){
@@ -452,7 +424,6 @@ messageSends: ["notEmpty", "nonLocalReturns"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_iVars",
 smalltalk.method({
 selector: "iVars",
 fn: function (){
@@ -473,7 +444,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_isMethodScope",
 smalltalk.method({
 selector: "isMethodScope",
 fn: function (){
@@ -485,7 +455,6 @@ messageSends: []}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_localReturn",
 smalltalk.method({
 selector: "localReturn",
 fn: function (){
@@ -504,7 +473,6 @@ messageSends: ["ifNil:"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_localReturn_",
 smalltalk.method({
 selector: "localReturn:",
 fn: function (aBoolean){
@@ -516,7 +484,6 @@ messageSends: []}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_methodScope",
 smalltalk.method({
 selector: "methodScope",
 fn: function (){
@@ -530,7 +497,6 @@ messageSends: []}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_nonLocalReturns",
 smalltalk.method({
 selector: "nonLocalReturns",
 fn: function (){
@@ -551,7 +517,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_pseudoVars",
 smalltalk.method({
 selector: "pseudoVars",
 fn: function (){
@@ -582,7 +547,6 @@ messageSends: ["ifNil:", "new", "do:", "at:put:", "scope:", "methodScope", "on:"
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_removeNonLocalReturn_",
 smalltalk.method({
 selector: "removeNonLocalReturn:",
 fn: function (aScope){
@@ -596,7 +560,6 @@ messageSends: ["remove:ifAbsent:", "nonLocalReturns"]}),
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_unknownVariables",
 smalltalk.method({
 selector: "unknownVariables",
 fn: function (){
@@ -620,7 +583,6 @@ smalltalk.MethodLexicalScope);
 
 smalltalk.addClass('ScopeVar', smalltalk.Object, ['scope', 'name'], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 fn: function (){
@@ -634,7 +596,6 @@ messageSends: ["asVariableName", "name"]}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isArgVar",
 smalltalk.method({
 selector: "isArgVar",
 fn: function (){
@@ -646,7 +607,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isClassRefVar",
 smalltalk.method({
 selector: "isClassRefVar",
 fn: function (){
@@ -658,7 +618,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isInstanceVar",
 smalltalk.method({
 selector: "isInstanceVar",
 fn: function (){
@@ -670,7 +629,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isPseudoVar",
 smalltalk.method({
 selector: "isPseudoVar",
 fn: function (){
@@ -682,7 +640,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isTempVar",
 smalltalk.method({
 selector: "isTempVar",
 fn: function (){
@@ -694,7 +651,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isUnknownVar",
 smalltalk.method({
 selector: "isUnknownVar",
 fn: function (){
@@ -706,7 +662,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_name",
 smalltalk.method({
 selector: "name",
 fn: function (){
@@ -720,7 +675,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_name_",
 smalltalk.method({
 selector: "name:",
 fn: function (aString){
@@ -732,7 +686,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 fn: function (){
@@ -746,7 +699,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 fn: function (aScope){
@@ -758,7 +710,6 @@ messageSends: []}),
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_validateAssignment",
 smalltalk.method({
 selector: "validateAssignment",
 fn: function (){
@@ -782,7 +733,6 @@ smalltalk.ScopeVar);
 
 
 smalltalk.addMethod(
-"_on_",
 smalltalk.method({
 selector: "on:",
 fn: function (aString){
@@ -801,7 +751,6 @@ smalltalk.ScopeVar.klass);
 
 smalltalk.addClass('AliasVar', smalltalk.ScopeVar, ['node'], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_node",
 smalltalk.method({
 selector: "node",
 fn: function (){
@@ -815,7 +764,6 @@ messageSends: []}),
 smalltalk.AliasVar);
 
 smalltalk.addMethod(
-"_node_",
 smalltalk.method({
 selector: "node:",
 fn: function (aNode){
@@ -830,7 +778,6 @@ smalltalk.AliasVar);
 
 smalltalk.addClass('ArgVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_isArgVar",
 smalltalk.method({
 selector: "isArgVar",
 fn: function (){
@@ -845,7 +792,6 @@ smalltalk.ArgVar);
 
 smalltalk.addClass('ClassRefVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 fn: function (){
@@ -859,7 +805,6 @@ messageSends: [",", "name"]}),
 smalltalk.ClassRefVar);
 
 smalltalk.addMethod(
-"_isClassRefVar",
 smalltalk.method({
 selector: "isClassRefVar",
 fn: function (){
@@ -874,7 +819,6 @@ smalltalk.ClassRefVar);
 
 smalltalk.addClass('InstanceVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 fn: function (){
@@ -888,7 +832,6 @@ messageSends: [",", "name"]}),
 smalltalk.InstanceVar);
 
 smalltalk.addMethod(
-"_isInstanceVar",
 smalltalk.method({
 selector: "isInstanceVar",
 fn: function (){
@@ -903,7 +846,6 @@ smalltalk.InstanceVar);
 
 smalltalk.addClass('PseudoVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 fn: function (){
@@ -917,7 +859,6 @@ messageSends: ["name"]}),
 smalltalk.PseudoVar);
 
 smalltalk.addMethod(
-"_isPseudoVar",
 smalltalk.method({
 selector: "isPseudoVar",
 fn: function (){
@@ -932,7 +873,6 @@ smalltalk.PseudoVar);
 
 smalltalk.addClass('TempVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_isTempVar",
 smalltalk.method({
 selector: "isTempVar",
 fn: function (){
@@ -947,7 +887,6 @@ smalltalk.TempVar);
 
 smalltalk.addClass('UnknownVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_isUnknownVar",
 smalltalk.method({
 selector: "isUnknownVar",
 fn: function (){
@@ -962,7 +901,6 @@ smalltalk.UnknownVar);
 
 smalltalk.addClass('SemanticAnalyzer', smalltalk.NodeVisitor, ['currentScope', 'theClass', 'classReferences', 'messageSends', 'superSends'], 'Compiler-Semantic');
 smalltalk.addMethod(
-"_classReferences",
 smalltalk.method({
 selector: "classReferences",
 fn: function (){
@@ -983,7 +921,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_errorShadowingVariable_",
 smalltalk.method({
 selector: "errorShadowingVariable:",
 fn: function (aString){
@@ -999,7 +936,6 @@ messageSends: ["variableName:", "new", "signal"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_errorUnknownVariable_",
 smalltalk.method({
 selector: "errorUnknownVariable:",
 fn: function (aNode){
@@ -1026,7 +962,6 @@ messageSends: ["value", "ifTrue:ifFalse:", "variableName:", "new", "signal", "ad
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_isVariableGloballyUndefined_",
 smalltalk.method({
 selector: "isVariableGloballyUndefined:",
 fn: function (aString){
@@ -1038,7 +973,6 @@ messageSends: []}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_messageSends",
 smalltalk.method({
 selector: "messageSends",
 fn: function (){
@@ -1059,7 +993,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_newBlockScope",
 smalltalk.method({
 selector: "newBlockScope",
 fn: function (){
@@ -1074,7 +1007,6 @@ messageSends: ["newScopeOfClass:"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_newMethodScope",
 smalltalk.method({
 selector: "newMethodScope",
 fn: function (){
@@ -1089,7 +1021,6 @@ messageSends: ["newScopeOfClass:"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_newScopeOfClass_",
 smalltalk.method({
 selector: "newScopeOfClass:",
 fn: function (aLexicalScopeClass){
@@ -1106,7 +1037,6 @@ messageSends: ["outerScope:", "new", "yourself"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_popScope",
 smalltalk.method({
 selector: "popScope",
 fn: function (){
@@ -1125,7 +1055,6 @@ messageSends: ["ifNotNil:", "outerScope"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_pushScope_",
 smalltalk.method({
 selector: "pushScope:",
 fn: function (aScope){
@@ -1138,7 +1067,6 @@ messageSends: ["outerScope:"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_superSends",
 smalltalk.method({
 selector: "superSends",
 fn: function (){
@@ -1159,7 +1087,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 fn: function (){
@@ -1173,7 +1100,6 @@ messageSends: []}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 fn: function (aClass){
@@ -1185,7 +1111,6 @@ messageSends: []}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_validateVariableScope_",
 smalltalk.method({
 selector: "validateVariableScope:",
 fn: function (aString){
@@ -1203,7 +1128,6 @@ messageSends: ["ifNotNil:", "errorShadowingVariable:", "lookupVariable:"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitAssignmentNode_",
 smalltalk.method({
 selector: "visitAssignmentNode:",
 fn: function (aNode){
@@ -1216,7 +1140,6 @@ messageSends: ["visitAssignmentNode:", "beAssigned", "left"]}),
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitBlockNode_",
 smalltalk.method({
 selector: "visitBlockNode:",
 fn: function (aNode){
@@ -1237,7 +1160,6 @@ messageSends: ["pushScope:", "newBlockScope", "scope:", "node:", "do:", "validat
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitCascadeNode_",
 smalltalk.method({
 selector: "visitCascadeNode:",
 fn: function (aNode){
@@ -1261,7 +1183,6 @@ messageSends: ["do:", "receiver:", "receiver", "nodes", "visitCascadeNode:", "if
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitClassReferenceNode_",
 smalltalk.method({
 selector: "visitClassReferenceNode:",
 fn: function (aNode){
@@ -1279,7 +1200,6 @@ messageSends: ["add:", "value", "classReferences", "binding:", "name:", "new", "
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitMethodNode_",
 smalltalk.method({
 selector: "visitMethodNode:",
 fn: function (aNode){
@@ -1309,7 +1229,6 @@ messageSends: ["pushScope:", "newMethodScope", "scope:", "node:", "do:", "addIVa
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitReturnNode_",
 smalltalk.method({
 selector: "visitReturnNode:",
 fn: function (aNode){
@@ -1329,7 +1248,6 @@ messageSends: ["scope:", "ifTrue:ifFalse:", "localReturn:", "addNonLocalReturn:"
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitSendNode_",
 smalltalk.method({
 selector: "visitSendNode:",
 fn: function (aNode){
@@ -1366,7 +1284,6 @@ messageSends: ["ifTrue:ifFalse:", "superSend:", "value:", "receiver", "at:ifAbse
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitSequenceNode_",
 smalltalk.method({
 selector: "visitSequenceNode:",
 fn: function (aNode){
@@ -1383,7 +1300,6 @@ messageSends: ["do:", "validateVariableScope:", "addTemp:", "temps", "visitSeque
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitVariableNode_",
 smalltalk.method({
 selector: "visitVariableNode:",
 fn: function (aNode){
@@ -1409,7 +1325,6 @@ smalltalk.SemanticAnalyzer);
 
 
 smalltalk.addMethod(
-"_on_",
 smalltalk.method({
 selector: "on:",
 fn: function (aClass){

js/Compiler-Semantic.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Compiler-Semantic');
 smalltalk.addClass('LexicalScope', smalltalk.Object, ['node', 'instruction', 'temps', 'args', 'outerScope'], 'Compiler-Semantic');
 smalltalk.LexicalScope.comment="I represent a lexical scope where variable names are associated with ScopeVars\x0aInstances are used for block scopes. Method scopes are instances of MethodLexicalScope.\x0a\x0aI am attached to a ScopeVar and method/block nodes.\x0aEach context (method/closure) get a fresh scope that inherits from its outer scope."
 smalltalk.addMethod(
-"_addArg_",
 smalltalk.method({
 selector: "addArg:",
 category: 'adding',
@@ -21,7 +20,6 @@ referencedClasses: ["ArgVar"]
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_addTemp_",
 smalltalk.method({
 selector: "addTemp:",
 category: 'adding',
@@ -40,7 +38,6 @@ referencedClasses: ["TempVar"]
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 category: 'accessing',
@@ -59,7 +56,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_allVariableNames",
 smalltalk.method({
 selector: "allVariableNames",
 category: 'accessing',
@@ -78,7 +74,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_args",
 smalltalk.method({
 selector: "args",
 category: 'accessing',
@@ -104,7 +99,6 @@ referencedClasses: ["Dictionary"]
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_bindingFor_",
 smalltalk.method({
 selector: "bindingFor:",
 category: 'accessing',
@@ -132,7 +126,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_canInlineNonLocalReturns",
 smalltalk.method({
 selector: "canInlineNonLocalReturns",
 category: 'testing',
@@ -154,7 +147,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_instruction",
 smalltalk.method({
 selector: "instruction",
 category: 'accessing',
@@ -173,7 +165,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_instruction_",
 smalltalk.method({
 selector: "instruction:",
 category: 'accessing',
@@ -190,7 +181,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_isBlockScope",
 smalltalk.method({
 selector: "isBlockScope",
 category: 'testing',
@@ -209,7 +199,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_isInlined",
 smalltalk.method({
 selector: "isInlined",
 category: 'testing',
@@ -231,7 +220,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_isMethodScope",
 smalltalk.method({
 selector: "isMethodScope",
 category: 'testing',
@@ -248,7 +236,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_lookupVariable_",
 smalltalk.method({
 selector: "lookupVariable:",
 category: 'accessing',
@@ -281,7 +268,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_methodScope",
 smalltalk.method({
 selector: "methodScope",
 category: 'accessing',
@@ -305,7 +291,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_node",
 smalltalk.method({
 selector: "node",
 category: 'accessing',
@@ -324,7 +309,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_node_",
 smalltalk.method({
 selector: "node:",
 category: 'accessing',
@@ -341,7 +325,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_outerScope",
 smalltalk.method({
 selector: "outerScope",
 category: 'accessing',
@@ -360,7 +343,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_outerScope_",
 smalltalk.method({
 selector: "outerScope:",
 category: 'accessing',
@@ -377,7 +359,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_pseudoVars",
 smalltalk.method({
 selector: "pseudoVars",
 category: 'accessing',
@@ -396,7 +377,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_scopeLevel",
 smalltalk.method({
 selector: "scopeLevel",
 category: 'accessing',
@@ -427,7 +407,6 @@ referencedClasses: []
 smalltalk.LexicalScope);
 
 smalltalk.addMethod(
-"_temps",
 smalltalk.method({
 selector: "temps",
 category: 'accessing',
@@ -457,7 +436,6 @@ smalltalk.LexicalScope);
 smalltalk.addClass('MethodLexicalScope', smalltalk.LexicalScope, ['iVars', 'pseudoVars', 'unknownVariables', 'localReturn', 'nonLocalReturns'], 'Compiler-Semantic');
 smalltalk.MethodLexicalScope.comment="I represent a method scope."
 smalltalk.addMethod(
-"_addIVar_",
 smalltalk.method({
 selector: "addIVar:",
 category: 'adding',
@@ -476,7 +454,6 @@ referencedClasses: ["InstanceVar"]
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_addNonLocalReturn_",
 smalltalk.method({
 selector: "addNonLocalReturn:",
 category: 'adding',
@@ -493,7 +470,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_allVariableNames",
 smalltalk.method({
 selector: "allVariableNames",
 category: 'accessing',
@@ -512,7 +488,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_bindingFor_",
 smalltalk.method({
 selector: "bindingFor:",
 category: 'accessing',
@@ -539,7 +514,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_canInlineNonLocalReturns",
 smalltalk.method({
 selector: "canInlineNonLocalReturns",
 category: 'testing',
@@ -556,7 +530,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_hasLocalReturn",
 smalltalk.method({
 selector: "hasLocalReturn",
 category: 'testing',
@@ -575,7 +548,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_hasNonLocalReturn",
 smalltalk.method({
 selector: "hasNonLocalReturn",
 category: 'testing',
@@ -594,7 +566,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_iVars",
 smalltalk.method({
 selector: "iVars",
 category: 'accessing',
@@ -620,7 +591,6 @@ referencedClasses: ["Dictionary"]
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_isMethodScope",
 smalltalk.method({
 selector: "isMethodScope",
 category: 'testing',
@@ -637,7 +607,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_localReturn",
 smalltalk.method({
 selector: "localReturn",
 category: 'accessing',
@@ -661,7 +630,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_localReturn_",
 smalltalk.method({
 selector: "localReturn:",
 category: 'accessing',
@@ -678,7 +646,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_methodScope",
 smalltalk.method({
 selector: "methodScope",
 category: 'accessing',
@@ -697,7 +664,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_nonLocalReturns",
 smalltalk.method({
 selector: "nonLocalReturns",
 category: 'accessing',
@@ -723,7 +689,6 @@ referencedClasses: ["OrderedCollection"]
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_pseudoVars",
 smalltalk.method({
 selector: "pseudoVars",
 category: 'accessing',
@@ -759,7 +724,6 @@ referencedClasses: ["Dictionary", "PseudoVar", "Smalltalk"]
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_removeNonLocalReturn_",
 smalltalk.method({
 selector: "removeNonLocalReturn:",
 category: 'adding',
@@ -778,7 +742,6 @@ referencedClasses: []
 smalltalk.MethodLexicalScope);
 
 smalltalk.addMethod(
-"_unknownVariables",
 smalltalk.method({
 selector: "unknownVariables",
 category: 'accessing',
@@ -808,7 +771,6 @@ smalltalk.MethodLexicalScope);
 smalltalk.addClass('ScopeVar', smalltalk.Object, ['scope', 'name'], 'Compiler-Semantic');
 smalltalk.ScopeVar.comment="I am an entry in a LexicalScope that gets associated with variable nodes of the same name.\x0aThere are 4 different subclasses of vars: temp vars, local vars, args, and unknown/global vars."
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 category: 'accessing',
@@ -827,7 +789,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isArgVar",
 smalltalk.method({
 selector: "isArgVar",
 category: 'testing',
@@ -844,7 +805,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isClassRefVar",
 smalltalk.method({
 selector: "isClassRefVar",
 category: 'testing',
@@ -861,7 +821,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isInstanceVar",
 smalltalk.method({
 selector: "isInstanceVar",
 category: 'testing',
@@ -878,7 +837,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isPseudoVar",
 smalltalk.method({
 selector: "isPseudoVar",
 category: 'testing',
@@ -895,7 +853,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isTempVar",
 smalltalk.method({
 selector: "isTempVar",
 category: 'testing',
@@ -912,7 +869,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_isUnknownVar",
 smalltalk.method({
 selector: "isUnknownVar",
 category: 'testing',
@@ -929,7 +885,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_name",
 smalltalk.method({
 selector: "name",
 category: 'accessing',
@@ -948,7 +903,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_name_",
 smalltalk.method({
 selector: "name:",
 category: 'accessing',
@@ -965,7 +919,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_scope",
 smalltalk.method({
 selector: "scope",
 category: 'accessing',
@@ -984,7 +937,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_scope_",
 smalltalk.method({
 selector: "scope:",
 category: 'accessing',
@@ -1001,7 +953,6 @@ referencedClasses: []
 smalltalk.ScopeVar);
 
 smalltalk.addMethod(
-"_validateAssignment",
 smalltalk.method({
 selector: "validateAssignment",
 category: 'testing',
@@ -1030,7 +981,6 @@ smalltalk.ScopeVar);
 
 
 smalltalk.addMethod(
-"_on_",
 smalltalk.method({
 selector: "on:",
 category: 'instance creation',
@@ -1055,7 +1005,6 @@ smalltalk.ScopeVar.klass);
 smalltalk.addClass('AliasVar', smalltalk.ScopeVar, ['node'], 'Compiler-Semantic');
 smalltalk.AliasVar.comment="I am an internally defined variable by the compiler"
 smalltalk.addMethod(
-"_node",
 smalltalk.method({
 selector: "node",
 category: 'accessing',
@@ -1074,7 +1023,6 @@ referencedClasses: []
 smalltalk.AliasVar);
 
 smalltalk.addMethod(
-"_node_",
 smalltalk.method({
 selector: "node:",
 category: 'accessing',
@@ -1095,7 +1043,6 @@ smalltalk.AliasVar);
 smalltalk.addClass('ArgVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.ArgVar.comment="I am an argument of a method or block."
 smalltalk.addMethod(
-"_isArgVar",
 smalltalk.method({
 selector: "isArgVar",
 category: 'testing',
@@ -1116,7 +1063,6 @@ smalltalk.ArgVar);
 smalltalk.addClass('ClassRefVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.ClassRefVar.comment="I am an class reference variable"
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 category: 'accessing',
@@ -1135,7 +1081,6 @@ referencedClasses: []
 smalltalk.ClassRefVar);
 
 smalltalk.addMethod(
-"_isClassRefVar",
 smalltalk.method({
 selector: "isClassRefVar",
 category: 'testing',
@@ -1156,7 +1101,6 @@ smalltalk.ClassRefVar);
 smalltalk.addClass('InstanceVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.InstanceVar.comment="I am an instance variable of a method or block."
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 category: 'testing',
@@ -1175,7 +1119,6 @@ referencedClasses: []
 smalltalk.InstanceVar);
 
 smalltalk.addMethod(
-"_isInstanceVar",
 smalltalk.method({
 selector: "isInstanceVar",
 category: 'testing',
@@ -1196,7 +1139,6 @@ smalltalk.InstanceVar);
 smalltalk.addClass('PseudoVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.PseudoVar.comment="I am an pseudo variable.\x0a\x0aThe five Smalltalk pseudo variables are: 'self', 'super', 'nil', 'true' and 'false'"
 smalltalk.addMethod(
-"_alias",
 smalltalk.method({
 selector: "alias",
 category: 'accessing',
@@ -1215,7 +1157,6 @@ referencedClasses: []
 smalltalk.PseudoVar);
 
 smalltalk.addMethod(
-"_isPseudoVar",
 smalltalk.method({
 selector: "isPseudoVar",
 category: 'testing',
@@ -1236,7 +1177,6 @@ smalltalk.PseudoVar);
 smalltalk.addClass('TempVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.TempVar.comment="I am an temporary variable of a method or block."
 smalltalk.addMethod(
-"_isTempVar",
 smalltalk.method({
 selector: "isTempVar",
 category: 'testing',
@@ -1257,7 +1197,6 @@ smalltalk.TempVar);
 smalltalk.addClass('UnknownVar', smalltalk.ScopeVar, [], 'Compiler-Semantic');
 smalltalk.UnknownVar.comment="I am an unknown variable. Amber uses unknown variables as JavaScript globals"
 smalltalk.addMethod(
-"_isUnknownVar",
 smalltalk.method({
 selector: "isUnknownVar",
 category: 'testing',
@@ -1278,7 +1217,6 @@ smalltalk.UnknownVar);
 smalltalk.addClass('SemanticAnalyzer', smalltalk.NodeVisitor, ['currentScope', 'theClass', 'classReferences', 'messageSends', 'superSends'], 'Compiler-Semantic');
 smalltalk.SemanticAnalyzer.comment="I semantically analyze the abstract syntax tree and annotate it with informations such as non local returns and variable scopes."
 smalltalk.addMethod(
-"_classReferences",
 smalltalk.method({
 selector: "classReferences",
 category: 'accessing',
@@ -1304,7 +1242,6 @@ referencedClasses: ["Set"]
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_errorShadowingVariable_",
 smalltalk.method({
 selector: "errorShadowingVariable:",
 category: 'error handling',
@@ -1325,7 +1262,6 @@ referencedClasses: ["ShadowingVariableError"]
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_errorUnknownVariable_",
 smalltalk.method({
 selector: "errorUnknownVariable:",
 category: 'error handling',
@@ -1357,7 +1293,6 @@ referencedClasses: ["UnknownVariableError"]
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_isVariableGloballyUndefined_",
 smalltalk.method({
 selector: "isVariableGloballyUndefined:",
 category: 'testing',
@@ -1374,7 +1309,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_messageSends",
 smalltalk.method({
 selector: "messageSends",
 category: 'accessing',
@@ -1400,7 +1334,6 @@ referencedClasses: ["Dictionary"]
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_newBlockScope",
 smalltalk.method({
 selector: "newBlockScope",
 category: 'factory',
@@ -1420,7 +1353,6 @@ referencedClasses: ["LexicalScope"]
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_newMethodScope",
 smalltalk.method({
 selector: "newMethodScope",
 category: 'factory',
@@ -1440,7 +1372,6 @@ referencedClasses: ["MethodLexicalScope"]
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_newScopeOfClass_",
 smalltalk.method({
 selector: "newScopeOfClass:",
 category: 'factory',
@@ -1462,7 +1393,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_popScope",
 smalltalk.method({
 selector: "popScope",
 category: 'scope',
@@ -1486,7 +1416,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_pushScope_",
 smalltalk.method({
 selector: "pushScope:",
 category: 'scope',
@@ -1504,7 +1433,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_superSends",
 smalltalk.method({
 selector: "superSends",
 category: 'accessing',
@@ -1530,7 +1458,6 @@ referencedClasses: ["Dictionary"]
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 category: 'accessing',
@@ -1549,7 +1476,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 category: 'accessing',
@@ -1566,7 +1492,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_validateVariableScope_",
 smalltalk.method({
 selector: "validateVariableScope:",
 category: 'scope',
@@ -1589,7 +1514,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitAssignmentNode_",
 smalltalk.method({
 selector: "visitAssignmentNode:",
 category: 'visiting',
@@ -1607,7 +1531,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitBlockNode_",
 smalltalk.method({
 selector: "visitBlockNode:",
 category: 'visiting',
@@ -1633,7 +1556,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitCascadeNode_",
 smalltalk.method({
 selector: "visitCascadeNode:",
 category: 'visiting',
@@ -1662,7 +1584,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitClassReferenceNode_",
 smalltalk.method({
 selector: "visitClassReferenceNode:",
 category: 'visiting',
@@ -1685,7 +1606,6 @@ referencedClasses: ["ClassRefVar"]
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitMethodNode_",
 smalltalk.method({
 selector: "visitMethodNode:",
 category: 'visiting',
@@ -1720,7 +1640,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitReturnNode_",
 smalltalk.method({
 selector: "visitReturnNode:",
 category: 'visiting',
@@ -1745,7 +1664,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitSendNode_",
 smalltalk.method({
 selector: "visitSendNode:",
 category: 'visiting',
@@ -1787,7 +1705,6 @@ referencedClasses: ["Set", "IRSendInliner"]
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitSequenceNode_",
 smalltalk.method({
 selector: "visitSequenceNode:",
 category: 'visiting',
@@ -1809,7 +1726,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzer);
 
 smalltalk.addMethod(
-"_visitVariableNode_",
 smalltalk.method({
 selector: "visitVariableNode:",
 category: 'visiting',
@@ -1840,7 +1756,6 @@ smalltalk.SemanticAnalyzer);
 
 
 smalltalk.addMethod(
-"_on_",
 smalltalk.method({
 selector: "on:",
 category: 'instance creation',

js/Compiler-Tests.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Compiler-Tests');
 smalltalk.addClass('AbstractASTInterpreterTest', smalltalk.TestCase, [], 'Compiler-Tests');
 smalltalk.addMethod(
-"_analyze_forClass_",
 smalltalk.method({
 selector: "analyze:forClass:",
 fn: function (aNode,aClass){
@@ -17,7 +16,6 @@ messageSends: ["visit:", "on:"]}),
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_interpret_",
 smalltalk.method({
 selector: "interpret:",
 fn: function (aString){
@@ -32,7 +30,6 @@ messageSends: ["interpret:withArguments:", "new"]}),
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_interpret_receiver_withArguments_",
 smalltalk.method({
 selector: "interpret:receiver:withArguments:",
 fn: function (aString,anObject,aDictionary){
@@ -58,7 +55,6 @@ messageSends: ["new", "receiver:", "keysAndValuesDo:", "localAt:put:", "context:
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_interpret_withArguments_",
 smalltalk.method({
 selector: "interpret:withArguments:",
 fn: function (aString,aDictionary){
@@ -73,7 +69,6 @@ messageSends: ["interpret:receiver:withArguments:", "new"]}),
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_interpreter",
 smalltalk.method({
 selector: "interpreter",
 fn: function (){
@@ -87,7 +82,6 @@ messageSends: ["subclassResponsibility"]}),
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_parse_",
 smalltalk.method({
 selector: "parse:",
 fn: function (aString){
@@ -102,7 +96,6 @@ messageSends: ["parse:", "current"]}),
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_parse_forClass_",
 smalltalk.method({
 selector: "parse:forClass:",
 fn: function (aString,aClass){
@@ -119,7 +112,6 @@ smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addClass('ASTInterpreterTest', smalltalk.AbstractASTInterpreterTest, [], 'Compiler-Tests');
 smalltalk.addMethod(
-"_interpreter",
 smalltalk.method({
 selector: "interpreter",
 fn: function (){
@@ -134,7 +126,6 @@ messageSends: ["new"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testBinarySend",
 smalltalk.method({
 selector: "testBinarySend",
 fn: function (){
@@ -146,7 +137,6 @@ messageSends: ["assert:equals:", "interpret:"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testBlockLiteral",
 smalltalk.method({
 selector: "testBlockLiteral",
 fn: function (){
@@ -160,7 +150,6 @@ messageSends: ["assert:equals:", "interpret:"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testCascade",
 smalltalk.method({
 selector: "testCascade",
 fn: function (){
@@ -173,7 +162,6 @@ messageSends: ["assert:equals:", "interpret:", "with:with:"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testDynamicArray",
 smalltalk.method({
 selector: "testDynamicArray",
 fn: function (){
@@ -185,7 +173,6 @@ messageSends: ["assert:equals:", "interpret:"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testDynamicDictionary",
 smalltalk.method({
 selector: "testDynamicDictionary",
 fn: function (){
@@ -197,7 +184,6 @@ messageSends: ["assert:equals:", "interpret:", "->"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testInlinedJSStatement",
 smalltalk.method({
 selector: "testInlinedJSStatement",
 fn: function (){
@@ -210,7 +196,6 @@ messageSends: ["assert:equals:", "interpret:", "interpret:withArguments:", "->"]
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testInstVarAccess",
 smalltalk.method({
 selector: "testInstVarAccess",
 fn: function (){
@@ -222,7 +207,6 @@ messageSends: ["assert:equals:", "interpret:receiver:withArguments:", "@"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testInstVarAssignment",
 smalltalk.method({
 selector: "testInstVarAssignment",
 fn: function (){
@@ -235,7 +219,6 @@ messageSends: ["assert:equals:", "interpret:receiver:withArguments:", "new", "->
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testNonlocalReturn",
 smalltalk.method({
 selector: "testNonlocalReturn",
 fn: function (){
@@ -247,7 +230,6 @@ messageSends: ["assert:equals:", "interpret:"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testReceiver",
 smalltalk.method({
 selector: "testReceiver",
 fn: function (){
@@ -259,7 +241,6 @@ messageSends: ["assert:equals:", "interpret:receiver:withArguments:", "@"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testTempAssignment",
 smalltalk.method({
 selector: "testTempAssignment",
 fn: function (){
@@ -271,7 +252,6 @@ messageSends: ["assert:equals:", "interpret:"]}),
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testThisContext",
 smalltalk.method({
 selector: "testThisContext",
 fn: function (){
@@ -288,7 +268,6 @@ smalltalk.ASTInterpreterTest);
 
 smalltalk.addClass('ASTSteppingInterpreterTest', smalltalk.AbstractASTInterpreterTest, ['interpreter'], 'Compiler-Tests');
 smalltalk.addMethod(
-"_interpreter",
 smalltalk.method({
 selector: "interpreter",
 fn: function (){
@@ -309,7 +288,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.ASTSteppingInterpreterTest);
 
 smalltalk.addMethod(
-"_testAtEnd",
 smalltalk.method({
 selector: "testAtEnd",
 fn: function (){
@@ -330,7 +308,6 @@ messageSends: ["interpret:", "deny:", "atEnd", "interpreter", "step", "assert:"]
 smalltalk.ASTSteppingInterpreterTest);
 
 smalltalk.addMethod(
-"_testMessageSend",
 smalltalk.method({
 selector: "testMessageSend",
 fn: function (){
@@ -350,7 +327,6 @@ messageSends: ["interpret:", "step", "interpreter", "assert:equals:", "value", "
 smalltalk.ASTSteppingInterpreterTest);
 
 smalltalk.addMethod(
-"_testSimpleStepping",
 smalltalk.method({
 selector: "testSimpleStepping",
 fn: function (){
@@ -369,7 +345,6 @@ smalltalk.ASTSteppingInterpreterTest);
 
 smalltalk.addClass('CodeGeneratorTest', smalltalk.TestCase, ['receiver'], 'Compiler-Tests');
 smalltalk.addMethod(
-"_codeGeneratorClass",
 smalltalk.method({
 selector: "codeGeneratorClass",
 fn: function (){
@@ -384,7 +359,6 @@ messageSends: []}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_compiler",
 smalltalk.method({
 selector: "compiler",
 fn: function (){
@@ -402,7 +376,6 @@ messageSends: ["codeGeneratorClass:", "codeGeneratorClass", "new", "yourself"]})
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 fn: function (){
@@ -414,7 +387,6 @@ messageSends: ["new", "targetClass"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_should_return_",
 smalltalk.method({
 selector: "should:return:",
 fn: function (aString,anObject){
@@ -430,7 +402,6 @@ messageSends: ["install:forClass:category:", "targetClass", "compiler", "perform
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_targetClass",
 smalltalk.method({
 selector: "targetClass",
 fn: function (){
@@ -445,7 +416,6 @@ messageSends: []}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_tearDown",
 smalltalk.method({
 selector: "tearDown",
 fn: function (){
@@ -456,7 +426,6 @@ messageSends: []}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testAssignment",
 smalltalk.method({
 selector: "testAssignment",
 fn: function (){
@@ -470,7 +439,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testBackslashSelectors",
 smalltalk.method({
 selector: "testBackslashSelectors",
 fn: function (){
@@ -483,7 +451,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testBlockReturn",
 smalltalk.method({
 selector: "testBlockReturn",
 fn: function (){
@@ -497,7 +464,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testCascades",
 smalltalk.method({
 selector: "testCascades",
 fn: function (){
@@ -509,7 +475,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testDynamicArrayElementsOrdered",
 smalltalk.method({
 selector: "testDynamicArrayElementsOrdered",
 fn: function (){
@@ -521,7 +486,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testDynamicDictionaryElementsOrdered",
 smalltalk.method({
 selector: "testDynamicDictionaryElementsOrdered",
 fn: function (){
@@ -533,7 +497,6 @@ messageSends: ["should:return:", "->"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testInnerTemporalDependentElementsOrdered",
 smalltalk.method({
 selector: "testInnerTemporalDependentElementsOrdered",
 fn: function (){
@@ -549,7 +512,6 @@ messageSends: ["should:return:", "->"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testLiterals",
 smalltalk.method({
 selector: "testLiterals",
 fn: function (){
@@ -569,7 +531,6 @@ messageSends: ["should:return:", "->"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testLocalReturn",
 smalltalk.method({
 selector: "testLocalReturn",
 fn: function (){
@@ -585,7 +546,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testMessageSends",
 smalltalk.method({
 selector: "testMessageSends",
 fn: function (){
@@ -601,7 +561,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testMutableLiterals",
 smalltalk.method({
 selector: "testMutableLiterals",
 fn: function (){
@@ -613,7 +572,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testNestedIfTrue",
 smalltalk.method({
 selector: "testNestedIfTrue",
 fn: function (){
@@ -628,7 +586,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testNonLocalReturn",
 smalltalk.method({
 selector: "testNonLocalReturn",
 fn: function (){
@@ -643,7 +600,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testPascalCaseGlobal",
 smalltalk.method({
 selector: "testPascalCaseGlobal",
 fn: function (){
@@ -656,7 +612,6 @@ messageSends: ["should:return:", "at:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testSendReceiverAndArgumentsOrdered",
 smalltalk.method({
 selector: "testSendReceiverAndArgumentsOrdered",
 fn: function (){
@@ -670,7 +625,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifFalse",
 smalltalk.method({
 selector: "testifFalse",
 fn: function (){
@@ -685,7 +639,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifFalseIfTrue",
 smalltalk.method({
 selector: "testifFalseIfTrue",
 fn: function (){
@@ -700,7 +653,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifNil",
 smalltalk.method({
 selector: "testifNil",
 fn: function (){
@@ -715,7 +667,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifNilIfNotNil",
 smalltalk.method({
 selector: "testifNilIfNotNil",
 fn: function (){
@@ -730,7 +681,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifNotNil",
 smalltalk.method({
 selector: "testifNotNil",
 fn: function (){
@@ -745,7 +695,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifNotNilWithArgument",
 smalltalk.method({
 selector: "testifNotNilWithArgument",
 fn: function (){
@@ -762,7 +711,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifTrue",
 smalltalk.method({
 selector: "testifTrue",
 fn: function (){
@@ -777,7 +725,6 @@ messageSends: ["should:return:"]}),
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifTrueIfFalse",
 smalltalk.method({
 selector: "testifTrueIfFalse",
 fn: function (){
@@ -795,7 +742,6 @@ smalltalk.CodeGeneratorTest);
 
 smalltalk.addClass('InliningCodeGeneratorTest', smalltalk.CodeGeneratorTest, [], 'Compiler-Tests');
 smalltalk.addMethod(
-"_codeGeneratorClass",
 smalltalk.method({
 selector: "codeGeneratorClass",
 fn: function (){
@@ -813,7 +759,6 @@ smalltalk.InliningCodeGeneratorTest);
 
 smalltalk.addClass('ScopeVarTest', smalltalk.TestCase, [], 'Compiler-Tests');
 smalltalk.addMethod(
-"_testClassRefVar",
 smalltalk.method({
 selector: "testClassRefVar",
 fn: function (){
@@ -834,7 +779,6 @@ messageSends: ["value:", "new", "yourself", "visit:", "assert:", "isClassRefVar"
 smalltalk.ScopeVarTest);
 
 smalltalk.addMethod(
-"_testInstanceVar",
 smalltalk.method({
 selector: "testInstanceVar",
 fn: function (){
@@ -856,7 +800,6 @@ messageSends: ["value:", "new", "yourself", "addIVar:", "assert:", "isInstanceVa
 smalltalk.ScopeVarTest);
 
 smalltalk.addMethod(
-"_testPseudoVar",
 smalltalk.method({
 selector: "testPseudoVar",
 fn: function (){
@@ -881,7 +824,6 @@ messageSends: ["do:", "value:", "new", "yourself", "assert:", "isPseudoVar", "bi
 smalltalk.ScopeVarTest);
 
 smalltalk.addMethod(
-"_testTempVar",
 smalltalk.method({
 selector: "testTempVar",
 fn: function (){
@@ -903,7 +845,6 @@ messageSends: ["value:", "new", "yourself", "addTemp:", "assert:", "isTempVar",
 smalltalk.ScopeVarTest);
 
 smalltalk.addMethod(
-"_testUnknownVar",
 smalltalk.method({
 selector: "testUnknownVar",
 fn: function (){
@@ -926,7 +867,6 @@ smalltalk.ScopeVarTest);
 
 smalltalk.addClass('SemanticAnalyzerTest', smalltalk.TestCase, ['analyzer'], 'Compiler-Tests');
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 fn: function (){
@@ -940,7 +880,6 @@ messageSends: ["on:"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testAssignment",
 smalltalk.method({
 selector: "testAssignment",
 fn: function (){
@@ -959,7 +898,6 @@ messageSends: ["parse:", "should:raise:", "visit:"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testNonLocalReturn",
 smalltalk.method({
 selector: "testNonLocalReturn",
 fn: function (){
@@ -975,7 +913,6 @@ messageSends: ["parse:", "visit:", "deny:", "hasNonLocalReturn", "scope"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testNonLocalReturn2",
 smalltalk.method({
 selector: "testNonLocalReturn2",
 fn: function (){
@@ -991,7 +928,6 @@ messageSends: ["parse:", "visit:", "assert:", "hasNonLocalReturn", "scope"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testScope",
 smalltalk.method({
 selector: "testScope",
 fn: function (){
@@ -1007,7 +943,6 @@ messageSends: ["parse:", "visit:", "deny:", "==", "scope", "last", "nodes", "fir
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testScope2",
 smalltalk.method({
 selector: "testScope2",
 fn: function (){
@@ -1023,7 +958,6 @@ messageSends: ["parse:", "visit:", "deny:", "==", "scope", "first", "nodes", "la
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testScopeLevel",
 smalltalk.method({
 selector: "testScopeLevel",
 fn: function (){
@@ -1040,7 +974,6 @@ messageSends: ["parse:", "visit:", "assert:equals:", "scopeLevel", "scope", "fir
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testUnknownVariables",
 smalltalk.method({
 selector: "testUnknownVariables",
 fn: function (){
@@ -1059,7 +992,6 @@ messageSends: ["parse:", "should:raise:", "visit:"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testUnknownVariablesWithScope",
 smalltalk.method({
 selector: "testUnknownVariablesWithScope",
 fn: function (){
@@ -1078,7 +1010,6 @@ messageSends: ["parse:", "should:raise:", "visit:"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing",
 smalltalk.method({
 selector: "testVariableShadowing",
 fn: function (){
@@ -1093,7 +1024,6 @@ messageSends: ["parse:", "visit:"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing2",
 smalltalk.method({
 selector: "testVariableShadowing2",
 fn: function (){
@@ -1112,7 +1042,6 @@ messageSends: ["parse:", "should:raise:", "visit:"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing3",
 smalltalk.method({
 selector: "testVariableShadowing3",
 fn: function (){
@@ -1127,7 +1056,6 @@ messageSends: ["parse:", "visit:"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing4",
 smalltalk.method({
 selector: "testVariableShadowing4",
 fn: function (){
@@ -1142,7 +1070,6 @@ messageSends: ["parse:", "visit:"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing5",
 smalltalk.method({
 selector: "testVariableShadowing5",
 fn: function (){
@@ -1161,7 +1088,6 @@ messageSends: ["parse:", "should:raise:", "visit:"]}),
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariablesLookup",
 smalltalk.method({
 selector: "testVariablesLookup",
 fn: function (){

js/Compiler-Tests.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Compiler-Tests');
 smalltalk.addClass('AbstractASTInterpreterTest', smalltalk.TestCase, [], 'Compiler-Tests');
 smalltalk.addMethod(
-"_analyze_forClass_",
 smalltalk.method({
 selector: "analyze:forClass:",
 category: 'interpreting',
@@ -22,7 +21,6 @@ referencedClasses: ["SemanticAnalyzer"]
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_interpret_",
 smalltalk.method({
 selector: "interpret:",
 category: 'interpreting',
@@ -42,7 +40,6 @@ referencedClasses: ["Dictionary"]
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_interpret_receiver_withArguments_",
 smalltalk.method({
 selector: "interpret:receiver:withArguments:",
 category: 'interpreting',
@@ -73,7 +70,6 @@ referencedClasses: ["AIContext"]
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_interpret_withArguments_",
 smalltalk.method({
 selector: "interpret:withArguments:",
 category: 'interpreting',
@@ -93,7 +89,6 @@ referencedClasses: ["Object"]
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_interpreter",
 smalltalk.method({
 selector: "interpreter",
 category: 'accessing',
@@ -112,7 +107,6 @@ referencedClasses: []
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_parse_",
 smalltalk.method({
 selector: "parse:",
 category: 'parsing',
@@ -132,7 +126,6 @@ referencedClasses: ["Smalltalk"]
 smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addMethod(
-"_parse_forClass_",
 smalltalk.method({
 selector: "parse:forClass:",
 category: 'parsing',
@@ -154,7 +147,6 @@ smalltalk.AbstractASTInterpreterTest);
 
 smalltalk.addClass('ASTInterpreterTest', smalltalk.AbstractASTInterpreterTest, [], 'Compiler-Tests');
 smalltalk.addMethod(
-"_interpreter",
 smalltalk.method({
 selector: "interpreter",
 category: 'accessing',
@@ -174,7 +166,6 @@ referencedClasses: ["ASTInterpreter"]
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testBinarySend",
 smalltalk.method({
 selector: "testBinarySend",
 category: 'tests',
@@ -191,7 +182,6 @@ referencedClasses: []
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testBlockLiteral",
 smalltalk.method({
 selector: "testBlockLiteral",
 category: 'tests',
@@ -210,7 +200,6 @@ referencedClasses: []
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testCascade",
 smalltalk.method({
 selector: "testCascade",
 category: 'tests',
@@ -228,7 +217,6 @@ referencedClasses: ["OrderedCollection"]
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testDynamicArray",
 smalltalk.method({
 selector: "testDynamicArray",
 category: 'tests',
@@ -245,7 +233,6 @@ referencedClasses: []
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testDynamicDictionary",
 smalltalk.method({
 selector: "testDynamicDictionary",
 category: 'tests',
@@ -262,7 +249,6 @@ referencedClasses: []
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testInlinedJSStatement",
 smalltalk.method({
 selector: "testInlinedJSStatement",
 category: 'tests',
@@ -280,7 +266,6 @@ referencedClasses: []
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testInstVarAccess",
 smalltalk.method({
 selector: "testInstVarAccess",
 category: 'tests',
@@ -297,7 +282,6 @@ referencedClasses: []
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testInstVarAssignment",
 smalltalk.method({
 selector: "testInstVarAssignment",
 category: 'tests',
@@ -315,7 +299,6 @@ referencedClasses: ["Point"]
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testNonlocalReturn",
 smalltalk.method({
 selector: "testNonlocalReturn",
 category: 'tests',
@@ -332,7 +315,6 @@ referencedClasses: []
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testReceiver",
 smalltalk.method({
 selector: "testReceiver",
 category: 'tests',
@@ -349,7 +331,6 @@ referencedClasses: []
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testTempAssignment",
 smalltalk.method({
 selector: "testTempAssignment",
 category: 'tests',
@@ -366,7 +347,6 @@ referencedClasses: []
 smalltalk.ASTInterpreterTest);
 
 smalltalk.addMethod(
-"_testThisContext",
 smalltalk.method({
 selector: "testThisContext",
 category: 'tests',
@@ -388,7 +368,6 @@ smalltalk.ASTInterpreterTest);
 
 smalltalk.addClass('ASTSteppingInterpreterTest', smalltalk.AbstractASTInterpreterTest, ['interpreter'], 'Compiler-Tests');
 smalltalk.addMethod(
-"_interpreter",
 smalltalk.method({
 selector: "interpreter",
 category: 'accessing',
@@ -414,7 +393,6 @@ referencedClasses: ["ASTSteppingInterpreter"]
 smalltalk.ASTSteppingInterpreterTest);
 
 smalltalk.addMethod(
-"_testAtEnd",
 smalltalk.method({
 selector: "testAtEnd",
 category: 'tests',
@@ -440,7 +418,6 @@ referencedClasses: []
 smalltalk.ASTSteppingInterpreterTest);
 
 smalltalk.addMethod(
-"_testMessageSend",
 smalltalk.method({
 selector: "testMessageSend",
 category: 'tests',
@@ -465,7 +442,6 @@ referencedClasses: []
 smalltalk.ASTSteppingInterpreterTest);
 
 smalltalk.addMethod(
-"_testSimpleStepping",
 smalltalk.method({
 selector: "testSimpleStepping",
 category: 'tests',
@@ -489,7 +465,6 @@ smalltalk.ASTSteppingInterpreterTest);
 
 smalltalk.addClass('CodeGeneratorTest', smalltalk.TestCase, ['receiver'], 'Compiler-Tests');
 smalltalk.addMethod(
-"_codeGeneratorClass",
 smalltalk.method({
 selector: "codeGeneratorClass",
 category: 'accessing',
@@ -509,7 +484,6 @@ referencedClasses: ["CodeGenerator"]
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_compiler",
 smalltalk.method({
 selector: "compiler",
 category: 'factory',
@@ -532,7 +506,6 @@ referencedClasses: ["Compiler"]
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 category: 'initialization',
@@ -549,7 +522,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_should_return_",
 smalltalk.method({
 selector: "should:return:",
 category: 'testing',
@@ -570,7 +542,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_targetClass",
 smalltalk.method({
 selector: "targetClass",
 category: 'accessing',
@@ -590,7 +561,6 @@ referencedClasses: ["DoIt"]
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_tearDown",
 smalltalk.method({
 selector: "tearDown",
 category: 'initialization',
@@ -606,7 +576,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testAssignment",
 smalltalk.method({
 selector: "testAssignment",
 category: 'tests',
@@ -625,7 +594,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testBackslashSelectors",
 smalltalk.method({
 selector: "testBackslashSelectors",
 category: 'tests',
@@ -643,7 +611,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testBlockReturn",
 smalltalk.method({
 selector: "testBlockReturn",
 category: 'tests',
@@ -662,7 +629,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testCascades",
 smalltalk.method({
 selector: "testCascades",
 category: 'tests',
@@ -679,7 +645,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testDynamicArrayElementsOrdered",
 smalltalk.method({
 selector: "testDynamicArrayElementsOrdered",
 category: 'tests',
@@ -696,7 +661,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testDynamicDictionaryElementsOrdered",
 smalltalk.method({
 selector: "testDynamicDictionaryElementsOrdered",
 category: 'tests',
@@ -713,7 +677,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testInnerTemporalDependentElementsOrdered",
 smalltalk.method({
 selector: "testInnerTemporalDependentElementsOrdered",
 category: 'tests',
@@ -734,7 +697,6 @@ referencedClasses: ["Array"]
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testLiterals",
 smalltalk.method({
 selector: "testLiterals",
 category: 'tests',
@@ -759,7 +721,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testLocalReturn",
 smalltalk.method({
 selector: "testLocalReturn",
 category: 'tests',
@@ -780,7 +741,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testMessageSends",
 smalltalk.method({
 selector: "testMessageSends",
 category: 'tests',
@@ -801,7 +761,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testMutableLiterals",
 smalltalk.method({
 selector: "testMutableLiterals",
 category: 'tests',
@@ -818,7 +777,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testNestedIfTrue",
 smalltalk.method({
 selector: "testNestedIfTrue",
 category: 'tests',
@@ -838,7 +796,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testNonLocalReturn",
 smalltalk.method({
 selector: "testNonLocalReturn",
 category: 'tests',
@@ -858,7 +815,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testPascalCaseGlobal",
 smalltalk.method({
 selector: "testPascalCaseGlobal",
 category: 'tests',
@@ -876,7 +832,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testSendReceiverAndArgumentsOrdered",
 smalltalk.method({
 selector: "testSendReceiverAndArgumentsOrdered",
 category: 'tests',
@@ -895,7 +850,6 @@ referencedClasses: ["Array"]
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifFalse",
 smalltalk.method({
 selector: "testifFalse",
 category: 'tests',
@@ -915,7 +869,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifFalseIfTrue",
 smalltalk.method({
 selector: "testifFalseIfTrue",
 category: 'tests',
@@ -935,7 +888,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifNil",
 smalltalk.method({
 selector: "testifNil",
 category: 'tests',
@@ -955,7 +907,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifNilIfNotNil",
 smalltalk.method({
 selector: "testifNilIfNotNil",
 category: 'tests',
@@ -975,7 +926,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifNotNil",
 smalltalk.method({
 selector: "testifNotNil",
 category: 'tests',
@@ -995,7 +945,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifNotNilWithArgument",
 smalltalk.method({
 selector: "testifNotNilWithArgument",
 category: 'tests',
@@ -1017,7 +966,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifTrue",
 smalltalk.method({
 selector: "testifTrue",
 category: 'tests',
@@ -1037,7 +985,6 @@ referencedClasses: []
 smalltalk.CodeGeneratorTest);
 
 smalltalk.addMethod(
-"_testifTrueIfFalse",
 smalltalk.method({
 selector: "testifTrueIfFalse",
 category: 'tests',
@@ -1060,7 +1007,6 @@ smalltalk.CodeGeneratorTest);
 
 smalltalk.addClass('InliningCodeGeneratorTest', smalltalk.CodeGeneratorTest, [], 'Compiler-Tests');
 smalltalk.addMethod(
-"_codeGeneratorClass",
 smalltalk.method({
 selector: "codeGeneratorClass",
 category: 'accessing',
@@ -1083,7 +1029,6 @@ smalltalk.InliningCodeGeneratorTest);
 
 smalltalk.addClass('ScopeVarTest', smalltalk.TestCase, [], 'Compiler-Tests');
 smalltalk.addMethod(
-"_testClassRefVar",
 smalltalk.method({
 selector: "testClassRefVar",
 category: 'tests',
@@ -1109,7 +1054,6 @@ referencedClasses: ["ClassReferenceNode", "SemanticAnalyzer"]
 smalltalk.ScopeVarTest);
 
 smalltalk.addMethod(
-"_testInstanceVar",
 smalltalk.method({
 selector: "testInstanceVar",
 category: 'tests',
@@ -1136,7 +1080,6 @@ referencedClasses: ["VariableNode", "MethodLexicalScope"]
 smalltalk.ScopeVarTest);
 
 smalltalk.addMethod(
-"_testPseudoVar",
 smalltalk.method({
 selector: "testPseudoVar",
 category: 'tests',
@@ -1166,7 +1109,6 @@ referencedClasses: ["VariableNode", "MethodLexicalScope"]
 smalltalk.ScopeVarTest);
 
 smalltalk.addMethod(
-"_testTempVar",
 smalltalk.method({
 selector: "testTempVar",
 category: 'tests',
@@ -1193,7 +1135,6 @@ referencedClasses: ["VariableNode", "MethodLexicalScope"]
 smalltalk.ScopeVarTest);
 
 smalltalk.addMethod(
-"_testUnknownVar",
 smalltalk.method({
 selector: "testUnknownVar",
 category: 'tests',
@@ -1221,7 +1162,6 @@ smalltalk.ScopeVarTest);
 
 smalltalk.addClass('SemanticAnalyzerTest', smalltalk.TestCase, ['analyzer'], 'Compiler-Tests');
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 category: 'running',
@@ -1240,7 +1180,6 @@ referencedClasses: ["Object", "SemanticAnalyzer"]
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testAssignment",
 smalltalk.method({
 selector: "testAssignment",
 category: 'tests',
@@ -1264,7 +1203,6 @@ referencedClasses: ["InvalidAssignmentError"]
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testNonLocalReturn",
 smalltalk.method({
 selector: "testNonLocalReturn",
 category: 'tests',
@@ -1285,7 +1223,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testNonLocalReturn2",
 smalltalk.method({
 selector: "testNonLocalReturn2",
 category: 'tests',
@@ -1306,7 +1243,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testScope",
 smalltalk.method({
 selector: "testScope",
 category: 'tests',
@@ -1327,7 +1263,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testScope2",
 smalltalk.method({
 selector: "testScope2",
 category: 'tests',
@@ -1348,7 +1283,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testScopeLevel",
 smalltalk.method({
 selector: "testScopeLevel",
 category: 'tests',
@@ -1370,7 +1304,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testUnknownVariables",
 smalltalk.method({
 selector: "testUnknownVariables",
 category: 'tests',
@@ -1394,7 +1327,6 @@ referencedClasses: ["UnknownVariableError"]
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testUnknownVariablesWithScope",
 smalltalk.method({
 selector: "testUnknownVariablesWithScope",
 category: 'tests',
@@ -1418,7 +1350,6 @@ referencedClasses: ["UnknownVariableError"]
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing",
 smalltalk.method({
 selector: "testVariableShadowing",
 category: 'tests',
@@ -1438,7 +1369,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing2",
 smalltalk.method({
 selector: "testVariableShadowing2",
 category: 'tests',
@@ -1462,7 +1392,6 @@ referencedClasses: ["ShadowingVariableError"]
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing3",
 smalltalk.method({
 selector: "testVariableShadowing3",
 category: 'tests',
@@ -1482,7 +1411,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing4",
 smalltalk.method({
 selector: "testVariableShadowing4",
 category: 'tests',
@@ -1502,7 +1430,6 @@ referencedClasses: []
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariableShadowing5",
 smalltalk.method({
 selector: "testVariableShadowing5",
 category: 'tests',
@@ -1526,7 +1453,6 @@ referencedClasses: ["ShadowingVariableError"]
 smalltalk.SemanticAnalyzerTest);
 
 smalltalk.addMethod(
-"_testVariablesLookup",
 smalltalk.method({
 selector: "testVariablesLookup",
 category: 'tests',

js/Examples.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Examples');
 smalltalk.addClass('Counter', smalltalk.Widget, ['count', 'header'], 'Examples');
 smalltalk.addMethod(
-"_decrease",
 smalltalk.method({
 selector: "decrease",
 fn: function (){
@@ -17,7 +16,6 @@ messageSends: ["-", "contents:", "with:", "asString"]}),
 smalltalk.Counter);
 
 smalltalk.addMethod(
-"_increase",
 smalltalk.method({
 selector: "increase",
 fn: function (){
@@ -33,7 +31,6 @@ messageSends: ["+", "contents:", "with:", "asString"]}),
 smalltalk.Counter);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -46,7 +43,6 @@ messageSends: ["initialize"]}),
 smalltalk.Counter);
 
 smalltalk.addMethod(
-"_renderOn_",
 smalltalk.method({
 selector: "renderOn:",
 fn: function (html){
@@ -75,7 +71,6 @@ smalltalk.Counter);
 
 
 smalltalk.addMethod(
-"_tryExample",
 smalltalk.method({
 selector: "tryExample",
 fn: function (){

js/Examples.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Examples');
 smalltalk.addClass('Counter', smalltalk.Widget, ['count', 'header'], 'Examples');
 smalltalk.Counter.comment="This is a trivial Widget example mimicking the classic Counter example in Seaside.\x0aIn order to play with it, just select the doit below and press the Do it button in the far right corner.\x0aThen take a look in the HTML document above the IDE.\x0a\x0a\x09\x09Counter new appendToJQuery: 'body' asJQuery"
 smalltalk.addMethod(
-"_decrease",
 smalltalk.method({
 selector: "decrease",
 category: 'actions',
@@ -23,7 +22,6 @@ referencedClasses: []
 smalltalk.Counter);
 
 smalltalk.addMethod(
-"_increase",
 smalltalk.method({
 selector: "increase",
 category: 'actions',
@@ -44,7 +42,6 @@ referencedClasses: []
 smalltalk.Counter);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -62,7 +59,6 @@ referencedClasses: []
 smalltalk.Counter);
 
 smalltalk.addMethod(
-"_renderOn_",
 smalltalk.method({
 selector: "renderOn:",
 category: 'rendering',
@@ -96,7 +92,6 @@ smalltalk.Counter);
 
 
 smalltalk.addMethod(
-"_tryExample",
 smalltalk.method({
 selector: "tryExample",
 category: 'example',

js/Importer-Exporter.deploy.js

@@ -3,7 +3,7 @@ smalltalk.addClass('ChunkParser', smalltalk.Object, ['stream'], 'Importer-Export
 smalltalk.addMethod(
 smalltalk.method({
 selector: "nextChunk",
-fn: function () {
+fn: function (){
 var self=this;
 var char,result,chunk;
 return smalltalk.withContext(function($ctx1) { 
@@ -33,18 +33,18 @@ return _st(result)._nextPut_(char);
 return nil;
 }
 catch(e) {if(e===$early)return e[0]; throw e}
-}, function($ctx1) {$ctx1.fill(self,"nextChunk",{char:char,result:result,chunk:chunk},smalltalk.ChunkParser)});},
+}, function($ctx1) {$ctx1.fill(self,"nextChunk",{char:char,result:result,chunk:chunk},smalltalk.ChunkParser)})},
 messageSends: ["writeStream", "whileTrue:", "ifTrue:", "ifTrue:ifFalse:", "next", "trimBoth", "contents", "=", "peek", "nextPut:", "notNil"]}),
 smalltalk.ChunkParser);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "stream:",
-fn: function (aStream) {
+fn: function (aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@stream"]=aStream;
-return self}, function($ctx1) {$ctx1.fill(self,"stream:",{aStream:aStream},smalltalk.ChunkParser)});},
+return self}, function($ctx1) {$ctx1.fill(self,"stream:",{aStream:aStream},smalltalk.ChunkParser)})},
 messageSends: []}),
 smalltalk.ChunkParser);
 
@@ -52,13 +52,13 @@ smalltalk.ChunkParser);
 smalltalk.addMethod(
 smalltalk.method({
 selector: "on:",
-fn: function (aStream) {
+fn: function (aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(_st(self)._new())._stream_(aStream);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"on:",{aStream:aStream},smalltalk.ChunkParser.klass)});},
+}, function($ctx1) {$ctx1.fill(self,"on:",{aStream:aStream},smalltalk.ChunkParser.klass)})},
 messageSends: ["stream:", "new"]}),
 smalltalk.ChunkParser.klass);
 
@@ -67,7 +67,7 @@ smalltalk.addClass('Exporter', smalltalk.Object, [], 'Importer-Exporter');
 smalltalk.addMethod(
 smalltalk.method({
 selector: "classNameFor:",
-fn: function (aClass) {
+fn: function (aClass){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$3,$1;
@@ -83,14 +83,14 @@ $1=_st(aClass)._name();
 };
 };
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"classNameFor:",{aClass:aClass},smalltalk.Exporter)});},
+}, function($ctx1) {$ctx1.fill(self,"classNameFor:",{aClass:aClass},smalltalk.Exporter)})},
 messageSends: ["ifTrue:ifFalse:", ",", "name", "instanceClass", "isNil", "isMetaclass"]}),
 smalltalk.Exporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportAll",
-fn: function () {
+fn: function (){
 var self=this;
 function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)}
 function $String(){return smalltalk.String||(typeof String=="undefined"?nil:String)}
@@ -104,14 +104,14 @@ return _st(stream)._nextPutAll_(_st(self)._exportPackage_(_st(pkg)._name()));
 }, function($ctx3) {$ctx3.fillBlock({pkg:pkg},$ctx1)})}));
 }, function($ctx2) {$ctx2.fillBlock({stream:stream},$ctx1)})}));
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"exportAll",{},smalltalk.Exporter)});},
+}, function($ctx1) {$ctx1.fill(self,"exportAll",{},smalltalk.Exporter)})},
 messageSends: ["streamContents:", "do:", "nextPutAll:", "exportPackage:", "name", "packages", "current"]}),
 smalltalk.Exporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportClass:",
-fn: function (aClass) {
+fn: function (aClass){
 var self=this;
 function $String(){return smalltalk.String||(typeof String=="undefined"?nil:String)}
 return smalltalk.withContext(function($ctx1) { 
@@ -124,14 +124,14 @@ _st(self)._exportMetaDefinitionOf_on_(aClass,stream);
 return _st(self)._exportMethodsOf_on_(_st(aClass)._class(),stream);
 }, function($ctx2) {$ctx2.fillBlock({stream:stream},$ctx1)})}));
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"exportClass:",{aClass:aClass},smalltalk.Exporter)});},
+}, function($ctx1) {$ctx1.fill(self,"exportClass:",{aClass:aClass},smalltalk.Exporter)})},
 messageSends: ["streamContents:", "exportDefinitionOf:on:", "exportMethodsOf:on:", "exportMetaDefinitionOf:on:", "class"]}),
 smalltalk.Exporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportDefinitionOf:on:",
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4,$5,$6,$7;
@@ -162,14 +162,14 @@ $7=_st($6)._nextPutAll_(_st(_st(aClass)._comment())._asJavascript());
 $7;
 };
 _st(aStream)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)})},
 messageSends: ["nextPutAll:", ",", "classNameFor:", "superclass", "do:separatedBy:", "instanceVariableNames", "category", "ifTrue:", "lf", "asJavascript", "comment", "notEmpty"]}),
 smalltalk.Exporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMetaDefinitionOf:on:",
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 function $String(){return smalltalk.String||(typeof String=="undefined"?nil:String)}
 return smalltalk.withContext(function($ctx1) { 
@@ -189,7 +189,7 @@ return _st(aStream)._nextPutAll_(",");
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
 _st(aStream)._nextPutAll_(_st("];").__comma(_st($String())._lf()));
 };
-return self}, function($ctx1) {$ctx1.fill(self,"exportMetaDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMetaDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)})},
 messageSends: ["ifFalse:", "nextPutAll:", ",", "classNameFor:", "class", "do:separatedBy:", "instanceVariableNames", "lf", "isEmpty"]}),
 smalltalk.Exporter);
 
@@ -233,7 +233,7 @@ smalltalk.Exporter);
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMethodsOf:on:",
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
@@ -248,14 +248,14 @@ return _st(self)._exportMethod_of_on_(each,aClass,aStream);
 };
 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
 _st(aStream)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportMethodsOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMethodsOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)})},
 messageSends: ["do:", "ifFalse:", "exportMethod:of:on:", "match:", "category", "sorted:", "<=", "selector", "values", "methodDictionary", "lf"]}),
 smalltalk.Exporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackage:",
-fn: function (packageName) {
+fn: function (packageName){
 var self=this;
 var package_;
 function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)}
@@ -274,14 +274,14 @@ return _st(stream)._nextPutAll_(_st(self)._exportClass_(each));
 return _st(self)._exportPackageExtensionsOf_on_(package_,stream);
 }, function($ctx2) {$ctx2.fillBlock({stream:stream},$ctx1)})}));
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"exportPackage:",{packageName:packageName,package_:package_},smalltalk.Exporter)});},
+}, function($ctx1) {$ctx1.fill(self,"exportPackage:",{packageName:packageName,package_:package_},smalltalk.Exporter)})},
 messageSends: ["streamContents:", "packageAt:", "current", "exportPackageDefinitionOf:on:", "do:", "nextPutAll:", "exportClass:", "asSet", "sortedClasses", "exportPackageExtensionsOf:on:"]}),
 smalltalk.Exporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackageDefinitionOf:on:",
-fn: function (package_, aStream) {
+fn: function (package_,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2;
@@ -289,14 +289,14 @@ $1=aStream;
 _st($1)._nextPutAll_("smalltalk.addPackage(");
 _st($1)._nextPutAll_(_st(_st("'").__comma(_st(package_)._name())).__comma("');"));
 $2=_st($1)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportPackageDefinitionOf:on:",{package_:package_,aStream:aStream},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportPackageDefinitionOf:on:",{package_:package_,aStream:aStream},smalltalk.Exporter)})},
 messageSends: ["nextPutAll:", ",", "name", "lf"]}),
 smalltalk.Exporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackageExtensionsOf:on:",
-fn: function (package_, aStream) {
+fn: function (package_,aStream){
 var self=this;
 var name;
 function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)}
@@ -320,7 +320,7 @@ return _st(self)._exportMethod_of_on_(method,aClass,aStream);
 }, function($ctx4) {$ctx4.fillBlock({method:method},$ctx1)})}));
 }, function($ctx3) {$ctx3.fillBlock({aClass:aClass},$ctx1)})}));
 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"exportPackageExtensionsOf:on:",{package_:package_,aStream:aStream,name:name},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportPackageExtensionsOf:on:",{package_:package_,aStream:aStream,name:name},smalltalk.Exporter)})},
 messageSends: ["name", "do:", "ifTrue:", "exportMethod:of:on:", "match:", ",", "category", "sorted:", "<=", "selector", "values", "methodDictionary", "class", "sortedClasses:", "classes", "current"]}),
 smalltalk.Exporter);
 
@@ -330,20 +330,20 @@ smalltalk.addClass('ChunkExporter', smalltalk.Exporter, [], 'Importer-Exporter')
 smalltalk.addMethod(
 smalltalk.method({
 selector: "chunkEscape:",
-fn: function (aString) {
+fn: function (aString){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(_st(aString)._replace_with_("!","!!"))._trimBoth();
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"chunkEscape:",{aString:aString},smalltalk.ChunkExporter)});},
+}, function($ctx1) {$ctx1.fill(self,"chunkEscape:",{aString:aString},smalltalk.ChunkExporter)})},
 messageSends: ["trimBoth", "replace:with:"]}),
 smalltalk.ChunkExporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "classNameFor:",
-fn: function (aClass) {
+fn: function (aClass){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$3,$1;
@@ -359,14 +359,14 @@ $1=_st(aClass)._name();
 };
 };
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"classNameFor:",{aClass:aClass},smalltalk.ChunkExporter)});},
+}, function($ctx1) {$ctx1.fill(self,"classNameFor:",{aClass:aClass},smalltalk.ChunkExporter)})},
 messageSends: ["ifTrue:ifFalse:", ",", "name", "instanceClass", "isNil", "isMetaclass"]}),
 smalltalk.ChunkExporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportDefinitionOf:on:",
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4,$5,$6,$7;
@@ -399,14 +399,14 @@ $7=_st($6)._lf();
 $7;
 };
 _st(aStream)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)})},
 messageSends: ["nextPutAll:", "classNameFor:", "superclass", ",", "lf", "tab", "do:separatedBy:", "instanceVariableNames", "category", "ifTrue:", "chunkEscape:", "comment", "notEmpty"]}),
 smalltalk.ChunkExporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMetaDefinitionOf:on:",
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4,$5;
@@ -429,14 +429,14 @@ _st($4)._lf();
 $5=_st($4)._lf();
 $5;
 };
-return self}, function($ctx1) {$ctx1.fill(self,"exportMetaDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMetaDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)})},
 messageSends: ["ifFalse:", "nextPutAll:", "classNameFor:", "class", "do:separatedBy:", "instanceVariableNames", "lf", "isEmpty"]}),
 smalltalk.ChunkExporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMethod:of:on:",
-fn: function (aMethod, aClass, aStream) {
+fn: function (aMethod,aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2;
@@ -446,14 +446,14 @@ _st($1)._lf();
 _st($1)._nextPutAll_(_st(self)._chunkEscape_(_st(aMethod)._source()));
 _st($1)._lf();
 $2=_st($1)._nextPutAll_("!");
-return self}, function($ctx1) {$ctx1.fill(self,"exportMethod:of:on:",{aMethod:aMethod,aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMethod:of:on:",{aMethod:aMethod,aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)})},
 messageSends: ["lf", "nextPutAll:", "chunkEscape:", "source"]}),
 smalltalk.ChunkExporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMethods:category:of:on:",
-fn: function (methods, category, aClass, aStream) {
+fn: function (methods,category,aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4;
@@ -471,14 +471,14 @@ $3=aStream;
 _st($3)._nextPutAll_(" !");
 _st($3)._lf();
 $4=_st($3)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportMethods:category:of:on:",{methods:methods,category:category,aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMethods:category:of:on:",{methods:methods,category:category,aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)})},
 messageSends: ["nextPutAll:", ",", "classNameFor:", "do:", "exportMethod:of:on:", "sorted:", "<=", "selector", "lf"]}),
 smalltalk.ChunkExporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMethodsOf:on:",
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 var map;
 function $Dictionary(){return smalltalk.Dictionary||(typeof Dictionary=="undefined"?nil:Dictionary)}
@@ -502,28 +502,28 @@ methods=_st(map)._at_(category);
 methods;
 return _st(self)._exportMethods_category_of_on_(methods,category,aClass,aStream);
 }, function($ctx2) {$ctx2.fillBlock({category:category,methods:methods},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"exportMethodsOf:on:",{aClass:aClass,aStream:aStream,map:map},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMethodsOf:on:",{aClass:aClass,aStream:aStream,map:map},smalltalk.ChunkExporter)})},
 messageSends: ["new", "protocolsDo:", "ifFalse:", "at:put:", "match:", "do:", "at:", "exportMethods:category:of:on:", "sorted:", "<=", "keys"]}),
 smalltalk.ChunkExporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackageDefinitionOf:on:",
-fn: function (package_, aStream) {
+fn: function (package_,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2;
 $1=aStream;
 _st($1)._nextPutAll_(_st(_st("Smalltalk current createPackage: '").__comma(_st(package_)._name())).__comma("'!"));
 $2=_st($1)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportPackageDefinitionOf:on:",{package_:package_,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportPackageDefinitionOf:on:",{package_:package_,aStream:aStream},smalltalk.ChunkExporter)})},
 messageSends: ["nextPutAll:", ",", "name", "lf"]}),
 smalltalk.ChunkExporter);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackageExtensionsOf:on:",
-fn: function (package_, aStream) {
+fn: function (package_,aStream){
 var self=this;
 var name,map;
 function $Dictionary(){return smalltalk.Dictionary||(typeof Dictionary=="undefined"?nil:Dictionary)}
@@ -557,7 +557,7 @@ return _st(self)._exportMethods_category_of_on_(methods,category,aClass,aStream)
 }, function($ctx4) {$ctx4.fillBlock({category:category,methods:methods},$ctx1)})}));
 }, function($ctx3) {$ctx3.fillBlock({aClass:aClass},$ctx1)})}));
 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"exportPackageExtensionsOf:on:",{package_:package_,aStream:aStream,name:name,map:map},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportPackageExtensionsOf:on:",{package_:package_,aStream:aStream,name:name,map:map},smalltalk.ChunkExporter)})},
 messageSends: ["name", "do:", "new", "protocolsDo:", "ifTrue:", "at:put:", "match:", ",", "at:", "exportMethods:category:of:on:", "sorted:", "<=", "keys", "class", "sortedClasses:", "classes", "current"]}),
 smalltalk.ChunkExporter);
 
@@ -567,7 +567,7 @@ smalltalk.addClass('StrippedExporter', smalltalk.Exporter, [], 'Importer-Exporte
 smalltalk.addMethod(
 smalltalk.method({
 selector: "exportDefinitionOf:on:",
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4;
@@ -588,7 +588,7 @@ _st($3)._nextPutAll_("], '");
 _st($3)._nextPutAll_(_st(_st(aClass)._category()).__comma("'"));
 $4=_st($3)._nextPutAll_(");");
 _st(aStream)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.StrippedExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.StrippedExporter)})},
 messageSends: ["nextPutAll:", ",", "classNameFor:", "superclass", "do:separatedBy:", "instanceVariableNames", "category", "lf"]}),
 smalltalk.StrippedExporter);
 
@@ -625,7 +625,7 @@ smalltalk.addClass('Importer', smalltalk.Object, [], 'Importer-Exporter');
 smalltalk.addMethod(
 smalltalk.method({
 selector: "import:",
-fn: function (aStream) {
+fn: function (aStream){
 var self=this;
 var chunk,result,parser,lastEmpty;
 function $ChunkParser(){return smalltalk.ChunkParser||(typeof ChunkParser=="undefined"?nil:ChunkParser)}
@@ -656,7 +656,7 @@ return _st(result)._scanFrom_(parser);
 };
 };
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"import:",{aStream:aStream,chunk:chunk,result:result,parser:parser,lastEmpty:lastEmpty},smalltalk.Importer)});},
+return self}, function($ctx1) {$ctx1.fill(self,"import:",{aStream:aStream,chunk:chunk,result:result,parser:parser,lastEmpty:lastEmpty},smalltalk.Importer)})},
 messageSends: ["on:", "whileFalse:", "ifTrue:ifFalse:", "evaluateExpression:", "new", "ifTrue:", "scanFrom:", "isEmpty", "nextChunk", "isNil"]}),
 smalltalk.Importer);
 
@@ -666,21 +666,21 @@ smalltalk.addClass('PackageHandler', smalltalk.Object, [], 'Importer-Exporter');
 smalltalk.addMethod(
 smalltalk.method({
 selector: "ajaxPutAt:data:",
-fn: function (aURL, aString) {
+fn: function (aURL,aString){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(jQuery)._ajax_options_(aURL,smalltalk.HashedCollection._fromPairs_([_st("type").__minus_gt("PUT"),_st("data").__minus_gt(aString),_st("contentType").__minus_gt("text/plain;charset=UTF-8"),_st("error").__minus_gt((function(xhr){
 return smalltalk.withContext(function($ctx2) {
 return _st(self)._error_(_st(_st(_st(_st("Commiting ").__comma(aURL)).__comma(" failed with reason: \x22")).__comma(_st(xhr)._responseText())).__comma("\x22"));
 }, function($ctx2) {$ctx2.fillBlock({xhr:xhr},$ctx1)})}))]));
-return self}, function($ctx1) {$ctx1.fill(self,"ajaxPutAt:data:",{aURL:aURL,aString:aString},smalltalk.PackageHandler)});},
+return self}, function($ctx1) {$ctx1.fill(self,"ajaxPutAt:data:",{aURL:aURL,aString:aString},smalltalk.PackageHandler)})},
 messageSends: ["ajax:options:", "->", "error:", ",", "responseText"]}),
 smalltalk.PackageHandler);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "commit:",
-fn: function (aPackage) {
+fn: function (aPackage){
 var self=this;
 function $Exporter(){return smalltalk.Exporter||(typeof Exporter=="undefined"?nil:Exporter)}
 function $StrippedExporter(){return smalltalk.StrippedExporter||(typeof StrippedExporter=="undefined"?nil:StrippedExporter)}
@@ -693,14 +693,14 @@ fileContents=_st(_st(_st(commitStrategy)._key())._new())._exportPackage_(_st(aPa
 fileContents;
 return _st(self)._ajaxPutAt_data_(_st(commitStrategy)._value(),fileContents);
 }, function($ctx2) {$ctx2.fillBlock({commitStrategy:commitStrategy,fileContents:fileContents},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"commit:",{aPackage:aPackage},smalltalk.PackageHandler)});},
+return self}, function($ctx1) {$ctx1.fill(self,"commit:",{aPackage:aPackage},smalltalk.PackageHandler)})},
 messageSends: ["do:", "exportPackage:", "name", "new", "key", "ajaxPutAt:data:", "value", "->", ",", "commitPathJs", "commitPathSt"]}),
 smalltalk.PackageHandler);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "loadPackage:prefix:",
-fn: function (packageName, aString) {
+fn: function (packageName,aString){
 var self=this;
 var url;
 return smalltalk.withContext(function($ctx1) { 
@@ -716,28 +716,28 @@ return _st(self)._setupPackageNamed_prefix_(packageName,aString);
 return smalltalk.withContext(function($ctx2) {
 return _st(window)._alert_(_st("Could not load package at: ").__comma(url));
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}))]));
-return self}, function($ctx1) {$ctx1.fill(self,"loadPackage:prefix:",{packageName:packageName,aString:aString,url:url},smalltalk.PackageLoader)});},
+return self}, function($ctx1) {$ctx1.fill(self,"loadPackage:prefix:",{packageName:packageName,aString:aString,url:url},smalltalk.PackageHandler)})},
 messageSends: [",", "ajax:options:", "->", "ifTrue:", "setupPackageNamed:prefix:", "=", "readyState", "alert:"]}),
 smalltalk.PackageHandler);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "loadPackages:prefix:",
-fn: function (aCollection, aString) {
+fn: function (aCollection,aString){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(aCollection)._do_((function(each){
 return smalltalk.withContext(function($ctx2) {
 return _st(self)._loadPackage_prefix_(each,aString);
 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"loadPackages:prefix:",{aCollection:aCollection,aString:aString},smalltalk.PackageLoader)});},
+return self}, function($ctx1) {$ctx1.fill(self,"loadPackages:prefix:",{aCollection:aCollection,aString:aString},smalltalk.PackageHandler)})},
 messageSends: ["do:", "loadPackage:prefix:"]}),
 smalltalk.PackageHandler);
 
 smalltalk.addMethod(
 smalltalk.method({
 selector: "setupPackageNamed:prefix:",
-fn: function (packageName, aString) {
+fn: function (packageName,aString){
 var self=this;
 function $Package(){return smalltalk.Package||(typeof Package=="undefined"?nil:Package)}
 return smalltalk.withContext(function($ctx1) { 
@@ -746,7 +746,7 @@ $1=_st($Package())._named_(packageName);
 _st($1)._setupClasses();
 _st($1)._commitPathJs_(_st(_st("/").__comma(aString)).__comma("/js"));
 $2=_st($1)._commitPathSt_(_st(_st("/").__comma(aString)).__comma("/st"));
-return self}, function($ctx1) {$ctx1.fill(self,"setupPackageNamed:prefix:",{packageName:packageName,aString:aString},smalltalk.PackageLoader)});},
+return self}, function($ctx1) {$ctx1.fill(self,"setupPackageNamed:prefix:",{packageName:packageName,aString:aString},smalltalk.PackageHandler)})},
 messageSends: ["setupClasses", "named:", "commitPathJs:", ",", "commitPathSt:"]}),
 smalltalk.PackageHandler);
 
@@ -754,13 +754,13 @@ smalltalk.PackageHandler);
 smalltalk.addMethod(
 smalltalk.method({
 selector: "loadPackages:prefix:",
-fn: function (aCollection, aString) {
+fn: function (aCollection,aString){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(_st(self)._new())._loadPackages_prefix_(aCollection,aString);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"loadPackages:prefix:",{aCollection:aCollection,aString:aString},smalltalk.PackageLoader.klass)});},
+}, function($ctx1) {$ctx1.fill(self,"loadPackages:prefix:",{aCollection:aCollection,aString:aString},smalltalk.PackageHandler.klass)})},
 messageSends: ["loadPackages:prefix:", "new"]}),
 smalltalk.PackageHandler.klass);
 
@@ -768,14 +768,14 @@ smalltalk.PackageHandler.klass);
 smalltalk.addMethod(
 smalltalk.method({
 selector: "commit",
-fn: function () {
+fn: function (){
 var self=this;
 function $PackageHandler(){return smalltalk.PackageHandler||(typeof PackageHandler=="undefined"?nil:PackageHandler)}
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(_st($PackageHandler())._new())._commit_(self);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"commit",{},smalltalk.Package)});},
+}, function($ctx1) {$ctx1.fill(self,"commit",{},smalltalk.Package)})},
 messageSends: ["commit:", "new"]}),
 smalltalk.Package);
 

js/Importer-Exporter.js

@@ -4,7 +4,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "nextChunk",
 category: 'reading',
-fn: function () {
+fn: function (){
 var self=this;
 var char,result,chunk;
 return smalltalk.withContext(function($ctx1) { 
@@ -34,7 +34,7 @@ return _st(result)._nextPut_(char);
 return nil;
 }
 catch(e) {if(e===$early)return e[0]; throw e}
-}, function($ctx1) {$ctx1.fill(self,"nextChunk",{char:char,result:result,chunk:chunk},smalltalk.ChunkParser)});},
+}, function($ctx1) {$ctx1.fill(self,"nextChunk",{char:char,result:result,chunk:chunk},smalltalk.ChunkParser)})},
 args: [],
 source: "nextChunk\x0a\x09\x22The chunk format (Smalltalk Interchange Format or Fileout format)\x0a\x09is a trivial format but can be a bit tricky to understand:\x0a\x09\x09- Uses the exclamation mark as delimiter of chunks.\x0a\x09\x09- Inside a chunk a normal exclamation mark must be doubled.\x0a\x09\x09- A non empty chunk must be a valid Smalltalk expression.\x0a\x09\x09- A chunk on top level with a preceding empty chunk is an instruction chunk:\x0a\x09\x09\x09- The object created by the expression then takes over reading chunks.\x0a\x0a\x09This metod returns next chunk as a String (trimmed), empty String (all whitespace) or nil.\x22\x0a\x0a\x09| char result chunk |\x0a\x09result := '' writeStream.\x0a\x09\x09[char := stream next.\x0a\x09\x09char notNil] whileTrue: [\x0a\x09\x09\x09\x09char = '!' ifTrue: [\x0a\x09\x09\x09\x09\x09\x09stream peek = '!'\x0a\x09\x09\x09\x09\x09\x09\x09\x09ifTrue: [stream next \x22skipping the escape double\x22]\x0a\x09\x09\x09\x09\x09\x09\x09\x09ifFalse: [^result contents trimBoth \x22chunk end marker found\x22]].\x0a\x09\x09\x09\x09result nextPut: char].\x0a\x09^nil \x22a chunk needs to end with !\x22",
 messageSends: ["writeStream", "whileTrue:", "ifTrue:", "ifTrue:ifFalse:", "next", "trimBoth", "contents", "=", "peek", "nextPut:", "notNil"],
@@ -46,11 +46,11 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "stream:",
 category: 'accessing',
-fn: function (aStream) {
+fn: function (aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self["@stream"]=aStream;
-return self}, function($ctx1) {$ctx1.fill(self,"stream:",{aStream:aStream},smalltalk.ChunkParser)});},
+return self}, function($ctx1) {$ctx1.fill(self,"stream:",{aStream:aStream},smalltalk.ChunkParser)})},
 args: ["aStream"],
 source: "stream: aStream\x0a\x09stream := aStream",
 messageSends: [],
@@ -63,13 +63,13 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "on:",
 category: 'not yet classified',
-fn: function (aStream) {
+fn: function (aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(_st(self)._new())._stream_(aStream);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"on:",{aStream:aStream},smalltalk.ChunkParser.klass)});},
+}, function($ctx1) {$ctx1.fill(self,"on:",{aStream:aStream},smalltalk.ChunkParser.klass)})},
 args: ["aStream"],
 source: "on: aStream\x0a\x09^self new stream: aStream",
 messageSends: ["stream:", "new"],
@@ -83,7 +83,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "classNameFor:",
 category: 'private',
-fn: function (aClass) {
+fn: function (aClass){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$3,$1;
@@ -99,7 +99,7 @@ $1=_st(aClass)._name();
 };
 };
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"classNameFor:",{aClass:aClass},smalltalk.Exporter)});},
+}, function($ctx1) {$ctx1.fill(self,"classNameFor:",{aClass:aClass},smalltalk.Exporter)})},
 args: ["aClass"],
 source: "classNameFor: aClass\x0a\x09^aClass isMetaclass\x0a\x09\x09ifTrue: [aClass instanceClass name, '.klass']\x0a\x09\x09ifFalse: [\x0a\x09\x09aClass isNil\x0a\x09\x09\x09ifTrue: ['nil']\x0a\x09\x09\x09ifFalse: [aClass name]]",
 messageSends: ["ifTrue:ifFalse:", ",", "name", "instanceClass", "isNil", "isMetaclass"],
@@ -111,7 +111,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportAll",
 category: 'fileOut',
-fn: function () {
+fn: function (){
 var self=this;
 function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)}
 function $String(){return smalltalk.String||(typeof String=="undefined"?nil:String)}
@@ -125,7 +125,7 @@ return _st(stream)._nextPutAll_(_st(self)._exportPackage_(_st(pkg)._name()));
 }, function($ctx3) {$ctx3.fillBlock({pkg:pkg},$ctx1)})}));
 }, function($ctx2) {$ctx2.fillBlock({stream:stream},$ctx1)})}));
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"exportAll",{},smalltalk.Exporter)});},
+}, function($ctx1) {$ctx1.fill(self,"exportAll",{},smalltalk.Exporter)})},
 args: [],
 source: "exportAll\x0a\x09\x22Export all packages in the system.\x22\x0a\x0a\x09^String streamContents: [:stream |\x0a\x09\x09Smalltalk current packages do: [:pkg |\x0a\x09\x09stream nextPutAll: (self exportPackage: pkg name)]]",
 messageSends: ["streamContents:", "do:", "nextPutAll:", "exportPackage:", "name", "packages", "current"],
@@ -137,7 +137,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportClass:",
 category: 'fileOut',
-fn: function (aClass) {
+fn: function (aClass){
 var self=this;
 function $String(){return smalltalk.String||(typeof String=="undefined"?nil:String)}
 return smalltalk.withContext(function($ctx1) { 
@@ -150,7 +150,7 @@ _st(self)._exportMetaDefinitionOf_on_(aClass,stream);
 return _st(self)._exportMethodsOf_on_(_st(aClass)._class(),stream);
 }, function($ctx2) {$ctx2.fillBlock({stream:stream},$ctx1)})}));
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"exportClass:",{aClass:aClass},smalltalk.Exporter)});},
+}, function($ctx1) {$ctx1.fill(self,"exportClass:",{aClass:aClass},smalltalk.Exporter)})},
 args: ["aClass"],
 source: "exportClass: aClass\x0a\x09\x22Export a single class. Subclasses override these methods.\x22\x0a\x0a\x09^String streamContents: [:stream |\x0a\x09\x09self exportDefinitionOf: aClass on: stream.\x0a\x09\x09self exportMethodsOf: aClass on: stream.\x0a\x09\x09self exportMetaDefinitionOf: aClass on: stream.\x0a\x09\x09self exportMethodsOf: aClass class on: stream]",
 messageSends: ["streamContents:", "exportDefinitionOf:on:", "exportMethodsOf:on:", "exportMetaDefinitionOf:on:", "class"],
@@ -162,7 +162,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportDefinitionOf:on:",
 category: 'private',
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4,$5,$6,$7;
@@ -193,7 +193,7 @@ $7=_st($6)._nextPutAll_(_st(_st(aClass)._comment())._asJavascript());
 $7;
 };
 _st(aStream)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)})},
 args: ["aClass", "aStream"],
 source: "exportDefinitionOf: aClass on: aStream\x0a\x09aStream\x0a\x09\x09nextPutAll: 'smalltalk.addClass(';\x0a\x09\x09nextPutAll: '''', (self classNameFor: aClass), ''', ';\x0a\x09\x09nextPutAll: 'smalltalk.', (self classNameFor: aClass superclass);\x0a\x09\x09nextPutAll: ', ['.\x0a\x09aClass instanceVariableNames\x0a\x09\x09do: [:each | aStream nextPutAll: '''', each, '''']\x0a\x09\x09separatedBy: [aStream nextPutAll: ', '].\x0a\x09aStream\x0a\x09\x09nextPutAll: '], ''';\x0a\x09\x09nextPutAll: aClass category, '''';\x0a\x09\x09nextPutAll: ');'.\x0a\x09aClass comment notEmpty ifTrue: [\x0a\x09\x09aStream\x0a\x09\x09\x09lf;\x0a\x09\x09nextPutAll: 'smalltalk.';\x0a\x09\x09nextPutAll: (self classNameFor: aClass);\x0a\x09\x09nextPutAll: '.comment=';\x0a\x09\x09nextPutAll: aClass comment asJavascript].\x0a\x09aStream lf",
 messageSends: ["nextPutAll:", ",", "classNameFor:", "superclass", "do:separatedBy:", "instanceVariableNames", "category", "ifTrue:", "lf", "asJavascript", "comment", "notEmpty"],
@@ -205,7 +205,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMetaDefinitionOf:on:",
 category: 'private',
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 function $String(){return smalltalk.String||(typeof String=="undefined"?nil:String)}
 return smalltalk.withContext(function($ctx1) { 
@@ -225,7 +225,7 @@ return _st(aStream)._nextPutAll_(",");
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
 _st(aStream)._nextPutAll_(_st("];").__comma(_st($String())._lf()));
 };
-return self}, function($ctx1) {$ctx1.fill(self,"exportMetaDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMetaDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)})},
 args: ["aClass", "aStream"],
 source: "exportMetaDefinitionOf: aClass on: aStream\x0a\x09aClass class instanceVariableNames isEmpty ifFalse: [\x0a\x09\x09aStream\x0a\x09\x09nextPutAll: 'smalltalk.', (self classNameFor: aClass class);\x0a\x09\x09nextPutAll: '.iVarNames = ['.\x0a\x09\x09aClass class instanceVariableNames\x0a\x09\x09do: [:each | aStream nextPutAll: '''', each, '''']\x0a\x09\x09separatedBy: [aStream nextPutAll: ','].\x0a\x09\x09aStream nextPutAll: '];', String lf]",
 messageSends: ["ifFalse:", "nextPutAll:", ",", "classNameFor:", "class", "do:separatedBy:", "instanceVariableNames", "lf", "isEmpty"],
@@ -279,7 +279,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMethodsOf:on:",
 category: 'private',
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
@@ -294,7 +294,7 @@ return _st(self)._exportMethod_of_on_(each,aClass,aStream);
 };
 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
 _st(aStream)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportMethodsOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMethodsOf:on:",{aClass:aClass,aStream:aStream},smalltalk.Exporter)})},
 args: ["aClass", "aStream"],
 source: "exportMethodsOf: aClass on: aStream\x0a\x09\x22Issue #143: sort methods alphabetically\x22\x0a\x0a\x09((aClass methodDictionary values) sorted: [:a :b | a selector <= b selector]) do: [:each |\x0a\x09\x09(each category match: '^\x5c*') ifFalse: [\x0a\x09\x09\x09self exportMethod: each of: aClass on: aStream]].\x0a\x09aStream lf",
 messageSends: ["do:", "ifFalse:", "exportMethod:of:on:", "match:", "category", "sorted:", "<=", "selector", "values", "methodDictionary", "lf"],
@@ -306,7 +306,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackage:",
 category: 'fileOut',
-fn: function (packageName) {
+fn: function (packageName){
 var self=this;
 var package_;
 function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)}
@@ -325,7 +325,7 @@ return _st(stream)._nextPutAll_(_st(self)._exportClass_(each));
 return _st(self)._exportPackageExtensionsOf_on_(package_,stream);
 }, function($ctx2) {$ctx2.fillBlock({stream:stream},$ctx1)})}));
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"exportPackage:",{packageName:packageName,package_:package_},smalltalk.Exporter)});},
+}, function($ctx1) {$ctx1.fill(self,"exportPackage:",{packageName:packageName,package_:package_},smalltalk.Exporter)})},
 args: ["packageName"],
 source: "exportPackage: packageName\x0a\x09\x22Export a given package by name.\x22\x0a\x0a\x09| package |\x0a\x09^String streamContents: [:stream |\x0a\x09\x09\x09\x09package := Smalltalk current packageAt: packageName.\x0a\x09\x09\x09\x09self exportPackageDefinitionOf: package on: stream.\x0a\x0a\x09\x09\x22Export classes in dependency order.\x0a\x09\x09Update (issue #171): Remove duplicates for export\x22\x0a\x09\x09\x09package sortedClasses asSet do: [:each |\x0a\x09\x09\x09\x09\x09\x09stream nextPutAll: (self exportClass: each)].\x0a\x09\x09self exportPackageExtensionsOf: package on: stream]",
 messageSends: ["streamContents:", "packageAt:", "current", "exportPackageDefinitionOf:on:", "do:", "nextPutAll:", "exportClass:", "asSet", "sortedClasses", "exportPackageExtensionsOf:on:"],
@@ -337,7 +337,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackageDefinitionOf:on:",
 category: 'private',
-fn: function (package_, aStream) {
+fn: function (package_,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2;
@@ -345,7 +345,7 @@ $1=aStream;
 _st($1)._nextPutAll_("smalltalk.addPackage(");
 _st($1)._nextPutAll_(_st(_st("'").__comma(_st(package_)._name())).__comma("');"));
 $2=_st($1)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportPackageDefinitionOf:on:",{package_:package_,aStream:aStream},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportPackageDefinitionOf:on:",{package_:package_,aStream:aStream},smalltalk.Exporter)})},
 args: ["package", "aStream"],
 source: "exportPackageDefinitionOf: package on: aStream\x0a\x09aStream\x0a\x09\x09nextPutAll: 'smalltalk.addPackage(';\x0a\x09\x09nextPutAll: '''', package name, ''');';\x0a\x09\x09lf",
 messageSends: ["nextPutAll:", ",", "name", "lf"],
@@ -357,7 +357,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackageExtensionsOf:on:",
 category: 'private',
-fn: function (package_, aStream) {
+fn: function (package_,aStream){
 var self=this;
 var name;
 function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)}
@@ -381,7 +381,7 @@ return _st(self)._exportMethod_of_on_(method,aClass,aStream);
 }, function($ctx4) {$ctx4.fillBlock({method:method},$ctx1)})}));
 }, function($ctx3) {$ctx3.fillBlock({aClass:aClass},$ctx1)})}));
 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"exportPackageExtensionsOf:on:",{package_:package_,aStream:aStream,name:name},smalltalk.Exporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportPackageExtensionsOf:on:",{package_:package_,aStream:aStream,name:name},smalltalk.Exporter)})},
 args: ["package", "aStream"],
 source: "exportPackageExtensionsOf: package on: aStream\x0a\x09\x22Issue #143: sort classes and methods alphabetically\x22\x0a\x0a\x09| name |\x0a\x09name := package name.\x0a\x09(Package sortedClasses: Smalltalk current classes) do: [:each |\x0a\x09\x09{each. each class} do: [:aClass |\x0a\x09\x09\x09((aClass methodDictionary values) sorted: [:a :b | a selector <= b selector]) do: [:method |\x0a\x09\x09\x09\x09(method category match: '^\x5c*', name) ifTrue: [\x0a\x09\x09\x09\x09\x09self exportMethod: method of: aClass on: aStream ]]]]",
 messageSends: ["name", "do:", "ifTrue:", "exportMethod:of:on:", "match:", ",", "category", "sorted:", "<=", "selector", "values", "methodDictionary", "class", "sortedClasses:", "classes", "current"],
@@ -396,13 +396,13 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "chunkEscape:",
 category: 'not yet classified',
-fn: function (aString) {
+fn: function (aString){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(_st(aString)._replace_with_("!","!!"))._trimBoth();
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"chunkEscape:",{aString:aString},smalltalk.ChunkExporter)});},
+}, function($ctx1) {$ctx1.fill(self,"chunkEscape:",{aString:aString},smalltalk.ChunkExporter)})},
 args: ["aString"],
 source: "chunkEscape: aString\x0a\x09\x22Replace all occurrences of ! with !! and trim at both ends.\x22\x0a\x0a\x09^(aString replace: '!' with: '!!') trimBoth",
 messageSends: ["trimBoth", "replace:with:"],
@@ -414,7 +414,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "classNameFor:",
 category: 'not yet classified',
-fn: function (aClass) {
+fn: function (aClass){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $2,$3,$1;
@@ -430,7 +430,7 @@ $1=_st(aClass)._name();
 };
 };
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"classNameFor:",{aClass:aClass},smalltalk.ChunkExporter)});},
+}, function($ctx1) {$ctx1.fill(self,"classNameFor:",{aClass:aClass},smalltalk.ChunkExporter)})},
 args: ["aClass"],
 source: "classNameFor: aClass\x0a\x09^aClass isMetaclass\x0a\x09\x09ifTrue: [aClass instanceClass name, ' class']\x0a\x09\x09ifFalse: [\x0a\x09\x09aClass isNil\x0a\x09\x09\x09ifTrue: ['nil']\x0a\x09\x09\x09ifFalse: [aClass name]]",
 messageSends: ["ifTrue:ifFalse:", ",", "name", "instanceClass", "isNil", "isMetaclass"],
@@ -442,7 +442,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportDefinitionOf:on:",
 category: 'not yet classified',
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4,$5,$6,$7;
@@ -475,7 +475,7 @@ $7=_st($6)._lf();
 $7;
 };
 _st(aStream)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)})},
 args: ["aClass", "aStream"],
 source: "exportDefinitionOf: aClass on: aStream\x0a\x09\x22Chunk format.\x22\x0a\x0a\x09aStream\x0a\x09\x09nextPutAll: (self classNameFor: aClass superclass);\x0a\x09\x09nextPutAll: ' subclass: #', (self classNameFor: aClass); lf;\x0a\x09\x09tab; nextPutAll: 'instanceVariableNames: '''.\x0a\x09aClass instanceVariableNames\x0a\x09\x09do: [:each | aStream nextPutAll: each]\x0a\x09\x09separatedBy: [aStream nextPutAll: ' '].\x0a\x09aStream\x0a\x09\x09nextPutAll: ''''; lf;\x0a\x09\x09tab; nextPutAll: 'package: ''', aClass category, '''!'; lf.\x0a\x09aClass comment notEmpty ifTrue: [\x0a\x09\x09aStream\x0a\x09\x09nextPutAll: '!', (self classNameFor: aClass), ' commentStamp!';lf;\x0a\x09\x09nextPutAll: (self chunkEscape: aClass comment), '!';lf].\x0a\x09aStream lf",
 messageSends: ["nextPutAll:", "classNameFor:", "superclass", ",", "lf", "tab", "do:separatedBy:", "instanceVariableNames", "category", "ifTrue:", "chunkEscape:", "comment", "notEmpty"],
@@ -487,7 +487,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMetaDefinitionOf:on:",
 category: 'not yet classified',
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4,$5;
@@ -510,7 +510,7 @@ _st($4)._lf();
 $5=_st($4)._lf();
 $5;
 };
-return self}, function($ctx1) {$ctx1.fill(self,"exportMetaDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMetaDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)})},
 args: ["aClass", "aStream"],
 source: "exportMetaDefinitionOf: aClass on: aStream\x0a\x0a\x09aClass class instanceVariableNames isEmpty ifFalse: [\x0a\x09\x09aStream\x0a\x09\x09\x09nextPutAll: (self classNameFor: aClass class);\x0a\x09\x09\x09nextPutAll: ' instanceVariableNames: '''.\x0a\x09\x09aClass class instanceVariableNames\x0a\x09\x09\x09do: [:each | aStream nextPutAll: each]\x0a\x09\x09\x09separatedBy: [aStream nextPutAll: ' '].\x0a\x09\x09aStream\x0a\x09\x09\x09nextPutAll: '''!'; lf; lf]",
 messageSends: ["ifFalse:", "nextPutAll:", "classNameFor:", "class", "do:separatedBy:", "instanceVariableNames", "lf", "isEmpty"],
@@ -522,7 +522,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMethod:of:on:",
 category: 'not yet classified',
-fn: function (aMethod, aClass, aStream) {
+fn: function (aMethod,aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2;
@@ -532,7 +532,7 @@ _st($1)._lf();
 _st($1)._nextPutAll_(_st(self)._chunkEscape_(_st(aMethod)._source()));
 _st($1)._lf();
 $2=_st($1)._nextPutAll_("!");
-return self}, function($ctx1) {$ctx1.fill(self,"exportMethod:of:on:",{aMethod:aMethod,aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMethod:of:on:",{aMethod:aMethod,aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)})},
 args: ["aMethod", "aClass", "aStream"],
 source: "exportMethod: aMethod of: aClass on: aStream\x0a\x09aStream\x0a\x09\x09lf; lf; nextPutAll: (self chunkEscape: aMethod source); lf;\x0a\x09\x09nextPutAll: '!'",
 messageSends: ["lf", "nextPutAll:", "chunkEscape:", "source"],
@@ -544,7 +544,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMethods:category:of:on:",
 category: 'not yet classified',
-fn: function (methods, category, aClass, aStream) {
+fn: function (methods,category,aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4;
@@ -562,7 +562,7 @@ $3=aStream;
 _st($3)._nextPutAll_(" !");
 _st($3)._lf();
 $4=_st($3)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportMethods:category:of:on:",{methods:methods,category:category,aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMethods:category:of:on:",{methods:methods,category:category,aClass:aClass,aStream:aStream},smalltalk.ChunkExporter)})},
 args: ["methods", "category", "aClass", "aStream"],
 source: "exportMethods: methods category: category of: aClass on: aStream\x0a\x09\x22Issue #143: sort methods alphabetically\x22\x0a\x0a\x09aStream\x0a\x09\x09nextPutAll: '!', (self classNameFor: aClass);\x0a\x09\x09nextPutAll: ' methodsFor: ''', category, '''!'.\x0a\x09\x09(methods sorted: [:a :b | a selector <= b selector]) do: [:each |\x0a\x09\x09\x09\x09self exportMethod: each of: aClass on: aStream].\x0a\x09aStream nextPutAll: ' !'; lf; lf",
 messageSends: ["nextPutAll:", ",", "classNameFor:", "do:", "exportMethod:of:on:", "sorted:", "<=", "selector", "lf"],
@@ -574,7 +574,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportMethodsOf:on:",
 category: 'not yet classified',
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 var map;
 function $Dictionary(){return smalltalk.Dictionary||(typeof Dictionary=="undefined"?nil:Dictionary)}
@@ -598,7 +598,7 @@ methods=_st(map)._at_(category);
 methods;
 return _st(self)._exportMethods_category_of_on_(methods,category,aClass,aStream);
 }, function($ctx2) {$ctx2.fillBlock({category:category,methods:methods},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"exportMethodsOf:on:",{aClass:aClass,aStream:aStream,map:map},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportMethodsOf:on:",{aClass:aClass,aStream:aStream,map:map},smalltalk.ChunkExporter)})},
 args: ["aClass", "aStream"],
 source: "exportMethodsOf: aClass on: aStream\x0a\x09\x22Issue #143: sort protocol alphabetically\x22\x0a\x0a\x09| map |\x0a\x09map := Dictionary new.\x0a\x09aClass protocolsDo: [:category :methods |\x0a\x09\x09(category match: '^\x5c*') ifFalse: [ map at: category put: methods ]].\x0a\x09(map keys sorted: [:a :b | a <= b ]) do: [:category | | methods |\x0a\x09\x09methods := map at: category.\x0a\x09\x09self\x0a\x09\x09\x09exportMethods: methods\x0a\x09\x09\x09category: category\x0a\x09\x09\x09of: aClass\x0a\x09\x09\x09on: aStream ]",
 messageSends: ["new", "protocolsDo:", "ifFalse:", "at:put:", "match:", "do:", "at:", "exportMethods:category:of:on:", "sorted:", "<=", "keys"],
@@ -610,14 +610,14 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackageDefinitionOf:on:",
 category: 'not yet classified',
-fn: function (package_, aStream) {
+fn: function (package_,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2;
 $1=aStream;
 _st($1)._nextPutAll_(_st(_st("Smalltalk current createPackage: '").__comma(_st(package_)._name())).__comma("'!"));
 $2=_st($1)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportPackageDefinitionOf:on:",{package_:package_,aStream:aStream},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportPackageDefinitionOf:on:",{package_:package_,aStream:aStream},smalltalk.ChunkExporter)})},
 args: ["package", "aStream"],
 source: "exportPackageDefinitionOf: package on: aStream\x0a\x09\x22Chunk format.\x22\x0a\x0a\x09aStream\x0a\x09\x09nextPutAll: 'Smalltalk current createPackage: ''', package name, '''!';\x0a\x09\x09lf",
 messageSends: ["nextPutAll:", ",", "name", "lf"],
@@ -629,7 +629,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportPackageExtensionsOf:on:",
 category: 'not yet classified',
-fn: function (package_, aStream) {
+fn: function (package_,aStream){
 var self=this;
 var name,map;
 function $Dictionary(){return smalltalk.Dictionary||(typeof Dictionary=="undefined"?nil:Dictionary)}
@@ -663,7 +663,7 @@ return _st(self)._exportMethods_category_of_on_(methods,category,aClass,aStream)
 }, function($ctx4) {$ctx4.fillBlock({category:category,methods:methods},$ctx1)})}));
 }, function($ctx3) {$ctx3.fillBlock({aClass:aClass},$ctx1)})}));
 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"exportPackageExtensionsOf:on:",{package_:package_,aStream:aStream,name:name,map:map},smalltalk.ChunkExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportPackageExtensionsOf:on:",{package_:package_,aStream:aStream,name:name,map:map},smalltalk.ChunkExporter)})},
 args: ["package", "aStream"],
 source: "exportPackageExtensionsOf: package on: aStream\x0a\x09\x22We need to override this one too since we need to group\x0a\x09all methods in a given protocol under a leading methodsFor: chunk\x0a\x09for that class.\x22\x0a\x0a\x09\x22Issue #143: sort protocol alphabetically\x22\x0a\x0a\x09| name map |\x0a\x09name := package name.\x0a\x09(Package sortedClasses: Smalltalk current classes) do: [:each |\x0a\x09\x09{each. each class} do: [:aClass |\x0a\x09\x09\x09map := Dictionary new.\x0a\x09\x09\x09aClass protocolsDo: [:category :methods |\x0a\x09\x09\x09\x09(category match: '^\x5c*', name) ifTrue: [ map at: category put: methods ]].\x0a\x09\x09\x09(map keys sorted: [:a :b | a <= b ]) do: [:category | | methods |\x0a\x09\x09\x09\x09methods := map at: category.\x0a\x09\x09\x09\x09self exportMethods: methods category: category of: aClass on: aStream ]]]",
 messageSends: ["name", "do:", "new", "protocolsDo:", "ifTrue:", "at:put:", "match:", ",", "at:", "exportMethods:category:of:on:", "sorted:", "<=", "keys", "class", "sortedClasses:", "classes", "current"],
@@ -678,7 +678,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "exportDefinitionOf:on:",
 category: 'private',
-fn: function (aClass, aStream) {
+fn: function (aClass,aStream){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1,$2,$3,$4;
@@ -699,7 +699,7 @@ _st($3)._nextPutAll_("], '");
 _st($3)._nextPutAll_(_st(_st(aClass)._category()).__comma("'"));
 $4=_st($3)._nextPutAll_(");");
 _st(aStream)._lf();
-return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.StrippedExporter)});},
+return self}, function($ctx1) {$ctx1.fill(self,"exportDefinitionOf:on:",{aClass:aClass,aStream:aStream},smalltalk.StrippedExporter)})},
 args: ["aClass", "aStream"],
 source: "exportDefinitionOf: aClass on: aStream\x0a\x09aStream\x0a\x09\x09nextPutAll: 'smalltalk.addClass(';\x0a\x09\x09nextPutAll: '''', (self classNameFor: aClass), ''', ';\x0a\x09\x09nextPutAll: 'smalltalk.', (self classNameFor: aClass superclass);\x0a\x09\x09nextPutAll: ', ['.\x0a\x09aClass instanceVariableNames\x0a\x09\x09do: [:each | aStream nextPutAll: '''', each, '''']\x0a\x09\x09separatedBy: [aStream nextPutAll: ', '].\x0a\x09aStream\x0a\x09\x09nextPutAll: '], ''';\x0a\x09\x09nextPutAll: aClass category, '''';\x0a\x09\x09nextPutAll: ');'.\x0a\x09aStream lf",
 messageSends: ["nextPutAll:", ",", "classNameFor:", "superclass", "do:separatedBy:", "instanceVariableNames", "category", "lf"],
@@ -746,7 +746,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "import:",
 category: 'fileIn',
-fn: function (aStream) {
+fn: function (aStream){
 var self=this;
 var chunk,result,parser,lastEmpty;
 function $ChunkParser(){return smalltalk.ChunkParser||(typeof ChunkParser=="undefined"?nil:ChunkParser)}
@@ -777,7 +777,7 @@ return _st(result)._scanFrom_(parser);
 };
 };
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"import:",{aStream:aStream,chunk:chunk,result:result,parser:parser,lastEmpty:lastEmpty},smalltalk.Importer)});},
+return self}, function($ctx1) {$ctx1.fill(self,"import:",{aStream:aStream,chunk:chunk,result:result,parser:parser,lastEmpty:lastEmpty},smalltalk.Importer)})},
 args: ["aStream"],
 source: "import: aStream\x0a\x09| chunk result parser lastEmpty |\x0a\x09parser := ChunkParser on: aStream.\x0a\x09lastEmpty := false.\x0a\x09[chunk := parser nextChunk.\x0a\x09chunk isNil] whileFalse: [\x0a\x09\x09chunk isEmpty\x0a\x09\x09\x09ifTrue: [lastEmpty := true]\x0a\x09\x09\x09ifFalse: [\x0a\x09\x09\x09\x09result := Compiler new evaluateExpression: chunk.\x0a\x09\x09\x09\x09lastEmpty\x0a\x09\x09\x09\x09\x09\x09ifTrue: [\x0a\x09\x09\x09\x09\x09\x09\x09\x09\x09lastEmpty := false.\x0a\x09\x09\x09\x09\x09\x09\x09\x09\x09result scanFrom: parser]]]",
 messageSends: ["on:", "whileFalse:", "ifTrue:ifFalse:", "evaluateExpression:", "new", "ifTrue:", "scanFrom:", "isEmpty", "nextChunk", "isNil"],
@@ -792,14 +792,14 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "ajaxPutAt:data:",
 category: 'private',
-fn: function (aURL, aString) {
+fn: function (aURL,aString){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(jQuery)._ajax_options_(aURL,smalltalk.HashedCollection._fromPairs_([_st("type").__minus_gt("PUT"),_st("data").__minus_gt(aString),_st("contentType").__minus_gt("text/plain;charset=UTF-8"),_st("error").__minus_gt((function(xhr){
 return smalltalk.withContext(function($ctx2) {
 return _st(self)._error_(_st(_st(_st(_st("Commiting ").__comma(aURL)).__comma(" failed with reason: \x22")).__comma(_st(xhr)._responseText())).__comma("\x22"));
 }, function($ctx2) {$ctx2.fillBlock({xhr:xhr},$ctx1)})}))]));
-return self}, function($ctx1) {$ctx1.fill(self,"ajaxPutAt:data:",{aURL:aURL,aString:aString},smalltalk.PackageHandler)});},
+return self}, function($ctx1) {$ctx1.fill(self,"ajaxPutAt:data:",{aURL:aURL,aString:aString},smalltalk.PackageHandler)})},
 args: ["aURL", "aString"],
 source: "ajaxPutAt: aURL data: aString\x0a\x09jQuery\x0a\x09\x09ajax: aURL \x0a\x09\x09options: #{ \x0a\x09\x09\x09'type' -> 'PUT'.\x0a\x09\x09\x09'data' -> aString.\x0a\x09\x09\x09'contentType' -> 'text/plain;charset=UTF-8'.\x0a\x09\x09\x09'error' -> [ :xhr | self error: 'Commiting ' , aURL , ' failed with reason: \x22' , (xhr responseText) , '\x22'] }",
 messageSends: ["ajax:options:", "->", "error:", ",", "responseText"],
@@ -811,7 +811,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "commit:",
 category: 'committing',
-fn: function (aPackage) {
+fn: function (aPackage){
 var self=this;
 function $Exporter(){return smalltalk.Exporter||(typeof Exporter=="undefined"?nil:Exporter)}
 function $StrippedExporter(){return smalltalk.StrippedExporter||(typeof StrippedExporter=="undefined"?nil:StrippedExporter)}
@@ -824,7 +824,7 @@ fileContents=_st(_st(_st(commitStrategy)._key())._new())._exportPackage_(_st(aPa
 fileContents;
 return _st(self)._ajaxPutAt_data_(_st(commitStrategy)._value(),fileContents);
 }, function($ctx2) {$ctx2.fillBlock({commitStrategy:commitStrategy,fileContents:fileContents},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"commit:",{aPackage:aPackage},smalltalk.PackageHandler)});},
+return self}, function($ctx1) {$ctx1.fill(self,"commit:",{aPackage:aPackage},smalltalk.PackageHandler)})},
 args: ["aPackage"],
 source: "commit: aPackage\x0a\x09{ \x0a\x09\x09Exporter -> (aPackage commitPathJs, '/', aPackage name, '.js').\x0a\x09\x09StrippedExporter -> (aPackage commitPathJs, '/', aPackage name, '.deploy.js').\x0a\x09\x09ChunkExporter -> (aPackage commitPathSt, '/', aPackage name, '.st')\x0a\x09} \x0a\x09\x09do: [ :commitStrategy|| fileContents |\x0a\x09\x09\x09fileContents := (commitStrategy key new exportPackage: aPackage name).\x0a\x09\x09\x09self ajaxPutAt: commitStrategy value data: fileContents ]",
 messageSends: ["do:", "exportPackage:", "name", "new", "key", "ajaxPutAt:data:", "value", "->", ",", "commitPathJs", "commitPathSt"],
@@ -836,7 +836,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "loadPackage:prefix:",
 category: 'loading',
-fn: function (packageName, aString) {
+fn: function (packageName,aString){
 var self=this;
 var url;
 return smalltalk.withContext(function($ctx1) { 
@@ -852,7 +852,7 @@ return _st(self)._setupPackageNamed_prefix_(packageName,aString);
 return smalltalk.withContext(function($ctx2) {
 return _st(window)._alert_(_st("Could not load package at: ").__comma(url));
 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}))]));
-return self}, function($ctx1) {$ctx1.fill(self,"loadPackage:prefix:",{packageName:packageName,aString:aString,url:url},smalltalk.PackageLoader)});},
+return self}, function($ctx1) {$ctx1.fill(self,"loadPackage:prefix:",{packageName:packageName,aString:aString,url:url},smalltalk.PackageHandler)})},
 args: ["packageName", "aString"],
 source: "loadPackage: packageName prefix: aString\x0a\x09| url |\x0a\x09url := '/', aString, '/js/', packageName, '.js'.\x0a\x09jQuery\x0a\x09\x09ajax: url\x0a\x09\x09options: #{\x0a\x09\x09\x09'type' -> 'GET'.\x0a\x09\x09\x09'dataType' -> 'script'.\x0a\x09\x09\x09'complete' -> [ :jqXHR :textStatus |\x0a\x09\x09\x09\x09jqXHR readyState = 4\x0a\x09\x09\x09\x09\x09ifTrue: [ self setupPackageNamed: packageName prefix: aString ] ].\x0a\x09\x09\x09'error' -> [ window alert: 'Could not load package at: ', url ]\x0a\x09\x09}",
 messageSends: [",", "ajax:options:", "->", "ifTrue:", "setupPackageNamed:prefix:", "=", "readyState", "alert:"],
@@ -864,14 +864,14 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "loadPackages:prefix:",
 category: 'loading',
-fn: function (aCollection, aString) {
+fn: function (aCollection,aString){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 _st(aCollection)._do_((function(each){
 return smalltalk.withContext(function($ctx2) {
 return _st(self)._loadPackage_prefix_(each,aString);
 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
-return self}, function($ctx1) {$ctx1.fill(self,"loadPackages:prefix:",{aCollection:aCollection,aString:aString},smalltalk.PackageLoader)});},
+return self}, function($ctx1) {$ctx1.fill(self,"loadPackages:prefix:",{aCollection:aCollection,aString:aString},smalltalk.PackageHandler)})},
 args: ["aCollection", "aString"],
 source: "loadPackages: aCollection prefix: aString\x0a\x09aCollection do: [ :each |\x0a\x09\x09self loadPackage: each prefix: aString ]",
 messageSends: ["do:", "loadPackage:prefix:"],
@@ -883,7 +883,7 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "setupPackageNamed:prefix:",
 category: 'private',
-fn: function (packageName, aString) {
+fn: function (packageName,aString){
 var self=this;
 function $Package(){return smalltalk.Package||(typeof Package=="undefined"?nil:Package)}
 return smalltalk.withContext(function($ctx1) { 
@@ -892,7 +892,7 @@ $1=_st($Package())._named_(packageName);
 _st($1)._setupClasses();
 _st($1)._commitPathJs_(_st(_st("/").__comma(aString)).__comma("/js"));
 $2=_st($1)._commitPathSt_(_st(_st("/").__comma(aString)).__comma("/st"));
-return self}, function($ctx1) {$ctx1.fill(self,"setupPackageNamed:prefix:",{packageName:packageName,aString:aString},smalltalk.PackageLoader)});},
+return self}, function($ctx1) {$ctx1.fill(self,"setupPackageNamed:prefix:",{packageName:packageName,aString:aString},smalltalk.PackageHandler)})},
 args: ["packageName", "aString"],
 source: "setupPackageNamed: packageName prefix: aString\x0a\x0a\x09(Package named: packageName)\x0a\x09\x09setupClasses;\x0a\x09\x09commitPathJs: '/', aString, '/js';\x0a\x09\x09commitPathSt: '/', aString, '/st'",
 messageSends: ["setupClasses", "named:", "commitPathJs:", ",", "commitPathSt:"],
@@ -905,13 +905,13 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "loadPackages:prefix:",
 category: 'not yet classified',
-fn: function (aCollection, aString) {
+fn: function (aCollection,aString){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(_st(self)._new())._loadPackages_prefix_(aCollection,aString);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"loadPackages:prefix:",{aCollection:aCollection,aString:aString},smalltalk.PackageLoader.klass)});},
+}, function($ctx1) {$ctx1.fill(self,"loadPackages:prefix:",{aCollection:aCollection,aString:aString},smalltalk.PackageHandler.klass)})},
 args: ["aCollection", "aString"],
 source: "loadPackages: aCollection prefix: aString\x0a\x09^ self new loadPackages: aCollection prefix: aString",
 messageSends: ["loadPackages:prefix:", "new"],
@@ -924,14 +924,14 @@ smalltalk.addMethod(
 smalltalk.method({
 selector: "commit",
 category: '*Importer-Exporter',
-fn: function () {
+fn: function (){
 var self=this;
 function $PackageHandler(){return smalltalk.PackageHandler||(typeof PackageHandler=="undefined"?nil:PackageHandler)}
 return smalltalk.withContext(function($ctx1) { 
 var $1;
 $1=_st(_st($PackageHandler())._new())._commit_(self);
 return $1;
-}, function($ctx1) {$ctx1.fill(self,"commit",{},smalltalk.Package)});},
+}, function($ctx1) {$ctx1.fill(self,"commit",{},smalltalk.Package)})},
 args: [],
 source: "commit\x0a\x09^ PackageHandler new commit: self",
 messageSends: ["commit:", "new"],

js/Kernel-Announcements.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Kernel-Announcements');
 smalltalk.addClass('AnnouncementSubscription', smalltalk.Object, ['block', 'announcementClass'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_announcementClass",
 smalltalk.method({
 selector: "announcementClass",
 fn: function (){
@@ -15,7 +14,6 @@ messageSends: []}),
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_announcementClass_",
 smalltalk.method({
 selector: "announcementClass:",
 fn: function (aClass){
@@ -27,7 +25,6 @@ messageSends: []}),
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_block",
 smalltalk.method({
 selector: "block",
 fn: function (){
@@ -41,7 +38,6 @@ messageSends: []}),
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_block_",
 smalltalk.method({
 selector: "block:",
 fn: function (aBlock){
@@ -53,7 +49,6 @@ messageSends: []}),
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_deliver_",
 smalltalk.method({
 selector: "deliver:",
 fn: function (anAnnouncement){
@@ -69,7 +64,6 @@ messageSends: ["ifTrue:", "value:", "block", "handlesAnnouncement:"]}),
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_handlesAnnouncement_",
 smalltalk.method({
 selector: "handlesAnnouncement:",
 fn: function (anAnnouncement){
@@ -86,7 +80,6 @@ smalltalk.AnnouncementSubscription);
 
 smalltalk.addClass('Announcer', smalltalk.Object, ['registry', 'subscriptions'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_announce_",
 smalltalk.method({
 selector: "announce:",
 fn: function (anAnnouncement){
@@ -101,7 +94,6 @@ messageSends: ["do:", "deliver:"]}),
 smalltalk.Announcer);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -115,7 +107,6 @@ messageSends: ["initialize", "new"]}),
 smalltalk.Announcer);
 
 smalltalk.addMethod(
-"_on_do_",
 smalltalk.method({
 selector: "on:do:",
 fn: function (aClass,aBlock){
@@ -138,7 +129,6 @@ smalltalk.addClass('SystemAnnouncer', smalltalk.Announcer, [], 'Kernel-Announcem
 
 smalltalk.SystemAnnouncer.klass.iVarNames = ['current'];
 smalltalk.addMethod(
-"_current",
 smalltalk.method({
 selector: "current",
 fn: function (){
@@ -158,7 +148,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.SystemAnnouncer.klass);
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 fn: function (){
@@ -172,7 +161,6 @@ smalltalk.SystemAnnouncer.klass);
 
 smalltalk.addClass('SystemAnnouncement', smalltalk.Object, ['theClass'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 fn: function (){
@@ -186,7 +174,6 @@ messageSends: []}),
 smalltalk.SystemAnnouncement);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 fn: function (aClass){
@@ -201,7 +188,6 @@ smalltalk.SystemAnnouncement);
 
 smalltalk.addClass('ClassAnnouncement', smalltalk.SystemAnnouncement, ['theClass'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 fn: function (){
@@ -215,7 +201,6 @@ messageSends: []}),
 smalltalk.ClassAnnouncement);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 fn: function (aClass){
@@ -245,7 +230,6 @@ smalltalk.addClass('ClassRenamed', smalltalk.ClassAnnouncement, [], 'Kernel-Anno
 
 smalltalk.addClass('MethodAnnouncement', smalltalk.SystemAnnouncement, ['method'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_method",
 smalltalk.method({
 selector: "method",
 fn: function (){
@@ -259,7 +243,6 @@ messageSends: []}),
 smalltalk.MethodAnnouncement);
 
 smalltalk.addMethod(
-"_method_",
 smalltalk.method({
 selector: "method:",
 fn: function (aCompiledMethod){
@@ -277,7 +260,6 @@ smalltalk.addClass('MethodAdded', smalltalk.MethodAnnouncement, [], 'Kernel-Anno
 
 smalltalk.addClass('MethodModified', smalltalk.MethodAnnouncement, ['oldMethod'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_oldMethod",
 smalltalk.method({
 selector: "oldMethod",
 fn: function (){
@@ -291,7 +273,6 @@ messageSends: []}),
 smalltalk.MethodModified);
 
 smalltalk.addMethod(
-"_oldMethod_",
 smalltalk.method({
 selector: "oldMethod:",
 fn: function (aMethod){
@@ -309,7 +290,6 @@ smalltalk.addClass('MethodRemoved', smalltalk.MethodAnnouncement, [], 'Kernel-An
 
 smalltalk.addClass('PackageAnnouncement', smalltalk.SystemAnnouncement, ['package'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_package",
 smalltalk.method({
 selector: "package",
 fn: function (){
@@ -323,7 +303,6 @@ messageSends: []}),
 smalltalk.PackageAnnouncement);
 
 smalltalk.addMethod(
-"_package_",
 smalltalk.method({
 selector: "package:",
 fn: function (aPackage){
@@ -344,7 +323,6 @@ smalltalk.addClass('PackageRemoved', smalltalk.PackageAnnouncement, [], 'Kernel-
 
 smalltalk.addClass('ProtocolAnnouncement', smalltalk.SystemAnnouncement, ['theClass', 'protocol'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_protocol",
 smalltalk.method({
 selector: "protocol",
 fn: function (){
@@ -358,7 +336,6 @@ messageSends: []}),
 smalltalk.ProtocolAnnouncement);
 
 smalltalk.addMethod(
-"_protocol_",
 smalltalk.method({
 selector: "protocol:",
 fn: function (aString){
@@ -370,7 +347,6 @@ messageSends: []}),
 smalltalk.ProtocolAnnouncement);
 
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 fn: function (){
@@ -384,7 +360,6 @@ messageSends: []}),
 smalltalk.ProtocolAnnouncement);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 fn: function (aClass){

js/Kernel-Announcements.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Kernel-Announcements');
 smalltalk.addClass('AnnouncementSubscription', smalltalk.Object, ['block', 'announcementClass'], 'Kernel-Announcements');
 smalltalk.AnnouncementSubscription.comment="The subscription is a single entry in a subscription registry of an `Announcer`.\x0aSeveral subscriptions by the same object is possible."
 smalltalk.addMethod(
-"_announcementClass",
 smalltalk.method({
 selector: "announcementClass",
 category: 'accessing',
@@ -21,7 +20,6 @@ referencedClasses: []
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_announcementClass_",
 smalltalk.method({
 selector: "announcementClass:",
 category: 'accessing',
@@ -38,7 +36,6 @@ referencedClasses: []
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_block",
 smalltalk.method({
 selector: "block",
 category: 'accessing',
@@ -57,7 +54,6 @@ referencedClasses: []
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_block_",
 smalltalk.method({
 selector: "block:",
 category: 'accessing',
@@ -74,7 +70,6 @@ referencedClasses: []
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_deliver_",
 smalltalk.method({
 selector: "deliver:",
 category: 'announcing',
@@ -95,7 +90,6 @@ referencedClasses: []
 smalltalk.AnnouncementSubscription);
 
 smalltalk.addMethod(
-"_handlesAnnouncement_",
 smalltalk.method({
 selector: "handlesAnnouncement:",
 category: 'announcing',
@@ -118,7 +112,6 @@ smalltalk.AnnouncementSubscription);
 smalltalk.addClass('Announcer', smalltalk.Object, ['registry', 'subscriptions'], 'Kernel-Announcements');
 smalltalk.Announcer.comment="The code is based on the announcements as [described by Vassili Bykov](http://www.cincomsmalltalk.com/userblogs/vbykov/blogView?searchCategory=Announcements%20Framework).\x0aThe Announcer holds annoncement subscriptions (`AnnouncementSubscription`) in a private registry.\x0a\x0aUse `#on:do:` to register subscriptions."
 smalltalk.addMethod(
-"_announce_",
 smalltalk.method({
 selector: "announce:",
 category: 'announcing',
@@ -138,7 +131,6 @@ referencedClasses: []
 smalltalk.Announcer);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -157,7 +149,6 @@ referencedClasses: ["Array"]
 smalltalk.Announcer);
 
 smalltalk.addMethod(
-"_on_do_",
 smalltalk.method({
 selector: "on:do:",
 category: 'subscribing',
@@ -186,7 +177,6 @@ smalltalk.SystemAnnouncer.comment="My unique instance #current is the global ann
 
 smalltalk.SystemAnnouncer.klass.iVarNames = ['current'];
 smalltalk.addMethod(
-"_current",
 smalltalk.method({
 selector: "current",
 category: 'accessing',
@@ -211,7 +201,6 @@ referencedClasses: []
 smalltalk.SystemAnnouncer.klass);
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 category: 'instance creation',
@@ -231,7 +220,6 @@ smalltalk.SystemAnnouncer.klass);
 smalltalk.addClass('SystemAnnouncement', smalltalk.Object, ['theClass'], 'Kernel-Announcements');
 smalltalk.SystemAnnouncement.comment="I am the superclass of all system announcements"
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 category: 'accessing',
@@ -250,7 +238,6 @@ referencedClasses: []
 smalltalk.SystemAnnouncement);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 category: 'accessing',
@@ -270,7 +257,6 @@ smalltalk.SystemAnnouncement);
 
 smalltalk.addClass('ClassAnnouncement', smalltalk.SystemAnnouncement, ['theClass'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 category: 'accessing',
@@ -289,7 +275,6 @@ referencedClasses: []
 smalltalk.ClassAnnouncement);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 category: 'accessing',
@@ -329,7 +314,6 @@ smalltalk.ClassRenamed.comment="I am emitted when a class is renamed.\x0aSee Cla
 
 smalltalk.addClass('MethodAnnouncement', smalltalk.SystemAnnouncement, ['method'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_method",
 smalltalk.method({
 selector: "method",
 category: 'accessing',
@@ -348,7 +332,6 @@ referencedClasses: []
 smalltalk.MethodAnnouncement);
 
 smalltalk.addMethod(
-"_method_",
 smalltalk.method({
 selector: "method:",
 category: 'accessing',
@@ -371,7 +354,6 @@ smalltalk.addClass('MethodAdded', smalltalk.MethodAnnouncement, [], 'Kernel-Anno
 
 smalltalk.addClass('MethodModified', smalltalk.MethodAnnouncement, ['oldMethod'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_oldMethod",
 smalltalk.method({
 selector: "oldMethod",
 category: 'accessing',
@@ -390,7 +372,6 @@ referencedClasses: []
 smalltalk.MethodModified);
 
 smalltalk.addMethod(
-"_oldMethod_",
 smalltalk.method({
 selector: "oldMethod:",
 category: 'accessing',
@@ -413,7 +394,6 @@ smalltalk.addClass('MethodRemoved', smalltalk.MethodAnnouncement, [], 'Kernel-An
 
 smalltalk.addClass('PackageAnnouncement', smalltalk.SystemAnnouncement, ['package'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_package",
 smalltalk.method({
 selector: "package",
 category: 'accessing',
@@ -432,7 +412,6 @@ referencedClasses: []
 smalltalk.PackageAnnouncement);
 
 smalltalk.addMethod(
-"_package_",
 smalltalk.method({
 selector: "package:",
 category: 'accessing',
@@ -458,7 +437,6 @@ smalltalk.addClass('PackageRemoved', smalltalk.PackageAnnouncement, [], 'Kernel-
 
 smalltalk.addClass('ProtocolAnnouncement', smalltalk.SystemAnnouncement, ['theClass', 'protocol'], 'Kernel-Announcements');
 smalltalk.addMethod(
-"_protocol",
 smalltalk.method({
 selector: "protocol",
 category: 'accessing',
@@ -477,7 +455,6 @@ referencedClasses: []
 smalltalk.ProtocolAnnouncement);
 
 smalltalk.addMethod(
-"_protocol_",
 smalltalk.method({
 selector: "protocol:",
 category: 'accessing',
@@ -494,7 +471,6 @@ referencedClasses: []
 smalltalk.ProtocolAnnouncement);
 
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 category: 'accessing',
@@ -513,7 +489,6 @@ referencedClasses: []
 smalltalk.ProtocolAnnouncement);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 category: 'accessing',

js/Kernel-Classes.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Kernel-Classes');
 smalltalk.addClass('Behavior', smalltalk.Object, [], 'Kernel-Classes');
 smalltalk.addMethod(
-"_addCompiledMethod_",
 smalltalk.method({
 selector: "addCompiledMethod:",
 fn: function (aMethod){
@@ -40,7 +39,6 @@ messageSends: ["at:ifAbsent:", "selector", "methodDictionary", "ifFalse:", "addE
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_allInstanceVariableNames",
 smalltalk.method({
 selector: "allInstanceVariableNames",
 fn: function (){
@@ -62,7 +60,6 @@ messageSends: ["copy", "instanceVariableNames", "ifNotNil:", "addAll:", "allInst
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_allSelectors",
 smalltalk.method({
 selector: "allSelectors",
 fn: function (){
@@ -82,7 +79,6 @@ messageSends: ["inject:into:", "selectors", "addAll:", "yourself", "allSuperclas
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_allSubclasses",
 smalltalk.method({
 selector: "allSubclasses",
 fn: function (){
@@ -102,7 +98,6 @@ messageSends: ["subclasses", "do:", "addAll:", "allSubclasses"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_allSuperclasses",
 smalltalk.method({
 selector: "allSuperclasses",
 fn: function (){
@@ -127,7 +122,6 @@ messageSends: ["ifNil:", "superclass", "addAll:", "allSuperclasses", "with:", "y
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_basicAddCompiledMethod_",
 smalltalk.method({
 selector: "basicAddCompiledMethod:",
 fn: function (aMethod){
@@ -139,7 +133,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_basicNew",
 smalltalk.method({
 selector: "basicNew",
 fn: function (){
@@ -151,7 +144,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_basicRemoveCompiledMethod_",
 smalltalk.method({
 selector: "basicRemoveCompiledMethod:",
 fn: function (aMethod){
@@ -166,7 +158,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_canUnderstand_",
 smalltalk.method({
 selector: "canUnderstand:",
 fn: function (aSelector){
@@ -186,7 +177,6 @@ messageSends: ["or:", "and:", "canUnderstand:", "superclass", "notNil", "include
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_comment",
 smalltalk.method({
 selector: "comment",
 fn: function (){
@@ -205,7 +195,6 @@ messageSends: ["ifNil:", "basicAt:"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_comment_",
 smalltalk.method({
 selector: "comment:",
 fn: function (aString){
@@ -224,7 +213,6 @@ messageSends: ["basicAt:put:", "announce:", "theClass:", "new", "yourself", "cur
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_commentStamp",
 smalltalk.method({
 selector: "commentStamp",
 fn: function (){
@@ -242,7 +230,6 @@ messageSends: ["class:", "new", "yourself"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_commentStamp_prior_",
 smalltalk.method({
 selector: "commentStamp:prior:",
 fn: function (aStamp,prior){
@@ -256,7 +243,6 @@ messageSends: ["commentStamp"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_compile_",
 smalltalk.method({
 selector: "compile:",
 fn: function (aString){
@@ -268,7 +254,6 @@ messageSends: ["compile:category:"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_compile_category_",
 smalltalk.method({
 selector: "compile:category:",
 fn: function (aString,anotherString){
@@ -281,7 +266,6 @@ messageSends: ["install:forClass:category:", "new"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_definition",
 smalltalk.method({
 selector: "definition",
 fn: function (){
@@ -293,7 +277,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_includesSelector_",
 smalltalk.method({
 selector: "includesSelector:",
 fn: function (aString){
@@ -307,7 +290,6 @@ messageSends: ["includesKey:", "methodDictionary"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_inheritsFrom_",
 smalltalk.method({
 selector: "inheritsFrom:",
 fn: function (aClass){
@@ -321,7 +303,6 @@ messageSends: ["includes:", "allSubclasses"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_instanceVariableNames",
 smalltalk.method({
 selector: "instanceVariableNames",
 fn: function (){
@@ -333,7 +314,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_lookupSelector_",
 smalltalk.method({
 selector: "lookupSelector:",
 fn: function (selector){
@@ -365,7 +345,6 @@ messageSends: ["whileFalse:", "ifTrue:", "methodAt:", "includesSelector:", "supe
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodAt_",
 smalltalk.method({
 selector: "methodAt:",
 fn: function (aString){
@@ -379,7 +358,6 @@ messageSends: ["at:", "methodDictionary"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodDictionary",
 smalltalk.method({
 selector: "methodDictionary",
 fn: function (){
@@ -398,7 +376,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methods",
 smalltalk.method({
 selector: "methods",
 fn: function (){
@@ -412,7 +389,6 @@ messageSends: ["values", "methodDictionary"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodsFor_",
 smalltalk.method({
 selector: "methodsFor:",
 fn: function (aString){
@@ -430,7 +406,6 @@ messageSends: ["class:category:", "new", "yourself"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodsFor_stamp_",
 smalltalk.method({
 selector: "methodsFor:stamp:",
 fn: function (aString,aStamp){
@@ -444,7 +419,6 @@ messageSends: ["methodsFor:"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodsInProtocol_",
 smalltalk.method({
 selector: "methodsInProtocol:",
 fn: function (aString){
@@ -461,7 +435,6 @@ messageSends: ["select:", "=", "protocol", "values", "methodDictionary"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_name",
 smalltalk.method({
 selector: "name",
 fn: function (){
@@ -473,7 +446,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 fn: function (){
@@ -487,7 +459,6 @@ messageSends: ["initialize", "basicNew"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_organization",
 smalltalk.method({
 selector: "organization",
 fn: function (){
@@ -501,7 +472,6 @@ messageSends: ["basicAt:"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_protocols",
 smalltalk.method({
 selector: "protocols",
 fn: function (){
@@ -515,7 +485,6 @@ messageSends: ["sorted", "elements", "organization"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_protocolsDo_",
 smalltalk.method({
 selector: "protocolsDo:",
 fn: function (aBlock){
@@ -541,7 +510,6 @@ messageSends: ["new", "do:", "add:", "at:ifAbsentPut:", "category", "values", "m
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_prototype",
 smalltalk.method({
 selector: "prototype",
 fn: function (){
@@ -553,7 +521,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_removeCompiledMethod_",
 smalltalk.method({
 selector: "removeCompiledMethod:",
 fn: function (aMethod){
@@ -579,7 +546,6 @@ messageSends: ["basicRemoveCompiledMethod:", "detect:ifNone:", "=", "protocol",
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_selectors",
 smalltalk.method({
 selector: "selectors",
 fn: function (){
@@ -593,7 +559,6 @@ messageSends: ["keys", "methodDictionary"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_subclasses",
 smalltalk.method({
 selector: "subclasses",
 fn: function (){
@@ -605,7 +570,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_superclass",
 smalltalk.method({
 selector: "superclass",
 fn: function (){
@@ -617,7 +581,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_theMetaClass",
 smalltalk.method({
 selector: "theMetaClass",
 fn: function (){
@@ -631,7 +594,6 @@ messageSends: ["class"]}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_theNonMetaClass",
 smalltalk.method({
 selector: "theNonMetaClass",
 fn: function (){
@@ -645,7 +607,6 @@ messageSends: []}),
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_withAllSubclasses",
 smalltalk.method({
 selector: "withAllSubclasses",
 fn: function (){
@@ -666,7 +627,6 @@ smalltalk.Behavior);
 
 smalltalk.addClass('Class', smalltalk.Behavior, [], 'Kernel-Classes');
 smalltalk.addMethod(
-"_asJavascript",
 smalltalk.method({
 selector: "asJavascript",
 fn: function (){
@@ -680,7 +640,6 @@ messageSends: [",", "name"]}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_category",
 smalltalk.method({
 selector: "category",
 fn: function (){
@@ -699,7 +658,6 @@ messageSends: ["ifNil:ifNotNil:", "name", "package"]}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_definition",
 smalltalk.method({
 selector: "definition",
 fn: function (){
@@ -736,7 +694,6 @@ messageSends: ["streamContents:", "nextPutAll:", "asString", "superclass", "name
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_isClass",
 smalltalk.method({
 selector: "isClass",
 fn: function (){
@@ -748,7 +705,6 @@ messageSends: []}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_package",
 smalltalk.method({
 selector: "package",
 fn: function (){
@@ -760,7 +716,6 @@ messageSends: []}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_package_",
 smalltalk.method({
 selector: "package:",
 fn: function (aPackage){
@@ -772,7 +727,6 @@ messageSends: []}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_printOn_",
 smalltalk.method({
 selector: "printOn:",
 fn: function (aStream){
@@ -784,7 +738,6 @@ messageSends: ["nextPutAll:", "name"]}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_rename_",
 smalltalk.method({
 selector: "rename:",
 fn: function (aString){
@@ -797,7 +750,6 @@ messageSends: ["renameClass:to:", "new"]}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_subclass_instanceVariableNames_",
 smalltalk.method({
 selector: "subclass:instanceVariableNames:",
 fn: function (aString,anotherString){
@@ -811,7 +763,6 @@ messageSends: ["subclass:instanceVariableNames:package:"]}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_subclass_instanceVariableNames_category_",
 smalltalk.method({
 selector: "subclass:instanceVariableNames:category:",
 fn: function (aString,aString2,aString3){
@@ -826,7 +777,6 @@ messageSends: ["deprecatedAPI", "subclass:instanceVariableNames:package:"]}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_subclass_instanceVariableNames_classVariableNames_poolDictionaries_category_",
 smalltalk.method({
 selector: "subclass:instanceVariableNames:classVariableNames:poolDictionaries:category:",
 fn: function (aString,aString2,classVars,pools,aString3){
@@ -840,7 +790,6 @@ messageSends: ["subclass:instanceVariableNames:package:"]}),
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_subclass_instanceVariableNames_package_",
 smalltalk.method({
 selector: "subclass:instanceVariableNames:package:",
 fn: function (aString,aString2,aString3){
@@ -858,7 +807,6 @@ smalltalk.Class);
 
 smalltalk.addClass('Metaclass', smalltalk.Behavior, [], 'Kernel-Classes');
 smalltalk.addMethod(
-"_asJavascript",
 smalltalk.method({
 selector: "asJavascript",
 fn: function (){
@@ -872,7 +820,6 @@ messageSends: [",", "name", "instanceClass"]}),
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_definition",
 smalltalk.method({
 selector: "definition",
 fn: function (){
@@ -901,7 +848,6 @@ messageSends: ["streamContents:", "nextPutAll:", "asString", "do:separatedBy:",
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_instanceClass",
 smalltalk.method({
 selector: "instanceClass",
 fn: function (){
@@ -913,7 +859,6 @@ messageSends: []}),
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_instanceVariableNames_",
 smalltalk.method({
 selector: "instanceVariableNames:",
 fn: function (aCollection){
@@ -926,7 +871,6 @@ messageSends: ["class:instanceVariableNames:", "new"]}),
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_isMetaclass",
 smalltalk.method({
 selector: "isMetaclass",
 fn: function (){
@@ -938,7 +882,6 @@ messageSends: []}),
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_printOn_",
 smalltalk.method({
 selector: "printOn:",
 fn: function (aStream){
@@ -953,7 +896,6 @@ messageSends: ["nextPutAll:", "name", "instanceClass"]}),
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_theMetaClass",
 smalltalk.method({
 selector: "theMetaClass",
 fn: function (){
@@ -967,7 +909,6 @@ messageSends: []}),
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_theNonMetaClass",
 smalltalk.method({
 selector: "theNonMetaClass",
 fn: function (){
@@ -984,7 +925,6 @@ smalltalk.Metaclass);
 
 smalltalk.addClass('ClassBuilder', smalltalk.Object, [], 'Kernel-Classes');
 smalltalk.addMethod(
-"_addSubclassOf_named_instanceVariableNames_package_",
 smalltalk.method({
 selector: "addSubclassOf:named:instanceVariableNames:package:",
 fn: function (aClass,aString,aCollection,packageName){
@@ -1011,7 +951,6 @@ messageSends: ["at:", "current", "ifNotNil:", "ifFalse:", "migrateClassNamed:sup
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicAddSubclassOf_named_instanceVariableNames_package_",
 smalltalk.method({
 selector: "basicAddSubclassOf:named:instanceVariableNames:package:",
 fn: function (aClass,aString,aCollection,packageName){
@@ -1026,7 +965,6 @@ messageSends: []}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicClass_instanceVariableNames_",
 smalltalk.method({
 selector: "basicClass:instanceVariableNames:",
 fn: function (aClass,aString){
@@ -1038,7 +976,6 @@ messageSends: ["basicClass:instanceVariables:", "instanceVariableNamesFor:"]}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicClass_instanceVariables_",
 smalltalk.method({
 selector: "basicClass:instanceVariables:",
 fn: function (aClass,aCollection){
@@ -1055,7 +992,6 @@ messageSends: ["ifFalse:", "error:", ",", "name", "isMetaclass", "basicAt:put:"]
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicRemoveClass_",
 smalltalk.method({
 selector: "basicRemoveClass:",
 fn: function (aClass){
@@ -1067,7 +1003,6 @@ messageSends: []}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicRenameClass_to_",
 smalltalk.method({
 selector: "basicRenameClass:to:",
 fn: function (aClass,aString){
@@ -1083,7 +1018,6 @@ messageSends: []}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicSwapClassNames_with_",
 smalltalk.method({
 selector: "basicSwapClassNames:with:",
 fn: function (aClass,anotherClass){
@@ -1099,7 +1033,6 @@ messageSends: []}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_class_instanceVariableNames_",
 smalltalk.method({
 selector: "class:instanceVariableNames:",
 fn: function (aClass,aString){
@@ -1119,7 +1052,6 @@ messageSends: ["basicClass:instanceVariableNames:", "setupClass:", "announce:",
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_copyClass_named_",
 smalltalk.method({
 selector: "copyClass:named:",
 fn: function (aClass,aString){
@@ -1136,7 +1068,6 @@ messageSends: ["addSubclassOf:named:instanceVariableNames:package:", "superclass
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_copyClass_to_",
 smalltalk.method({
 selector: "copyClass:to:",
 fn: function (aClass,anotherClass){
@@ -1159,7 +1090,6 @@ messageSends: ["comment:", "comment", "do:", "install:forClass:category:", "sour
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_installMethod_forClass_category_",
 smalltalk.method({
 selector: "installMethod:forClass:category:",
 fn: function (aCompiledMethod,aBehavior,aString){
@@ -1176,7 +1106,6 @@ messageSends: ["category:", "addCompiledMethod:", "setupClass:"]}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_instanceVariableNamesFor_",
 smalltalk.method({
 selector: "instanceVariableNamesFor:",
 fn: function (aString){
@@ -1193,7 +1122,6 @@ messageSends: ["reject:", "isEmpty", "tokenize:"]}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_migrateClass_superclass_",
 smalltalk.method({
 selector: "migrateClass:superclass:",
 fn: function (aClass,anotherClass){
@@ -1206,7 +1134,6 @@ messageSends: ["log:", "name", "migrateClassNamed:superclass:instanceVariableNam
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_migrateClassNamed_superclass_instanceVariableNames_package_",
 smalltalk.method({
 selector: "migrateClassNamed:superclass:instanceVariableNames:package:",
 fn: function (aString,aClass,aCollection,packageName){
@@ -1246,7 +1173,6 @@ messageSends: [",", "at:", "current", "addSubclassOf:named:instanceVariableNames
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_rawRenameClass_to_",
 smalltalk.method({
 selector: "rawRenameClass:to:",
 fn: function (aClass,aString){
@@ -1260,7 +1186,6 @@ messageSends: []}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_renameClass_to_",
 smalltalk.method({
 selector: "renameClass:to:",
 fn: function (aClass,aString){
@@ -1279,7 +1204,6 @@ messageSends: ["basicRenameClass:to:", "announce:", "theClass:", "new", "yoursel
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_setupClass_",
 smalltalk.method({
 selector: "setupClass:",
 fn: function (aClass){
@@ -1291,7 +1215,6 @@ messageSends: []}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_superclass_subclass_",
 smalltalk.method({
 selector: "superclass:subclass:",
 fn: function (aClass,aString){
@@ -1305,7 +1228,6 @@ messageSends: ["superclass:subclass:instanceVariableNames:package:"]}),
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_superclass_subclass_instanceVariableNames_package_",
 smalltalk.method({
 selector: "superclass:subclass:instanceVariableNames:package:",
 fn: function (aClass,aString,aString2,aString3){
@@ -1341,7 +1263,6 @@ smalltalk.ClassBuilder);
 
 smalltalk.addClass('ClassCategoryReader', smalltalk.Object, ['class', 'category'], 'Kernel-Classes');
 smalltalk.addMethod(
-"_class_category_",
 smalltalk.method({
 selector: "class:category:",
 fn: function (aClass,aString){
@@ -1354,7 +1275,6 @@ messageSends: []}),
 smalltalk.ClassCategoryReader);
 
 smalltalk.addMethod(
-"_compileMethod_",
 smalltalk.method({
 selector: "compileMethod:",
 fn: function (aString){
@@ -1367,7 +1287,6 @@ messageSends: ["install:forClass:category:", "new"]}),
 smalltalk.ClassCategoryReader);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -1379,7 +1298,6 @@ messageSends: ["initialize"]}),
 smalltalk.ClassCategoryReader);
 
 smalltalk.addMethod(
-"_scanFrom_",
 smalltalk.method({
 selector: "scanFrom:",
 fn: function (aChunkParser){
@@ -1405,7 +1323,6 @@ smalltalk.ClassCategoryReader);
 
 smalltalk.addClass('ClassCommentReader', smalltalk.Object, ['class'], 'Kernel-Classes');
 smalltalk.addMethod(
-"_class_",
 smalltalk.method({
 selector: "class:",
 fn: function (aClass){
@@ -1417,7 +1334,6 @@ messageSends: []}),
 smalltalk.ClassCommentReader);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -1429,7 +1345,6 @@ messageSends: ["initialize"]}),
 smalltalk.ClassCommentReader);
 
 smalltalk.addMethod(
-"_scanFrom_",
 smalltalk.method({
 selector: "scanFrom:",
 fn: function (aChunkParser){
@@ -1447,7 +1362,6 @@ messageSends: ["nextChunk", "ifFalse:", "setComment:", "isEmpty"]}),
 smalltalk.ClassCommentReader);
 
 smalltalk.addMethod(
-"_setComment_",
 smalltalk.method({
 selector: "setComment:",
 fn: function (aString){
@@ -1462,7 +1376,6 @@ smalltalk.ClassCommentReader);
 
 smalltalk.addClass('ClassSorterNode', smalltalk.Object, ['theClass', 'level', 'nodes'], 'Kernel-Classes');
 smalltalk.addMethod(
-"_getNodesFrom_",
 smalltalk.method({
 selector: "getNodesFrom:",
 fn: function (aCollection){
@@ -1491,7 +1404,6 @@ messageSends: ["do:", "ifTrue:ifFalse:", "add:", "=", "theClass", "superclass",
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_level",
 smalltalk.method({
 selector: "level",
 fn: function (){
@@ -1505,7 +1417,6 @@ messageSends: []}),
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_level_",
 smalltalk.method({
 selector: "level:",
 fn: function (anInteger){
@@ -1517,7 +1428,6 @@ messageSends: []}),
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_nodes",
 smalltalk.method({
 selector: "nodes",
 fn: function (){
@@ -1531,7 +1441,6 @@ messageSends: []}),
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 fn: function (){
@@ -1545,7 +1454,6 @@ messageSends: []}),
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 fn: function (aClass){
@@ -1557,7 +1465,6 @@ messageSends: []}),
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_traverseClassesWith_",
 smalltalk.method({
 selector: "traverseClassesWith:",
 fn: function (aCollection){
@@ -1577,7 +1484,6 @@ smalltalk.ClassSorterNode);
 
 
 smalltalk.addMethod(
-"_on_classes_level_",
 smalltalk.method({
 selector: "on:classes:level:",
 fn: function (aClass,aCollection,anInteger){

js/Kernel-Classes.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Kernel-Classes');
 smalltalk.addClass('Behavior', smalltalk.Object, [], 'Kernel-Classes');
 smalltalk.Behavior.comment="Behavior is the superclass of all class objects.\x0a\x0aIt defines the protocol for creating instances of a class with `#basicNew` and `#new` (see `boot.js` for class constructors details).\x0aInstances know about the subclass/superclass relationships between classes, contain the description that instances are created from,\x0aand hold the method dictionary that's associated with each class.\x0a\x0aBehavior also provides methods for compiling methods, examining the method dictionary, and iterating over the class hierarchy."
 smalltalk.addMethod(
-"_addCompiledMethod_",
 smalltalk.method({
 selector: "addCompiledMethod:",
 category: 'compiling',
@@ -46,7 +45,6 @@ referencedClasses: ["MethodAdded", "MethodModified", "SystemAnnouncer"]
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_allInstanceVariableNames",
 smalltalk.method({
 selector: "allInstanceVariableNames",
 category: 'accessing',
@@ -73,7 +71,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_allSelectors",
 smalltalk.method({
 selector: "allSelectors",
 category: 'accessing',
@@ -98,7 +95,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_allSubclasses",
 smalltalk.method({
 selector: "allSubclasses",
 category: 'accessing',
@@ -123,7 +119,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_allSuperclasses",
 smalltalk.method({
 selector: "allSuperclasses",
 category: 'accessing',
@@ -153,7 +148,6 @@ referencedClasses: ["OrderedCollection"]
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_basicAddCompiledMethod_",
 smalltalk.method({
 selector: "basicAddCompiledMethod:",
 category: 'private',
@@ -170,7 +164,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_basicNew",
 smalltalk.method({
 selector: "basicNew",
 category: 'instance creation',
@@ -187,7 +180,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_basicRemoveCompiledMethod_",
 smalltalk.method({
 selector: "basicRemoveCompiledMethod:",
 category: 'private',
@@ -207,7 +199,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_canUnderstand_",
 smalltalk.method({
 selector: "canUnderstand:",
 category: 'testing',
@@ -232,7 +223,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_comment",
 smalltalk.method({
 selector: "comment",
 category: 'accessing',
@@ -256,7 +246,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_comment_",
 smalltalk.method({
 selector: "comment:",
 category: 'accessing',
@@ -280,7 +269,6 @@ referencedClasses: ["ClassCommentChanged", "SystemAnnouncer"]
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_commentStamp",
 smalltalk.method({
 selector: "commentStamp",
 category: 'accessing',
@@ -303,7 +291,6 @@ referencedClasses: ["ClassCommentReader"]
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_commentStamp_prior_",
 smalltalk.method({
 selector: "commentStamp:prior:",
 category: 'accessing',
@@ -322,7 +309,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_compile_",
 smalltalk.method({
 selector: "compile:",
 category: 'compiling',
@@ -339,7 +325,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_compile_category_",
 smalltalk.method({
 selector: "compile:category:",
 category: 'compiling',
@@ -357,7 +342,6 @@ referencedClasses: ["Compiler"]
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_definition",
 smalltalk.method({
 selector: "definition",
 category: 'accessing',
@@ -374,7 +358,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_includesSelector_",
 smalltalk.method({
 selector: "includesSelector:",
 category: 'testing',
@@ -393,7 +376,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_inheritsFrom_",
 smalltalk.method({
 selector: "inheritsFrom:",
 category: 'testing',
@@ -412,7 +394,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_instanceVariableNames",
 smalltalk.method({
 selector: "instanceVariableNames",
 category: 'accessing',
@@ -429,7 +410,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_lookupSelector_",
 smalltalk.method({
 selector: "lookupSelector:",
 category: 'accessing',
@@ -466,7 +446,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodAt_",
 smalltalk.method({
 selector: "methodAt:",
 category: 'accessing',
@@ -485,7 +464,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodDictionary",
 smalltalk.method({
 selector: "methodDictionary",
 category: 'accessing',
@@ -509,7 +487,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methods",
 smalltalk.method({
 selector: "methods",
 category: 'accessing',
@@ -528,7 +505,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodsFor_",
 smalltalk.method({
 selector: "methodsFor:",
 category: 'accessing',
@@ -551,7 +527,6 @@ referencedClasses: ["ClassCategoryReader"]
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodsFor_stamp_",
 smalltalk.method({
 selector: "methodsFor:stamp:",
 category: 'accessing',
@@ -570,7 +545,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_methodsInProtocol_",
 smalltalk.method({
 selector: "methodsInProtocol:",
 category: 'accessing',
@@ -592,7 +566,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_name",
 smalltalk.method({
 selector: "name",
 category: 'accessing',
@@ -609,7 +582,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 category: 'instance creation',
@@ -628,7 +600,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_organization",
 smalltalk.method({
 selector: "organization",
 category: 'accessing',
@@ -647,7 +618,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_protocols",
 smalltalk.method({
 selector: "protocols",
 category: 'accessing',
@@ -666,7 +636,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_protocolsDo_",
 smalltalk.method({
 selector: "protocolsDo:",
 category: 'accessing',
@@ -697,7 +666,6 @@ referencedClasses: ["HashedCollection", "Array"]
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_prototype",
 smalltalk.method({
 selector: "prototype",
 category: 'accessing',
@@ -714,7 +682,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_removeCompiledMethod_",
 smalltalk.method({
 selector: "removeCompiledMethod:",
 category: 'compiling',
@@ -745,7 +712,6 @@ referencedClasses: ["MethodRemoved", "SystemAnnouncer"]
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_selectors",
 smalltalk.method({
 selector: "selectors",
 category: 'accessing',
@@ -764,7 +730,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_subclasses",
 smalltalk.method({
 selector: "subclasses",
 category: 'accessing',
@@ -781,7 +746,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_superclass",
 smalltalk.method({
 selector: "superclass",
 category: 'accessing',
@@ -798,7 +762,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_theMetaClass",
 smalltalk.method({
 selector: "theMetaClass",
 category: 'accessing',
@@ -817,7 +780,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_theNonMetaClass",
 smalltalk.method({
 selector: "theNonMetaClass",
 category: 'accessing',
@@ -836,7 +798,6 @@ referencedClasses: []
 smalltalk.Behavior);
 
 smalltalk.addMethod(
-"_withAllSubclasses",
 smalltalk.method({
 selector: "withAllSubclasses",
 category: 'accessing',
@@ -863,7 +824,6 @@ smalltalk.Behavior);
 smalltalk.addClass('Class', smalltalk.Behavior, [], 'Kernel-Classes');
 smalltalk.Class.comment="Class is __the__ class object.\x0a\x0aInstances are the classes of the system.\x0aClass creation is done throught a `ClassBuilder`"
 smalltalk.addMethod(
-"_asJavascript",
 smalltalk.method({
 selector: "asJavascript",
 category: 'converting',
@@ -882,7 +842,6 @@ referencedClasses: []
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_category",
 smalltalk.method({
 selector: "category",
 category: 'accessing',
@@ -906,7 +865,6 @@ referencedClasses: []
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_definition",
 smalltalk.method({
 selector: "definition",
 category: 'accessing',
@@ -948,7 +906,6 @@ referencedClasses: ["String"]
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_isClass",
 smalltalk.method({
 selector: "isClass",
 category: 'testing',
@@ -965,7 +922,6 @@ referencedClasses: []
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_package",
 smalltalk.method({
 selector: "package",
 category: 'accessing',
@@ -982,7 +938,6 @@ referencedClasses: []
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_package_",
 smalltalk.method({
 selector: "package:",
 category: 'accessing',
@@ -999,7 +954,6 @@ referencedClasses: []
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_printOn_",
 smalltalk.method({
 selector: "printOn:",
 category: 'printing',
@@ -1016,7 +970,6 @@ referencedClasses: []
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_rename_",
 smalltalk.method({
 selector: "rename:",
 category: 'accessing',
@@ -1034,7 +987,6 @@ referencedClasses: ["ClassBuilder"]
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_subclass_instanceVariableNames_",
 smalltalk.method({
 selector: "subclass:instanceVariableNames:",
 category: 'class creation',
@@ -1053,7 +1005,6 @@ referencedClasses: []
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_subclass_instanceVariableNames_category_",
 smalltalk.method({
 selector: "subclass:instanceVariableNames:category:",
 category: 'class creation',
@@ -1073,7 +1024,6 @@ referencedClasses: []
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_subclass_instanceVariableNames_classVariableNames_poolDictionaries_category_",
 smalltalk.method({
 selector: "subclass:instanceVariableNames:classVariableNames:poolDictionaries:category:",
 category: 'class creation',
@@ -1092,7 +1042,6 @@ referencedClasses: []
 smalltalk.Class);
 
 smalltalk.addMethod(
-"_subclass_instanceVariableNames_package_",
 smalltalk.method({
 selector: "subclass:instanceVariableNames:package:",
 category: 'class creation',
@@ -1116,7 +1065,6 @@ smalltalk.Class);
 smalltalk.addClass('Metaclass', smalltalk.Behavior, [], 'Kernel-Classes');
 smalltalk.Metaclass.comment="Metaclass is the root of the class hierarchy.\x0a\x0aMetaclass instances are metaclasses, one for each real class.\x0aMetaclass instances have a single instance, which they hold onto, which is the class that they are the metaclass of."
 smalltalk.addMethod(
-"_asJavascript",
 smalltalk.method({
 selector: "asJavascript",
 category: 'converting',
@@ -1135,7 +1083,6 @@ referencedClasses: []
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_definition",
 smalltalk.method({
 selector: "definition",
 category: 'accessing',
@@ -1169,7 +1116,6 @@ referencedClasses: ["String"]
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_instanceClass",
 smalltalk.method({
 selector: "instanceClass",
 category: 'accessing',
@@ -1186,7 +1132,6 @@ referencedClasses: []
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_instanceVariableNames_",
 smalltalk.method({
 selector: "instanceVariableNames:",
 category: 'accessing',
@@ -1204,7 +1149,6 @@ referencedClasses: ["ClassBuilder"]
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_isMetaclass",
 smalltalk.method({
 selector: "isMetaclass",
 category: 'testing',
@@ -1221,7 +1165,6 @@ referencedClasses: []
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_printOn_",
 smalltalk.method({
 selector: "printOn:",
 category: 'printing',
@@ -1241,7 +1184,6 @@ referencedClasses: []
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_theMetaClass",
 smalltalk.method({
 selector: "theMetaClass",
 category: 'accessing',
@@ -1260,7 +1202,6 @@ referencedClasses: []
 smalltalk.Metaclass);
 
 smalltalk.addMethod(
-"_theNonMetaClass",
 smalltalk.method({
 selector: "theNonMetaClass",
 category: 'accessing',
@@ -1283,7 +1224,6 @@ smalltalk.Metaclass);
 smalltalk.addClass('ClassBuilder', smalltalk.Object, [], 'Kernel-Classes');
 smalltalk.ClassBuilder.comment="ClassBuilder is responsible for compiling new classes or modifying existing classes in the system.\x0a\x0aRather than using ClassBuilder directly to compile a class, use `Class >> subclass:instanceVariableNames:package:`."
 smalltalk.addMethod(
-"_addSubclassOf_named_instanceVariableNames_package_",
 smalltalk.method({
 selector: "addSubclassOf:named:instanceVariableNames:package:",
 category: 'class definition',
@@ -1315,7 +1255,6 @@ referencedClasses: ["Smalltalk"]
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicAddSubclassOf_named_instanceVariableNames_package_",
 smalltalk.method({
 selector: "basicAddSubclassOf:named:instanceVariableNames:package:",
 category: 'private',
@@ -1335,7 +1274,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicClass_instanceVariableNames_",
 smalltalk.method({
 selector: "basicClass:instanceVariableNames:",
 category: 'private',
@@ -1352,7 +1290,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicClass_instanceVariables_",
 smalltalk.method({
 selector: "basicClass:instanceVariables:",
 category: 'private',
@@ -1374,7 +1311,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicRemoveClass_",
 smalltalk.method({
 selector: "basicRemoveClass:",
 category: 'private',
@@ -1391,7 +1327,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicRenameClass_to_",
 smalltalk.method({
 selector: "basicRenameClass:to:",
 category: 'private',
@@ -1412,7 +1347,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_basicSwapClassNames_with_",
 smalltalk.method({
 selector: "basicSwapClassNames:with:",
 category: 'private',
@@ -1433,7 +1367,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_class_instanceVariableNames_",
 smalltalk.method({
 selector: "class:instanceVariableNames:",
 category: 'class definition',
@@ -1458,7 +1391,6 @@ referencedClasses: ["ClassDefinitionChanged", "SystemAnnouncer"]
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_copyClass_named_",
 smalltalk.method({
 selector: "copyClass:named:",
 category: 'copying',
@@ -1480,7 +1412,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_copyClass_to_",
 smalltalk.method({
 selector: "copyClass:to:",
 category: 'copying',
@@ -1508,7 +1439,6 @@ referencedClasses: ["Compiler"]
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_installMethod_forClass_category_",
 smalltalk.method({
 selector: "installMethod:forClass:category:",
 category: 'method definition',
@@ -1530,7 +1460,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_instanceVariableNamesFor_",
 smalltalk.method({
 selector: "instanceVariableNamesFor:",
 category: 'accessing',
@@ -1552,7 +1481,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_migrateClass_superclass_",
 smalltalk.method({
 selector: "migrateClass:superclass:",
 category: 'class migration',
@@ -1570,7 +1498,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_migrateClassNamed_superclass_instanceVariableNames_package_",
 smalltalk.method({
 selector: "migrateClassNamed:superclass:instanceVariableNames:package:",
 category: 'class migration',
@@ -1615,7 +1542,6 @@ referencedClasses: ["Smalltalk", "Error"]
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_rawRenameClass_to_",
 smalltalk.method({
 selector: "rawRenameClass:to:",
 category: 'private',
@@ -1634,7 +1560,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_renameClass_to_",
 smalltalk.method({
 selector: "renameClass:to:",
 category: 'class migration',
@@ -1658,7 +1583,6 @@ referencedClasses: ["ClassRenamed", "SystemAnnouncer"]
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_setupClass_",
 smalltalk.method({
 selector: "setupClass:",
 category: 'public',
@@ -1675,7 +1599,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_superclass_subclass_",
 smalltalk.method({
 selector: "superclass:subclass:",
 category: 'class definition',
@@ -1694,7 +1617,6 @@ referencedClasses: []
 smalltalk.ClassBuilder);
 
 smalltalk.addMethod(
-"_superclass_subclass_instanceVariableNames_package_",
 smalltalk.method({
 selector: "superclass:subclass:instanceVariableNames:package:",
 category: 'class definition',
@@ -1736,7 +1658,6 @@ smalltalk.ClassBuilder);
 smalltalk.addClass('ClassCategoryReader', smalltalk.Object, ['class', 'category'], 'Kernel-Classes');
 smalltalk.ClassCategoryReader.comment="ClassCategoryReader represents a mechanism for retrieving class descriptions stored on a file."
 smalltalk.addMethod(
-"_class_category_",
 smalltalk.method({
 selector: "class:category:",
 category: 'accessing',
@@ -1754,7 +1675,6 @@ referencedClasses: []
 smalltalk.ClassCategoryReader);
 
 smalltalk.addMethod(
-"_compileMethod_",
 smalltalk.method({
 selector: "compileMethod:",
 category: 'private',
@@ -1772,7 +1692,6 @@ referencedClasses: ["Compiler"]
 smalltalk.ClassCategoryReader);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -1789,7 +1708,6 @@ referencedClasses: []
 smalltalk.ClassCategoryReader);
 
 smalltalk.addMethod(
-"_scanFrom_",
 smalltalk.method({
 selector: "scanFrom:",
 category: 'fileIn',
@@ -1821,7 +1739,6 @@ smalltalk.ClassCategoryReader);
 smalltalk.addClass('ClassCommentReader', smalltalk.Object, ['class'], 'Kernel-Classes');
 smalltalk.ClassCommentReader.comment="ClassCommentReader represents a mechanism for retrieving class comments stored on a file.\x0aSee `ClassCategoryReader` too."
 smalltalk.addMethod(
-"_class_",
 smalltalk.method({
 selector: "class:",
 category: 'accessing',
@@ -1838,7 +1755,6 @@ referencedClasses: []
 smalltalk.ClassCommentReader);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -1855,7 +1771,6 @@ referencedClasses: []
 smalltalk.ClassCommentReader);
 
 smalltalk.addMethod(
-"_scanFrom_",
 smalltalk.method({
 selector: "scanFrom:",
 category: 'fileIn',
@@ -1878,7 +1793,6 @@ referencedClasses: []
 smalltalk.ClassCommentReader);
 
 smalltalk.addMethod(
-"_setComment_",
 smalltalk.method({
 selector: "setComment:",
 category: 'private',
@@ -1898,7 +1812,6 @@ smalltalk.ClassCommentReader);
 
 smalltalk.addClass('ClassSorterNode', smalltalk.Object, ['theClass', 'level', 'nodes'], 'Kernel-Classes');
 smalltalk.addMethod(
-"_getNodesFrom_",
 smalltalk.method({
 selector: "getNodesFrom:",
 category: 'accessing',
@@ -1932,7 +1845,6 @@ referencedClasses: ["ClassSorterNode"]
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_level",
 smalltalk.method({
 selector: "level",
 category: 'accessing',
@@ -1951,7 +1863,6 @@ referencedClasses: []
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_level_",
 smalltalk.method({
 selector: "level:",
 category: 'accessing',
@@ -1968,7 +1879,6 @@ referencedClasses: []
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_nodes",
 smalltalk.method({
 selector: "nodes",
 category: 'accessing',
@@ -1987,7 +1897,6 @@ referencedClasses: []
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_theClass",
 smalltalk.method({
 selector: "theClass",
 category: 'accessing',
@@ -2006,7 +1915,6 @@ referencedClasses: []
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_theClass_",
 smalltalk.method({
 selector: "theClass:",
 category: 'accessing',
@@ -2023,7 +1931,6 @@ referencedClasses: []
 smalltalk.ClassSorterNode);
 
 smalltalk.addMethod(
-"_traverseClassesWith_",
 smalltalk.method({
 selector: "traverseClassesWith:",
 category: 'visiting',
@@ -2048,7 +1955,6 @@ smalltalk.ClassSorterNode);
 
 
 smalltalk.addMethod(
-"_on_classes_level_",
 smalltalk.method({
 selector: "on:classes:level:",
 category: 'instance creation',

js/Kernel-Exceptions.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Kernel-Exceptions');
 smalltalk.addClass('Error', smalltalk.Object, ['messageText'], 'Kernel-Exceptions');
 smalltalk.addMethod(
-"_context",
 smalltalk.method({
 selector: "context",
 fn: function (){
@@ -13,7 +12,6 @@ messageSends: []}),
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -25,7 +23,6 @@ messageSends: ["messageText:", ",", "name", "class"]}),
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_isSmalltalkError",
 smalltalk.method({
 selector: "isSmalltalkError",
 fn: function (){
@@ -37,7 +34,6 @@ messageSends: []}),
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_jsStack",
 smalltalk.method({
 selector: "jsStack",
 fn: function (){
@@ -49,7 +45,6 @@ messageSends: []}),
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 fn: function (){
@@ -63,7 +58,6 @@ messageSends: []}),
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_messageText_",
 smalltalk.method({
 selector: "messageText:",
 fn: function (aString){
@@ -75,7 +69,6 @@ messageSends: []}),
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_signal",
 smalltalk.method({
 selector: "signal",
 fn: function (){
@@ -87,7 +80,6 @@ messageSends: []}),
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_signal_",
 smalltalk.method({
 selector: "signal:",
 fn: function (aString){
@@ -101,7 +93,6 @@ smalltalk.Error);
 
 
 smalltalk.addMethod(
-"_signal",
 smalltalk.method({
 selector: "signal",
 fn: function (){
@@ -115,7 +106,6 @@ messageSends: ["signal", "new"]}),
 smalltalk.Error.klass);
 
 smalltalk.addMethod(
-"_signal_",
 smalltalk.method({
 selector: "signal:",
 fn: function (aString){
@@ -131,7 +121,6 @@ smalltalk.Error.klass);
 
 smalltalk.addClass('JavaScriptException', smalltalk.Error, ['exception'], 'Kernel-Exceptions');
 smalltalk.addMethod(
-"_context_",
 smalltalk.method({
 selector: "context:",
 fn: function (aMethodContext){
@@ -143,7 +132,6 @@ messageSends: []}),
 smalltalk.JavaScriptException);
 
 smalltalk.addMethod(
-"_exception",
 smalltalk.method({
 selector: "exception",
 fn: function (){
@@ -157,7 +145,6 @@ messageSends: []}),
 smalltalk.JavaScriptException);
 
 smalltalk.addMethod(
-"_exception_",
 smalltalk.method({
 selector: "exception:",
 fn: function (anException){
@@ -169,7 +156,6 @@ messageSends: []}),
 smalltalk.JavaScriptException);
 
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 fn: function (){
@@ -182,7 +168,6 @@ smalltalk.JavaScriptException);
 
 
 smalltalk.addMethod(
-"_on_",
 smalltalk.method({
 selector: "on:",
 fn: function (anException){
@@ -199,7 +184,6 @@ messageSends: ["exception:", "new", "yourself"]}),
 smalltalk.JavaScriptException.klass);
 
 smalltalk.addMethod(
-"_on_context_",
 smalltalk.method({
 selector: "on:context:",
 fn: function (anException,aMethodContext){
@@ -219,7 +203,6 @@ smalltalk.JavaScriptException.klass);
 
 smalltalk.addClass('MessageNotUnderstood', smalltalk.Error, ['message', 'receiver'], 'Kernel-Exceptions');
 smalltalk.addMethod(
-"_message",
 smalltalk.method({
 selector: "message",
 fn: function (){
@@ -233,7 +216,6 @@ messageSends: []}),
 smalltalk.MessageNotUnderstood);
 
 smalltalk.addMethod(
-"_message_",
 smalltalk.method({
 selector: "message:",
 fn: function (aMessage){
@@ -245,7 +227,6 @@ messageSends: []}),
 smalltalk.MessageNotUnderstood);
 
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 fn: function (){
@@ -259,7 +240,6 @@ messageSends: [",", "selector", "message", "asString", "receiver"]}),
 smalltalk.MessageNotUnderstood);
 
 smalltalk.addMethod(
-"_receiver",
 smalltalk.method({
 selector: "receiver",
 fn: function (){
@@ -273,7 +253,6 @@ messageSends: []}),
 smalltalk.MessageNotUnderstood);
 
 smalltalk.addMethod(
-"_receiver_",
 smalltalk.method({
 selector: "receiver:",
 fn: function (anObject){
@@ -288,7 +267,6 @@ smalltalk.MessageNotUnderstood);
 
 smalltalk.addClass('NonBooleanReceiver', smalltalk.Error, ['object'], 'Kernel-Exceptions');
 smalltalk.addMethod(
-"_object",
 smalltalk.method({
 selector: "object",
 fn: function (){
@@ -302,7 +280,6 @@ messageSends: []}),
 smalltalk.NonBooleanReceiver);
 
 smalltalk.addMethod(
-"_object_",
 smalltalk.method({
 selector: "object:",
 fn: function (anObject){
@@ -317,7 +294,6 @@ smalltalk.NonBooleanReceiver);
 
 smalltalk.addClass('ErrorHandler', smalltalk.Object, [], 'Kernel-Exceptions');
 smalltalk.addMethod(
-"_handleError_",
 smalltalk.method({
 selector: "handleError:",
 fn: function (anError){
@@ -336,7 +312,6 @@ messageSends: ["ifNotNil:", "logErrorContext:", "context", "logError:"]}),
 smalltalk.ErrorHandler);
 
 smalltalk.addMethod(
-"_log_",
 smalltalk.method({
 selector: "log:",
 fn: function (aString){
@@ -348,7 +323,6 @@ messageSends: ["log:"]}),
 smalltalk.ErrorHandler);
 
 smalltalk.addMethod(
-"_logContext_",
 smalltalk.method({
 selector: "logContext:",
 fn: function (aContext){
@@ -367,7 +341,6 @@ messageSends: ["ifNotNil:", "logContext:", "home", "log:", ",", "asString", "sel
 smalltalk.ErrorHandler);
 
 smalltalk.addMethod(
-"_logError_",
 smalltalk.method({
 selector: "logError:",
 fn: function (anError){
@@ -379,7 +352,6 @@ messageSends: ["log:", "messageText"]}),
 smalltalk.ErrorHandler);
 
 smalltalk.addMethod(
-"_logErrorContext_",
 smalltalk.method({
 selector: "logErrorContext:",
 fn: function (aContext){
@@ -404,7 +376,6 @@ smalltalk.ErrorHandler);
 
 smalltalk.ErrorHandler.klass.iVarNames = ['current'];
 smalltalk.addMethod(
-"_current",
 smalltalk.method({
 selector: "current",
 fn: function (){
@@ -424,7 +395,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.ErrorHandler.klass);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -436,7 +406,6 @@ messageSends: ["register"]}),
 smalltalk.ErrorHandler.klass);
 
 smalltalk.addMethod(
-"_register",
 smalltalk.method({
 selector: "register",
 fn: function (){
@@ -449,7 +418,6 @@ messageSends: ["setCurrent:", "new"]}),
 smalltalk.ErrorHandler.klass);
 
 smalltalk.addMethod(
-"_setCurrent_",
 smalltalk.method({
 selector: "setCurrent:",
 fn: function (anHandler){

js/Kernel-Exceptions.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Kernel-Exceptions');
 smalltalk.addClass('Error', smalltalk.Object, ['messageText'], 'Kernel-Exceptions');
 smalltalk.Error.comment="From the ANSI standard:\x0a\x0aThis protocol describes the behavior of instances of class `Error`.\x0aThese are used to represent error conditions that prevent the normal continuation of processing.\x0aActual error exceptions used by an application may be subclasses of this class.\x0aAs `Error` is explicitly specified to be subclassable, conforming implementations must implement its behavior in a non-fragile manner."
 smalltalk.addMethod(
-"_context",
 smalltalk.method({
 selector: "context",
 category: 'accessing',
@@ -19,7 +18,6 @@ referencedClasses: []
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -36,7 +34,6 @@ referencedClasses: []
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_isSmalltalkError",
 smalltalk.method({
 selector: "isSmalltalkError",
 category: 'testing',
@@ -53,7 +50,6 @@ referencedClasses: []
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_jsStack",
 smalltalk.method({
 selector: "jsStack",
 category: 'accessing',
@@ -70,7 +66,6 @@ referencedClasses: []
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 category: 'accessing',
@@ -89,7 +84,6 @@ referencedClasses: []
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_messageText_",
 smalltalk.method({
 selector: "messageText:",
 category: 'accessing',
@@ -106,7 +100,6 @@ referencedClasses: []
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_signal",
 smalltalk.method({
 selector: "signal",
 category: 'signaling',
@@ -123,7 +116,6 @@ referencedClasses: []
 smalltalk.Error);
 
 smalltalk.addMethod(
-"_signal_",
 smalltalk.method({
 selector: "signal:",
 category: 'signaling',
@@ -142,7 +134,6 @@ smalltalk.Error);
 
 
 smalltalk.addMethod(
-"_signal",
 smalltalk.method({
 selector: "signal",
 category: 'instance creation',
@@ -161,7 +152,6 @@ referencedClasses: []
 smalltalk.Error.klass);
 
 smalltalk.addMethod(
-"_signal_",
 smalltalk.method({
 selector: "signal:",
 category: 'instance creation',
@@ -183,7 +173,6 @@ smalltalk.Error.klass);
 smalltalk.addClass('JavaScriptException', smalltalk.Error, ['exception'], 'Kernel-Exceptions');
 smalltalk.JavaScriptException.comment="A JavaScriptException is thrown when a non-Smalltalk exception occurs while in the Smalltalk stack.\x0aSee `boot.js` `inContext()` and `BlockClosure >> on:do:`"
 smalltalk.addMethod(
-"_context_",
 smalltalk.method({
 selector: "context:",
 category: 'accessing',
@@ -200,7 +189,6 @@ referencedClasses: []
 smalltalk.JavaScriptException);
 
 smalltalk.addMethod(
-"_exception",
 smalltalk.method({
 selector: "exception",
 category: 'accessing',
@@ -219,7 +207,6 @@ referencedClasses: []
 smalltalk.JavaScriptException);
 
 smalltalk.addMethod(
-"_exception_",
 smalltalk.method({
 selector: "exception:",
 category: 'accessing',
@@ -236,7 +223,6 @@ referencedClasses: []
 smalltalk.JavaScriptException);
 
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 category: 'accessing',
@@ -254,7 +240,6 @@ smalltalk.JavaScriptException);
 
 
 smalltalk.addMethod(
-"_on_",
 smalltalk.method({
 selector: "on:",
 category: 'instance creation',
@@ -276,7 +261,6 @@ referencedClasses: []
 smalltalk.JavaScriptException.klass);
 
 smalltalk.addMethod(
-"_on_context_",
 smalltalk.method({
 selector: "on:context:",
 category: 'instance creation',
@@ -302,7 +286,6 @@ smalltalk.JavaScriptException.klass);
 smalltalk.addClass('MessageNotUnderstood', smalltalk.Error, ['message', 'receiver'], 'Kernel-Exceptions');
 smalltalk.MessageNotUnderstood.comment="This exception is provided to support `Object>>doesNotUnderstand:`."
 smalltalk.addMethod(
-"_message",
 smalltalk.method({
 selector: "message",
 category: 'accessing',
@@ -321,7 +304,6 @@ referencedClasses: []
 smalltalk.MessageNotUnderstood);
 
 smalltalk.addMethod(
-"_message_",
 smalltalk.method({
 selector: "message:",
 category: 'accessing',
@@ -338,7 +320,6 @@ referencedClasses: []
 smalltalk.MessageNotUnderstood);
 
 smalltalk.addMethod(
-"_messageText",
 smalltalk.method({
 selector: "messageText",
 category: 'accessing',
@@ -357,7 +338,6 @@ referencedClasses: []
 smalltalk.MessageNotUnderstood);
 
 smalltalk.addMethod(
-"_receiver",
 smalltalk.method({
 selector: "receiver",
 category: 'accessing',
@@ -376,7 +356,6 @@ referencedClasses: []
 smalltalk.MessageNotUnderstood);
 
 smalltalk.addMethod(
-"_receiver_",
 smalltalk.method({
 selector: "receiver:",
 category: 'accessing',
@@ -397,7 +376,6 @@ smalltalk.MessageNotUnderstood);
 smalltalk.addClass('NonBooleanReceiver', smalltalk.Error, ['object'], 'Kernel-Exceptions');
 smalltalk.NonBooleanReceiver.comment="NonBooleanReceiver exceptions may be thrown when executing inlined methods such as `#ifTrue:` with a non boolean receiver."
 smalltalk.addMethod(
-"_object",
 smalltalk.method({
 selector: "object",
 category: 'accessing',
@@ -416,7 +394,6 @@ referencedClasses: []
 smalltalk.NonBooleanReceiver);
 
 smalltalk.addMethod(
-"_object_",
 smalltalk.method({
 selector: "object:",
 category: 'accessing',
@@ -437,7 +414,6 @@ smalltalk.NonBooleanReceiver);
 smalltalk.addClass('ErrorHandler', smalltalk.Object, [], 'Kernel-Exceptions');
 smalltalk.ErrorHandler.comment="ErrorHandler is used to manage Smalltalk errors.\x0aSee `boot.js` `handleError()` function.\x0a\x0aSubclasses of `ErrorHandler` can register themselves as the current handler with\x0a`ErrorHandler class >> register`.\x0a\x0aSubclasses may override `#handleError:` to perform an action on the thrown exception.\x0aThe default behavior is to log the error and the context stack to the JavaScript console."
 smalltalk.addMethod(
-"_handleError_",
 smalltalk.method({
 selector: "handleError:",
 category: 'error handling',
@@ -461,7 +437,6 @@ referencedClasses: []
 smalltalk.ErrorHandler);
 
 smalltalk.addMethod(
-"_log_",
 smalltalk.method({
 selector: "log:",
 category: 'private',
@@ -478,7 +453,6 @@ referencedClasses: []
 smalltalk.ErrorHandler);
 
 smalltalk.addMethod(
-"_logContext_",
 smalltalk.method({
 selector: "logContext:",
 category: 'private',
@@ -502,7 +476,6 @@ referencedClasses: []
 smalltalk.ErrorHandler);
 
 smalltalk.addMethod(
-"_logError_",
 smalltalk.method({
 selector: "logError:",
 category: 'private',
@@ -519,7 +492,6 @@ referencedClasses: []
 smalltalk.ErrorHandler);
 
 smalltalk.addMethod(
-"_logErrorContext_",
 smalltalk.method({
 selector: "logErrorContext:",
 category: 'private',
@@ -549,7 +521,6 @@ smalltalk.ErrorHandler);
 
 smalltalk.ErrorHandler.klass.iVarNames = ['current'];
 smalltalk.addMethod(
-"_current",
 smalltalk.method({
 selector: "current",
 category: 'accessing',
@@ -574,7 +545,6 @@ referencedClasses: []
 smalltalk.ErrorHandler.klass);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -591,7 +561,6 @@ referencedClasses: []
 smalltalk.ErrorHandler.klass);
 
 smalltalk.addMethod(
-"_register",
 smalltalk.method({
 selector: "register",
 category: 'initialization',
@@ -609,7 +578,6 @@ referencedClasses: ["ErrorHandler"]
 smalltalk.ErrorHandler.klass);
 
 smalltalk.addMethod(
-"_setCurrent_",
 smalltalk.method({
 selector: "setCurrent:",
 category: 'accessing',

js/Kernel-Methods.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Kernel-Methods');
 smalltalk.addClass('BlockClosure', smalltalk.Object, [], 'Kernel-Methods');
 smalltalk.addMethod(
-"_applyTo_arguments_",
 smalltalk.method({
 selector: "applyTo:arguments:",
 fn: function (anObject,aCollection){
@@ -13,7 +12,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_asCompiledMethod_",
 smalltalk.method({
 selector: "asCompiledMethod:",
 fn: function (aString){
@@ -25,7 +23,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_compiledSource",
 smalltalk.method({
 selector: "compiledSource",
 fn: function (){
@@ -37,7 +34,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_currySelf",
 smalltalk.method({
 selector: "currySelf",
 fn: function (){
@@ -55,7 +51,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_ensure_",
 smalltalk.method({
 selector: "ensure:",
 fn: function (aBlock){
@@ -67,7 +62,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_fork",
 smalltalk.method({
 selector: "fork",
 fn: function (){
@@ -80,7 +74,6 @@ messageSends: ["fork:", "default"]}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 fn: function (){
@@ -92,7 +85,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_newValue_",
 smalltalk.method({
 selector: "newValue:",
 fn: function (anObject){
@@ -104,7 +96,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_newValue_value_",
 smalltalk.method({
 selector: "newValue:value:",
 fn: function (anObject,anObject2){
@@ -116,7 +107,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_newValue_value_value_",
 smalltalk.method({
 selector: "newValue:value:value:",
 fn: function (anObject,anObject2,anObject3){
@@ -128,7 +118,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_numArgs",
 smalltalk.method({
 selector: "numArgs",
 fn: function (){
@@ -140,7 +129,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_on_do_",
 smalltalk.method({
 selector: "on:do:",
 fn: function (anErrorClass,aBlock){
@@ -166,7 +154,6 @@ messageSends: ["try:catch:", "asSmalltalkException:", "current", "ifTrue:ifFalse
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_timeToRun",
 smalltalk.method({
 selector: "timeToRun",
 fn: function (){
@@ -181,7 +168,6 @@ messageSends: ["millisecondsToRun:"]}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_value",
 smalltalk.method({
 selector: "value",
 fn: function (){
@@ -193,7 +179,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_value_",
 smalltalk.method({
 selector: "value:",
 fn: function (anArg){
@@ -205,7 +190,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_value_value_",
 smalltalk.method({
 selector: "value:value:",
 fn: function (firstArg,secondArg){
@@ -217,7 +201,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_value_value_value_",
 smalltalk.method({
 selector: "value:value:value:",
 fn: function (firstArg,secondArg,thirdArg){
@@ -229,7 +212,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_valueWithInterval_",
 smalltalk.method({
 selector: "valueWithInterval:",
 fn: function (aNumber){
@@ -244,7 +226,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_valueWithPossibleArguments_",
 smalltalk.method({
 selector: "valueWithPossibleArguments:",
 fn: function (aCollection){
@@ -256,7 +237,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_valueWithTimeout_",
 smalltalk.method({
 selector: "valueWithTimeout:",
 fn: function (aNumber){
@@ -271,7 +251,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_whileFalse",
 smalltalk.method({
 selector: "whileFalse",
 fn: function (){
@@ -285,7 +264,6 @@ messageSends: ["whileFalse:"]}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_whileFalse_",
 smalltalk.method({
 selector: "whileFalse:",
 fn: function (aBlock){
@@ -297,7 +275,6 @@ messageSends: []}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_whileTrue",
 smalltalk.method({
 selector: "whileTrue",
 fn: function (){
@@ -311,7 +288,6 @@ messageSends: ["whileTrue:"]}),
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_whileTrue_",
 smalltalk.method({
 selector: "whileTrue:",
 fn: function (aBlock){
@@ -326,7 +302,6 @@ smalltalk.BlockClosure);
 
 smalltalk.addClass('CompiledMethod', smalltalk.Object, [], 'Kernel-Methods');
 smalltalk.addMethod(
-"_arguments",
 smalltalk.method({
 selector: "arguments",
 fn: function (){
@@ -338,7 +313,6 @@ messageSends: []}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_category",
 smalltalk.method({
 selector: "category",
 fn: function (){
@@ -357,7 +331,6 @@ messageSends: ["ifNil:", "defaultCategory", "basicAt:"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_category_",
 smalltalk.method({
 selector: "category:",
 fn: function (aString){
@@ -385,7 +358,6 @@ messageSends: ["category", "basicAt:put:", "ifNotNil:", "addElement:", "organiza
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_defaultCategory",
 smalltalk.method({
 selector: "defaultCategory",
 fn: function (){
@@ -397,7 +369,6 @@ messageSends: []}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_fn",
 smalltalk.method({
 selector: "fn",
 fn: function (){
@@ -411,7 +382,6 @@ messageSends: ["basicAt:"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_fn_",
 smalltalk.method({
 selector: "fn:",
 fn: function (aBlock){
@@ -423,7 +393,6 @@ messageSends: ["basicAt:put:"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_messageSends",
 smalltalk.method({
 selector: "messageSends",
 fn: function (){
@@ -437,7 +406,6 @@ messageSends: ["basicAt:"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_methodClass",
 smalltalk.method({
 selector: "methodClass",
 fn: function (){
@@ -451,7 +419,6 @@ messageSends: ["basicAt:"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_protocol",
 smalltalk.method({
 selector: "protocol",
 fn: function (){
@@ -465,7 +432,6 @@ messageSends: ["category"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_referencedClasses",
 smalltalk.method({
 selector: "referencedClasses",
 fn: function (){
@@ -479,7 +445,6 @@ messageSends: ["basicAt:"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 fn: function (){
@@ -493,7 +458,6 @@ messageSends: ["basicAt:"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 fn: function (aString){
@@ -505,7 +469,6 @@ messageSends: ["basicAt:put:"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 fn: function (){
@@ -524,7 +487,6 @@ messageSends: ["ifNil:", "basicAt:"]}),
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 fn: function (aString){
@@ -539,7 +501,6 @@ smalltalk.CompiledMethod);
 
 smalltalk.addClass('ForkPool', smalltalk.Object, ['poolSize', 'maxPoolSize', 'queue', 'worker'], 'Kernel-Methods');
 smalltalk.addMethod(
-"_addWorker",
 smalltalk.method({
 selector: "addWorker",
 fn: function (){
@@ -552,7 +513,6 @@ messageSends: ["valueWithTimeout:", "+"]}),
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_defaultMaxPoolSize",
 smalltalk.method({
 selector: "defaultMaxPoolSize",
 fn: function (){
@@ -566,7 +526,6 @@ messageSends: ["defaultMaxPoolSize", "class"]}),
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_fork_",
 smalltalk.method({
 selector: "fork:",
 fn: function (aBlock){
@@ -583,7 +542,6 @@ messageSends: ["ifTrue:", "addWorker", "<", "maxPoolSize", "back:"]}),
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -599,7 +557,6 @@ messageSends: ["initialize", "new", "makeWorker"]}),
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_makeWorker",
 smalltalk.method({
 selector: "makeWorker",
 fn: function (){
@@ -636,7 +593,6 @@ messageSends: ["new", "-", "frontIfAbsent:", "ifFalse:", "ensure:", "addWorker",
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_maxPoolSize",
 smalltalk.method({
 selector: "maxPoolSize",
 fn: function (){
@@ -655,7 +611,6 @@ messageSends: ["ifNil:", "defaultMaxPoolSize"]}),
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_maxPoolSize_",
 smalltalk.method({
 selector: "maxPoolSize:",
 fn: function (anInteger){
@@ -669,7 +624,6 @@ smalltalk.ForkPool);
 
 smalltalk.ForkPool.klass.iVarNames = ['default'];
 smalltalk.addMethod(
-"_default",
 smalltalk.method({
 selector: "default",
 fn: function (){
@@ -689,7 +643,6 @@ messageSends: ["ifNil:", "new"]}),
 smalltalk.ForkPool.klass);
 
 smalltalk.addMethod(
-"_defaultMaxPoolSize",
 smalltalk.method({
 selector: "defaultMaxPoolSize",
 fn: function (){
@@ -703,7 +656,6 @@ messageSends: []}),
 smalltalk.ForkPool.klass);
 
 smalltalk.addMethod(
-"_resetDefault",
 smalltalk.method({
 selector: "resetDefault",
 fn: function (){
@@ -717,7 +669,6 @@ smalltalk.ForkPool.klass);
 
 smalltalk.addClass('Message', smalltalk.Object, ['selector', 'arguments'], 'Kernel-Methods');
 smalltalk.addMethod(
-"_arguments",
 smalltalk.method({
 selector: "arguments",
 fn: function (){
@@ -731,7 +682,6 @@ messageSends: []}),
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_arguments_",
 smalltalk.method({
 selector: "arguments:",
 fn: function (anArray){
@@ -743,7 +693,6 @@ messageSends: []}),
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_printOn_",
 smalltalk.method({
 selector: "printOn:",
 fn: function (aStream){
@@ -760,7 +709,6 @@ messageSends: ["printOn:", "nextPutAll:", "selector"]}),
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 fn: function (){
@@ -774,7 +722,6 @@ messageSends: []}),
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 fn: function (aString){
@@ -786,7 +733,6 @@ messageSends: []}),
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_sendTo_",
 smalltalk.method({
 selector: "sendTo:",
 fn: function (anObject){
@@ -801,7 +747,6 @@ smalltalk.Message);
 
 
 smalltalk.addMethod(
-"_selector_arguments_",
 smalltalk.method({
 selector: "selector:arguments:",
 fn: function (aString,anArray){
@@ -821,7 +766,6 @@ smalltalk.Message.klass);
 
 smalltalk.addClass('MethodContext', smalltalk.Object, [], 'Kernel-Methods');
 smalltalk.addMethod(
-"_asString",
 smalltalk.method({
 selector: "asString",
 fn: function (){
@@ -840,7 +784,6 @@ messageSends: ["ifTrue:ifFalse:", ",", "printString", "class", "receiver", "meth
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_home",
 smalltalk.method({
 selector: "home",
 fn: function (){
@@ -852,7 +795,6 @@ messageSends: []}),
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_isBlockContext",
 smalltalk.method({
 selector: "isBlockContext",
 fn: function (){
@@ -866,7 +808,6 @@ messageSends: ["isNil", "selector"]}),
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_locals",
 smalltalk.method({
 selector: "locals",
 fn: function (){
@@ -878,7 +819,6 @@ messageSends: []}),
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_method",
 smalltalk.method({
 selector: "method",
 fn: function (){
@@ -892,7 +832,6 @@ messageSends: ["lookupSelector:", "selector", "methodContext", "class", "receive
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_methodContext",
 smalltalk.method({
 selector: "methodContext",
 fn: function (){
@@ -911,7 +850,6 @@ messageSends: ["ifFalse:", "isBlockContext", "home"]}),
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_outerContext",
 smalltalk.method({
 selector: "outerContext",
 fn: function (){
@@ -923,7 +861,6 @@ messageSends: []}),
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_pc",
 smalltalk.method({
 selector: "pc",
 fn: function (){
@@ -935,7 +872,6 @@ messageSends: []}),
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_printOn_",
 smalltalk.method({
 selector: "printOn:",
 fn: function (aStream){
@@ -952,7 +888,6 @@ messageSends: ["printOn:", "nextPutAll:", "asString"]}),
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_receiver",
 smalltalk.method({
 selector: "receiver",
 fn: function (){
@@ -964,7 +899,6 @@ messageSends: []}),
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 fn: function (){
@@ -982,7 +916,6 @@ messageSends: []}),
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_temps",
 smalltalk.method({
 selector: "temps",
 fn: function (){
@@ -1001,7 +934,6 @@ smalltalk.MethodContext);
 smalltalk.addClass('NativeFunction', smalltalk.Object, [], 'Kernel-Methods');
 
 smalltalk.addMethod(
-"_constructor_",
 smalltalk.method({
 selector: "constructor:",
 fn: function (aString){
@@ -1016,7 +948,6 @@ messageSends: []}),
 smalltalk.NativeFunction.klass);
 
 smalltalk.addMethod(
-"_constructor_value_",
 smalltalk.method({
 selector: "constructor:value:",
 fn: function (aString,anObject){
@@ -1031,7 +962,6 @@ messageSends: []}),
 smalltalk.NativeFunction.klass);
 
 smalltalk.addMethod(
-"_constructor_value_value_",
 smalltalk.method({
 selector: "constructor:value:value:",
 fn: function (aString,anObject,anObject2){
@@ -1046,7 +976,6 @@ messageSends: []}),
 smalltalk.NativeFunction.klass);
 
 smalltalk.addMethod(
-"_constructor_value_value_value_",
 smalltalk.method({
 selector: "constructor:value:value:value:",
 fn: function (aString,anObject,anObject2,anObject3){
@@ -1061,7 +990,6 @@ messageSends: []}),
 smalltalk.NativeFunction.klass);
 
 smalltalk.addMethod(
-"_exists_",
 smalltalk.method({
 selector: "exists:",
 fn: function (aString){

js/Kernel-Methods.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('Kernel-Methods');
 smalltalk.addClass('BlockClosure', smalltalk.Object, [], 'Kernel-Methods');
 smalltalk.BlockClosure.comment="A BlockClosure is a lexical closure.\x0aThe JavaScript representation is a function.\x0a\x0aA BlockClosure is evaluated with the `#value*` methods in the 'evaluating' protocol."
 smalltalk.addMethod(
-"_applyTo_arguments_",
 smalltalk.method({
 selector: "applyTo:arguments:",
 category: 'evaluating',
@@ -19,7 +18,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_asCompiledMethod_",
 smalltalk.method({
 selector: "asCompiledMethod:",
 category: 'converting',
@@ -36,7 +34,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_compiledSource",
 smalltalk.method({
 selector: "compiledSource",
 category: 'accessing',
@@ -53,7 +50,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_currySelf",
 smalltalk.method({
 selector: "currySelf",
 category: 'converting',
@@ -76,7 +72,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_ensure_",
 smalltalk.method({
 selector: "ensure:",
 category: 'evaluating',
@@ -93,7 +88,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_fork",
 smalltalk.method({
 selector: "fork",
 category: 'timeout/interval',
@@ -111,7 +105,6 @@ referencedClasses: ["ForkPool"]
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 category: 'evaluating',
@@ -128,7 +121,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_newValue_",
 smalltalk.method({
 selector: "newValue:",
 category: 'evaluating',
@@ -145,7 +137,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_newValue_value_",
 smalltalk.method({
 selector: "newValue:value:",
 category: 'evaluating',
@@ -162,7 +153,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_newValue_value_value_",
 smalltalk.method({
 selector: "newValue:value:value:",
 category: 'evaluating',
@@ -179,7 +169,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_numArgs",
 smalltalk.method({
 selector: "numArgs",
 category: 'accessing',
@@ -196,7 +185,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_on_do_",
 smalltalk.method({
 selector: "on:do:",
 category: 'error handling',
@@ -227,7 +215,6 @@ referencedClasses: ["Smalltalk"]
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_timeToRun",
 smalltalk.method({
 selector: "timeToRun",
 category: 'evaluating',
@@ -247,7 +234,6 @@ referencedClasses: ["Date"]
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_value",
 smalltalk.method({
 selector: "value",
 category: 'evaluating',
@@ -264,7 +250,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_value_",
 smalltalk.method({
 selector: "value:",
 category: 'evaluating',
@@ -281,7 +266,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_value_value_",
 smalltalk.method({
 selector: "value:value:",
 category: 'evaluating',
@@ -298,7 +282,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_value_value_value_",
 smalltalk.method({
 selector: "value:value:value:",
 category: 'evaluating',
@@ -315,7 +298,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_valueWithInterval_",
 smalltalk.method({
 selector: "valueWithInterval:",
 category: 'timeout/interval',
@@ -335,7 +317,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_valueWithPossibleArguments_",
 smalltalk.method({
 selector: "valueWithPossibleArguments:",
 category: 'evaluating',
@@ -352,7 +333,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_valueWithTimeout_",
 smalltalk.method({
 selector: "valueWithTimeout:",
 category: 'timeout/interval',
@@ -372,7 +352,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_whileFalse",
 smalltalk.method({
 selector: "whileFalse",
 category: 'controlling',
@@ -391,7 +370,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_whileFalse_",
 smalltalk.method({
 selector: "whileFalse:",
 category: 'controlling',
@@ -408,7 +386,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_whileTrue",
 smalltalk.method({
 selector: "whileTrue",
 category: 'controlling',
@@ -427,7 +404,6 @@ referencedClasses: []
 smalltalk.BlockClosure);
 
 smalltalk.addMethod(
-"_whileTrue_",
 smalltalk.method({
 selector: "whileTrue:",
 category: 'controlling',
@@ -448,7 +424,6 @@ smalltalk.BlockClosure);
 smalltalk.addClass('CompiledMethod', smalltalk.Object, [], 'Kernel-Methods');
 smalltalk.CompiledMethod.comment="CompiledMethod hold the source and compiled code of a class method.\x0a\x0aYou can get a CompiledMethod using `Behavior>>methodAt:`\x0a\x0a\x09String methodAt: 'lines'\x0a\x0aand read the source code\x0a\x0a\x09(String methodAt: 'lines') source\x0a\x0aSee referenced classes:\x0a\x0a\x09(String methodAt: 'lines') referencedClasses\x0a\x0aor messages sent from this method:\x0a\x09\x0a\x09(String methodAt: 'lines') messageSends"
 smalltalk.addMethod(
-"_arguments",
 smalltalk.method({
 selector: "arguments",
 category: 'accessing',
@@ -465,7 +440,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_category",
 smalltalk.method({
 selector: "category",
 category: 'accessing',
@@ -489,7 +463,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_category_",
 smalltalk.method({
 selector: "category:",
 category: 'accessing',
@@ -522,7 +495,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_defaultCategory",
 smalltalk.method({
 selector: "defaultCategory",
 category: 'defaults',
@@ -539,7 +511,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_fn",
 smalltalk.method({
 selector: "fn",
 category: 'accessing',
@@ -558,7 +529,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_fn_",
 smalltalk.method({
 selector: "fn:",
 category: 'accessing',
@@ -575,7 +545,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_messageSends",
 smalltalk.method({
 selector: "messageSends",
 category: 'accessing',
@@ -594,7 +563,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_methodClass",
 smalltalk.method({
 selector: "methodClass",
 category: 'accessing',
@@ -613,7 +581,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_protocol",
 smalltalk.method({
 selector: "protocol",
 category: 'accessing',
@@ -632,7 +599,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_referencedClasses",
 smalltalk.method({
 selector: "referencedClasses",
 category: 'accessing',
@@ -651,7 +617,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 category: 'accessing',
@@ -670,7 +635,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 category: 'accessing',
@@ -687,7 +651,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_source",
 smalltalk.method({
 selector: "source",
 category: 'accessing',
@@ -711,7 +674,6 @@ referencedClasses: []
 smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-"_source_",
 smalltalk.method({
 selector: "source:",
 category: 'accessing',
@@ -732,7 +694,6 @@ smalltalk.CompiledMethod);
 smalltalk.addClass('ForkPool', smalltalk.Object, ['poolSize', 'maxPoolSize', 'queue', 'worker'], 'Kernel-Methods');
 smalltalk.ForkPool.comment="A ForkPool is responsible for handling forked blocks.\x0aThe pool size sets the maximum concurrent forked blocks.\x0a\x0aThe default instance is accessed with `ForkPool default`"
 smalltalk.addMethod(
-"_addWorker",
 smalltalk.method({
 selector: "addWorker",
 category: 'private',
@@ -750,7 +711,6 @@ referencedClasses: []
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_defaultMaxPoolSize",
 smalltalk.method({
 selector: "defaultMaxPoolSize",
 category: 'defaults',
@@ -769,7 +729,6 @@ referencedClasses: []
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_fork_",
 smalltalk.method({
 selector: "fork:",
 category: 'actions',
@@ -791,7 +750,6 @@ referencedClasses: []
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -812,7 +770,6 @@ referencedClasses: ["Queue"]
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_makeWorker",
 smalltalk.method({
 selector: "makeWorker",
 category: 'initialization',
@@ -854,7 +811,6 @@ referencedClasses: ["Object"]
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_maxPoolSize",
 smalltalk.method({
 selector: "maxPoolSize",
 category: 'accessing',
@@ -878,7 +834,6 @@ referencedClasses: []
 smalltalk.ForkPool);
 
 smalltalk.addMethod(
-"_maxPoolSize_",
 smalltalk.method({
 selector: "maxPoolSize:",
 category: 'accessing',
@@ -897,7 +852,6 @@ smalltalk.ForkPool);
 
 smalltalk.ForkPool.klass.iVarNames = ['default'];
 smalltalk.addMethod(
-"_default",
 smalltalk.method({
 selector: "default",
 category: 'accessing',
@@ -922,7 +876,6 @@ referencedClasses: []
 smalltalk.ForkPool.klass);
 
 smalltalk.addMethod(
-"_defaultMaxPoolSize",
 smalltalk.method({
 selector: "defaultMaxPoolSize",
 category: 'accessing',
@@ -941,7 +894,6 @@ referencedClasses: []
 smalltalk.ForkPool.klass);
 
 smalltalk.addMethod(
-"_resetDefault",
 smalltalk.method({
 selector: "resetDefault",
 category: 'accessing',
@@ -961,7 +913,6 @@ smalltalk.ForkPool.klass);
 smalltalk.addClass('Message', smalltalk.Object, ['selector', 'arguments'], 'Kernel-Methods');
 smalltalk.Message.comment="Generally, the system does not use instances of Message for efficiency reasons.\x0aHowever, when a message is not understood by its receiver, the interpreter will make up an instance of it in order to capture the information involved in an actual message transmission.\x0aThis instance is sent it as an argument with the message `doesNotUnderstand:` to the receiver.\x0a\x0aSee boot.js, `messageNotUnderstood` and its counterpart `Object>>doesNotUnderstand:`"
 smalltalk.addMethod(
-"_arguments",
 smalltalk.method({
 selector: "arguments",
 category: 'accessing',
@@ -980,7 +931,6 @@ referencedClasses: []
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_arguments_",
 smalltalk.method({
 selector: "arguments:",
 category: 'accessing',
@@ -997,7 +947,6 @@ referencedClasses: []
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_printOn_",
 smalltalk.method({
 selector: "printOn:",
 category: 'printing',
@@ -1019,7 +968,6 @@ referencedClasses: []
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 category: 'accessing',
@@ -1038,7 +986,6 @@ referencedClasses: []
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 category: 'accessing',
@@ -1055,7 +1002,6 @@ referencedClasses: []
 smalltalk.Message);
 
 smalltalk.addMethod(
-"_sendTo_",
 smalltalk.method({
 selector: "sendTo:",
 category: 'actions',
@@ -1075,7 +1021,6 @@ smalltalk.Message);
 
 
 smalltalk.addMethod(
-"_selector_arguments_",
 smalltalk.method({
 selector: "selector:arguments:",
 category: 'instance creation',
@@ -1101,7 +1046,6 @@ smalltalk.Message.klass);
 smalltalk.addClass('MethodContext', smalltalk.Object, [], 'Kernel-Methods');
 smalltalk.MethodContext.comment="MethodContext holds all the dynamic state associated with the execution of either a method activation resulting from a message send. That is used to build the call stack while debugging.\x0a\x0aMethodContext instances are JavaScript `SmalltalkMethodContext` objects defined in boot.js"
 smalltalk.addMethod(
-"_asString",
 smalltalk.method({
 selector: "asString",
 category: 'converting',
@@ -1125,7 +1069,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_home",
 smalltalk.method({
 selector: "home",
 category: 'accessing',
@@ -1142,7 +1085,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_isBlockContext",
 smalltalk.method({
 selector: "isBlockContext",
 category: 'testing',
@@ -1161,7 +1103,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_locals",
 smalltalk.method({
 selector: "locals",
 category: 'accessing',
@@ -1178,7 +1119,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_method",
 smalltalk.method({
 selector: "method",
 category: 'accessing',
@@ -1197,7 +1137,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_methodContext",
 smalltalk.method({
 selector: "methodContext",
 category: 'accessing',
@@ -1221,7 +1160,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_outerContext",
 smalltalk.method({
 selector: "outerContext",
 category: 'accessing',
@@ -1238,7 +1176,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_pc",
 smalltalk.method({
 selector: "pc",
 category: 'accessing',
@@ -1255,7 +1192,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_printOn_",
 smalltalk.method({
 selector: "printOn:",
 category: 'printing',
@@ -1277,7 +1213,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_receiver",
 smalltalk.method({
 selector: "receiver",
 category: 'accessing',
@@ -1294,7 +1229,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 category: 'accessing',
@@ -1317,7 +1251,6 @@ referencedClasses: []
 smalltalk.MethodContext);
 
 smalltalk.addMethod(
-"_temps",
 smalltalk.method({
 selector: "temps",
 category: 'accessing',
@@ -1342,7 +1275,6 @@ smalltalk.addClass('NativeFunction', smalltalk.Object, [], 'Kernel-Methods');
 smalltalk.NativeFunction.comment="NativeFunction is a wrapper around native functions, such as `WebSocket`.\x0aFor 'normal' functions (whose constructor is the JavaScript `Function` object), use `BlockClosure`.\x0a\x0aSee the class-side `instance creation` methods.\x0a\x0aCreated instances will most probably be instance of `JSObjectProxy`.\x0a\x0aUsage example:\x0a\x0a\x09| ws |\x0a\x09ws := NativeFunction constructor: 'WebSocket' value: 'ws://localhost'.\x0a\x09ws at: 'onopen' put: [ ws send: 'hey there from Amber' ]"
 
 smalltalk.addMethod(
-"_constructor_",
 smalltalk.method({
 selector: "constructor:",
 category: 'instance creation',
@@ -1362,7 +1294,6 @@ referencedClasses: []
 smalltalk.NativeFunction.klass);
 
 smalltalk.addMethod(
-"_constructor_value_",
 smalltalk.method({
 selector: "constructor:value:",
 category: 'instance creation',
@@ -1382,7 +1313,6 @@ referencedClasses: []
 smalltalk.NativeFunction.klass);
 
 smalltalk.addMethod(
-"_constructor_value_value_",
 smalltalk.method({
 selector: "constructor:value:value:",
 category: 'instance creation',
@@ -1402,7 +1332,6 @@ referencedClasses: []
 smalltalk.NativeFunction.klass);
 
 smalltalk.addMethod(
-"_constructor_value_value_value_",
 smalltalk.method({
 selector: "constructor:value:value:value:",
 category: 'instance creation',
@@ -1422,7 +1351,6 @@ referencedClasses: []
 smalltalk.NativeFunction.klass);
 
 smalltalk.addMethod(
-"_exists_",
 smalltalk.method({
 selector: "exists:",
 category: 'testing',

js/Kernel-Transcript.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Kernel-Transcript');
 smalltalk.addClass('ConsoleTranscript', smalltalk.Object, ['textarea'], 'Kernel-Transcript');
 smalltalk.addMethod(
-"_clear",
 smalltalk.method({
 selector: "clear",
 fn: function (){
@@ -12,7 +11,6 @@ messageSends: []}),
 smalltalk.ConsoleTranscript);
 
 smalltalk.addMethod(
-"_cr",
 smalltalk.method({
 selector: "cr",
 fn: function (){
@@ -23,7 +21,6 @@ messageSends: []}),
 smalltalk.ConsoleTranscript);
 
 smalltalk.addMethod(
-"_open",
 smalltalk.method({
 selector: "open",
 fn: function (){
@@ -34,7 +31,6 @@ messageSends: []}),
 smalltalk.ConsoleTranscript);
 
 smalltalk.addMethod(
-"_show_",
 smalltalk.method({
 selector: "show:",
 fn: function (anObject){
@@ -47,7 +43,6 @@ smalltalk.ConsoleTranscript);
 
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -64,7 +59,6 @@ smalltalk.addClass('Transcript', smalltalk.Object, ['textarea'], 'Kernel-Transcr
 
 smalltalk.Transcript.klass.iVarNames = ['current'];
 smalltalk.addMethod(
-"_clear",
 smalltalk.method({
 selector: "clear",
 fn: function (){
@@ -76,7 +70,6 @@ messageSends: ["clear", "current"]}),
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_cr",
 smalltalk.method({
 selector: "cr",
 fn: function (){
@@ -89,7 +82,6 @@ messageSends: ["show:", "cr", "current"]}),
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_current",
 smalltalk.method({
 selector: "current",
 fn: function (){
@@ -103,7 +95,6 @@ messageSends: []}),
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 fn: function (){
@@ -115,7 +106,6 @@ messageSends: ["shouldNotImplement"]}),
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_open",
 smalltalk.method({
 selector: "open",
 fn: function (){
@@ -127,7 +117,6 @@ messageSends: ["open", "current"]}),
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_register_",
 smalltalk.method({
 selector: "register:",
 fn: function (aTranscript){
@@ -139,7 +128,6 @@ messageSends: []}),
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_show_",
 smalltalk.method({
 selector: "show:",
 fn: function (anObject){

js/Kernel-Transcript.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('Kernel-Transcript');
 smalltalk.addClass('ConsoleTranscript', smalltalk.Object, ['textarea'], 'Kernel-Transcript');
 smalltalk.addMethod(
-"_clear",
 smalltalk.method({
 selector: "clear",
 category: 'printing',
@@ -17,7 +16,6 @@ referencedClasses: []
 smalltalk.ConsoleTranscript);
 
 smalltalk.addMethod(
-"_cr",
 smalltalk.method({
 selector: "cr",
 category: 'printing',
@@ -33,7 +31,6 @@ referencedClasses: []
 smalltalk.ConsoleTranscript);
 
 smalltalk.addMethod(
-"_open",
 smalltalk.method({
 selector: "open",
 category: 'actions',
@@ -49,7 +46,6 @@ referencedClasses: []
 smalltalk.ConsoleTranscript);
 
 smalltalk.addMethod(
-"_show_",
 smalltalk.method({
 selector: "show:",
 category: 'printing',
@@ -67,7 +63,6 @@ smalltalk.ConsoleTranscript);
 
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -89,7 +84,6 @@ smalltalk.addClass('Transcript', smalltalk.Object, ['textarea'], 'Kernel-Transcr
 
 smalltalk.Transcript.klass.iVarNames = ['current'];
 smalltalk.addMethod(
-"_clear",
 smalltalk.method({
 selector: "clear",
 category: 'printing',
@@ -106,7 +100,6 @@ referencedClasses: []
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_cr",
 smalltalk.method({
 selector: "cr",
 category: 'printing',
@@ -124,7 +117,6 @@ referencedClasses: ["String"]
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_current",
 smalltalk.method({
 selector: "current",
 category: 'instance creation',
@@ -143,7 +135,6 @@ referencedClasses: []
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 category: 'instance creation',
@@ -160,7 +151,6 @@ referencedClasses: []
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_open",
 smalltalk.method({
 selector: "open",
 category: 'instance creation',
@@ -177,7 +167,6 @@ referencedClasses: []
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_register_",
 smalltalk.method({
 selector: "register:",
 category: 'instance creation',
@@ -194,7 +183,6 @@ referencedClasses: []
 smalltalk.Transcript.klass);
 
 smalltalk.addMethod(
-"_show_",
 smalltalk.method({
 selector: "show:",
 category: 'printing',

js/SUnit-Tests.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('SUnit-Tests');
 smalltalk.addClass('ExampleSetTest', smalltalk.TestCase, ['empty', 'full'], 'SUnit-Tests');
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 fn: function (){
@@ -15,7 +14,6 @@ messageSends: ["new", "with:with:"]}),
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testAdd",
 smalltalk.method({
 selector: "testAdd",
 fn: function (){
@@ -28,7 +26,6 @@ messageSends: ["add:", "assert:", "includes:"]}),
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testGrow",
 smalltalk.method({
 selector: "testGrow",
 fn: function (){
@@ -41,7 +38,6 @@ messageSends: ["addAll:", "to:", "assert:equals:", "size"]}),
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testIllegal",
 smalltalk.method({
 selector: "testIllegal",
 fn: function (){
@@ -61,7 +57,6 @@ messageSends: ["should:raise:", "at:", "at:put:"]}),
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testIncludes",
 smalltalk.method({
 selector: "testIncludes",
 fn: function (){
@@ -74,7 +69,6 @@ messageSends: ["assert:", "includes:"]}),
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testOccurrences",
 smalltalk.method({
 selector: "testOccurrences",
 fn: function (){
@@ -89,7 +83,6 @@ messageSends: ["assert:equals:", "occurrencesOf:", "add:"]}),
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testRemove",
 smalltalk.method({
 selector: "testRemove",
 fn: function (){
@@ -106,7 +99,6 @@ smalltalk.ExampleSetTest);
 
 smalltalk.addClass('SUnitAsyncTest', smalltalk.TestCase, ['flag'], 'SUnit-Tests');
 smalltalk.addMethod(
-"_fakeError",
 smalltalk.method({
 selector: "fakeError",
 fn: function (){
@@ -125,7 +117,6 @@ messageSends: ["timeout:", "valueWithTimeout:", "async:", "error:"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeErrorFailingInTearDown",
 smalltalk.method({
 selector: "fakeErrorFailingInTearDown",
 fn: function (){
@@ -142,7 +133,6 @@ messageSends: ["timeout:", "valueWithTimeout:", "async:", "error:"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeFailure",
 smalltalk.method({
 selector: "fakeFailure",
 fn: function (){
@@ -161,7 +151,6 @@ messageSends: ["timeout:", "valueWithTimeout:", "async:", "assert:"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeMultipleTimeoutFailing",
 smalltalk.method({
 selector: "fakeMultipleTimeoutFailing",
 fn: function (){
@@ -181,7 +170,6 @@ messageSends: ["timeout:", "valueWithTimeout:", "async:", "finished"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeMultipleTimeoutPassing",
 smalltalk.method({
 selector: "fakeMultipleTimeoutPassing",
 fn: function (){
@@ -201,7 +189,6 @@ messageSends: ["timeout:", "valueWithTimeout:", "async:", "finished"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeTimeout",
 smalltalk.method({
 selector: "fakeTimeout",
 fn: function (){
@@ -217,7 +204,6 @@ messageSends: ["timeout:", "valueWithTimeout:", "async:", "finished"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_selectorSetOf_",
 smalltalk.method({
 selector: "selectorSetOf:",
 fn: function (aCollection){
@@ -234,7 +220,6 @@ messageSends: ["asSet", "collect:", "selector"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 fn: function (){
@@ -246,7 +231,6 @@ messageSends: []}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_tearDown",
 smalltalk.method({
 selector: "tearDown",
 fn: function (){
@@ -258,7 +242,6 @@ messageSends: ["assert:equals:"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testAsyncErrorsAndFailures",
 smalltalk.method({
 selector: "testAsyncErrorsAndFailures",
 fn: function (){
@@ -295,7 +278,6 @@ messageSends: ["collect:", "selector:", "class", "on:", "timeout:", "result", "a
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testAsyncNeedsTimeout",
 smalltalk.method({
 selector: "testAsyncNeedsTimeout",
 fn: function (){
@@ -321,7 +303,6 @@ messageSends: ["should:raise:", "async:", "timeout:", "shouldnt:raise:", "finish
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testFinishedNeedsTimeout",
 smalltalk.method({
 selector: "testFinishedNeedsTimeout",
 fn: function (){
@@ -342,7 +323,6 @@ messageSends: ["should:raise:", "finished", "timeout:", "shouldnt:raise:"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testIsAsyncReturnsCorrectValues",
 smalltalk.method({
 selector: "testIsAsyncReturnsCorrectValues",
 fn: function (){
@@ -358,7 +338,6 @@ messageSends: ["deny:", "isAsync", "timeout:", "assert:", "finished"]}),
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testPass",
 smalltalk.method({
 selector: "testPass",
 fn: function (){
@@ -378,7 +357,6 @@ messageSends: ["timeout:", "valueWithTimeout:", "async:", "assert:", "finished"]
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testTimeouts",
 smalltalk.method({
 selector: "testTimeouts",
 fn: function (){
@@ -416,7 +394,6 @@ messageSends: ["collect:", "selector:", "class", "on:", "timeout:", "result", "a
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testTwoAsyncPassesWithFinishedOnlyOneIsRun",
 smalltalk.method({
 selector: "testTwoAsyncPassesWithFinishedOnlyOneIsRun",
 fn: function (){

js/SUnit-Tests.js

@@ -2,7 +2,6 @@ smalltalk.addPackage('SUnit-Tests');
 smalltalk.addClass('ExampleSetTest', smalltalk.TestCase, ['empty', 'full'], 'SUnit-Tests');
 smalltalk.ExampleSetTest.comment="ExampleSetTest is taken from Pharo 1.4.\x0a\x0aTHe purpose of this class is to demonstrate a simple use case of the test framework."
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 category: 'running',
@@ -21,7 +20,6 @@ referencedClasses: ["Set"]
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testAdd",
 smalltalk.method({
 selector: "testAdd",
 category: 'tests',
@@ -39,7 +37,6 @@ referencedClasses: []
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testGrow",
 smalltalk.method({
 selector: "testGrow",
 category: 'tests',
@@ -57,7 +54,6 @@ referencedClasses: []
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testIllegal",
 smalltalk.method({
 selector: "testIllegal",
 category: 'tests',
@@ -82,7 +78,6 @@ referencedClasses: ["Error"]
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testIncludes",
 smalltalk.method({
 selector: "testIncludes",
 category: 'tests',
@@ -100,7 +95,6 @@ referencedClasses: []
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testOccurrences",
 smalltalk.method({
 selector: "testOccurrences",
 category: 'tests',
@@ -120,7 +114,6 @@ referencedClasses: []
 smalltalk.ExampleSetTest);
 
 smalltalk.addMethod(
-"_testRemove",
 smalltalk.method({
 selector: "testRemove",
 category: 'tests',
@@ -142,7 +135,6 @@ smalltalk.ExampleSetTest);
 
 smalltalk.addClass('SUnitAsyncTest', smalltalk.TestCase, ['flag'], 'SUnit-Tests');
 smalltalk.addMethod(
-"_fakeError",
 smalltalk.method({
 selector: "fakeError",
 category: 'helpers',
@@ -166,7 +158,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeErrorFailingInTearDown",
 smalltalk.method({
 selector: "fakeErrorFailingInTearDown",
 category: 'helpers',
@@ -188,7 +179,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeFailure",
 smalltalk.method({
 selector: "fakeFailure",
 category: 'helpers',
@@ -212,7 +202,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeMultipleTimeoutFailing",
 smalltalk.method({
 selector: "fakeMultipleTimeoutFailing",
 category: 'helpers',
@@ -237,7 +226,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeMultipleTimeoutPassing",
 smalltalk.method({
 selector: "fakeMultipleTimeoutPassing",
 category: 'helpers',
@@ -262,7 +250,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_fakeTimeout",
 smalltalk.method({
 selector: "fakeTimeout",
 category: 'helpers',
@@ -283,7 +270,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_selectorSetOf_",
 smalltalk.method({
 selector: "selectorSetOf:",
 category: 'private',
@@ -305,7 +291,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 category: 'running',
@@ -322,7 +307,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_tearDown",
 smalltalk.method({
 selector: "tearDown",
 category: 'running',
@@ -339,7 +323,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testAsyncErrorsAndFailures",
 smalltalk.method({
 selector: "testAsyncErrorsAndFailures",
 category: 'tests',
@@ -381,7 +364,6 @@ referencedClasses: ["TestSuiteRunner", "ResultAnnouncement"]
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testAsyncNeedsTimeout",
 smalltalk.method({
 selector: "testAsyncNeedsTimeout",
 category: 'tests',
@@ -412,7 +394,6 @@ referencedClasses: ["Error"]
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testFinishedNeedsTimeout",
 smalltalk.method({
 selector: "testFinishedNeedsTimeout",
 category: 'tests',
@@ -438,7 +419,6 @@ referencedClasses: ["Error"]
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testIsAsyncReturnsCorrectValues",
 smalltalk.method({
 selector: "testIsAsyncReturnsCorrectValues",
 category: 'tests',
@@ -459,7 +439,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testPass",
 smalltalk.method({
 selector: "testPass",
 category: 'tests',
@@ -484,7 +463,6 @@ referencedClasses: []
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testTimeouts",
 smalltalk.method({
 selector: "testTimeouts",
 category: 'tests',
@@ -527,7 +505,6 @@ referencedClasses: ["TestSuiteRunner", "Set", "ResultAnnouncement"]
 smalltalk.SUnitAsyncTest);
 
 smalltalk.addMethod(
-"_testTwoAsyncPassesWithFinishedOnlyOneIsRun",
 smalltalk.method({
 selector: "testTwoAsyncPassesWithFinishedOnlyOneIsRun",
 category: 'tests',

js/SUnit.deploy.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('SUnit');
 smalltalk.addClass('ResultAnnouncement', smalltalk.Object, ['result'], 'SUnit');
 smalltalk.addMethod(
-"_result",
 smalltalk.method({
 selector: "result",
 fn: function (){
@@ -15,7 +14,6 @@ messageSends: []}),
 smalltalk.ResultAnnouncement);
 
 smalltalk.addMethod(
-"_result_",
 smalltalk.method({
 selector: "result:",
 fn: function (aTestResult){
@@ -30,7 +28,6 @@ smalltalk.ResultAnnouncement);
 
 smalltalk.addClass('TestCase', smalltalk.Object, ['testSelector', 'asyncTimeout', 'context'], 'SUnit');
 smalltalk.addMethod(
-"_assert_",
 smalltalk.method({
 selector: "assert:",
 fn: function (aBoolean){
@@ -42,7 +39,6 @@ messageSends: ["assert:description:"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_assert_description_",
 smalltalk.method({
 selector: "assert:description:",
 fn: function (aBoolean,aString){
@@ -58,7 +54,6 @@ messageSends: ["ifFalse:", "signalFailure:"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_assert_equals_",
 smalltalk.method({
 selector: "assert:equals:",
 fn: function (actual,expected){
@@ -72,7 +67,6 @@ messageSends: ["assert:description:", "=", ",", "asString"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_async_",
 smalltalk.method({
 selector: "async:",
 fn: function (aBlock){
@@ -95,7 +89,6 @@ messageSends: ["errorIfNotAsync:", "ifTrue:", "execute:", "isAsync"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_context_",
 smalltalk.method({
 selector: "context:",
 fn: function (aRunningTestContext){
@@ -107,7 +100,6 @@ messageSends: []}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_deny_",
 smalltalk.method({
 selector: "deny:",
 fn: function (aBoolean){
@@ -119,7 +111,6 @@ messageSends: ["assert:", "not"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_errorIfNotAsync_",
 smalltalk.method({
 selector: "errorIfNotAsync:",
 fn: function (aString){
@@ -135,7 +126,6 @@ messageSends: ["ifFalse:", "error:", ",", "isAsync"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_finished",
 smalltalk.method({
 selector: "finished",
 fn: function (){
@@ -148,7 +138,6 @@ messageSends: ["errorIfNotAsync:"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_isAsync",
 smalltalk.method({
 selector: "isAsync",
 fn: function (){
@@ -162,7 +151,6 @@ messageSends: ["notNil"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_performTest",
 smalltalk.method({
 selector: "performTest",
 fn: function (){
@@ -175,7 +163,6 @@ messageSends: ["perform:", "selector"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_runCase",
 smalltalk.method({
 selector: "runCase",
 fn: function (){
@@ -188,7 +175,6 @@ messageSends: ["start", "testCase:"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 fn: function (){
@@ -202,7 +188,6 @@ messageSends: []}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_setTestSelector_",
 smalltalk.method({
 selector: "setTestSelector:",
 fn: function (aSelector){
@@ -214,7 +199,6 @@ messageSends: []}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 fn: function (){
@@ -225,7 +209,6 @@ messageSends: []}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_should_",
 smalltalk.method({
 selector: "should:",
 fn: function (aBlock){
@@ -237,7 +220,6 @@ messageSends: ["assert:", "value"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_should_raise_",
 smalltalk.method({
 selector: "should:raise:",
 fn: function (aBlock,anExceptionClass){
@@ -256,7 +238,6 @@ messageSends: ["assert:", "on:do:", "value"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_shouldnt_raise_",
 smalltalk.method({
 selector: "shouldnt:raise:",
 fn: function (aBlock,anExceptionClass){
@@ -275,7 +256,6 @@ messageSends: ["assert:", "on:do:", "value"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_signalFailure_",
 smalltalk.method({
 selector: "signalFailure:",
 fn: function (aString){
@@ -291,7 +271,6 @@ messageSends: ["messageText:", "new", "signal"]}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_tearDown",
 smalltalk.method({
 selector: "tearDown",
 fn: function (){
@@ -302,7 +281,6 @@ messageSends: []}),
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_timeout_",
 smalltalk.method({
 selector: "timeout:",
 fn: function (aNumber){
@@ -326,7 +304,6 @@ smalltalk.TestCase);
 
 
 smalltalk.addMethod(
-"_allTestSelectors",
 smalltalk.method({
 selector: "allTestSelectors",
 fn: function (){
@@ -346,7 +323,6 @@ messageSends: ["testSelectors", "ifTrue:", "addAll:", "allTestSelectors", "super
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_buildSuite",
 smalltalk.method({
 selector: "buildSuite",
 fn: function (){
@@ -363,7 +339,6 @@ messageSends: ["collect:", "selector:", "allTestSelectors"]}),
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_isAbstract",
 smalltalk.method({
 selector: "isAbstract",
 fn: function (){
@@ -377,7 +352,6 @@ messageSends: ["=", "name"]}),
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_lookupHierarchyRoot",
 smalltalk.method({
 selector: "lookupHierarchyRoot",
 fn: function (){
@@ -392,7 +366,6 @@ messageSends: []}),
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 fn: function (aSelector){
@@ -409,7 +382,6 @@ messageSends: ["setTestSelector:", "new", "yourself"]}),
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_shouldInheritSelectors",
 smalltalk.method({
 selector: "shouldInheritSelectors",
 fn: function (){
@@ -423,7 +395,6 @@ messageSends: ["~=", "lookupHierarchyRoot"]}),
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_testSelectors",
 smalltalk.method({
 selector: "testSelectors",
 fn: function (){
@@ -442,7 +413,6 @@ smalltalk.TestCase.klass);
 
 smalltalk.addClass('TestContext', smalltalk.Object, ['testCase'], 'SUnit');
 smalltalk.addMethod(
-"_execute_",
 smalltalk.method({
 selector: "execute:",
 fn: function (aBlock){
@@ -478,7 +448,6 @@ messageSends: ["context:", "ensure:", "ifTrue:", "finished", "and:", "isAsync",
 smalltalk.TestContext);
 
 smalltalk.addMethod(
-"_start",
 smalltalk.method({
 selector: "start",
 fn: function (){
@@ -494,7 +463,6 @@ messageSends: ["execute:", "setUp", "performTest"]}),
 smalltalk.TestContext);
 
 smalltalk.addMethod(
-"_testCase_",
 smalltalk.method({
 selector: "testCase:",
 fn: function (aTestCase){
@@ -507,7 +475,6 @@ smalltalk.TestContext);
 
 
 smalltalk.addMethod(
-"_testCase_",
 smalltalk.method({
 selector: "testCase:",
 fn: function (aTestCase){
@@ -526,7 +493,6 @@ smalltalk.TestContext.klass);
 
 smalltalk.addClass('ReportingTestContext', smalltalk.TestContext, ['finished', 'result'], 'SUnit');
 smalltalk.addMethod(
-"_execute_",
 smalltalk.method({
 selector: "execute:",
 fn: function (aBlock){
@@ -552,7 +518,6 @@ messageSends: ["ensure:", "ifFalse:", "increaseRuns", "value", "isAsync", "withE
 smalltalk.ReportingTestContext);
 
 smalltalk.addMethod(
-"_finished_",
 smalltalk.method({
 selector: "finished:",
 fn: function (aBlock){
@@ -564,7 +529,6 @@ messageSends: []}),
 smalltalk.ReportingTestContext);
 
 smalltalk.addMethod(
-"_result_",
 smalltalk.method({
 selector: "result:",
 fn: function (aTestResult){
@@ -576,7 +540,6 @@ messageSends: []}),
 smalltalk.ReportingTestContext);
 
 smalltalk.addMethod(
-"_withErrorReporting_",
 smalltalk.method({
 selector: "withErrorReporting:",
 fn: function (aBlock){
@@ -600,7 +563,6 @@ smalltalk.ReportingTestContext);
 
 
 smalltalk.addMethod(
-"_testCase_result_finished_",
 smalltalk.method({
 selector: "testCase:result:finished:",
 fn: function (aTestCase,aTestResult,aBlock){
@@ -623,7 +585,6 @@ smalltalk.addClass('TestFailure', smalltalk.Error, [], 'SUnit');
 
 smalltalk.addClass('TestResult', smalltalk.Object, ['timestamp', 'runs', 'errors', 'failures', 'total'], 'SUnit');
 smalltalk.addMethod(
-"_addError_",
 smalltalk.method({
 selector: "addError:",
 fn: function (anError){
@@ -635,7 +596,6 @@ messageSends: ["add:", "errors"]}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_addFailure_",
 smalltalk.method({
 selector: "addFailure:",
 fn: function (aFailure){
@@ -647,7 +607,6 @@ messageSends: ["add:", "failures"]}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_errors",
 smalltalk.method({
 selector: "errors",
 fn: function (){
@@ -661,7 +620,6 @@ messageSends: []}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_failures",
 smalltalk.method({
 selector: "failures",
 fn: function (){
@@ -675,7 +633,6 @@ messageSends: []}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_increaseRuns",
 smalltalk.method({
 selector: "increaseRuns",
 fn: function (){
@@ -687,7 +644,6 @@ messageSends: ["+"]}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -706,7 +662,6 @@ messageSends: ["initialize", "now", "new"]}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_nextRunDo_",
 smalltalk.method({
 selector: "nextRunDo:",
 fn: function (aBlock){
@@ -723,7 +678,6 @@ messageSends: ["ifFalse:", "value:", "+", "runs", "==", "total"]}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_runCase_",
 smalltalk.method({
 selector: "runCase:",
 fn: function (aTestCase){
@@ -750,7 +704,6 @@ messageSends: ["on:do:", "addError:", "addFailure:", "increaseRuns", "runCase"]}
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_runs",
 smalltalk.method({
 selector: "runs",
 fn: function (){
@@ -764,7 +717,6 @@ messageSends: []}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_status",
 smalltalk.method({
 selector: "status",
 fn: function (){
@@ -788,7 +740,6 @@ messageSends: ["ifTrue:ifFalse:", "isEmpty", "failures", "errors"]}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_timestamp",
 smalltalk.method({
 selector: "timestamp",
 fn: function (){
@@ -802,7 +753,6 @@ messageSends: []}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_total",
 smalltalk.method({
 selector: "total",
 fn: function (){
@@ -816,7 +766,6 @@ messageSends: []}),
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_total_",
 smalltalk.method({
 selector: "total:",
 fn: function (aNumber){
@@ -831,7 +780,6 @@ smalltalk.TestResult);
 
 smalltalk.addClass('TestSuiteRunner', smalltalk.Object, ['suite', 'result', 'announcer', 'runNextTest'], 'SUnit');
 smalltalk.addMethod(
-"_announcer",
 smalltalk.method({
 selector: "announcer",
 fn: function (){
@@ -845,7 +793,6 @@ messageSends: []}),
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_contextOf_",
 smalltalk.method({
 selector: "contextOf:",
 fn: function (anInteger){
@@ -863,7 +810,6 @@ messageSends: ["testCase:result:finished:", "at:", "resume"]}),
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 fn: function (){
@@ -890,7 +836,6 @@ messageSends: ["initialize", "new", "runs", "ifTrue:", "start", "contextOf:", "+
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_result",
 smalltalk.method({
 selector: "result",
 fn: function (){
@@ -904,7 +849,6 @@ messageSends: []}),
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_resume",
 smalltalk.method({
 selector: "resume",
 fn: function (){
@@ -918,7 +862,6 @@ messageSends: ["fork", "announce:", "result:", "new"]}),
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_run",
 smalltalk.method({
 selector: "run",
 fn: function (){
@@ -931,7 +874,6 @@ messageSends: ["total:", "size", "resume"]}),
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_suite_",
 smalltalk.method({
 selector: "suite:",
 fn: function (aCollection){
@@ -944,7 +886,6 @@ smalltalk.TestSuiteRunner);
 
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 fn: function (){
@@ -956,7 +897,6 @@ messageSends: ["shouldNotImplement"]}),
 smalltalk.TestSuiteRunner.klass);
 
 smalltalk.addMethod(
-"_on_",
 smalltalk.method({
 selector: "on:",
 fn: function (aCollection){

js/SUnit.js

@@ -1,7 +1,6 @@
 smalltalk.addPackage('SUnit');
 smalltalk.addClass('ResultAnnouncement', smalltalk.Object, ['result'], 'SUnit');
 smalltalk.addMethod(
-"_result",
 smalltalk.method({
 selector: "result",
 category: 'accessing',
@@ -20,7 +19,6 @@ referencedClasses: []
 smalltalk.ResultAnnouncement);
 
 smalltalk.addMethod(
-"_result_",
 smalltalk.method({
 selector: "result:",
 category: 'accessing',
@@ -41,7 +39,6 @@ smalltalk.ResultAnnouncement);
 smalltalk.addClass('TestCase', smalltalk.Object, ['testSelector', 'asyncTimeout', 'context'], 'SUnit');
 smalltalk.TestCase.comment="A TestCase is an implementation of the command pattern to run a test.\x0a\x0a`TestCase` instances are created with the class method `#selector:`,\x0apassing the symbol that names the method to be executed when the test case runs.\x0a\x0aWhen you discover a new fixture, subclass `TestCase` and create a `#test...` method for the first test.\x0aAs that method develops and more `#test...` methods are added, you will find yourself refactoring temps\x0ainto instance variables for the objects in the fixture and overriding `#setUp` to initialize these variables.\x0aAs required, override `#tearDown` to nil references, release objects and deallocate."
 smalltalk.addMethod(
-"_assert_",
 smalltalk.method({
 selector: "assert:",
 category: 'testing',
@@ -58,7 +55,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_assert_description_",
 smalltalk.method({
 selector: "assert:description:",
 category: 'testing',
@@ -79,7 +75,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_assert_equals_",
 smalltalk.method({
 selector: "assert:equals:",
 category: 'testing',
@@ -98,7 +93,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_async_",
 smalltalk.method({
 selector: "async:",
 category: 'async',
@@ -126,7 +120,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_context_",
 smalltalk.method({
 selector: "context:",
 category: 'accessing',
@@ -143,7 +136,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_deny_",
 smalltalk.method({
 selector: "deny:",
 category: 'testing',
@@ -160,7 +152,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_errorIfNotAsync_",
 smalltalk.method({
 selector: "errorIfNotAsync:",
 category: 'error handling',
@@ -181,7 +172,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_finished",
 smalltalk.method({
 selector: "finished",
 category: 'async',
@@ -199,7 +189,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_isAsync",
 smalltalk.method({
 selector: "isAsync",
 category: 'testing',
@@ -218,7 +207,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_performTest",
 smalltalk.method({
 selector: "performTest",
 category: 'running',
@@ -236,7 +224,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_runCase",
 smalltalk.method({
 selector: "runCase",
 category: 'running',
@@ -254,7 +241,6 @@ referencedClasses: ["TestContext"]
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_selector",
 smalltalk.method({
 selector: "selector",
 category: 'accessing',
@@ -273,7 +259,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_setTestSelector_",
 smalltalk.method({
 selector: "setTestSelector:",
 category: 'accessing',
@@ -290,7 +275,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_setUp",
 smalltalk.method({
 selector: "setUp",
 category: 'running',
@@ -306,7 +290,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_should_",
 smalltalk.method({
 selector: "should:",
 category: 'testing',
@@ -323,7 +306,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_should_raise_",
 smalltalk.method({
 selector: "should:raise:",
 category: 'testing',
@@ -347,7 +329,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_shouldnt_raise_",
 smalltalk.method({
 selector: "shouldnt:raise:",
 category: 'testing',
@@ -371,7 +352,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_signalFailure_",
 smalltalk.method({
 selector: "signalFailure:",
 category: 'private',
@@ -392,7 +372,6 @@ referencedClasses: ["TestFailure"]
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_tearDown",
 smalltalk.method({
 selector: "tearDown",
 category: 'running',
@@ -408,7 +387,6 @@ referencedClasses: []
 smalltalk.TestCase);
 
 smalltalk.addMethod(
-"_timeout_",
 smalltalk.method({
 selector: "timeout:",
 category: 'async',
@@ -437,7 +415,6 @@ smalltalk.TestCase);
 
 
 smalltalk.addMethod(
-"_allTestSelectors",
 smalltalk.method({
 selector: "allTestSelectors",
 category: 'accessing',
@@ -462,7 +439,6 @@ referencedClasses: []
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_buildSuite",
 smalltalk.method({
 selector: "buildSuite",
 category: 'accessing',
@@ -484,7 +460,6 @@ referencedClasses: []
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_isAbstract",
 smalltalk.method({
 selector: "isAbstract",
 category: 'testing',
@@ -503,7 +478,6 @@ referencedClasses: []
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_lookupHierarchyRoot",
 smalltalk.method({
 selector: "lookupHierarchyRoot",
 category: 'accessing',
@@ -523,7 +497,6 @@ referencedClasses: ["TestCase"]
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_selector_",
 smalltalk.method({
 selector: "selector:",
 category: 'accessing',
@@ -545,7 +518,6 @@ referencedClasses: []
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_shouldInheritSelectors",
 smalltalk.method({
 selector: "shouldInheritSelectors",
 category: 'testing',
@@ -564,7 +536,6 @@ referencedClasses: []
 smalltalk.TestCase.klass);
 
 smalltalk.addMethod(
-"_testSelectors",
 smalltalk.method({
 selector: "testSelectors",
 category: 'accessing',
@@ -589,7 +560,6 @@ smalltalk.TestCase.klass);
 smalltalk.addClass('TestContext', smalltalk.Object, ['testCase'], 'SUnit');
 smalltalk.TestContext.comment="TestContext governs running a particular test case.\x0a\x0aIt's main added value is `#execute:` method which runs a block\x0aas a part of test case (restores context, nilling it afterwards,\x0acleaning/calling tearDown as appropriate for sync/async scenario)."
 smalltalk.addMethod(
-"_execute_",
 smalltalk.method({
 selector: "execute:",
 category: 'running',
@@ -630,7 +600,6 @@ referencedClasses: []
 smalltalk.TestContext);
 
 smalltalk.addMethod(
-"_start",
 smalltalk.method({
 selector: "start",
 category: 'running',
@@ -651,7 +620,6 @@ referencedClasses: []
 smalltalk.TestContext);
 
 smalltalk.addMethod(
-"_testCase_",
 smalltalk.method({
 selector: "testCase:",
 category: 'accessing',
@@ -669,7 +637,6 @@ smalltalk.TestContext);
 
 
 smalltalk.addMethod(
-"_testCase_",
 smalltalk.method({
 selector: "testCase:",
 category: 'instance creation',
@@ -694,7 +661,6 @@ smalltalk.TestContext.klass);
 smalltalk.addClass('ReportingTestContext', smalltalk.TestContext, ['finished', 'result'], 'SUnit');
 smalltalk.ReportingTestContext.comment="ReportingTestContext adds `TestResult` reporting\x0ato `TestContext`.\x0a\x0aErrors are caught and save into a `TestResult`,\x0aWhen test case is finished (which can be later for async tests),\x0aa callback block is executed; this is used by a `TestSuiteRunner`."
 smalltalk.addMethod(
-"_execute_",
 smalltalk.method({
 selector: "execute:",
 category: 'running',
@@ -725,7 +691,6 @@ referencedClasses: []
 smalltalk.ReportingTestContext);
 
 smalltalk.addMethod(
-"_finished_",
 smalltalk.method({
 selector: "finished:",
 category: 'accessing',
@@ -742,7 +707,6 @@ referencedClasses: []
 smalltalk.ReportingTestContext);
 
 smalltalk.addMethod(
-"_result_",
 smalltalk.method({
 selector: "result:",
 category: 'accessing',
@@ -759,7 +723,6 @@ referencedClasses: []
 smalltalk.ReportingTestContext);
 
 smalltalk.addMethod(
-"_withErrorReporting_",
 smalltalk.method({
 selector: "withErrorReporting:",
 category: 'private',
@@ -788,7 +751,6 @@ smalltalk.ReportingTestContext);
 
 
 smalltalk.addMethod(
-"_testCase_result_finished_",
 smalltalk.method({
 selector: "testCase:result:finished:",
 category: 'instance creation',
@@ -818,7 +780,6 @@ smalltalk.TestFailure.comment="The test framework distinguishes between failures
 smalltalk.addClass('TestResult', smalltalk.Object, ['timestamp', 'runs', 'errors', 'failures', 'total'], 'SUnit');
 smalltalk.TestResult.comment="A TestResult implements the collecting parameter pattern for running a bunch of tests.\x0a\x0aA TestResult holds tests that have run, sorted into the result categories of passed, failures and errors.\x0a\x0aTestResult is an interesting object to subclass or substitute. `#runCase:` is the external protocol you need to reproduce"
 smalltalk.addMethod(
-"_addError_",
 smalltalk.method({
 selector: "addError:",
 category: 'accessing',
@@ -835,7 +796,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_addFailure_",
 smalltalk.method({
 selector: "addFailure:",
 category: 'accessing',
@@ -852,7 +812,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_errors",
 smalltalk.method({
 selector: "errors",
 category: 'accessing',
@@ -871,7 +830,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_failures",
 smalltalk.method({
 selector: "failures",
 category: 'accessing',
@@ -890,7 +848,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_increaseRuns",
 smalltalk.method({
 selector: "increaseRuns",
 category: 'accessing',
@@ -907,7 +864,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -931,7 +887,6 @@ referencedClasses: ["Date", "Array"]
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_nextRunDo_",
 smalltalk.method({
 selector: "nextRunDo:",
 category: 'running',
@@ -953,7 +908,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_runCase_",
 smalltalk.method({
 selector: "runCase:",
 category: 'running',
@@ -985,7 +939,6 @@ referencedClasses: ["Error", "TestFailure"]
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_runs",
 smalltalk.method({
 selector: "runs",
 category: 'accessing',
@@ -1004,7 +957,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_status",
 smalltalk.method({
 selector: "status",
 category: 'accessing',
@@ -1033,7 +985,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_timestamp",
 smalltalk.method({
 selector: "timestamp",
 category: 'accessing',
@@ -1052,7 +1003,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_total",
 smalltalk.method({
 selector: "total",
 category: 'accessing',
@@ -1071,7 +1021,6 @@ referencedClasses: []
 smalltalk.TestResult);
 
 smalltalk.addMethod(
-"_total_",
 smalltalk.method({
 selector: "total:",
 category: 'accessing',
@@ -1091,7 +1040,6 @@ smalltalk.TestResult);
 
 smalltalk.addClass('TestSuiteRunner', smalltalk.Object, ['suite', 'result', 'announcer', 'runNextTest'], 'SUnit');
 smalltalk.addMethod(
-"_announcer",
 smalltalk.method({
 selector: "announcer",
 category: 'accessing',
@@ -1110,7 +1058,6 @@ referencedClasses: []
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_contextOf_",
 smalltalk.method({
 selector: "contextOf:",
 category: 'private',
@@ -1133,7 +1080,6 @@ referencedClasses: ["ReportingTestContext"]
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_initialize",
 smalltalk.method({
 selector: "initialize",
 category: 'initialization',
@@ -1165,7 +1111,6 @@ referencedClasses: ["Announcer", "TestResult"]
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_result",
 smalltalk.method({
 selector: "result",
 category: 'accessing',
@@ -1184,7 +1129,6 @@ referencedClasses: []
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_resume",
 smalltalk.method({
 selector: "resume",
 category: 'actions',
@@ -1203,7 +1147,6 @@ referencedClasses: ["ResultAnnouncement"]
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_run",
 smalltalk.method({
 selector: "run",
 category: 'actions',
@@ -1221,7 +1164,6 @@ referencedClasses: []
 smalltalk.TestSuiteRunner);
 
 smalltalk.addMethod(
-"_suite_",
 smalltalk.method({
 selector: "suite:",
 category: 'accessing',
@@ -1239,7 +1181,6 @@ smalltalk.TestSuiteRunner);
 
 
 smalltalk.addMethod(
-"_new",
 smalltalk.method({
 selector: "new",
 category: 'instance creation',
@@ -1256,7 +1197,6 @@ referencedClasses: []
 smalltalk.TestSuiteRunner.klass);
 
 smalltalk.addMethod(
-"_on_",
 smalltalk.method({
 selector: "on:",
 category: 'instance creation',