resin 0.0.1 → 0.0.2

data/amber/js/Kernel-Methods.deploy.js

@@ -1,136 +1,163 @@
 smalltalk.addPackage('Kernel-Methods', {});
-smalltalk.addClass('CompiledMethod', smalltalk.Object, [], 'Kernel-Methods');
+smalltalk.addClass('Message', smalltalk.Object, ['selector', 'arguments'], 'Kernel-Methods');
 smalltalk.addMethod(
-unescape('_source'),
+unescape('_selector'),
 smalltalk.method({
-selector: unescape('source'),
-fn: function (){
-var self=this;
-return (($receiver = smalltalk.send(self, "_basicAt_", ["source"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver;
-return self;}
+selector: unescape('selector'),
+fn: function () {
+    var self = this;
+    return self['@selector'];
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.Message);
 
 smalltalk.addMethod(
-unescape('_source_'),
+unescape('_selector_'),
 smalltalk.method({
-selector: unescape('source%3A'),
-fn: function (aString){
-var self=this;
-smalltalk.send(self, "_basicAt_put_", ["source", aString]);
-return self;}
+selector: unescape('selector%3A'),
+fn: function (aString) {
+    var self = this;
+    self['@selector'] = aString;
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.Message);
 
 smalltalk.addMethod(
-unescape('_category'),
+unescape('_arguments_'),
 smalltalk.method({
-selector: unescape('category'),
-fn: function (){
-var self=this;
-return (($receiver = smalltalk.send(self, "_basicAt_", ["category"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver;
-return self;}
+selector: unescape('arguments%3A'),
+fn: function (anArray) {
+    var self = this;
+    self['@arguments'] = anArray;
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.Message);
 
 smalltalk.addMethod(
-unescape('_category_'),
+unescape('_arguments'),
 smalltalk.method({
-selector: unescape('category%3A'),
-fn: function (aString){
-var self=this;
-smalltalk.send(self, "_basicAt_put_", ["category", aString]);
-return self;}
+selector: unescape('arguments'),
+fn: function () {
+    var self = this;
+    return self['@arguments'];
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.Message);
 
 smalltalk.addMethod(
-unescape('_selector'),
+unescape('_printString'),
 smalltalk.method({
-selector: unescape('selector'),
-fn: function (){
-var self=this;
-return smalltalk.send(self, "_basicAt_", ["selector"]);
-return self;}
+selector: unescape('printString'),
+fn: function () {
+    var self = this;
+    return smalltalk.send(smalltalk.String || String, "_streamContents_", [function (aStream) {return function ($rec) {smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self, "_printString", [], smalltalk.Object)]);smalltalk.send($rec, "_nextPutAll_", [unescape("%28")]);smalltalk.send($rec, "_nextPutAll_", [self['@selector']]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%29")]);}(aStream);}]);
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.Message);
 
 smalltalk.addMethod(
-unescape('_selector_'),
+unescape('_sendTo_'),
 smalltalk.method({
-selector: unescape('selector%3A'),
-fn: function (aString){
-var self=this;
-smalltalk.send(self, "_basicAt_put_", ["selector", aString]);
-return self;}
+selector: unescape('sendTo%3A'),
+fn: function (anObject) {
+    var self = this;
+    smalltalk.send(smalltalk.send(smalltalk.Smalltalk || Smalltalk, "_current", []), "_send_to_arguments_", [smalltalk.send(self, "_selector", []), anObject, smalltalk.send(self, "_arguments", [])]);
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.Message);
+
 
 smalltalk.addMethod(
-unescape('_fn'),
+unescape('_selector_arguments_'),
 smalltalk.method({
-selector: unescape('fn'),
-fn: function (){
-var self=this;
-return smalltalk.send(self, "_basicAt_", ["fn"]);
-return self;}
+selector: unescape('selector%3Aarguments%3A'),
+fn: function (aString, anArray) {
+    var self = this;
+    return function ($rec) {smalltalk.send($rec, "_selector_", [aString]);smalltalk.send($rec, "_arguments_", [anArray]);return smalltalk.send($rec, "_yourself", []);}(smalltalk.send(self, "_new", []));
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.Message.klass);
+
 
+smalltalk.addClass('MethodContext', smalltalk.Object, [], 'Kernel-Methods');
 smalltalk.addMethod(
-unescape('_fn_'),
+unescape('_receiver'),
 smalltalk.method({
-selector: unescape('fn%3A'),
-fn: function (aBlock){
-var self=this;
-smalltalk.send(self, "_basicAt_put_", ["fn", aBlock]);
-return self;}
+selector: unescape('receiver'),
+fn: function () {
+    var self = this;
+    return self.receiver;
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.MethodContext);
 
 smalltalk.addMethod(
-unescape('_messageSends'),
+unescape('_selector'),
 smalltalk.method({
-selector: unescape('messageSends'),
-fn: function (){
-var self=this;
-return smalltalk.send(self, "_basicAt_", ["messageSends"]);
-return self;}
+selector: unescape('selector'),
+fn: function () {
+    var self = this;
+    return smalltalk.convertSelector(self.selector);
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.MethodContext);
 
 smalltalk.addMethod(
-unescape('_methodClass'),
+unescape('_home'),
 smalltalk.method({
-selector: unescape('methodClass'),
-fn: function (){
-var self=this;
-return smalltalk.send(self, "_basicAt_", ["methodClass"]);
-return self;}
+selector: unescape('home'),
+fn: function () {
+    var self = this;
+    return self.homeContext;
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.MethodContext);
 
 smalltalk.addMethod(
-unescape('_referencedClasses'),
+unescape('_temps'),
 smalltalk.method({
-selector: unescape('referencedClasses'),
-fn: function (){
-var self=this;
-return smalltalk.send(self, "_basicAt_", ["referencedClasses"]);
-return self;}
+selector: unescape('temps'),
+fn: function () {
+    var self = this;
+    return self.temps;
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.MethodContext);
 
 smalltalk.addMethod(
-unescape('_arguments'),
+unescape('_printString'),
 smalltalk.method({
-selector: unescape('arguments'),
-fn: function (){
-var self=this;
-return self.args || [];
-return self;}
+selector: unescape('printString'),
+fn: function () {
+    var self = this;
+    return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_printString", [], smalltalk.Object), "__comma", [unescape("%28")]), "__comma", [smalltalk.send(self, "_asString", [])]), "__comma", [unescape("%29")]);
+    return self;
+}
 }),
-smalltalk.CompiledMethod);
+smalltalk.MethodContext);
+
+smalltalk.addMethod(
+unescape('_asString'),
+smalltalk.method({
+selector: unescape('asString'),
+fn: function () {
+    var self = this;
+    return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_class", []), "_printString", []), "__comma", [unescape("%20%3E%3E%20")]), "__comma", [smalltalk.send(self, "_selector", [])]);
+    return self;
+}
+}),
+smalltalk.MethodContext);
 
 
 
@@ -139,10 +166,11 @@ smalltalk.addMethod(
 unescape('_compiledSource'),
 smalltalk.method({
 selector: unescape('compiledSource'),
-fn: function (){
-var self=this;
-return self.toString();
-return self;}
+fn: function () {
+    var self = this;
+    return self.toString();
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -150,10 +178,13 @@ smalltalk.addMethod(
 unescape('_whileTrue_'),
 smalltalk.method({
 selector: unescape('whileTrue%3A'),
-fn: function (aBlock){
-var self=this;
-while(self()) {aBlock()};
-return self;}
+fn: function (aBlock) {
+    var self = this;
+    while (self()) {
+        aBlock();
+    }
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -161,10 +192,13 @@ smalltalk.addMethod(
 unescape('_whileFalse_'),
 smalltalk.method({
 selector: unescape('whileFalse%3A'),
-fn: function (aBlock){
-var self=this;
-while(!self()) {aBlock()};
-return self;}
+fn: function (aBlock) {
+    var self = this;
+    while (!self()) {
+        aBlock();
+    }
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -172,10 +206,11 @@ smalltalk.addMethod(
 unescape('_value'),
 smalltalk.method({
 selector: unescape('value'),
-fn: function (){
-var self=this;
-return self();;
-return self;}
+fn: function () {
+    var self = this;
+    return self();
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -183,10 +218,11 @@ smalltalk.addMethod(
 unescape('_value_'),
 smalltalk.method({
 selector: unescape('value%3A'),
-fn: function (anArg){
-var self=this;
-return self(anArg);;
-return self;}
+fn: function (anArg) {
+    var self = this;
+    return self(anArg);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -194,10 +230,11 @@ smalltalk.addMethod(
 unescape('_value_value_'),
 smalltalk.method({
 selector: unescape('value%3Avalue%3A'),
-fn: function (firstArg, secondArg){
-var self=this;
-return self(firstArg, secondArg);;
-return self;}
+fn: function (firstArg, secondArg) {
+    var self = this;
+    return self(firstArg, secondArg);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -205,10 +242,11 @@ smalltalk.addMethod(
 unescape('_value_value_value_'),
 smalltalk.method({
 selector: unescape('value%3Avalue%3Avalue%3A'),
-fn: function (firstArg, secondArg, thirdArg){
-var self=this;
-return self(firstArg, secondArg, thirdArg);;
-return self;}
+fn: function (firstArg, secondArg, thirdArg) {
+    var self = this;
+    return self(firstArg, secondArg, thirdArg);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -216,10 +254,11 @@ smalltalk.addMethod(
 unescape('_valueWithPossibleArguments_'),
 smalltalk.method({
 selector: unescape('valueWithPossibleArguments%3A'),
-fn: function (aCollection){
-var self=this;
-return self.apply(null, aCollection);;
-return self;}
+fn: function (aCollection) {
+    var self = this;
+    return self.apply(null, aCollection);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -227,10 +266,11 @@ smalltalk.addMethod(
 unescape('_on_do_'),
 smalltalk.method({
 selector: unescape('on%3Ado%3A'),
-fn: function (anErrorClass, aBlock){
-var self=this;
-return smalltalk.send(self, "_try_catch_", [self, (function(error){return ((($receiver = smalltalk.send(error, "_isKindOf_", [anErrorClass])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(aBlock, "_value_", [error]);})() : (function(){return smalltalk.send(error, "_signal", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(aBlock, "_value_", [error]);}), (function(){return smalltalk.send(error, "_signal", []);})]));})]);
-return self;}
+fn: function (anErrorClass, aBlock) {
+    var self = this;
+    return smalltalk.send(self, "_try_catch_", [self, function (error) {return ($receiver = smalltalk.send(error, "_isKindOf_", [anErrorClass])).klass === smalltalk.Boolean ? $receiver ? function () {return smalltalk.send(aBlock, "_value_", [error]);}() : function () {return smalltalk.send(error, "_signal", []);}() : smalltalk.send($receiver, "_ifTrue_ifFalse_", [function () {return smalltalk.send(aBlock, "_value_", [error]);}, function () {return smalltalk.send(error, "_signal", []);}]);}]);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -238,10 +278,11 @@ smalltalk.addMethod(
 unescape('_valueWithTimeout_'),
 smalltalk.method({
 selector: unescape('valueWithTimeout%3A'),
-fn: function (aNumber){
-var self=this;
-return setTimeout(self, aNumber);
-return self;}
+fn: function (aNumber) {
+    var self = this;
+    return setTimeout(self, aNumber);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -249,10 +290,11 @@ smalltalk.addMethod(
 unescape('_valueWithInterval_'),
 smalltalk.method({
 selector: unescape('valueWithInterval%3A'),
-fn: function (aNumber){
-var self=this;
-return setInterval(self, aNumber);
-return self;}
+fn: function (aNumber) {
+    var self = this;
+    return setInterval(self, aNumber);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -260,10 +302,11 @@ smalltalk.addMethod(
 unescape('_whileFalse'),
 smalltalk.method({
 selector: unescape('whileFalse'),
-fn: function (){
-var self=this;
-smalltalk.send(self, "_whileFalse_", [(function(){return nil;})]);
-return self;}
+fn: function () {
+    var self = this;
+    smalltalk.send(self, "_whileFalse_", [function () {return nil;}]);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -271,10 +314,11 @@ smalltalk.addMethod(
 unescape('_whileTrue'),
 smalltalk.method({
 selector: unescape('whileTrue'),
-fn: function (){
-var self=this;
-smalltalk.send(self, "_whileTrue_", [(function(){return nil;})]);
-return self;}
+fn: function () {
+    var self = this;
+    smalltalk.send(self, "_whileTrue_", [function () {return nil;}]);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -282,10 +326,11 @@ smalltalk.addMethod(
 unescape('_new'),
 smalltalk.method({
 selector: unescape('new'),
-fn: function (){
-var self=this;
-return new self();
-return self;}
+fn: function () {
+    var self = this;
+    return new self;
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -293,10 +338,11 @@ smalltalk.addMethod(
 unescape('_applyTo_arguments_'),
 smalltalk.method({
 selector: unescape('applyTo%3Aarguments%3A'),
-fn: function (anObject, aCollection){
-var self=this;
-return self.apply(anObject, aCollection);
-return self;}
+fn: function (anObject, aCollection) {
+    var self = this;
+    return self.apply(anObject, aCollection);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -304,10 +350,11 @@ smalltalk.addMethod(
 unescape('_timeToRun'),
 smalltalk.method({
 selector: unescape('timeToRun'),
-fn: function (){
-var self=this;
-return smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [self]);
-return self;}
+fn: function () {
+    var self = this;
+    return smalltalk.send(smalltalk.Date || Date, "_millisecondsToRun_", [self]);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -315,10 +362,11 @@ smalltalk.addMethod(
 unescape('_numArgs'),
 smalltalk.method({
 selector: unescape('numArgs'),
-fn: function (){
-var self=this;
-return self.length;
-return self;}
+fn: function () {
+    var self = this;
+    return self.length;
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -326,12 +374,13 @@ smalltalk.addMethod(
 unescape('_ensure_'),
 smalltalk.method({
 selector: unescape('ensure%3A'),
-fn: function (aBlock){
-var self=this;
-var success=nil;
-(success=false);
-return smalltalk.send((function(){smalltalk.send(self, "_value", []);(success=true);return smalltalk.send(aBlock, "_value", []);}), "_on_do_", [(smalltalk.Error || Error), (function(ex){((($receiver = success).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(aBlock, "_value", []);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(aBlock, "_value", []);})]));return smalltalk.send(ex, "_signal", []);})]);
-return self;}
+fn: function (aBlock) {
+    var self = this;
+    var success = nil;
+    success = false;
+    return smalltalk.send(function () {smalltalk.send(self, "_value", []);success = true;return smalltalk.send(aBlock, "_value", []);}, "_on_do_", [smalltalk.Error || Error, function (ex) {($receiver = success).klass === smalltalk.Boolean ? !$receiver ? function () {return smalltalk.send(aBlock, "_value", []);}() : nil : smalltalk.send($receiver, "_ifFalse_", [function () {return smalltalk.send(aBlock, "_value", []);}]);return smalltalk.send(ex, "_signal", []);}]);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -339,10 +388,11 @@ smalltalk.addMethod(
 unescape('_newValue_'),
 smalltalk.method({
 selector: unescape('newValue%3A'),
-fn: function (anObject){
-var self=this;
-return new self(anObject);
-return self;}
+fn: function (anObject) {
+    var self = this;
+    return new self(anObject);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -350,10 +400,11 @@ smalltalk.addMethod(
 unescape('_newValue_value_'),
 smalltalk.method({
 selector: unescape('newValue%3Avalue%3A'),
-fn: function (anObject, anObject2){
-var self=this;
-return new self(anObject, anObject2);
-return self;}
+fn: function (anObject, anObject2) {
+    var self = this;
+    return new self(anObject, anObject2);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
@@ -361,150 +412,162 @@ smalltalk.addMethod(
 unescape('_newValue_value_value_'),
 smalltalk.method({
 selector: unescape('newValue%3Avalue%3Avalue%3A'),
-fn: function (anObject, anObject2, anObject3){
-var self=this;
-return new self(anObject, anObject2);
-return self;}
+fn: function (anObject, anObject2, anObject3) {
+    var self = this;
+    return new self(anObject, anObject2);
+    return self;
+}
 }),
 smalltalk.BlockClosure);
 
 
 
-smalltalk.addClass('MethodContext', smalltalk.Object, [], 'Kernel-Methods');
+smalltalk.addClass('CompiledMethod', smalltalk.Object, [], 'Kernel-Methods');
 smalltalk.addMethod(
-unescape('_receiver'),
+unescape('_source'),
 smalltalk.method({
-selector: unescape('receiver'),
-fn: function (){
-var self=this;
-return self.receiver;
-return self;}
+selector: unescape('source'),
+fn: function () {
+    var self = this;
+    return ($receiver = smalltalk.send(self, "_basicAt_", ["source"])) == nil ||
+        $receiver == undefined ? function () {return "";}() : $receiver;
+    return self;
+}
 }),
-smalltalk.MethodContext);
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_selector'),
+unescape('_source_'),
 smalltalk.method({
-selector: unescape('selector'),
-fn: function (){
-var self=this;
-return smalltalk.convertSelector(self.selector);
-return self;}
+selector: unescape('source%3A'),
+fn: function (aString) {
+    var self = this;
+    smalltalk.send(self, "_basicAt_put_", ["source", aString]);
+    return self;
+}
 }),
-smalltalk.MethodContext);
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_home'),
+unescape('_category'),
 smalltalk.method({
-selector: unescape('home'),
-fn: function (){
-var self=this;
-return self.homeContext;
-return self;}
+selector: unescape('category'),
+fn: function () {
+    var self = this;
+    return ($receiver = smalltalk.send(self, "_basicAt_", ["category"])) == nil ||
+        $receiver == undefined ? function () {return "";}() : $receiver;
+    return self;
+}
 }),
-smalltalk.MethodContext);
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_temps'),
+unescape('_category_'),
 smalltalk.method({
-selector: unescape('temps'),
-fn: function (){
-var self=this;
-return self.temps;
-return self;}
+selector: unescape('category%3A'),
+fn: function (aString) {
+    var self = this;
+    smalltalk.send(self, "_basicAt_put_", ["category", aString]);
+    return self;
+}
 }),
-smalltalk.MethodContext);
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_printString'),
+unescape('_selector'),
 smalltalk.method({
-selector: unescape('printString'),
-fn: function (){
-var self=this;
-return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_printString", [], smalltalk.Object), "__comma", [unescape("%28")]), "__comma", [smalltalk.send(self, "_asString", [])]), "__comma", [unescape("%29")]);
-return self;}
+selector: unescape('selector'),
+fn: function () {
+    var self = this;
+    return smalltalk.send(self, "_basicAt_", ["selector"]);
+    return self;
+}
 }),
-smalltalk.MethodContext);
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_asString'),
+unescape('_selector_'),
 smalltalk.method({
-selector: unescape('asString'),
-fn: function (){
-var self=this;
-return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_class", []), "_printString", []), "__comma", [unescape("%20%3E%3E%20")]), "__comma", [smalltalk.send(self, "_selector", [])]);
-return self;}
+selector: unescape('selector%3A'),
+fn: function (aString) {
+    var self = this;
+    smalltalk.send(self, "_basicAt_put_", ["selector", aString]);
+    return self;
+}
 }),
-smalltalk.MethodContext);
-
-
+smalltalk.CompiledMethod);
 
-smalltalk.addClass('Message', smalltalk.Object, ['selector', 'arguments'], 'Kernel-Methods');
 smalltalk.addMethod(
-unescape('_selector'),
+unescape('_fn'),
 smalltalk.method({
-selector: unescape('selector'),
-fn: function (){
-var self=this;
-return self['@selector'];
-return self;}
+selector: unescape('fn'),
+fn: function () {
+    var self = this;
+    return smalltalk.send(self, "_basicAt_", ["fn"]);
+    return self;
+}
 }),
-smalltalk.Message);
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_selector_'),
+unescape('_fn_'),
 smalltalk.method({
-selector: unescape('selector%3A'),
-fn: function (aString){
-var self=this;
-(self['@selector']=aString);
-return self;}
+selector: unescape('fn%3A'),
+fn: function (aBlock) {
+    var self = this;
+    smalltalk.send(self, "_basicAt_put_", ["fn", aBlock]);
+    return self;
+}
 }),
-smalltalk.Message);
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_arguments_'),
+unescape('_messageSends'),
 smalltalk.method({
-selector: unescape('arguments%3A'),
-fn: function (anArray){
-var self=this;
-(self['@arguments']=anArray);
-return self;}
+selector: unescape('messageSends'),
+fn: function () {
+    var self = this;
+    return smalltalk.send(self, "_basicAt_", ["messageSends"]);
+    return self;
+}
 }),
-smalltalk.Message);
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_arguments'),
+unescape('_methodClass'),
 smalltalk.method({
-selector: unescape('arguments'),
-fn: function (){
-var self=this;
-return self['@arguments'];
-return self;}
+selector: unescape('methodClass'),
+fn: function () {
+    var self = this;
+    return smalltalk.send(self, "_basicAt_", ["methodClass"]);
+    return self;
+}
 }),
-smalltalk.Message);
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_printString'),
+unescape('_referencedClasses'),
 smalltalk.method({
-selector: unescape('printString'),
-fn: function (){
-var self=this;
-return smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(aStream){return (function($rec){smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self, "_printString", [], smalltalk.Object)]);smalltalk.send($rec, "_nextPutAll_", [unescape("%28")]);smalltalk.send($rec, "_nextPutAll_", [self['@selector']]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%29")]);})(aStream);})]);
-return self;}
+selector: unescape('referencedClasses'),
+fn: function () {
+    var self = this;
+    return smalltalk.send(self, "_basicAt_", ["referencedClasses"]);
+    return self;
+}
 }),
-smalltalk.Message);
-
+smalltalk.CompiledMethod);
 
 smalltalk.addMethod(
-unescape('_selector_arguments_'),
+unescape('_arguments'),
 smalltalk.method({
-selector: unescape('selector%3Aarguments%3A'),
-fn: function (aString, anArray){
-var self=this;
-return (function($rec){smalltalk.send($rec, "_selector_", [aString]);smalltalk.send($rec, "_arguments_", [anArray]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", []));
-return self;}
+selector: unescape('arguments'),
+fn: function () {
+    var self = this;
+    return self.args || [];
+    return self;
+}
 }),
-smalltalk.Message.klass);
+smalltalk.CompiledMethod);
+