From e74b3868fd5b61941034cd36c0fb1f4a8339e254 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?G=C3=B6ran=20Krampe?= Date: Mon, 16 Jan 2012 11:02:13 +0100 Subject: [PATCH] Fixes for REPL, included in top Makefile, fixed clean and make run etc. --- Makefile | 3 +- bin/amber | 0 repl/Makefile | 4 +- repl/REPL.js | 8 +- repl/amber.js | 9972 +++++++++++++++++++++++++++---------------------- 5 files changed, 5456 insertions(+), 4531 deletions(-) mode change 100644 => 100755 bin/amber diff --git a/Makefile b/Makefile index 8c9719fc2..cd99e8526 100644 --- a/Makefile +++ b/Makefile @@ -1,10 +1,11 @@ # Makefile for sub directories AMBER = st SERVER = server +REPL = repl EXAMPLES = examples # REST is all except AMBER -REST = $(SERVER) $(EXAMPLES) +REST = $(SERVER) $(EXAMPLES) $(REPL) # And these are all DIRS = $(AMBER) $(REST) diff --git a/bin/amber b/bin/amber old mode 100644 new mode 100755 diff --git a/repl/Makefile b/repl/Makefile index 8ed6dddcb..9ad928a96 100644 --- a/repl/Makefile +++ b/repl/Makefile @@ -2,7 +2,7 @@ repl.js: REPL.st ../bin/amberc -m Repl -l Compiler,parser REPL.st amber run: repl.js - ./amber + ../bin/amber clean: - rm -f amber.js + rm -f amber.js REPL.js diff --git a/repl/REPL.js b/repl/REPL.js index ed4420a78..d40ade7ed 100644 --- a/repl/REPL.js +++ b/repl/REPL.js @@ -23,7 +23,7 @@ selector: unescape('createInterface'), category: 'actions', fn: function (){ var self=this; -self['@interface']=smalltalk.send(self['@readline'], "_createInterface_stdout_", [smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdin", []), smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", [])]); +(self['@interface']=smalltalk.send(self['@readline'], "_createInterface_stdout_", [smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdin", []), smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", [])])); smalltalk.send(self['@interface'], "_on_do_", ["line", (function(buffer){return smalltalk.send(self, "_eval_", [buffer]);})]); smalltalk.send(self['@interface'], "_on_do_", ["close", (function(){return smalltalk.send(self, "_close", []);})]); smalltalk.send(self, "_setPrompt", []); @@ -76,7 +76,7 @@ category: 'actions', fn: function (buffer){ var self=this; var result=nil; -((($receiver = smalltalk.send(buffer, "_isEmpty", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_try_catch_", [(function(){result=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_loadExpression_", [buffer]);return smalltalk.send((smalltalk.Transcript || Transcript), "_show_", [result]);}), (function(e){return ((($receiver = smalltalk.send(e, "_isSmalltalkError", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);})() : (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);}), (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})]));})]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_try_catch_", [(function(){result=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_loadExpression_", [buffer]);return smalltalk.send((smalltalk.Transcript || Transcript), "_show_", [result]);}), (function(e){return ((($receiver = smalltalk.send(e, "_isSmalltalkError", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);})() : (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);}), (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})]));})]);})])); +((($receiver = smalltalk.send(buffer, "_isEmpty", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_try_catch_", [(function(){(result=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_loadExpression_", [buffer]));return smalltalk.send((smalltalk.Transcript || Transcript), "_show_", [result]);}), (function(e){return ((($receiver = smalltalk.send(e, "_isSmalltalkError", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);})() : (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);}), (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})]));})]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_try_catch_", [(function(){(result=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_loadExpression_", [buffer]));return smalltalk.send((smalltalk.Transcript || Transcript), "_show_", [result]);}), (function(e){return ((($receiver = smalltalk.send(e, "_isSmalltalkError", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);})() : (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);}), (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})]));})]);})])); smalltalk.send(self['@interface'], "_prompt", []); return self;}, args: ["buffer"], @@ -94,8 +94,8 @@ category: 'initialization', fn: function (){ var self=this; smalltalk.send(self, "_initialize", [], smalltalk.Object); -self['@readline']=smalltalk.send((typeof require == 'undefined' ? nil : require), "_value_", ["readline"]); -self['@util']=smalltalk.send((typeof require == 'undefined' ? nil : require), "_value_", ["util"]); +(self['@readline']=smalltalk.send((typeof require == 'undefined' ? nil : require), "_value_", ["readline"])); +(self['@util']=smalltalk.send((typeof require == 'undefined' ? nil : require), "_value_", ["util"])); return self;}, args: [], source: unescape('initialize%0A%09super%20initialize.%0A%09readline%20%3A%3D%20require%20value%3A%20%27readline%27.%0A%09util%20%3A%3D%20require%20value%3A%20%27util%27'), diff --git a/repl/amber.js b/repl/amber.js index 5e42b7c69..a37320be2 100644 --- a/repl/amber.js +++ b/repl/amber.js @@ -58,6 +58,10 @@ function SmalltalkMetaclass(){ function SmalltalkMethod(){}; function SmalltalkNil(){}; +function SmalltalkSymbol(string){ + this.value = string; +}; + function Smalltalk(){ var st = this; @@ -77,6 +81,25 @@ function Smalltalk(){ 'public', 'return', 'static', 'switch', 'this', 'throw', 'try', 'typeof', 'var', 'void', 'while', 'with', 'yield']; + /* The symbol table ensures symbol unicity */ + + symbolTable = {}; + st.symbolFor = function(string) { + if(symbolTable[string] === undefined) { + symbolTable[string] = new SmalltalkSymbol(string); + }; + + return symbolTable[string]; + }; + + /* Unique ID number generator */ + + oid = 0; + st.nextId = function() { + oid += 1; + return oid; + }; + /* We hold all Packages in a separate Object */ st.packages = {}; @@ -554,14 +577,17 @@ smalltalk.mapClassName("UndefinedObject", "Kernel", SmalltalkNil, smalltalk.Obje smalltalk.mapClassName("Collection", "Kernel", null, smalltalk.Object); smalltalk.mapClassName("SequenceableCollection", "Kernel", null, smalltalk.Collection); -smalltalk.mapClassName("String", "Kernel", String, smalltalk.SequenceableCollection); +smalltalk.mapClassName("CharacterArray", "Kernel", null, smalltalk.SequenceableCollection); +smalltalk.mapClassName("String", "Kernel", String, smalltalk.CharacterArray); +smalltalk.mapClassName("Symbol", "Kernel", SmalltalkSymbol, smalltalk.CharacterArray); smalltalk.mapClassName("Array", "Kernel", Array, smalltalk.SequenceableCollection); smalltalk.mapClassName("RegularExpression", "Kernel", RegExp, smalltalk.String); smalltalk.mapClassName("Error", "Kernel", Error, smalltalk.Object); smalltalk.mapClassName("MethodContext", "Kernel", SmalltalkMethodContext, smalltalk.Object); -smalltalk.addPackage('Kernel', {}); -smalltalk.addClass('Object', smalltalk.nil, [], 'Kernel'); +smalltalk.addPackage('Kernel-Objects', {}); +smalltalk.addClass('Object', smalltalk.nil, [], 'Kernel-Objects'); +smalltalk.Object.comment=unescape('*Object%20is%20the%20root%20of%20the%20Smalltalk%20class%20system*.%20All%20classes%20in%20the%20system%20are%20subclasses%20of%20Object.%0A%0AObject%20provides%20default%20behavior%20common%20to%20all%20normal%20objects%2C%20such%20as%3A%20%0A%0A-%20access%0A-%20copying%0A-%20comparison%0A-%20error%20handling%0A-%20message%20sending%0A-%20reflection%0A%0AAlso%20utility%20messages%20that%20all%20objects%20should%20respond%20to%20are%20defined%20here.%0A%0AObject%20has%20no%20instance%20variable.%0A%0A%23%23Access%0A%0AInstance%20variables%20can%20be%20accessed%20with%20%60%23instVarAt%3A%60%20and%20%60%23instVarAt%3Aput%3A%60.%20%60Object%20%3E%3E%20instanceVariableNames%60%20answers%20a%20collection%20of%20all%20instance%20variable%20names.%0AAccessing%20JavaScript%20properties%20of%20an%20object%20is%20done%20through%20%60%23basicAt%3A%60%2C%20%60%23basicAt%3Aput%3A%60%20and%20%60basicDelete%3A%60.%0A%0A%23%23Copying%0A%0ACopying%20an%20object%20is%20handled%20by%20%60%23copy%60%20and%20%60%23deepCopy%60.%20The%20first%20one%20performs%20a%20shallow%20copy%20of%20the%20receiver%2C%20while%20the%20second%20one%20performs%20a%20deep%20copy.%0AThe%20hook%20method%20%60%23postCopy%60%20can%20be%20overriden%20in%20subclasses%20to%20copy%20fields%20as%20necessary%20to%20complete%20the%20full%20copy.%20It%20will%20be%20sent%20by%20the%20copy%20of%20the%20receiver.%0A%0A%23%23Comparison%0A%0AObjects%20understand%20equality%20%20%60%23%3D%60%20and%20identity%20%60%23%3D%3D%60%20comparison.%0A%0A%23%23Error%20handling%0A%0A-%20%60%23halt%60%20is%20the%20typical%20message%20to%20use%20for%20inserting%20breakpoints%20during%20debugging.%0A-%20%60%23error%3A%60%20throws%20a%20generic%20error%20exception%0A-%20%60%23doesNotUnderstand%3A%60%20handles%20the%20fact%20that%20there%20was%20an%20attempt%20to%20send%20the%20given%20message%20to%20the%20receiver%20but%20the%20receiver%20does%20not%20understand%20this%20message.%0A%20%20Overriding%20this%20message%20can%20be%20useful%20to%20implement%20proxies%20for%20example.') smalltalk.addMethod( unescape('__eq'), smalltalk.method({ @@ -823,13 +849,15 @@ unescape('_instVarAt_'), smalltalk.method({ selector: unescape('instVarAt%3A'), category: 'accessing', -fn: function (aString){ +fn: function (aSymbol){ var self=this; -return self['@'+aString]; +var varname=nil; +(varname=smalltalk.send(aSymbol, "_asString", [])); +return self['@'+varname]; return self;}, -args: ["aString"], -source: unescape('instVarAt%3A%20aString%0A%09%3Creturn%20self%5B%27@%27+aString%5D%3E'), -messageSends: [], +args: ["aSymbol"], +source: unescape('instVarAt%3A%20aSymbol%0A%09%7C%20varname%20%7C%0A%09varname%20%3A%3D%20aSymbol%20asString.%0A%09%3Creturn%20self%5B%27@%27+varname%5D%3E'), +messageSends: ["asString"], referencedClasses: [] }), smalltalk.Object); @@ -839,13 +867,15 @@ unescape('_instVarAt_put_'), smalltalk.method({ selector: unescape('instVarAt%3Aput%3A'), category: 'accessing', -fn: function (aString, anObject){ +fn: function (aSymbol, anObject){ var self=this; -self['@' + aString] = anObject; +var varname=nil; +(varname=smalltalk.send(aSymbol, "_asString", [])); +self['@' + varname] = anObject; return self;}, -args: ["aString", "anObject"], -source: unescape('instVarAt%3A%20aString%20put%3A%20anObject%0A%09%3Cself%5B%27@%27%20+%20aString%5D%20%3D%20anObject%3E'), -messageSends: [], +args: ["aSymbol", "anObject"], +source: unescape('instVarAt%3A%20aSymbol%20put%3A%20anObject%0A%09%7C%20varname%20%7C%0A%09varname%20%3A%3D%20aSymbol%20asString.%0A%09%3Cself%5B%27@%27%20+%20varname%5D%20%3D%20anObject%3E'), +messageSends: ["asString"], referencedClasses: [] }), smalltalk.Object); @@ -937,10 +967,11 @@ selector: unescape('try%3Acatch%3A'), category: 'error handling', fn: function (aBlock, anotherBlock){ var self=this; -try{aBlock()} catch(e) {anotherBlock(e)}; +try{result = aBlock()} catch(e) {result = anotherBlock(e)}; + return result;; return self;}, args: ["aBlock", "anotherBlock"], -source: unescape('try%3A%20aBlock%20catch%3A%20anotherBlock%0A%09%3Ctry%7BaBlock%28%29%7D%20catch%28e%29%20%7BanotherBlock%28e%29%7D%3E'), +source: unescape('try%3A%20aBlock%20catch%3A%20anotherBlock%0A%09%3Ctry%7Bresult%20%3D%20aBlock%28%29%7D%20catch%28e%29%20%7Bresult%20%3D%20anotherBlock%28e%29%7D%3B%0A%09return%20result%3B%3E'), messageSends: [], referencedClasses: [] }), @@ -1225,10 +1256,10 @@ selector: unescape('basicDelete%3A'), category: 'accessing', fn: function (aString){ var self=this; -delete self[aString]; +delete self[aString]; return aString; return self;}, args: ["aString"], -source: unescape('basicDelete%3A%20aString%0A%20%20%20%20%3Cdelete%20self%5BaString%5D%3E'), +source: unescape('basicDelete%3A%20aString%0A%20%20%20%20%3Cdelete%20self%5BaString%5D%3B%20return%20aString%3E'), messageSends: [], referencedClasses: [] }), @@ -1257,31 +1288,12 @@ selector: unescape('asJSON'), category: 'converting', fn: function (){ var self=this; -return JSON.stringify(self._asJSONObject()); -return self;}, -args: [], -source: unescape('asJSON%0A%09%3Creturn%20JSON.stringify%28self._asJSONObject%28%29%29%3E'), -messageSends: [], -referencedClasses: [] -}), -smalltalk.Object); - -smalltalk.addMethod( -unescape('_asJSONObject'), -smalltalk.method({ -selector: unescape('asJSONObject'), -category: 'converting', -fn: function (){ -var self=this; -var object=nil; -object=smalltalk.send((smalltalk.Object || Object), "_new", []); -smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "_instanceVariableNames", []), "_do_", [(function(each){return smalltalk.send(object, "_basicAt_put_", [each, smalltalk.send(smalltalk.send(self, "_instVarAt_", [each]), "_asJSONObject", [])]);})]); -return object; +return smalltalk.send((smalltalk.JSON || JSON), "_parse_", [smalltalk.send(self, "_asJSONString", [])]); return self;}, args: [], -source: unescape('asJSONObject%0A%09%7C%20object%20%7C%0A%09object%20%3A%3D%20Object%20new.%0A%09self%20class%20instanceVariableNames%20do%3A%20%5B%3Aeach%20%7C%0A%09%09object%20basicAt%3A%20each%20put%3A%20%28self%20instVarAt%3A%20each%29%20asJSONObject%5D.%0A%09%5Eobject'), -messageSends: ["new", "do:", "instanceVariableNames", "class", "basicAt:put:", "asJSONObject", "instVarAt:"], -referencedClasses: ["Object"] +source: unescape('asJSON%0A%09%5EJSON%20parse%3A%20self%20asJSONString'), +messageSends: ["parse:", "asJSONString"], +referencedClasses: ["JSON"] }), smalltalk.Object); @@ -1309,7 +1321,7 @@ category: 'printing', fn: function (aString, aBlock){ var self=this; var result=nil; -smalltalk.send((typeof console == 'undefined' ? nil : console), "_log_", [smalltalk.send(smalltalk.send(aString, "__comma", [" time: "]), "__comma", [smalltalk.send(smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return result=smalltalk.send(aBlock, "_value", []);})]), "_printString", [])])]); +smalltalk.send((typeof console == 'undefined' ? nil : console), "_log_", [smalltalk.send(smalltalk.send(aString, "__comma", [" time: "]), "__comma", [smalltalk.send(smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return (result=smalltalk.send(aBlock, "_value", []));})]), "_printString", [])])]); return result; return self;}, args: ["aString", "aBlock"], @@ -1326,11 +1338,11 @@ selector: unescape('%3D%3D'), category: 'comparing', fn: function (anObject){ var self=this; -return self === anObject; +return smalltalk.send(smalltalk.send(self, "_identityHash", []), "__eq", [smalltalk.send(anObject, "_identityHash", [])]); return self;}, args: ["anObject"], -source: unescape('%3D%3D%20anObject%0A%09%3Creturn%20self%20%3D%3D%3D%20anObject%3E'), -messageSends: [], +source: unescape('%3D%3D%20anObject%0A%09%5Eself%20identityHash%20%3D%20anObject%20identityHash'), +messageSends: [unescape("%3D"), "identityHash"], referencedClasses: [] }), smalltalk.Object); @@ -1358,10 +1370,10 @@ selector: unescape('deprecatedAPI'), category: 'error handling', fn: function (){ var self=this; -smalltalk.send((typeof console == 'undefined' ? nil : console), "_warn_", [smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.getThisContext()), "_home", []), "_asString", []), "__comma", [unescape("%20is%20deprecated%21")])]); +smalltalk.send((typeof console == 'undefined' ? nil : console), "_warn_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.getThisContext()), "_home", []), "_asString", []), "__comma", [unescape("%20is%20deprecated%21%20%28in%20")]), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send((smalltalk.getThisContext()), "_home", []), "_home", []), "_asString", [])]), "__comma", [unescape("%29")])]); return self;}, args: [], -source: unescape('deprecatedAPI%0A%09%22Just%20a%20simple%20way%20to%20deprecate%20methods.%0A%09%23deprecatedAPI%20is%20in%20the%20%27error%20handling%27%20protocol%20even%20if%20it%20doesn%27t%20throw%20an%20error%2C%0A%09but%20it%20could%20in%20the%20future.%22%0A%09console%20warn%3A%20thisContext%20home%20asString%2C%20%27%20is%20deprecated%21%27'), +source: unescape('deprecatedAPI%0A%09%22Just%20a%20simple%20way%20to%20deprecate%20methods.%0A%09%23deprecatedAPI%20is%20in%20the%20%27error%20handling%27%20protocol%20even%20if%20it%20doesn%27t%20throw%20an%20error%2C%0A%09but%20it%20could%20in%20the%20future.%22%0A%09console%20warn%3A%20thisContext%20home%20asString%2C%20%27%20is%20deprecated%21%20%28in%20%27%2C%20thisContext%20home%20home%20asString%2C%20%27%29%27'), messageSends: ["warn:", unescape("%2C"), "asString", "home"], referencedClasses: [] }), @@ -1399,6 +1411,54 @@ referencedClasses: [] }), smalltalk.Object); +smalltalk.addMethod( +unescape('_asJSONString'), +smalltalk.method({ +selector: unescape('asJSONString'), +category: 'converting', +fn: function (){ +var self=this; +return smalltalk.send((smalltalk.JSON || JSON), "_stringify_", [self]); +return self;}, +args: [], +source: unescape('asJSONString%0A%09%5EJSON%20stringify%3A%20self'), +messageSends: ["stringify:"], +referencedClasses: ["JSON"] +}), +smalltalk.Object); + +smalltalk.addMethod( +unescape('_identityHash'), +smalltalk.method({ +selector: unescape('identityHash'), +category: 'accessing', +fn: function (){ +var self=this; +return self.identityHash || (self.identityHash = smalltalk.nextId());; +return self;}, +args: [], +source: unescape('identityHash%0A%09%3Creturn%20self.identityHash%20%7C%7C%20%28self.identityHash%20%3D%20smalltalk.nextId%28%29%29%3B%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Object); + +smalltalk.addMethod( +unescape('_isSymbol'), +smalltalk.method({ +selector: unescape('isSymbol'), +category: 'testing', +fn: function (){ +var self=this; +return false; +return self;}, +args: [], +source: unescape('isSymbol%0A%09%5Efalse'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Object); + smalltalk.addMethod( unescape('_initialize'), @@ -1417,7 +1477,8 @@ referencedClasses: [] smalltalk.Object.klass); -smalltalk.addClass('Smalltalk', smalltalk.Object, [], 'Kernel'); +smalltalk.addClass('Smalltalk', smalltalk.Object, [], 'Kernel-Objects'); +smalltalk.Smalltalk.comment=unescape('Smalltalk%20has%20only%20one%20instance%2C%20accessed%20with%20%60Smalltalk%20current%60.%20%0AIt%20represents%20the%20global%20JavaScript%20variable%20%60smalltalk%60%20declared%20in%20%60js/boot.js%60.%0A%0AThe%20%60smalltalk%60%20object%20holds%20all%20class%20and%20packages%20defined%20in%20the%20system.%0A%0A%23%23%20Classes%0A%0AClasses%20can%20be%20accessed%20using%20the%20following%20methods%3A%0A%0A-%20%60%23classes%60%20answers%20the%20full%20list%20of%20Smalltalk%20classes%20in%20the%20system%0A-%20%60%23at%3A%60%20answers%20a%20specific%20class%20of%20%60nil%60%0A%0A%23%23%20Packages%0A%0APackages%20can%20be%20accessed%20using%20the%20following%20methods%3A%0A%0A-%20%60%23packages%60%20answers%20the%20full%20list%20of%20packages%0A-%20%60%23packageAt%3A%60%20answers%20a%20specific%20class%20of%20%60nil%60%0A%0A__note%3A__%20classes%20and%20packages%20are%20accessed%20using%20strings%2C%20not%20symbols%0A%0A%23%23%20Parsing%0A%0AThe%20%60%23parse%3A%60%20method%20is%20used%20to%20parse%20Smalltalk%20source%20code.%20%0AIt%20requires%20the%20%60Compiler%60%20package%20and%20the%20%60js/parser.js%60%20parser%20file%20in%20order%20to%20work') smalltalk.addMethod( unescape('_classes'), smalltalk.method({ @@ -1493,7 +1554,7 @@ category: 'accessing', fn: function (aString){ var self=this; var result=nil; -smalltalk.send(self, "_try_catch_", [(function(){return result=smalltalk.send(self, "_basicParse_", [aString]);}), (function(ex){return smalltalk.send(smalltalk.send(self, "_parseError_parsing_", [ex, aString]), "_signal", []);})]); +smalltalk.send(self, "_try_catch_", [(function(){return (result=smalltalk.send(self, "_basicParse_", [aString]));}), (function(ex){return smalltalk.send(smalltalk.send(self, "_parseError_parsing_", [ex, aString]), "_signal", []);})]); return result; return self;}, args: ["aString"], @@ -1519,11 +1580,11 @@ var code=nil; row = anException.line; col = anException.column; message = anException.message;; -lines=smalltalk.send(aString, "_lines", []); -badLine=smalltalk.send(lines, "_at_", [row]); -badLine=smalltalk.send(smalltalk.send(smalltalk.send(badLine, "_copyFrom_to_", [(1), ((($receiver = col).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)]))]), "__comma", [unescape("%20%3D%3D%3D%3E")]), "__comma", [smalltalk.send(badLine, "_copyFrom_to_", [col, smalltalk.send(badLine, "_size", [])])]); +(lines=smalltalk.send(aString, "_lines", [])); +(badLine=smalltalk.send(lines, "_at_", [row])); +(badLine=smalltalk.send(smalltalk.send(smalltalk.send(badLine, "_copyFrom_to_", [(1), ((($receiver = col).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)]))]), "__comma", [unescape("%20%3D%3D%3D%3E")]), "__comma", [smalltalk.send(badLine, "_copyFrom_to_", [col, smalltalk.send(badLine, "_size", [])])])); smalltalk.send(lines, "_at_put_", [row, badLine]); -code=smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(s){return smalltalk.send(lines, "_withIndexDo_", [(function(l, i){return smalltalk.send(s, "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(i, "_asString", []), "__comma", [": "]), "__comma", [l]), "__comma", [smalltalk.send((smalltalk.String || String), "_lf", [])])]);})]);})]); +(code=smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(s){return smalltalk.send(lines, "_withIndexDo_", [(function(l, i){return smalltalk.send(s, "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(i, "_asString", []), "__comma", [": "]), "__comma", [l]), "__comma", [smalltalk.send((smalltalk.String || String), "_lf", [])])]);})]);})])); return smalltalk.send(smalltalk.send((smalltalk.Error || Error), "_new", []), "_messageText_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send("Parse error on line ", "__comma", [row]), "__comma", [" column "]), "__comma", [col]), "__comma", [" : "]), "__comma", [message]), "__comma", [unescape("%20Below%20is%20code%20with%20line%20numbers%20and%20%3D%3D%3D%3E%20marker%20inserted%3A")]), "__comma", [smalltalk.send((smalltalk.String || String), "_lf", [])]), "__comma", [code])]); return self;}, args: ["anException", "aString"], @@ -1621,7 +1682,7 @@ category: 'packages', fn: function (packageName){ var self=this; var pkg=nil; -pkg=smalltalk.send(self, "_packageAt_ifAbsent_", [packageName, (function(){return smalltalk.send(self, "_error_", [smalltalk.send("Missing package: ", "__comma", [packageName])]);})]); +(pkg=smalltalk.send(self, "_packageAt_ifAbsent_", [packageName, (function(){return smalltalk.send(self, "_error_", [smalltalk.send("Missing package: ", "__comma", [packageName])]);})])); smalltalk.send(smalltalk.send(pkg, "_classes", []), "_do_", [(function(each){return smalltalk.send(self, "_removeClass_", [each]);})]); smalltalk.send(self, "_deletePackage_", [packageName]); return self;}, @@ -1640,7 +1701,7 @@ category: 'packages', fn: function (packageName, newName){ var self=this; var pkg=nil; -pkg=smalltalk.send(self, "_packageAt_ifAbsent_", [packageName, (function(){return smalltalk.send(self, "_error_", [smalltalk.send("Missing package: ", "__comma", [packageName])]);})]); +(pkg=smalltalk.send(self, "_packageAt_ifAbsent_", [packageName, (function(){return smalltalk.send(self, "_error_", [smalltalk.send("Missing package: ", "__comma", [packageName])]);})])); (($receiver = smalltalk.send(self, "_packageAt_", [newName])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_error_", [smalltalk.send("Already exists a package called: ", "__comma", [newName])]);})() : nil; smalltalk.packages[newName] = smalltalk.packages[packageName]; smalltalk.send(pkg, "_name_", [newName]); @@ -1723,8 +1784,8 @@ referencedClasses: [] smalltalk.Smalltalk.klass); -smalltalk.addClass('Package', smalltalk.Object, [], 'Kernel'); -smalltalk.Package.comment=unescape('A%20Package%20is%20similar%20to%20a%20%22class%20category%22%20typically%20found%20in%20other%20Smalltalks%20like%20Pharo%20or%20Squeak.%20Amber%20does%20not%20have%20class%20categories%20anymore%2C%20it%20had%20in%20the%20beginning%20but%20now%20each%20class%20in%20the%20system%20knows%20which%20package%20it%20belongs%20to.%0A%0AA%20Package%20has%20a%20name%2C%20an%20Array%20of%20%22requires%22%2C%20a%20comment%20and%20a%20Dictionary%20with%20other%20optional%20key%20value%20attributes.%20A%20Package%20can%20also%20be%20queried%20for%20its%20classes%2C%20but%20it%20will%20then%20resort%20to%20a%20reverse%20scan%20of%20all%20classes%20to%20find%20them.%0APackages%20are%20manipulated%20through%20%22Smalltalk%20current%22%2C%20like%20for%20example%20finding%20one%20based%20on%20a%20name%3A%0A%0A%09Smalltalk%20current%20packageAt%3A%20%27Kernel%27%0A%0A...but%20you%20can%20also%20use%3A%0A%0A%09Package%20named%3A%20%27Kernel%27%0A%0AA%20Package%20differs%20slightly%20from%20a%20Monticello%20package%20which%20can%20span%20multiple%20class%20categories%20using%20a%20naming%20convention%20based%20on%20hyphenation.%20But%20just%20as%20in%20Monticello%20a%20Package%20supports%20%22class%20extensions%22%20so%20a%20Package%0Acan%20define%20behaviors%20in%20foreign%20classes%20using%20a%20naming%20convention%20for%20method%20categories%20where%20the%20category%20starts%20with%20an%20asterisk%20and%20then%20the%20name%20of%20the%20owning%20package%20follows.%20This%20can%20easily%20be%20seen%20in%20for%20example%20class%0AString%20where%20the%20method%20category%20%22*IDE%22%20defines%20%23inspectOn%3A%20which%20thus%20is%20a%20method%20belonging%20to%20the%20IDE%20package.') +smalltalk.addClass('Package', smalltalk.Object, ['commitPathJs', 'commitPathSt'], 'Kernel-Objects'); +smalltalk.Package.comment=unescape('A%20Package%20is%20similar%20to%20a%20%22class%20category%22%20typically%20found%20in%20other%20Smalltalks%20like%20Pharo%20or%20Squeak.%20Amber%20does%20not%20have%20class%20categories%20anymore%2C%20it%20had%20in%20the%20beginning%20but%20now%20each%20class%20in%20the%20system%20knows%20which%20package%20it%20belongs%20to.%0A%0AA%20Package%20has%20a%20name%2C%20an%20Array%20of%20%22requires%22%2C%20a%20comment%20and%20a%20Dictionary%20with%20other%20optional%20key%20value%20attributes.%20A%20Package%20can%20also%20be%20queried%20for%20its%20classes%2C%20but%20it%20will%20then%20resort%20to%20a%20reverse%20scan%20of%20all%20classes%20to%20find%20them.%0APackages%20are%20manipulated%20through%20%22Smalltalk%20current%22%2C%20like%20for%20example%20finding%20one%20based%20on%20a%20name%3A%0A%0A%09Smalltalk%20current%20packageAt%3A%20%27Kernel%27%0A%0A...but%20you%20can%20also%20use%3A%0A%0A%09Package%20named%3A%20%27Kernel%27%0A%0AA%20Package%20differs%20slightly%20from%20a%20Monticello%20package%20which%20can%20span%20multiple%20class%20categories%20using%20a%20naming%20convention%20based%20on%20hyphenation.%20But%20just%20as%20in%20Monticello%20a%20Package%20supports%20%22class%20extensions%22%20so%20a%20Package%0Acan%20define%20behaviors%20in%20foreign%20classes%20using%20a%20naming%20convention%20for%20method%20categories%20where%20the%20category%20starts%20with%20an%20asterisk%20and%20then%20the%20name%20of%20the%20owning%20package%20follows.%20This%20can%20easily%20be%20seen%20in%20for%20example%20class%0AString%20where%20the%20method%20category%20%22*IDE%22%20defines%20%23inspectOn%3A%20which%20thus%20is%20a%20method%20belonging%20to%20the%20IDE%20package.%0A%0AYou%20can%20fetch%20a%20package%20from%20the%20server%3A%0A%0A%09Package%20fetch%3A%20%27Additional-Examples%27') smalltalk.addMethod( unescape('_name'), smalltalk.method({ @@ -1748,10 +1809,10 @@ selector: unescape('name%3A'), category: 'accessing', fn: function (aString){ var self=this; -return self.pkgName = aString; +self.pkgName = aString; return self;}, args: ["aString"], -source: unescape('name%3A%20aString%0A%09%3Creturn%20self.pkgName%20%3D%20aString%3E'), +source: unescape('name%3A%20aString%0A%09%3Cself.pkgName%20%3D%20aString%3E'), messageSends: [], referencedClasses: [] }), @@ -1952,7 +2013,72 @@ referencedClasses: [] }), smalltalk.Package); +smalltalk.addMethod( +unescape('_commitPathJs'), +smalltalk.method({ +selector: unescape('commitPathJs'), +category: 'accessing', +fn: function (){ +var self=this; +return (($receiver = self['@commitPathJs']) == nil || $receiver == undefined) ? (function(){return smalltalk.send(smalltalk.send(self, "_class", []), "_defaultCommitPathJs", []);})() : $receiver; +return self;}, +args: [], +source: unescape('commitPathJs%0A%09%5E%20commitPathJs%20ifNil%3A%20%5Bself%20class%20defaultCommitPathJs%5D'), +messageSends: ["ifNil:", "defaultCommitPathJs", "class"], +referencedClasses: [] +}), +smalltalk.Package); + +smalltalk.addMethod( +unescape('_commitPathJs_'), +smalltalk.method({ +selector: unescape('commitPathJs%3A'), +category: 'accessing', +fn: function (aString){ +var self=this; +(self['@commitPathJs']=aString); +return self;}, +args: ["aString"], +source: unescape('commitPathJs%3A%20aString%0A%09commitPathJs%A0%3A%3D%20aString'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Package); + +smalltalk.addMethod( +unescape('_commitPathSt'), +smalltalk.method({ +selector: unescape('commitPathSt'), +category: 'accessing', +fn: function (){ +var self=this; +return (($receiver = self['@commitPathSt']) == nil || $receiver == undefined) ? (function(){return smalltalk.send(smalltalk.send(self, "_class", []), "_defaultCommitPathSt", []);})() : $receiver; +return self;}, +args: [], +source: unescape('commitPathSt%0A%09%5E%20commitPathSt%20ifNil%3A%20%5Bself%20class%20defaultCommitPathSt%5D'), +messageSends: ["ifNil:", "defaultCommitPathSt", "class"], +referencedClasses: [] +}), +smalltalk.Package); + +smalltalk.addMethod( +unescape('_commitPathSt_'), +smalltalk.method({ +selector: unescape('commitPathSt%3A'), +category: 'accessing', +fn: function (aString){ +var self=this; +(self['@commitPathSt']=aString); +return self;}, +args: ["aString"], +source: unescape('commitPathSt%3A%20aString%0A%09commitPathSt%A0%3A%3D%20aString'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Package); + +smalltalk.Package.klass.iVarNames = ['defaultCommitPathJs','defaultCommitPathSt']; smalltalk.addMethod( unescape('_named_'), smalltalk.method({ @@ -1985,2273 +2111,2985 @@ referencedClasses: ["Smalltalk"] }), smalltalk.Package.klass); - -smalltalk.addClass('Behavior', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( -unescape('_new'), +unescape('_defaultCommitPathJs'), smalltalk.method({ -selector: unescape('new'), -category: 'instance creation', +selector: unescape('defaultCommitPathJs'), +category: 'commit paths', fn: function (){ var self=this; -return smalltalk.send(smalltalk.send(self, "_basicNew", []), "_initialize", []); +return (($receiver = self['@defaultCommitPathJs']) == nil || $receiver == undefined) ? (function(){return (self['@defaultCommitPathJs']="js");})() : $receiver; return self;}, args: [], -source: unescape('new%0A%09%5Eself%20basicNew%20initialize'), -messageSends: ["initialize", "basicNew"], +source: unescape('defaultCommitPathJs%0A%09%5E%20defaultCommitPathJs%20ifNil%3A%20%5B%20defaultCommitPathJs%20%3A%3D%20%27js%27%5D'), +messageSends: ["ifNil:"], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Package.klass); smalltalk.addMethod( -unescape('_basicNew'), +unescape('_defaultCommitPathJs_'), smalltalk.method({ -selector: unescape('basicNew'), -category: 'instance creation', -fn: function (){ +selector: unescape('defaultCommitPathJs%3A'), +category: 'commit paths', +fn: function (aString){ var self=this; -return new self.fn(); +(self['@defaultCommitPathJs']=aString); return self;}, -args: [], -source: unescape('basicNew%0A%09%3Creturn%20new%20self.fn%28%29%3E'), +args: ["aString"], +source: unescape('defaultCommitPathJs%3A%20aString%0A%09defaultCommitPathJs%20%3A%3D%20aString'), messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Package.klass); smalltalk.addMethod( -unescape('_name'), +unescape('_defaultCommitPathSt'), smalltalk.method({ -selector: unescape('name'), -category: 'accessing', +selector: unescape('defaultCommitPathSt'), +category: 'commit paths', fn: function (){ var self=this; -return self.className || nil; +return (($receiver = self['@defaultCommitPathSt']) == nil || $receiver == undefined) ? (function(){return (self['@defaultCommitPathSt']="st");})() : $receiver; return self;}, args: [], -source: unescape('name%0A%09%3Creturn%20self.className%20%7C%7C%20nil%3E'), -messageSends: [], +source: unescape('defaultCommitPathSt%0A%09%5E%20defaultCommitPathSt%20ifNil%3A%20%5B%20defaultCommitPathSt%20%3A%3D%20%27st%27%5D'), +messageSends: ["ifNil:"], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Package.klass); smalltalk.addMethod( -unescape('_superclass'), +unescape('_defaultCommitPathSt_'), smalltalk.method({ -selector: unescape('superclass'), -category: 'accessing', -fn: function (){ +selector: unescape('defaultCommitPathSt%3A'), +category: 'commit paths', +fn: function (aString){ var self=this; -return self.superclass || nil; +(self['@defaultCommitPathSt']=aString); return self;}, -args: [], -source: unescape('superclass%0A%09%3Creturn%20self.superclass%20%7C%7C%20nil%3E'), +args: ["aString"], +source: unescape('defaultCommitPathSt%3A%20aString%0A%09defaultCommitPathSt%20%3A%3D%20aString'), messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Package.klass); smalltalk.addMethod( -unescape('_subclasses'), +unescape('_resetCommitPaths'), smalltalk.method({ -selector: unescape('subclasses'), -category: 'accessing', +selector: unescape('resetCommitPaths'), +category: 'commit paths', fn: function (){ var self=this; -return smalltalk.subclasses(self); +(self['@defaultCommitPathJs']=nil); +(self['@defaultCommitPathSt']=nil); return self;}, args: [], -source: unescape('subclasses%0A%09%3Creturn%20smalltalk.subclasses%28self%29%3E'), +source: unescape('resetCommitPaths%0A%20%20%20%20%20%20%20%20defaultCommitPathJs%20%3A%3D%20nil.%0A%20%20%20%20%20%20%20%20defaultCommitPathSt%20%3A%3D%20nil.'), messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Package.klass); smalltalk.addMethod( -unescape('_allSubclasses'), +unescape('_fetch_prefix_'), smalltalk.method({ -selector: unescape('allSubclasses'), -category: 'accessing', -fn: function (){ +selector: unescape('fetch%3Aprefix%3A'), +category: 'loading-storing', +fn: function (aPackageName, aPrefix){ var self=this; -var result=nil; -result=smalltalk.send(self, "_subclasses", []); -smalltalk.send(smalltalk.send(self, "_subclasses", []), "_do_", [(function(each){return smalltalk.send(result, "_addAll_", [smalltalk.send(each, "_allSubclasses", [])]);})]); -return result; +smalltalk.send((typeof jQuery == 'undefined' ? nil : jQuery), "_getScript_onSuccess_", [smalltalk.send(smalltalk.send(aPrefix, "__comma", [aPackageName]), "__comma", [".js"]), (function(){return smalltalk.send((smalltalk.Package || Package), "_init_", [aPackageName]);})]); return self;}, -args: [], -source: unescape('allSubclasses%0A%09%7C%20result%20%7C%0A%09result%20%3A%3D%20self%20subclasses.%0A%09self%20subclasses%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20result%20addAll%3A%20each%20allSubclasses%5D.%0A%09%5Eresult'), -messageSends: ["subclasses", "do:", "addAll:", "allSubclasses"], -referencedClasses: [] +args: ["aPackageName", "aPrefix"], +source: unescape('fetch%3A%20aPackageName%20prefix%3A%20aPrefix%0A%09jQuery%20getScript%3A%20%28aPrefix%20%2C%20aPackageName%20%2C%20%27.js%27%29%20onSuccess%3A%20%5B%20Package%20init%3A%20aPackageName%20%5D'), +messageSends: ["getScript:onSuccess:", unescape("%2C"), "init:"], +referencedClasses: ["Package"] }), -smalltalk.Behavior); +smalltalk.Package.klass); smalltalk.addMethod( -unescape('_withAllSubclasses'), +unescape('_fetch_'), smalltalk.method({ -selector: unescape('withAllSubclasses'), -category: 'accessing', -fn: function (){ +selector: unescape('fetch%3A'), +category: 'loading-storing', +fn: function (aPackageName){ var self=this; -return (function($rec){smalltalk.send($rec, "_addAll_", [smalltalk.send(self, "_allSubclasses", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.Array || Array), "_with_", [self])); +smalltalk.send(self, "_fetch_prefix_", [aPackageName, smalltalk.send(smalltalk.send(self, "_defaultCommitPathJs", []), "__comma", [unescape("/")])]); return self;}, -args: [], -source: unescape('withAllSubclasses%0A%09%5E%28Array%20with%3A%20self%29%20addAll%3A%20self%20allSubclasses%3B%20yourself'), -messageSends: ["addAll:", "allSubclasses", "yourself", "with:"], -referencedClasses: ["Array"] +args: ["aPackageName"], +source: unescape('fetch%3A%20aPackageName%0A%09self%20fetch%3A%20aPackageName%20prefix%3A%20self%20defaultCommitPathJs%2C%20%27/%27'), +messageSends: ["fetch:prefix:", unescape("%2C"), "defaultCommitPathJs"], +referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Package.klass); smalltalk.addMethod( -unescape('_prototype'), +unescape('_commitToLocalStorage_'), smalltalk.method({ -selector: unescape('prototype'), -category: 'accessing', -fn: function (){ +selector: unescape('commitToLocalStorage%3A'), +category: 'loading-storing', +fn: function (aPackageName){ var self=this; -return self.fn.prototype; +var key=nil; +var sourceCode=nil; +(key=smalltalk.send("smalltalk.packages.", "__comma", [aPackageName])); +(sourceCode=smalltalk.send(smalltalk.send((smalltalk.Exporter || Exporter), "_new", []), "_exportPackage_", [aPackageName])); +localStorage[key] = escape(sourceCode); return self;}, -args: [], -source: unescape('prototype%0A%09%3Creturn%20self.fn.prototype%3E'), -messageSends: [], -referencedClasses: [] +args: ["aPackageName"], +source: unescape('commitToLocalStorage%3A%20aPackageName%0A%09%7C%20key%20sourceCode%20%7C%0A%09key%20%3A%3D%20%27smalltalk.packages.%27%20%2C%20aPackageName.%0A%09sourceCode%20%3A%3D%20Exporter%20new%20exportPackage%3A%20aPackageName.%0A%09%3ClocalStorage%5Bkey%5D%20%3D%20escape%28sourceCode%29%3E'), +messageSends: [unescape("%2C"), "exportPackage:", "new"], +referencedClasses: ["Exporter"] }), -smalltalk.Behavior); +smalltalk.Package.klass); smalltalk.addMethod( -unescape('_methodDictionary'), +unescape('_init_'), smalltalk.method({ -selector: unescape('methodDictionary'), -category: 'accessing', -fn: function (){ +selector: unescape('init%3A'), +category: 'loading-storing', +fn: function (aPackageName){ var self=this; -var dict = smalltalk.Dictionary._new(); - var methods = self.fn.prototype.methods; - for(var i in methods) { - if(methods[i].selector) { - dict._at_put_(methods[i].selector, methods[i]); - } - }; - return dict; +(function($rec){smalltalk.send($rec, "_do_", [(function(each){return smalltalk.init(each);})]);return smalltalk.send($rec, "_do_", [(function(each){return smalltalk.send(each, "_initialize", []);})]);})(smalltalk.send(smalltalk.send((typeof smalltalk == 'undefined' ? nil : smalltalk), "_classes", []), "_select_", [(function(each){return each.pkg.pkgName == aPackageName;})])); return self;}, -args: [], -source: unescape('methodDictionary%0A%09%3Cvar%20dict%20%3D%20smalltalk.Dictionary._new%28%29%3B%0A%09var%20methods%20%3D%20self.fn.prototype.methods%3B%0A%09for%28var%20i%20in%20methods%29%20%7B%0A%09%09if%28methods%5Bi%5D.selector%29%20%7B%0A%09%09%09dict._at_put_%28methods%5Bi%5D.selector%2C%20methods%5Bi%5D%29%3B%0A%09%09%7D%0A%09%7D%3B%0A%09return%20dict%3E'), -messageSends: [], +args: ["aPackageName"], +source: unescape('init%3A%20aPackageName%0A%09%28smalltalk%20classes%20select%3A%20%5B%20%3Aeach%20%7C%20%3Ceach.pkg.pkgName%20%3D%3D%20aPackageName%3E%20%5D%29%0A%09%09do%3A%20%5B%20%3Aeach%20%7C%20%3Csmalltalk.init%28each%29%3E%20%5D%3B%0A%09%09do%3A%20%5B%20%3Aeach%20%7C%20each%20initialize%20%5D'), +messageSends: ["do:", "initialize", "select:", "classes"], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Package.klass); + +smalltalk.addClass('Number', smalltalk.Object, [], 'Kernel-Objects'); +smalltalk.Number.comment=unescape('Number%20holds%20the%20most%20general%20methods%20for%20dealing%20with%20numbers.%20%20%0ANumber%20is%20directly%20mapped%20to%20JavaScript%20Number.%0A%0AMost%20arithmetic%20methods%20like%20%60%23+%60%20%60%23/%60%20%60%23-%60%20%60%23max%3A%60%20are%20directly%20inlined%20into%20javascript.%20%0A%0A%23%23Enumerating%0AA%20Number%20can%20be%20used%20to%20evaluate%20a%20Block%20a%20fixed%20number%20of%20times%3A%0A%0A%095%20timesRepeat%3A%20%5BTranscript%20show%3A%20%27This%20will%20be%20printed%205%20times%27%3B%20cr%5D.%0A%09%0A%091%20to%3A%205%20do%3A%20%5B%3AaNumber%7C%20Transcript%20show%3A%20aNumber%20asString%3B%20cr%5D.%0A%09%0A%091%20to%3A%2010%20by%3A%202%20do%3A%20%5B%3AaNumber%7C%20Transcript%20show%3A%20aNumber%20asString%3B%20cr%5D.') smalltalk.addMethod( -unescape('_methodsFor_'), +unescape('__eq'), smalltalk.method({ -selector: unescape('methodsFor%3A'), -category: 'accessing', -fn: function (aString){ +selector: unescape('%3D'), +category: 'comparing', +fn: function (aNumber){ var self=this; -return (function($rec){smalltalk.send($rec, "_class_category_", [self, aString]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.ClassCategoryReader || ClassCategoryReader), "_new", [])); -return self;}, -args: ["aString"], -source: unescape('methodsFor%3A%20aString%0A%09%5EClassCategoryReader%20new%0A%09%20%20%20%20class%3A%20self%20category%3A%20aString%3B%0A%09%20%20%20%20yourself'), -messageSends: ["class:category:", "yourself", "new"], -referencedClasses: ["ClassCategoryReader"] +try{((($receiver = smalltalk.send(aNumber, "_isNumber", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})])); +return Number(self) == aNumber; +return self; +} catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}, +args: ["aNumber"], +source: unescape('%3D%20aNumber%0A%09aNumber%20isNumber%20ifFalse%3A%20%5B%5Efalse%5D.%20%0A%09%3Creturn%20Number%28self%29%20%3D%3D%20aNumber%3E'), +messageSends: ["ifFalse:", "isNumber"], +referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_addCompiledMethod_'), +unescape('__gt'), smalltalk.method({ -selector: unescape('addCompiledMethod%3A'), -category: 'accessing', -fn: function (aMethod){ +selector: unescape('%3E'), +category: 'comparing', +fn: function (aNumber){ var self=this; -smalltalk.addMethod(aMethod.selector._asSelector(), aMethod, self); +return self > aNumber; return self;}, -args: ["aMethod"], -source: unescape('addCompiledMethod%3A%20aMethod%0A%09%3Csmalltalk.addMethod%28aMethod.selector._asSelector%28%29%2C%20aMethod%2C%20self%29%3E'), +args: ["aNumber"], +source: unescape('%3E%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20%3E%3E%20aNumber%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_instanceVariableNames'), +unescape('__lt'), smalltalk.method({ -selector: unescape('instanceVariableNames'), -category: 'accessing', -fn: function (){ +selector: unescape('%3C'), +category: 'comparing', +fn: function (aNumber){ var self=this; -return self.iVarNames; +return self < aNumber; return self;}, -args: [], -source: unescape('instanceVariableNames%0A%09%3Creturn%20self.iVarNames%3E'), +args: ["aNumber"], +source: unescape('%3C%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20%3C%20aNumber%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_comment'), +unescape('__gt_eq'), smalltalk.method({ -selector: unescape('comment'), -category: 'accessing', -fn: function (){ +selector: unescape('%3E%3D'), +category: 'comparing', +fn: function (aNumber){ var self=this; -return (($receiver = smalltalk.send(self, "_basicAt_", ["comment"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver; +return self >= aNumber; return self;}, -args: [], -source: unescape('comment%0A%20%20%20%20%5E%28self%20basicAt%3A%20%27comment%27%29%20ifNil%3A%20%5B%27%27%5D'), -messageSends: ["ifNil:", "basicAt:"], +args: ["aNumber"], +source: unescape('%3E%3D%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20%3E%3E%3D%20aNumber%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_comment_'), +unescape('__lt_eq'), smalltalk.method({ -selector: unescape('comment%3A'), -category: 'accessing', -fn: function (aString){ +selector: unescape('%3C%3D'), +category: 'comparing', +fn: function (aNumber){ var self=this; -smalltalk.send(self, "_basicAt_put_", ["comment", aString]); +return self <= aNumber; return self;}, -args: ["aString"], -source: unescape('comment%3A%20aString%0A%20%20%20%20self%20basicAt%3A%20%27comment%27%20put%3A%20aString'), -messageSends: ["basicAt:put:"], +args: ["aNumber"], +source: unescape('%3C%3D%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20%3C%3D%20aNumber%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_commentStamp'), +unescape('__plus'), smalltalk.method({ -selector: unescape('commentStamp'), -category: 'accessing', -fn: function (){ +selector: unescape('+'), +category: 'arithmetic', +fn: function (aNumber){ var self=this; -return (function($rec){smalltalk.send($rec, "_class_", [self]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.ClassCommentReader || ClassCommentReader), "_new", [])); +return self + aNumber; return self;}, -args: [], -source: unescape('commentStamp%0A%20%20%20%20%5EClassCommentReader%20new%0A%09class%3A%20self%3B%0A%09yourself'), -messageSends: ["class:", "yourself", "new"], -referencedClasses: ["ClassCommentReader"] +args: ["aNumber"], +source: unescape('+%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20+%20aNumber%3E'), +messageSends: [], +referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_removeCompiledMethod_'), +unescape('__minus'), smalltalk.method({ -selector: unescape('removeCompiledMethod%3A'), -category: 'accessing', -fn: function (aMethod){ +selector: unescape('-'), +category: 'arithmetic', +fn: function (aNumber){ var self=this; -delete self.fn.prototype[aMethod.selector._asSelector()]; - delete self.fn.prototype.methods[aMethod.selector]; - smalltalk.init(self);; +return self - aNumber; return self;}, -args: ["aMethod"], -source: unescape('removeCompiledMethod%3A%20aMethod%0A%09%3Cdelete%20self.fn.prototype%5BaMethod.selector._asSelector%28%29%5D%3B%0A%09delete%20self.fn.prototype.methods%5BaMethod.selector%5D%3B%0A%09smalltalk.init%28self%29%3B%3E'), +args: ["aNumber"], +source: unescape('-%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20-%20aNumber%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_inheritsFrom_'), +unescape('__star'), smalltalk.method({ -selector: unescape('inheritsFrom%3A'), -category: 'instance creation', -fn: function (aClass){ +selector: unescape('*'), +category: 'arithmetic', +fn: function (aNumber){ var self=this; -return smalltalk.send(smalltalk.send(aClass, "_allSubclasses", []), "_includes_", [self]); +return self * aNumber; return self;}, -args: ["aClass"], -source: unescape('inheritsFrom%3A%20aClass%0A%09%5EaClass%20allSubclasses%20includes%3A%20self'), -messageSends: ["includes:", "allSubclasses"], +args: ["aNumber"], +source: unescape('*%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20*%20aNumber%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_protocols'), +unescape('__slash'), smalltalk.method({ -selector: unescape('protocols'), -category: 'accessing', -fn: function (){ +selector: unescape('/'), +category: 'arithmetic', +fn: function (aNumber){ var self=this; -var protocols=nil; -protocols=smalltalk.send((smalltalk.Array || Array), "_new", []); -smalltalk.send(smalltalk.send(self, "_methodDictionary", []), "_do_", [(function(each){return ((($receiver = smalltalk.send(protocols, "_includes_", [smalltalk.send(each, "_category", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(protocols, "_add_", [smalltalk.send(each, "_category", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(protocols, "_add_", [smalltalk.send(each, "_category", [])]);})]));})]); -return smalltalk.send(protocols, "_sort", []); +return self / aNumber; return self;}, -args: [], -source: unescape('protocols%0A%20%20%20%20%7C%20protocols%20%7C%0A%20%20%20%20protocols%20%3A%3D%20Array%20new.%0A%20%20%20%20self%20methodDictionary%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20%28protocols%20includes%3A%20each%20category%29%20ifFalse%3A%20%5B%0A%09%09protocols%20add%3A%20each%20category%5D%5D.%0A%20%20%20%20%5Eprotocols%20sort'), -messageSends: ["new", "do:", "methodDictionary", "ifFalse:", "includes:", "category", "add:", "sort"], -referencedClasses: ["Array"] +args: ["aNumber"], +source: unescape('/%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20/%20aNumber%3E'), +messageSends: [], +referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_protocolsDo_'), +unescape('_max_'), smalltalk.method({ -selector: unescape('protocolsDo%3A'), -category: 'accessing', -fn: function (aBlock){ +selector: unescape('max%3A'), +category: 'arithmetic', +fn: function (aNumber){ var self=this; -var methodsByCategory=nil; -methodsByCategory=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []); -smalltalk.send(smalltalk.send(smalltalk.send(self, "_methodDictionary", []), "_values", []), "_do_", [(function(m){return smalltalk.send(smalltalk.send(methodsByCategory, "_at_ifAbsentPut_", [smalltalk.send(m, "_category", []), (function(){return smalltalk.send((smalltalk.Array || Array), "_new", []);})]), "_add_", [m]);})]); -smalltalk.send(smalltalk.send(self, "_protocols", []), "_do_", [(function(category){return smalltalk.send(aBlock, "_value_value_", [category, smalltalk.send(methodsByCategory, "_at_", [category])]);})]); +return Math.max(self, aNumber);; return self;}, -args: ["aBlock"], -source: unescape('protocolsDo%3A%20aBlock%0A%09%22Execute%20aBlock%20for%20each%20method%20category%20with%0A%09its%20collection%20of%20methods%20in%20the%20sort%20order%20of%20category%20name.%22%0A%0A%09%7C%20methodsByCategory%20%7C%0A%09methodsByCategory%20%3A%3D%20Dictionary%20new.%0A%09self%20methodDictionary%20values%20do%3A%20%5B%3Am%20%7C%0A%09%09%28methodsByCategory%20at%3A%20m%20category%20ifAbsentPut%3A%20%5BArray%20new%5D%29%0A%20%09%09%09add%3A%20m%5D.%20%0A%09self%20protocols%20do%3A%20%5B%3Acategory%20%7C%0A%09%09aBlock%20value%3A%20category%20value%3A%20%28methodsByCategory%20at%3A%20category%29%5D'), -messageSends: ["new", "do:", "values", "methodDictionary", "add:", "at:ifAbsentPut:", "category", "protocols", "value:value:", "at:"], -referencedClasses: ["Dictionary", "Array"] +args: ["aNumber"], +source: unescape('max%3A%20aNumber%0A%09%3Creturn%20Math.max%28self%2C%20aNumber%29%3B%3E'), +messageSends: [], +referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_allInstanceVariableNames'), +unescape('_min_'), smalltalk.method({ -selector: unescape('allInstanceVariableNames'), -category: 'accessing', -fn: function (){ +selector: unescape('min%3A'), +category: 'arithmetic', +fn: function (aNumber){ var self=this; -var result=nil; -result=smalltalk.send(smalltalk.send(self, "_instanceVariableNames", []), "_copy", []); -(($receiver = smalltalk.send(self, "_superclass", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(result, "_addAll_", [smalltalk.send(smalltalk.send(self, "_superclass", []), "_allInstanceVariableNames", [])]);})() : nil; -return result; +return Math.min(self, aNumber);; return self;}, -args: [], -source: unescape('allInstanceVariableNames%0A%09%7C%20result%20%7C%0A%09result%20%3A%3D%20self%20instanceVariableNames%20copy.%0A%09self%20superclass%20ifNotNil%3A%20%5B%0A%09%20%20%20%20result%20addAll%3A%20self%20superclass%20allInstanceVariableNames%5D.%0A%09%5Eresult'), -messageSends: ["copy", "instanceVariableNames", "ifNotNil:", "superclass", "addAll:", "allInstanceVariableNames"], +args: ["aNumber"], +source: unescape('min%3A%20aNumber%0A%09%3Creturn%20Math.min%28self%2C%20aNumber%29%3B%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_methodAt_'), +unescape('_rounded'), smalltalk.method({ -selector: unescape('methodAt%3A'), -category: 'accessing', -fn: function (aString){ +selector: unescape('rounded'), +category: 'converting', +fn: function (){ var self=this; -return smalltalk.methods(self)[aString]; +return Math.round(self);; return self;}, -args: ["aString"], -source: unescape('methodAt%3A%20aString%0A%09%3Creturn%20smalltalk.methods%28self%29%5BaString%5D%3E'), +args: [], +source: unescape('rounded%0A%09%3Creturn%20Math.round%28self%29%3B%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_methodsFor_stamp_'), +unescape('_truncated'), smalltalk.method({ -selector: unescape('methodsFor%3Astamp%3A'), -category: 'accessing', -fn: function (aString, aStamp){ +selector: unescape('truncated'), +category: 'converting', +fn: function (){ var self=this; -return smalltalk.send(self, "_methodsFor_", [aString]); +var result=nil; +((($receiver = self >= (0)).klass === smalltalk.Boolean) ? ($receiver ? (function(){return result = Math.floor(self);;})() : (function(){return result = (Math.floor(self * (-1)) * (-1));;})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return result = Math.floor(self);;}), (function(){return result = (Math.floor(self * (-1)) * (-1));;})])); +return result; return self;}, -args: ["aString", "aStamp"], -source: unescape('methodsFor%3A%20aString%20stamp%3A%20aStamp%0A%09%22Added%20for%20compatibility%2C%20right%20now%20ignores%20stamp.%22%0A%09%5Eself%20methodsFor%3A%20aString'), -messageSends: ["methodsFor:"], +args: [], +source: unescape('truncated%0A%7Cresult%7C%0A%0A%20%20%20%20self%20%3E%3D%200%20%0A%20%20%20%20%20%20%20%20ifTrue%3A%20%5B%3Cresult%20%3D%20Math.floor%28self%29%3B%3E%5D%0A%20%20%20%20%20%20%20%20ifFalse%3A%20%5B%3Cresult%20%3D%20%28Math.floor%28self%20*%20%28-1%29%29%20*%20%28-1%29%29%3B%3E%5D.%0A%0A%20%20%20%20%5E%20result'), +messageSends: ["ifTrue:ifFalse:", unescape("%3E%3D")], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_commentStamp_prior_'), +unescape('_to_'), smalltalk.method({ -selector: unescape('commentStamp%3Aprior%3A'), -category: 'accessing', -fn: function (aStamp, prior){ +selector: unescape('to%3A'), +category: 'converting', +fn: function (aNumber){ var self=this; -return smalltalk.send(self, "_commentStamp", []); +var array=nil; +var first=nil; +var last=nil; +var count=nil; +(first=smalltalk.send(self, "_truncated", [])); +(last=((($receiver = smalltalk.send(aNumber, "_truncated", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]))); +(count=(1)); +(array=smalltalk.send((smalltalk.Array || Array), "_new", [])); +smalltalk.send(((($receiver = last).klass === smalltalk.Number) ? $receiver -first : smalltalk.send($receiver, "__minus", [first])), "_timesRepeat_", [(function(){smalltalk.send(array, "_at_put_", [count, first]);(count=((($receiver = count).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));return (first=((($receiver = first).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));})]); +return array; return self;}, -args: ["aStamp", "prior"], -source: unescape('commentStamp%3A%20aStamp%20prior%3A%20prior%0A%20%20%20%20%20%20%20%20%5Eself%20commentStamp'), -messageSends: ["commentStamp"], -referencedClasses: [] +args: ["aNumber"], +source: unescape('to%3A%20aNumber%0A%09%7C%20array%20first%20last%20count%20%7C%0A%09first%20%3A%3D%20self%20truncated.%0A%09last%20%3A%3D%20aNumber%20truncated%20+%201.%0A%09count%20%3A%3D%201.%0A%09array%20%3A%3D%20Array%20new.%0A%09%28last%20-%20first%29%20timesRepeat%3A%20%5B%0A%09%20%20%20%20array%20at%3A%20count%20put%3A%20first.%0A%09%20%20%20%20count%20%3A%3D%20count%20+%201.%0A%09%20%20%20%20first%20%3A%3D%20first%20+%201%5D.%0A%09%5Earray'), +messageSends: ["truncated", unescape("+"), "new", "timesRepeat:", unescape("-"), "at:put:"], +referencedClasses: ["Array"] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_compile_'), +unescape('_timesRepeat_'), smalltalk.method({ -selector: unescape('compile%3A'), -category: 'compiling', -fn: function (aString){ +selector: unescape('timesRepeat%3A'), +category: 'enumerating', +fn: function (aBlock){ var self=this; -smalltalk.send(self, "_compile_category_", [aString, ""]); +var integer=nil; +var count=nil; +(integer=smalltalk.send(self, "_truncated", [])); +(count=(1)); +(function(){while(!(function(){return ((($receiver = count).klass === smalltalk.Number) ? $receiver >self : smalltalk.send($receiver, "__gt", [self]));})()) {(function(){smalltalk.send(aBlock, "_value", []);return (count=((($receiver = count).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));})()}})(); return self;}, -args: ["aString"], -source: unescape('compile%3A%20aString%0A%09self%20compile%3A%20aString%20category%3A%20%27%27'), -messageSends: ["compile:category:"], +args: ["aBlock"], +source: unescape('timesRepeat%3A%20aBlock%0A%09%7C%20integer%20count%20%7C%0A%09integer%20%3A%3D%20self%20truncated.%0A%09count%20%3A%3D%201.%0A%09%5Bcount%20%3E%20self%5D%20whileFalse%3A%20%5B%0A%09%20%20%20%20aBlock%20value.%0A%09%20%20%20%20count%20%3A%3D%20count%20+%201%5D'), +messageSends: ["truncated", "whileFalse:", unescape("%3E"), "value", unescape("+")], referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Number); smalltalk.addMethod( -unescape('_compile_category_'), +unescape('_to_do_'), smalltalk.method({ -selector: unescape('compile%3Acategory%3A'), -category: 'compiling', -fn: function (aString, anotherString){ -var self=this; -var method=nil; -method=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [aString, self]); -smalltalk.send(method, "_category_", [anotherString]); -smalltalk.send(self, "_addCompiledMethod_", [method]); +selector: unescape('to%3Ado%3A'), +category: 'enumerating', +fn: function (stop, aBlock){ +var self=this; +var nextValue=nil; +(nextValue=self); +(function(){while((function(){return ((($receiver = nextValue).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [nextValue]);return (nextValue=((($receiver = nextValue).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));})()}})(); +return self;}, +args: ["stop", "aBlock"], +source: unescape('to%3A%20stop%20do%3A%20aBlock%0A%09%22Evaluate%20aBlock%20for%20each%20number%20from%20self%20to%20aNumber.%22%0A%09%7C%20nextValue%20%7C%0A%09nextValue%20%3A%3D%20self.%0A%09%5BnextValue%20%3C%3D%20stop%5D%0A%09%09whileTrue%3A%20%0A%09%09%09%5BaBlock%20value%3A%20nextValue.%0A%09%09%09nextValue%20%3A%3D%20nextValue%20+%201%5D'), +messageSends: ["whileTrue:", unescape("%3C%3D"), "value:", unescape("+")], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_asString'), +smalltalk.method({ +selector: unescape('asString'), +category: 'converting', +fn: function (){ +var self=this; +return smalltalk.send(self, "_printString", []); +return self;}, +args: [], +source: unescape('asString%0A%09%5Eself%20printString'), +messageSends: ["printString"], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_asJavascript'), +smalltalk.method({ +selector: unescape('asJavascript'), +category: 'converting', +fn: function (){ +var self=this; +return smalltalk.send(smalltalk.send(unescape("%28"), "__comma", [smalltalk.send(self, "_printString", [])]), "__comma", [unescape("%29")]); +return self;}, +args: [], +source: unescape('asJavascript%0A%09%5E%27%28%27%2C%20self%20printString%2C%20%27%29%27'), +messageSends: [unescape("%2C"), "printString"], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_printString'), +smalltalk.method({ +selector: unescape('printString'), +category: 'printing', +fn: function (){ +var self=this; +return String(self); +return self;}, +args: [], +source: unescape('printString%0A%09%3Creturn%20String%28self%29%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_isNumber'), +smalltalk.method({ +selector: unescape('isNumber'), +category: 'testing', +fn: function (){ +var self=this; +return true; +return self;}, +args: [], +source: unescape('isNumber%0A%09%5Etrue'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_atRandom'), +smalltalk.method({ +selector: unescape('atRandom'), +category: 'converting', +fn: function (){ +var self=this; +return ((($receiver = smalltalk.send(((($receiver = smalltalk.send(smalltalk.send((smalltalk.Random || Random), "_new", []), "_next", [])).klass === smalltalk.Number) ? $receiver *self : smalltalk.send($receiver, "__star", [self])), "_truncated", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])); +return self;}, +args: [], +source: unescape('atRandom%0A%20%20%20%20%5E%28Random%20new%20next%20*%20self%29%20truncated%20+%201'), +messageSends: [unescape("+"), "truncated", unescape("*"), "next", "new"], +referencedClasses: ["Random"] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('__at'), +smalltalk.method({ +selector: unescape('@'), +category: 'converting', +fn: function (aNumber){ +var self=this; +return smalltalk.send((smalltalk.Point || Point), "_x_y_", [self, aNumber]); +return self;}, +args: ["aNumber"], +source: unescape('@%20aNumber%0A%09%5EPoint%20x%3A%20self%20y%3A%20aNumber'), +messageSends: ["x:y:"], +referencedClasses: ["Point"] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_asPoint'), +smalltalk.method({ +selector: unescape('asPoint'), +category: 'converting', +fn: function (){ +var self=this; +return smalltalk.send((smalltalk.Point || Point), "_x_y_", [self, self]); +return self;}, +args: [], +source: unescape('asPoint%0A%09%5EPoint%20x%3A%20self%20y%3A%20self'), +messageSends: ["x:y:"], +referencedClasses: ["Point"] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_clearInterval'), +smalltalk.method({ +selector: unescape('clearInterval'), +category: 'timeouts/intervals', +fn: function (){ +var self=this; +clearInterval(Number(self)); +return self;}, +args: [], +source: unescape('clearInterval%0A%09%3CclearInterval%28Number%28self%29%29%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_clearTimeout'), +smalltalk.method({ +selector: unescape('clearTimeout'), +category: 'timeouts/intervals', +fn: function (){ +var self=this; +clearTimeout(Number(self)); +return self;}, +args: [], +source: unescape('clearTimeout%0A%09%3CclearTimeout%28Number%28self%29%29%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_even'), +smalltalk.method({ +selector: unescape('even'), +category: 'testing', +fn: function (){ +var self=this; +return smalltalk.send((0), "__eq", [smalltalk.send(self, "_\\\\", [(2)])]); +return self;}, +args: [], +source: unescape('even%0A%09%5E%200%20%3D%20%28self%20%5C%5C%202%29'), +messageSends: [unescape("%3D"), unescape("%5C%5C%5C%5C")], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_odd'), +smalltalk.method({ +selector: unescape('odd'), +category: 'testing', +fn: function (){ +var self=this; +return smalltalk.send(smalltalk.send(self, "_even", []), "_not", []); +return self;}, +args: [], +source: unescape('odd%0A%09%5E%20self%20even%20not'), +messageSends: ["not", "even"], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_negated'), +smalltalk.method({ +selector: unescape('negated'), +category: 'arithmetic', +fn: function (){ +var self=this; +return (0) - self; +return self;}, +args: [], +source: unescape('negated%0A%09%5E0%20-%20self'), +messageSends: [unescape("-")], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_printShowingDecimalPlaces_'), +smalltalk.method({ +selector: unescape('printShowingDecimalPlaces%3A'), +category: 'printing', +fn: function (placesDesired){ +var self=this; +return self.toFixed(placesDesired); +return self;}, +args: ["placesDesired"], +source: unescape('printShowingDecimalPlaces%3A%20placesDesired%0A%09%3Creturn%20self.toFixed%28placesDesired%29%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_%5C'), +smalltalk.method({ +selector: unescape('%5C'), +category: '', +fn: function (aNumber){ +var self=this; +return self % aNumber; +return self;}, +args: ["aNumber"], +source: unescape(''), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_to_by_'), +smalltalk.method({ +selector: unescape('to%3Aby%3A'), +category: 'converting', +fn: function (stop, step){ +var self=this; +var array=nil; +var value=nil; +var pos=nil; +(value=self); +(array=smalltalk.send((smalltalk.Array || Array), "_new", [])); +(pos=(1)); +((($receiver = smalltalk.send(step, "__eq", [(0)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_error_", [unescape("step%20must%20be%20non-zero")]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self, "_error_", [unescape("step%20must%20be%20non-zero")]);})])); +((($receiver = ((($receiver = step).klass === smalltalk.Number) ? $receiver <(0) : smalltalk.send($receiver, "__lt", [(0)]))).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver >=stop : smalltalk.send($receiver, "__gt_eq", [stop]));})()) {(function(){smalltalk.send(array, "_at_put_", [pos, value]);(pos=((($receiver = pos).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));return (value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step])));})()}})();})() : (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(array, "_at_put_", [pos, value]);(pos=((($receiver = pos).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));return (value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step])));})()}})();})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver >=stop : smalltalk.send($receiver, "__gt_eq", [stop]));})()) {(function(){smalltalk.send(array, "_at_put_", [pos, value]);(pos=((($receiver = pos).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));return (value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step])));})()}})();}), (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(array, "_at_put_", [pos, value]);(pos=((($receiver = pos).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));return (value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step])));})()}})();})])); +return array; +return self;}, +args: ["stop", "step"], +source: unescape('to%3A%20stop%20by%3A%20step%0A%09%7C%20array%20value%20pos%20%7C%0A%09value%20%3A%3D%20self.%0A%09array%20%3A%3D%20Array%20new.%0A%09pos%20%3A%3D%201.%0A%09step%20%3D%200%20ifTrue%3A%20%5Bself%20error%3A%20%27step%20must%20be%20non-zero%27%5D.%0A%09step%20%3C%200%0A%09%09ifTrue%3A%20%5B%5B%20value%20%3E%3D%20stop%20%5D%20whileTrue%3A%20%5B%0A%09%20%20%20%20%09%09%09array%20at%3A%20pos%20put%3A%20value.%0A%09%20%20%20%20%09%09%09pos%20%3A%3D%20pos%20+%201.%0A%09%20%20%20%20%09%09%09value%20%3A%3D%20value%20+%20step%5D%5D%0A%09%09ifFalse%3A%20%5B%5B%20value%20%3C%3D%20stop%20%5D%20whileTrue%3A%20%5B%0A%09%20%20%20%20%09%09%09array%20at%3A%20pos%20put%3A%20value.%0A%09%20%20%09%09%09pos%20%3A%3D%20pos%20+%201.%0A%09%20%20%20%20%09%09%09value%20%3A%3D%20value%20+%20step%5D%5D.%0A%09%5Earray'), +messageSends: ["new", "ifTrue:", unescape("%3D"), "error:", "ifTrue:ifFalse:", unescape("%3C"), "whileTrue:", unescape("%3E%3D"), "at:put:", unescape("+"), unescape("%3C%3D")], +referencedClasses: ["Array"] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_to_by_do_'), +smalltalk.method({ +selector: unescape('to%3Aby%3Ado%3A'), +category: 'enumerating', +fn: function (stop, step, aBlock){ +var self=this; +var value=nil; +(value=self); +((($receiver = smalltalk.send(step, "__eq", [(0)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_error_", [unescape("step%20must%20be%20non-zero")]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self, "_error_", [unescape("step%20must%20be%20non-zero")]);})])); +((($receiver = ((($receiver = step).klass === smalltalk.Number) ? $receiver <(0) : smalltalk.send($receiver, "__lt", [(0)]))).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver >=stop : smalltalk.send($receiver, "__gt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [value]);return (value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step])));})()}})();})() : (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [value]);return (value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step])));})()}})();})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver >=stop : smalltalk.send($receiver, "__gt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [value]);return (value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step])));})()}})();}), (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [value]);return (value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step])));})()}})();})])); +return self;}, +args: ["stop", "step", "aBlock"], +source: unescape('to%3A%20stop%20by%3A%20step%20do%3A%20aBlock%0A%09%7C%20value%20%7C%0A%09value%20%3A%3D%20self.%0A%09step%20%3D%200%20ifTrue%3A%20%5Bself%20error%3A%20%27step%20must%20be%20non-zero%27%5D.%0A%09step%20%3C%200%0A%09%09ifTrue%3A%20%5B%5B%20value%20%3E%3D%20stop%20%5D%20whileTrue%3A%20%5B%0A%09%20%20%20%20%09%09%09aBlock%20value%3A%20value.%0A%09%20%20%20%20%09%09%09value%20%3A%3D%20value%20+%20step%5D%5D%0A%09%09ifFalse%3A%20%5B%5B%20value%20%3C%3D%20stop%20%5D%20whileTrue%3A%20%5B%0A%09%20%20%20%20%09%09%09aBlock%20value%3A%20value.%0A%09%20%20%20%20%09%09%09value%20%3A%3D%20value%20+%20step%5D%5D'), +messageSends: ["ifTrue:", unescape("%3D"), "error:", "ifTrue:ifFalse:", unescape("%3C"), "whileTrue:", unescape("%3E%3D"), "value:", unescape("+"), unescape("%3C%3D")], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_deepCopy'), +smalltalk.method({ +selector: unescape('deepCopy'), +category: 'copying', +fn: function (){ +var self=this; +return smalltalk.send(self, "_copy", []); +return self;}, +args: [], +source: unescape('deepCopy%0A%09%5Eself%20copy'), +messageSends: ["copy"], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_copy'), +smalltalk.method({ +selector: unescape('copy'), +category: 'copying', +fn: function (){ +var self=this; +return self; +return self;}, +args: [], +source: unescape('copy%0A%09%5Eself'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_%5C%5C'), +smalltalk.method({ +selector: unescape('%5C%5C'), +category: 'arithmetic', +fn: function (aNumber){ +var self=this; +return self % aNumber; +return self;}, +args: ["aNumber"], +source: unescape('%5C%5C%20aNumber%0A%09%3Creturn%20self%20%25%20aNumber%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_sqrt'), +smalltalk.method({ +selector: unescape('sqrt'), +category: 'arithmetic', +fn: function (){ +var self=this; +return Math.sqrt(self); +return self;}, +args: [], +source: unescape('sqrt%0A%09%3Creturn%20Math.sqrt%28self%29%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_squared'), +smalltalk.method({ +selector: unescape('squared'), +category: 'arithmetic', +fn: function (){ +var self=this; +return self * self; +return self;}, +args: [], +source: unescape('squared%0A%09%5Eself%20*%20self'), +messageSends: [unescape("*")], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_identityHash'), +smalltalk.method({ +selector: unescape('identityHash'), +category: 'accessing', +fn: function (){ +var self=this; +return smalltalk.send(smalltalk.send(self, "_asString", []), "__comma", ["n"]); +return self;}, +args: [], +source: unescape('identityHash%0A%09%5Eself%20asString%2C%20%27n%27'), +messageSends: [unescape("%2C"), "asString"], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_negative'), +smalltalk.method({ +selector: unescape('negative'), +category: 'testing', +fn: function (){ +var self=this; +return self < (0); +return self;}, +args: [], +source: unescape('negative%0A%09%22Answer%20whether%20the%20receiver%20is%20mathematically%20negative.%22%0A%0A%09%5E%20self%20%3C%200'), +messageSends: [unescape("%3C")], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_positive'), +smalltalk.method({ +selector: unescape('positive'), +category: 'testing', +fn: function (){ +var self=this; +return self >= (0); +return self;}, +args: [], +source: unescape('positive%0A%09%22Answer%20whether%20the%20receiver%20is%20positive%20or%20equal%20to%200.%20%28ST-80%20protocol%29.%22%0A%0A%09%5E%20self%20%3E%3D%200'), +messageSends: [unescape("%3E%3D")], +referencedClasses: [] +}), +smalltalk.Number); + +smalltalk.addMethod( +unescape('_isZero'), +smalltalk.method({ +selector: unescape('isZero'), +category: 'testing', +fn: function (){ +var self=this; +return smalltalk.send(self, "__eq", [(0)]); return self;}, -args: ["aString", "anotherString"], -source: unescape('compile%3A%20aString%20category%3A%20anotherString%0A%09%7C%20method%20%7C%0A%09method%20%3A%3D%20Compiler%20new%20load%3A%20aString%20forClass%3A%20self.%0A%09method%20category%3A%20anotherString.%0A%09self%20addCompiledMethod%3A%20method'), -messageSends: ["load:forClass:", "new", "category:", "addCompiledMethod:"], -referencedClasses: ["Compiler"] +args: [], +source: unescape('isZero%0A%09%5Eself%20%3D%200'), +messageSends: [unescape("%3D")], +referencedClasses: [] +}), +smalltalk.Number); + + +smalltalk.addMethod( +unescape('_pi'), +smalltalk.method({ +selector: unescape('pi'), +category: 'instance creation', +fn: function (){ +var self=this; +return Math.PI; +return self;}, +args: [], +source: unescape('pi%0A%09%3Creturn%20Math.PI%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Number.klass); + + +smalltalk.addClass('Boolean', smalltalk.Object, [], 'Kernel-Objects'); +smalltalk.Boolean.comment=unescape('Boolean%20wraps%20the%20JavaScript%20%60Boolean%28%29%60%20constructor.%20The%20%60true%60%20and%20%60false%60%20objects%20are%20the%20JavaScript%20boolean%20objects.%0A%0ABoolean%20defines%20the%20protocol%20for%20logic%20testing%20operations%20and%20conditional%20control%20structures%20for%20the%20logical%20values.%0ABoolean%20instances%20are%20weither%20%60true%60%20or%20%60false%60.') +smalltalk.addMethod( +unescape('__eq'), +smalltalk.method({ +selector: unescape('%3D'), +category: 'comparing', +fn: function (aBoolean){ +var self=this; +try{((($receiver = smalltalk.send(smalltalk.send(aBoolean, "_class", []), "__eq", [smalltalk.send(self, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})])); +return Boolean(self == true) == aBoolean; +return self; +} catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}, +args: ["aBoolean"], +source: unescape('%3D%20aBoolean%0A%09aBoolean%20class%20%3D%20self%20class%20ifFalse%3A%20%5B%5Efalse%5D.%0A%09%3Creturn%20Boolean%28self%20%3D%3D%20true%29%20%3D%3D%20aBoolean%3E'), +messageSends: ["ifFalse:", unescape("%3D"), "class"], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_shallowCopy'), +smalltalk.method({ +selector: unescape('shallowCopy'), +category: 'copying', +fn: function (){ +var self=this; +return self; +return self;}, +args: [], +source: unescape('shallowCopy%0A%09%5Eself'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_deepCopy'), +smalltalk.method({ +selector: unescape('deepCopy'), +category: 'copying', +fn: function (){ +var self=this; +return self; +return self;}, +args: [], +source: unescape('deepCopy%0A%09%5Eself'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_ifTrue_'), +smalltalk.method({ +selector: unescape('ifTrue%3A'), +category: 'controlling', +fn: function (aBlock){ +var self=this; +return smalltalk.send(self, "_ifTrue_ifFalse_", [aBlock, (function(){return nil;})]); +return self;}, +args: ["aBlock"], +source: unescape('ifTrue%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself%20ifTrue%3A%20aBlock%20ifFalse%3A%20%5B%5D'), +messageSends: ["ifTrue:ifFalse:"], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_ifFalse_'), +smalltalk.method({ +selector: unescape('ifFalse%3A'), +category: 'controlling', +fn: function (aBlock){ +var self=this; +return smalltalk.send(self, "_ifTrue_ifFalse_", [(function(){return nil;}), aBlock]); +return self;}, +args: ["aBlock"], +source: unescape('ifFalse%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself%20ifTrue%3A%20%5B%5D%20ifFalse%3A%20aBlock'), +messageSends: ["ifTrue:ifFalse:"], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_ifFalse_ifTrue_'), +smalltalk.method({ +selector: unescape('ifFalse%3AifTrue%3A'), +category: 'controlling', +fn: function (aBlock, anotherBlock){ +var self=this; +return smalltalk.send(self, "_ifTrue_ifFalse_", [anotherBlock, aBlock]); +return self;}, +args: ["aBlock", "anotherBlock"], +source: unescape('ifFalse%3A%20aBlock%20ifTrue%3A%20anotherBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself%20ifTrue%3A%20anotherBlock%20ifFalse%3A%20aBlock'), +messageSends: ["ifTrue:ifFalse:"], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_ifTrue_ifFalse_'), +smalltalk.method({ +selector: unescape('ifTrue%3AifFalse%3A'), +category: 'controlling', +fn: function (aBlock, anotherBlock){ +var self=this; + + if(self == true) { + return aBlock(); + } else { + return anotherBlock(); + } + ; +return self;}, +args: ["aBlock", "anotherBlock"], +source: unescape('ifTrue%3A%20aBlock%20ifFalse%3A%20anotherBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3C%0A%09%20%20%20%20if%28self%20%3D%3D%20true%29%20%7B%0A%09%09return%20aBlock%28%29%3B%0A%09%20%20%20%20%7D%20else%20%7B%0A%09%09return%20anotherBlock%28%29%3B%0A%09%20%20%20%20%7D%0A%09%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_and_'), +smalltalk.method({ +selector: unescape('and%3A'), +category: 'controlling', +fn: function (aBlock){ +var self=this; +return smalltalk.send(smalltalk.send(self, "__eq", [true]), "_ifTrue_ifFalse_", [aBlock, (function(){return false;})]); +return self;}, +args: ["aBlock"], +source: unescape('and%3A%20aBlock%0A%09%5Eself%20%3D%20true%0A%09%20%20%20%20ifTrue%3A%20aBlock%0A%09%20%20%20%20ifFalse%3A%20%5Bfalse%5D'), +messageSends: ["ifTrue:ifFalse:", unescape("%3D")], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_or_'), +smalltalk.method({ +selector: unescape('or%3A'), +category: 'controlling', +fn: function (aBlock){ +var self=this; +return smalltalk.send(smalltalk.send(self, "__eq", [true]), "_ifTrue_ifFalse_", [(function(){return true;}), aBlock]); +return self;}, +args: ["aBlock"], +source: unescape('or%3A%20aBlock%0A%09%5Eself%20%3D%20true%0A%09%20%20%20%20ifTrue%3A%20%5Btrue%5D%0A%09%20%20%20%20ifFalse%3A%20aBlock'), +messageSends: ["ifTrue:ifFalse:", unescape("%3D")], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_not'), +smalltalk.method({ +selector: unescape('not'), +category: 'controlling', +fn: function (){ +var self=this; +return smalltalk.send(self, "__eq", [false]); +return self;}, +args: [], +source: unescape('not%0A%09%5Eself%20%3D%20false'), +messageSends: [unescape("%3D")], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_printString'), +smalltalk.method({ +selector: unescape('printString'), +category: 'printing', +fn: function (){ +var self=this; +return self.toString(); +return self;}, +args: [], +source: unescape('printString%0A%09%3Creturn%20self.toString%28%29%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_%26'), +smalltalk.method({ +selector: unescape('%26'), +category: 'controlling', +fn: function (aBoolean){ +var self=this; + + if(self == true) { + return aBoolean; + } else { + return false; + } + ; +return self;}, +args: ["aBoolean"], +source: unescape('%26%20aBoolean%0A%09%3C%0A%09%20%20%20%20if%28self%20%3D%3D%20true%29%20%7B%0A%09%09return%20aBoolean%3B%0A%09%20%20%20%20%7D%20else%20%7B%0A%09%09return%20false%3B%0A%09%20%20%20%20%7D%0A%09%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Boolean); + +smalltalk.addMethod( +unescape('_%7C'), +smalltalk.method({ +selector: unescape('%7C'), +category: 'controlling', +fn: function (aBoolean){ +var self=this; + + if(self == true) { + return true; + } else { + return aBoolean; + } + ; +return self;}, +args: ["aBoolean"], +source: unescape('%7C%20aBoolean%0A%09%3C%0A%09%20%20%20%20if%28self%20%3D%3D%20true%29%20%7B%0A%09%09return%20true%3B%0A%09%20%20%20%20%7D%20else%20%7B%0A%09%09return%20aBoolean%3B%0A%09%20%20%20%20%7D%0A%09%3E'), +messageSends: [], +referencedClasses: [] }), -smalltalk.Behavior); +smalltalk.Boolean); -smalltalk.addClass('Class', smalltalk.Behavior, [], 'Kernel'); +smalltalk.addClass('Date', smalltalk.Object, [], 'Kernel-Objects'); +smalltalk.Date.comment=unescape('The%20Date%20class%20is%20used%20to%20work%20with%20dates%20and%20times.%20Therefore%20%60Date%20today%60%20and%20%60Date%20now%60%20are%20both%20valid%20in%0AAmber%20and%20answer%20the%20same%20date%20object.%0A%0ADate%20wraps%20the%20%60Date%28%29%60%20JavaScript%20constructor%2C%20and%20Smalltalk%20date%20objects%20are%20JavaScript%20date%20objects.') smalltalk.addMethod( -unescape('_category'), +unescape('_year'), smalltalk.method({ -selector: unescape('category'), +selector: unescape('year'), category: 'accessing', fn: function (){ var self=this; -return (($receiver = smalltalk.send(self, "_package", [])) == nil || $receiver == undefined) ? (function(){return "Unclassified";})() : (function(){return smalltalk.send(smalltalk.send(self, "_package", []), "_name", []);})(); +return self.getFullYear(); return self;}, args: [], -source: unescape('category%0A%09%5Eself%20package%20ifNil%3A%20%5B%27Unclassified%27%5D%20ifNotNil%3A%20%5Bself%20package%20name%5D'), -messageSends: ["ifNil:ifNotNil:", "package", "name"], +source: unescape('year%0A%09%3Creturn%20self.getFullYear%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Class); +smalltalk.Date); smalltalk.addMethod( -unescape('_subclass_instanceVariableNames_'), +unescape('_month'), smalltalk.method({ -selector: unescape('subclass%3AinstanceVariableNames%3A'), -category: 'class creation', -fn: function (aString, anotherString){ +selector: unescape('month'), +category: 'accessing', +fn: function (){ var self=this; -return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, anotherString, nil]); +return self.getMonth() + 1; return self;}, -args: ["aString", "anotherString"], -source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%0A%09%22Kept%20for%20compatibility.%22%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%20package%3A%20nil'), -messageSends: ["subclass:instanceVariableNames:package:"], +args: [], +source: unescape('month%0A%09%3Creturn%20self.getMonth%28%29%20+%201%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Class); +smalltalk.Date); smalltalk.addMethod( -unescape('_subclass_instanceVariableNames_category_'), +unescape('_month_'), smalltalk.method({ -selector: unescape('subclass%3AinstanceVariableNames%3Acategory%3A'), -category: 'class creation', -fn: function (aString, aString2, aString3){ +selector: unescape('month%3A'), +category: 'accessing', +fn: function (aNumber){ var self=this; -return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, aString2, aString3]); +self.setMonth(aNumber - 1); return self;}, -args: ["aString", "aString2", "aString3"], -source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20category%3A%20aString3%0A%09%22Kept%20for%20compatibility.%22%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), -messageSends: ["subclass:instanceVariableNames:package:"], +args: ["aNumber"], +source: unescape('month%3A%20aNumber%0A%09%3Cself.setMonth%28aNumber%20-%201%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Class); +smalltalk.Date); smalltalk.addMethod( -unescape('_isClass'), +unescape('_day'), smalltalk.method({ -selector: unescape('isClass'), -category: 'testing', +selector: unescape('day'), +category: 'accessing', fn: function (){ var self=this; -return true; +return smalltalk.send(self, "_dayOfWeek", []); return self;}, args: [], -source: unescape('isClass%0A%09%5Etrue'), -messageSends: [], +source: unescape('day%0A%09%5Eself%20dayOfWeek'), +messageSends: ["dayOfWeek"], referencedClasses: [] }), -smalltalk.Class); +smalltalk.Date); smalltalk.addMethod( -unescape('_printString'), +unescape('_dayOfWeek'), smalltalk.method({ -selector: unescape('printString'), -category: 'printing', +selector: unescape('dayOfWeek'), +category: 'accessing', fn: function (){ var self=this; -return smalltalk.send(self, "_name", []); +return self.getDay() + 1; return self;}, args: [], -source: unescape('printString%0A%09%5Eself%20name'), -messageSends: ["name"], +source: unescape('dayOfWeek%0A%09%3Creturn%20self.getDay%28%29%20+%201%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Class); +smalltalk.Date); smalltalk.addMethod( -unescape('_rename_'), +unescape('_dayOfWeek_'), smalltalk.method({ -selector: unescape('rename%3A'), +selector: unescape('dayOfWeek%3A'), category: 'accessing', -fn: function (aString){ +fn: function (aNumber){ var self=this; - - smalltalk[aString] = self; - delete smalltalk[self.className]; - self.className = aString; - ; +return self.setDay(aNumber - 1); return self;}, -args: ["aString"], -source: unescape('rename%3A%20aString%0A%09%3C%0A%09%09smalltalk%5BaString%5D%20%3D%20self%3B%0A%09%09delete%20smalltalk%5Bself.className%5D%3B%0A%09%09self.className%20%3D%20aString%3B%0A%09%3E'), +args: ["aNumber"], +source: unescape('dayOfWeek%3A%20aNumber%0A%09%3Creturn%20self.setDay%28aNumber%20-%201%29%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Class); +smalltalk.Date); smalltalk.addMethod( -unescape('_subclass_instanceVariableNames_classVariableNames_poolDictionaries_category_'), +unescape('_day_'), smalltalk.method({ -selector: unescape('subclass%3AinstanceVariableNames%3AclassVariableNames%3ApoolDictionaries%3Acategory%3A'), -category: 'class creation', -fn: function (aString, aString2, classVars, pools, aString3){ +selector: unescape('day%3A'), +category: 'accessing', +fn: function (aNumber){ var self=this; -return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, aString2, aString3]); +smalltalk.send(self, "_day_", [aNumber]); return self;}, -args: ["aString", "aString2", "classVars", "pools", "aString3"], -source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20classVariableNames%3A%20classVars%20poolDictionaries%3A%20pools%20category%3A%20aString3%0A%09%22Just%20ignore%20class%20variables%20and%20pools.%20Added%20for%20compatibility.%22%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), -messageSends: ["subclass:instanceVariableNames:package:"], +args: ["aNumber"], +source: unescape('day%3A%20aNumber%0A%09self%20day%3A%20aNumber'), +messageSends: ["day:"], referencedClasses: [] }), -smalltalk.Class); +smalltalk.Date); smalltalk.addMethod( -unescape('_package'), +unescape('_year_'), smalltalk.method({ -selector: unescape('package'), +selector: unescape('year%3A'), category: 'accessing', -fn: function (){ +fn: function (aNumber){ var self=this; -return self.pkg; +self.setFullYear(aNumber); return self;}, -args: [], -source: unescape('package%0A%09%3Creturn%20self.pkg%3E'), +args: ["aNumber"], +source: unescape('year%3A%20aNumber%0A%09%3Cself.setFullYear%28aNumber%29%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Class); +smalltalk.Date); smalltalk.addMethod( -unescape('_package_'), +unescape('_dayOfMonth'), smalltalk.method({ -selector: unescape('package%3A'), +selector: unescape('dayOfMonth'), category: 'accessing', -fn: function (aPackage){ +fn: function (){ var self=this; -self.pkg = aPackage; +return self.getDate(); return self;}, -args: ["aPackage"], -source: unescape('package%3A%20aPackage%0A%09%3Cself.pkg%20%3D%20aPackage%3E'), +args: [], +source: unescape('dayOfMonth%0A%09%3Creturn%20self.getDate%28%29%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Class); +smalltalk.Date); smalltalk.addMethod( -unescape('_subclass_instanceVariableNames_package_'), +unescape('_dayOfMonth_'), smalltalk.method({ -selector: unescape('subclass%3AinstanceVariableNames%3Apackage%3A'), -category: 'class creation', -fn: function (aString, aString2, aString3){ +selector: unescape('dayOfMonth%3A'), +category: 'accessing', +fn: function (aNumber){ var self=this; -return smalltalk.send(smalltalk.send((smalltalk.ClassBuilder || ClassBuilder), "_new", []), "_superclass_subclass_instanceVariableNames_package_", [self, aString, aString2, aString3]); +self.setDate(aNumber); return self;}, -args: ["aString", "aString2", "aString3"], -source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3%0A%09%5EClassBuilder%20new%0A%09%20%20%20%20superclass%3A%20self%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), -messageSends: ["superclass:subclass:instanceVariableNames:package:", "new"], -referencedClasses: ["ClassBuilder"] +args: ["aNumber"], +source: unescape('dayOfMonth%3A%20aNumber%0A%09%3Cself.setDate%28aNumber%29%3E'), +messageSends: [], +referencedClasses: [] }), -smalltalk.Class); - - +smalltalk.Date); -smalltalk.addClass('Metaclass', smalltalk.Behavior, [], 'Kernel'); smalltalk.addMethod( -unescape('_instanceClass'), +unescape('_asString'), smalltalk.method({ -selector: unescape('instanceClass'), -category: 'accessing', +selector: unescape('asString'), +category: 'converting', fn: function (){ var self=this; -return self.instanceClass; +return self.toString(); return self;}, args: [], -source: unescape('instanceClass%0A%09%3Creturn%20self.instanceClass%3E'), +source: unescape('asString%0A%09%3Creturn%20self.toString%28%29%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Metaclass); +smalltalk.Date); smalltalk.addMethod( -unescape('_instanceVariableNames_'), +unescape('_printString'), smalltalk.method({ -selector: unescape('instanceVariableNames%3A'), -category: 'accessing', -fn: function (aCollection){ +selector: unescape('printString'), +category: 'printing', +fn: function (){ var self=this; -smalltalk.send(smalltalk.send((smalltalk.ClassBuilder || ClassBuilder), "_new", []), "_class_instanceVariableNames_", [self, aCollection]); +return smalltalk.send(self, "_asString", []); return self;}, -args: ["aCollection"], -source: unescape('instanceVariableNames%3A%20aCollection%0A%09ClassBuilder%20new%0A%09%20%20%20%20class%3A%20self%20instanceVariableNames%3A%20aCollection'), -messageSends: ["class:instanceVariableNames:", "new"], -referencedClasses: ["ClassBuilder"] +args: [], +source: unescape('printString%0A%09%5Eself%20asString'), +messageSends: ["asString"], +referencedClasses: [] }), -smalltalk.Metaclass); +smalltalk.Date); smalltalk.addMethod( -unescape('_isMetaclass'), +unescape('_asMilliseconds'), smalltalk.method({ -selector: unescape('isMetaclass'), -category: 'testing', +selector: unescape('asMilliseconds'), +category: 'converting', fn: function (){ var self=this; -return true; +return smalltalk.send(self, "_time", []); return self;}, args: [], -source: unescape('isMetaclass%0A%09%5Etrue'), -messageSends: [], +source: unescape('asMilliseconds%0A%09%5Eself%20time'), +messageSends: ["time"], referencedClasses: [] }), -smalltalk.Metaclass); +smalltalk.Date); smalltalk.addMethod( -unescape('_printString'), +unescape('_time'), smalltalk.method({ -selector: unescape('printString'), -category: 'printing', +selector: unescape('time'), +category: 'accessing', fn: function (){ var self=this; -return smalltalk.send(smalltalk.send(smalltalk.send(self, "_instanceClass", []), "_name", []), "__comma", [" class"]); +return self.getTime(); return self;}, args: [], -source: unescape('printString%0A%09%5Eself%20instanceClass%20name%2C%20%27%20class%27'), -messageSends: [unescape("%2C"), "name", "instanceClass"], +source: unescape('time%0A%09%3Creturn%20self.getTime%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Metaclass); - - +smalltalk.Date); -smalltalk.addClass('CompiledMethod', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( -unescape('_source'), +unescape('_time_'), smalltalk.method({ -selector: unescape('source'), +selector: unescape('time%3A'), category: 'accessing', +fn: function (aNumber){ +var self=this; +self.setTime(aNumber); +return self;}, +args: ["aNumber"], +source: unescape('time%3A%20aNumber%0A%09%3Cself.setTime%28aNumber%29%3E'), +messageSends: [], +referencedClasses: [] +}), +smalltalk.Date); + +smalltalk.addMethod( +unescape('_asDateString'), +smalltalk.method({ +selector: unescape('asDateString'), +category: 'converting', fn: function (){ var self=this; -return (($receiver = smalltalk.send(self, "_basicAt_", ["source"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver; +return self.toDateString(); return self;}, args: [], -source: unescape('source%0A%09%5E%28self%20basicAt%3A%20%27source%27%29%20ifNil%3A%20%5B%27%27%5D'), -messageSends: ["ifNil:", "basicAt:"], +source: unescape('asDateString%0A%09%3Creturn%20self.toDateString%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_source_'), +unescape('_asTimeString'), smalltalk.method({ -selector: unescape('source%3A'), -category: 'accessing', -fn: function (aString){ +selector: unescape('asTimeString'), +category: 'converting', +fn: function (){ var self=this; -smalltalk.send(self, "_basicAt_put_", ["source", aString]); +return self.toTimeString(); return self;}, -args: ["aString"], -source: unescape('source%3A%20aString%0A%09self%20basicAt%3A%20%27source%27%20put%3A%20aString'), -messageSends: ["basicAt:put:"], +args: [], +source: unescape('asTimeString%0A%09%3Creturn%20self.toTimeString%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_category'), +unescape('_asLocaleString'), smalltalk.method({ -selector: unescape('category'), -category: 'accessing', +selector: unescape('asLocaleString'), +category: 'converting', fn: function (){ var self=this; -return (($receiver = smalltalk.send(self, "_basicAt_", ["category"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver; +return self.toLocaleString(); return self;}, args: [], -source: unescape('category%0A%09%5E%28self%20basicAt%3A%20%27category%27%29%20ifNil%3A%20%5B%27%27%5D'), -messageSends: ["ifNil:", "basicAt:"], +source: unescape('asLocaleString%0A%09%3Creturn%20self.toLocaleString%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_category_'), +unescape('_asNumber'), smalltalk.method({ -selector: unescape('category%3A'), -category: 'accessing', -fn: function (aString){ +selector: unescape('asNumber'), +category: 'converting', +fn: function (){ var self=this; -smalltalk.send(self, "_basicAt_put_", ["category", aString]); +return smalltalk.send(self, "_asMilliseconds", []); return self;}, -args: ["aString"], -source: unescape('category%3A%20aString%0A%09self%20basicAt%3A%20%27category%27%20put%3A%20aString'), -messageSends: ["basicAt:put:"], +args: [], +source: unescape('asNumber%0A%09%5Eself%20asMilliseconds'), +messageSends: ["asMilliseconds"], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_selector'), +unescape('_hours_'), smalltalk.method({ -selector: unescape('selector'), +selector: unescape('hours%3A'), category: 'accessing', -fn: function (){ +fn: function (aNumber){ var self=this; -return smalltalk.send(self, "_basicAt_", ["selector"]); +self.setHours(aNumber); return self;}, -args: [], -source: unescape('selector%0A%09%5Eself%20basicAt%3A%20%27selector%27'), -messageSends: ["basicAt:"], +args: ["aNumber"], +source: unescape('hours%3A%20aNumber%0A%09%3Cself.setHours%28aNumber%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_selector_'), +unescape('_minutes_'), smalltalk.method({ -selector: unescape('selector%3A'), +selector: unescape('minutes%3A'), category: 'accessing', -fn: function (aString){ +fn: function (aNumber){ var self=this; -smalltalk.send(self, "_basicAt_put_", ["selector", aString]); +self.setMinutes(aNumber); return self;}, -args: ["aString"], -source: unescape('selector%3A%20aString%0A%09self%20basicAt%3A%20%27selector%27%20put%3A%20aString'), -messageSends: ["basicAt:put:"], +args: ["aNumber"], +source: unescape('minutes%3A%20aNumber%0A%09%3Cself.setMinutes%28aNumber%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_fn'), +unescape('_seconds_'), smalltalk.method({ -selector: unescape('fn'), +selector: unescape('seconds%3A'), category: 'accessing', -fn: function (){ +fn: function (aNumber){ var self=this; -return smalltalk.send(self, "_basicAt_", ["fn"]); +self.setSeconds(aNumber); return self;}, -args: [], -source: unescape('fn%0A%09%5Eself%20basicAt%3A%20%27fn%27'), -messageSends: ["basicAt:"], +args: ["aNumber"], +source: unescape('seconds%3A%20aNumber%0A%09%3Cself.setSeconds%28aNumber%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_fn_'), +unescape('_milliseconds_'), smalltalk.method({ -selector: unescape('fn%3A'), +selector: unescape('milliseconds%3A'), category: 'accessing', -fn: function (aBlock){ +fn: function (aNumber){ var self=this; -smalltalk.send(self, "_basicAt_put_", ["fn", aBlock]); +self.setMilliseconds(aNumber); return self;}, -args: ["aBlock"], -source: unescape('fn%3A%20aBlock%0A%09self%20basicAt%3A%20%27fn%27%20put%3A%20aBlock'), -messageSends: ["basicAt:put:"], +args: ["aNumber"], +source: unescape('milliseconds%3A%20aNumber%0A%09%3Cself.setMilliseconds%28aNumber%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_messageSends'), +unescape('_hours'), smalltalk.method({ -selector: unescape('messageSends'), +selector: unescape('hours'), category: 'accessing', fn: function (){ var self=this; -return smalltalk.send(self, "_basicAt_", ["messageSends"]); +return self.getHours(); return self;}, args: [], -source: unescape('messageSends%0A%09%5Eself%20basicAt%3A%20%27messageSends%27'), -messageSends: ["basicAt:"], +source: unescape('hours%0A%09%3Creturn%20self.getHours%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_methodClass'), +unescape('_minutes'), smalltalk.method({ -selector: unescape('methodClass'), +selector: unescape('minutes'), category: 'accessing', fn: function (){ var self=this; -return smalltalk.send(self, "_basicAt_", ["methodClass"]); +return self.getMinutes(); return self;}, args: [], -source: unescape('methodClass%0A%09%5Eself%20basicAt%3A%20%27methodClass%27'), -messageSends: ["basicAt:"], +source: unescape('minutes%0A%09%3Creturn%20self.getMinutes%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_referencedClasses'), +unescape('_seconds'), smalltalk.method({ -selector: unescape('referencedClasses'), +selector: unescape('seconds'), category: 'accessing', fn: function (){ var self=this; -return smalltalk.send(self, "_basicAt_", ["referencedClasses"]); +return self.getSeconds(); return self;}, args: [], -source: unescape('referencedClasses%0A%09%5Eself%20basicAt%3A%20%27referencedClasses%27'), -messageSends: ["basicAt:"], +source: unescape('seconds%0A%09%3Creturn%20self.getSeconds%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); +smalltalk.Date); smalltalk.addMethod( -unescape('_arguments'), +unescape('_milliseconds'), smalltalk.method({ -selector: unescape('arguments'), +selector: unescape('milliseconds'), category: 'accessing', fn: function (){ var self=this; -return self.args || []; +return self.getMilliseconds(); return self;}, args: [], -source: unescape('arguments%0A%09%3Creturn%20self.args%20%7C%7C%20%5B%5D%3E'), +source: unescape('milliseconds%0A%09%3Creturn%20self.getMilliseconds%28%29%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.CompiledMethod); - - +smalltalk.Date); -smalltalk.addClass('Number', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( -unescape('__eq'), +unescape('__lt'), smalltalk.method({ -selector: unescape('%3D'), +selector: unescape('%3C'), category: 'comparing', -fn: function (aNumber){ +fn: function (aDate){ var self=this; -try{((($receiver = smalltalk.send(smalltalk.send(aNumber, "_class", []), "__eq", [smalltalk.send(self, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})])); -return Number(self) == aNumber; -return self; -} catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}, -args: ["aNumber"], -source: unescape('%3D%20aNumber%0A%09aNumber%20class%20%3D%20self%20class%20ifFalse%3A%20%5B%5Efalse%5D.%20%0A%09%3Creturn%20Number%28self%29%20%3D%3D%20aNumber%3E'), -messageSends: ["ifFalse:", unescape("%3D"), "class"], +return self < aDate; +return self;}, +args: ["aDate"], +source: unescape('%3C%20aDate%0A%09%3Creturn%20self%20%3C%20aDate%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date); smalltalk.addMethod( unescape('__gt'), smalltalk.method({ selector: unescape('%3E'), category: 'comparing', -fn: function (aNumber){ +fn: function (aDate){ var self=this; -return self > aNumber; +return self > aDate; return self;}, -args: ["aNumber"], -source: unescape('%3E%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20%3E%3E%20aNumber%3E'), +args: ["aDate"], +source: unescape('%3E%20aDate%0A%09%3Creturn%20self%20%3E%3E%20aDate%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date); smalltalk.addMethod( -unescape('__lt'), +unescape('__lt_eq'), smalltalk.method({ -selector: unescape('%3C'), +selector: unescape('%3C%3D'), category: 'comparing', -fn: function (aNumber){ +fn: function (aDate){ var self=this; -return self < aNumber; +return self <= aDate; return self;}, -args: ["aNumber"], -source: unescape('%3C%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20%3C%20aNumber%3E'), +args: ["aDate"], +source: unescape('%3C%3D%20aDate%0A%09%3Creturn%20self%20%3C%3D%20aDate%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date); smalltalk.addMethod( unescape('__gt_eq'), smalltalk.method({ selector: unescape('%3E%3D'), category: 'comparing', -fn: function (aNumber){ +fn: function (aDate){ var self=this; -return self >= aNumber; +return self >= aDate; return self;}, -args: ["aNumber"], -source: unescape('%3E%3D%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20%3E%3E%3D%20aNumber%3E'), +args: ["aDate"], +source: unescape('%3E%3D%20aDate%0A%09%3Creturn%20self%20%3E%3E%3D%20aDate%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date); smalltalk.addMethod( -unescape('__lt_eq'), +unescape('__minus'), smalltalk.method({ -selector: unescape('%3C%3D'), -category: 'comparing', -fn: function (aNumber){ +selector: unescape('-'), +category: 'arithmetic', +fn: function (aDate){ var self=this; -return self <= aNumber; +return self - aDate; return self;}, -args: ["aNumber"], -source: unescape('%3C%3D%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20%3C%3D%20aNumber%3E'), +args: ["aDate"], +source: unescape('-%20aDate%0A%09%3Creturn%20self%20-%20aDate%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date); smalltalk.addMethod( unescape('__plus'), smalltalk.method({ selector: unescape('+'), category: 'arithmetic', -fn: function (aNumber){ -var self=this; -return self + aNumber; -return self;}, -args: ["aNumber"], -source: unescape('+%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20+%20aNumber%3E'), -messageSends: [], -referencedClasses: [] -}), -smalltalk.Number); - -smalltalk.addMethod( -unescape('__minus'), -smalltalk.method({ -selector: unescape('-'), -category: 'arithmetic', -fn: function (aNumber){ +fn: function (aDate){ var self=this; -return self - aNumber; -return self;}, -args: ["aNumber"], -source: unescape('-%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20-%20aNumber%3E'), +return self + aDate; +return self;}, +args: ["aDate"], +source: unescape('+%20aDate%0A%09%3Creturn%20self%20+%20aDate%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date); + smalltalk.addMethod( -unescape('__star'), +unescape('_new_'), smalltalk.method({ -selector: unescape('*'), -category: 'arithmetic', -fn: function (aNumber){ +selector: unescape('new%3A'), +category: 'instance creation', +fn: function (anObject){ var self=this; -return self * aNumber; +return new Date(anObject); return self;}, -args: ["aNumber"], -source: unescape('*%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20*%20aNumber%3E'), +args: ["anObject"], +source: unescape('new%3A%20anObject%0A%09%3Creturn%20new%20Date%28anObject%29%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date.klass); smalltalk.addMethod( -unescape('__slash'), +unescape('_fromString_'), smalltalk.method({ -selector: unescape('/'), -category: 'arithmetic', -fn: function (aNumber){ +selector: unescape('fromString%3A'), +category: 'instance creation', +fn: function (aString){ var self=this; -return self / aNumber; +return smalltalk.send(self, "_new_", [aString]); return self;}, -args: ["aNumber"], -source: unescape('/%20aNumber%0A%09%22Inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%20/%20aNumber%3E'), -messageSends: [], +args: ["aString"], +source: unescape('fromString%3A%20aString%0A%09%22Example%3A%20Date%20fromString%28%272011/04/15%2000%3A00%3A00%27%29%22%0A%09%5Eself%20new%3A%20aString'), +messageSends: ["new:"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date.klass); smalltalk.addMethod( -unescape('_max_'), +unescape('_fromSeconds_'), smalltalk.method({ -selector: unescape('max%3A'), -category: 'arithmetic', +selector: unescape('fromSeconds%3A'), +category: 'instance creation', fn: function (aNumber){ var self=this; -return Math.max(self, aNumber);; +return smalltalk.send(self, "_fromMilliseconds_", [((($receiver = aNumber).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))]); return self;}, args: ["aNumber"], -source: unescape('max%3A%20aNumber%0A%09%3Creturn%20Math.max%28self%2C%20aNumber%29%3B%3E'), -messageSends: [], +source: unescape('fromSeconds%3A%20aNumber%0A%09%5Eself%20fromMilliseconds%3A%20aNumber%20*%201000'), +messageSends: ["fromMilliseconds:", unescape("*")], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date.klass); smalltalk.addMethod( -unescape('_min_'), +unescape('_fromMilliseconds_'), smalltalk.method({ -selector: unescape('min%3A'), -category: 'arithmetic', +selector: unescape('fromMilliseconds%3A'), +category: 'instance creation', fn: function (aNumber){ var self=this; -return Math.min(self, aNumber);; +return smalltalk.send(self, "_new_", [aNumber]); return self;}, args: ["aNumber"], -source: unescape('min%3A%20aNumber%0A%09%3Creturn%20Math.min%28self%2C%20aNumber%29%3B%3E'), -messageSends: [], +source: unescape('fromMilliseconds%3A%20aNumber%0A%09%5Eself%20new%3A%20aNumber'), +messageSends: ["new:"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date.klass); smalltalk.addMethod( -unescape('_rounded'), +unescape('_today'), smalltalk.method({ -selector: unescape('rounded'), -category: 'converting', +selector: unescape('today'), +category: 'instance creation', fn: function (){ var self=this; -return Math.round(self);; +return smalltalk.send(self, "_new", []); return self;}, args: [], -source: unescape('rounded%0A%09%3Creturn%20Math.round%28self%29%3B%3E'), -messageSends: [], +source: unescape('today%0A%09%5Eself%20new'), +messageSends: ["new"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date.klass); smalltalk.addMethod( -unescape('_truncated'), +unescape('_now'), smalltalk.method({ -selector: unescape('truncated'), -category: 'converting', +selector: unescape('now'), +category: 'instance creation', fn: function (){ var self=this; -var result=nil; -((($receiver = self >= (0)).klass === smalltalk.Boolean) ? ($receiver ? (function(){return result = Math.floor(self);;})() : (function(){return result = (Math.floor(self * (-1)) * (-1));;})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return result = Math.floor(self);;}), (function(){return result = (Math.floor(self * (-1)) * (-1));;})])); -return result; +return smalltalk.send(self, "_today", []); return self;}, args: [], -source: unescape('truncated%0A%7Cresult%7C%0A%0A%20%20%20%20self%20%3E%3D%200%20%0A%20%20%20%20%20%20%20%20ifTrue%3A%20%5B%3Cresult%20%3D%20Math.floor%28self%29%3B%3E%5D%0A%20%20%20%20%20%20%20%20ifFalse%3A%20%5B%3Cresult%20%3D%20%28Math.floor%28self%20*%20%28-1%29%29%20*%20%28-1%29%29%3B%3E%5D.%0A%0A%20%20%20%20%5E%20result'), -messageSends: ["ifTrue:ifFalse:", unescape("%3E%3D")], +source: unescape('now%0A%09%5Eself%20today'), +messageSends: ["today"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Date.klass); smalltalk.addMethod( -unescape('_to_'), +unescape('_millisecondsToRun_'), smalltalk.method({ -selector: unescape('to%3A'), -category: 'converting', -fn: function (aNumber){ +selector: unescape('millisecondsToRun%3A'), +category: 'instance creation', +fn: function (aBlock){ var self=this; -var array=nil; -var first=nil; -var last=nil; -var count=nil; -first=smalltalk.send(self, "_truncated", []); -last=((($receiver = smalltalk.send(aNumber, "_truncated", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])); -count=(1); -array=smalltalk.send((smalltalk.Array || Array), "_new", []); -smalltalk.send(((($receiver = last).klass === smalltalk.Number) ? $receiver -first : smalltalk.send($receiver, "__minus", [first])), "_timesRepeat_", [(function(){smalltalk.send(array, "_at_put_", [count, first]);count=((($receiver = count).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));return first=((($receiver = first).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));})]); -return array; +var t=nil; +(t=smalltalk.send((smalltalk.Date || Date), "_now", [])); +smalltalk.send(aBlock, "_value", []); +return ((($receiver = smalltalk.send((smalltalk.Date || Date), "_now", [])).klass === smalltalk.Number) ? $receiver -t : smalltalk.send($receiver, "__minus", [t])); return self;}, -args: ["aNumber"], -source: unescape('to%3A%20aNumber%0A%09%7C%20array%20first%20last%20count%20%7C%0A%09first%20%3A%3D%20self%20truncated.%0A%09last%20%3A%3D%20aNumber%20truncated%20+%201.%0A%09count%20%3A%3D%201.%0A%09array%20%3A%3D%20Array%20new.%0A%09%28last%20-%20first%29%20timesRepeat%3A%20%5B%0A%09%20%20%20%20array%20at%3A%20count%20put%3A%20first.%0A%09%20%20%20%20count%20%3A%3D%20count%20+%201.%0A%09%20%20%20%20first%20%3A%3D%20first%20+%201%5D.%0A%09%5Earray'), -messageSends: ["truncated", unescape("+"), "new", "timesRepeat:", unescape("-"), "at:put:"], -referencedClasses: ["Array"] +args: ["aBlock"], +source: unescape('millisecondsToRun%3A%20aBlock%0A%09%7C%20t%20%7C%0A%09t%20%3A%3D%20Date%20now.%0A%09aBlock%20value.%0A%09%5EDate%20now%20-%20t'), +messageSends: ["now", "value", unescape("-")], +referencedClasses: ["Date"] }), -smalltalk.Number); +smalltalk.Date.klass); + +smalltalk.addClass('UndefinedObject', smalltalk.Object, [], 'Kernel-Objects'); +smalltalk.UndefinedObject.comment=unescape('UndefinedObject%20describes%20the%20behavior%20of%20its%20sole%20instance%2C%20%60nil%60.%20%60nil%60%20represents%20a%20prior%20value%20for%20variables%20that%20have%20not%20been%20initialized%2C%20or%20for%20results%20which%20are%20meaningless.%0A%0A%60nil%60%20is%20the%20Smalltalk%20representation%20of%20the%20%60undefined%60%20JavaScript%20object.') smalltalk.addMethod( -unescape('_timesRepeat_'), +unescape('_subclass_instanceVariableNames_'), smalltalk.method({ -selector: unescape('timesRepeat%3A'), -category: 'enumerating', -fn: function (aBlock){ +selector: unescape('subclass%3AinstanceVariableNames%3A'), +category: 'class creation', +fn: function (aString, anotherString){ var self=this; -var integer=nil; -var count=nil; -integer=smalltalk.send(self, "_truncated", []); -count=(1); -(function(){while(!(function(){return ((($receiver = count).klass === smalltalk.Number) ? $receiver >self : smalltalk.send($receiver, "__gt", [self]));})()) {(function(){smalltalk.send(aBlock, "_value", []);return count=((($receiver = count).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));})()}})(); +return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, anotherString, nil]); return self;}, -args: ["aBlock"], -source: unescape('timesRepeat%3A%20aBlock%0A%09%7C%20integer%20count%20%7C%0A%09integer%20%3A%3D%20self%20truncated.%0A%09count%20%3A%3D%201.%0A%09%5Bcount%20%3E%20self%5D%20whileFalse%3A%20%5B%0A%09%20%20%20%20aBlock%20value.%0A%09%20%20%20%20count%20%3A%3D%20count%20+%201%5D'), -messageSends: ["truncated", "whileFalse:", unescape("%3E"), "value", unescape("+")], +args: ["aString", "anotherString"], +source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%20package%3A%20nil'), +messageSends: ["subclass:instanceVariableNames:package:"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_to_do_'), +unescape('_subclass_instanceVariableNames_category_'), smalltalk.method({ -selector: unescape('to%3Ado%3A'), -category: 'enumerating', -fn: function (stop, aBlock){ +selector: unescape('subclass%3AinstanceVariableNames%3Acategory%3A'), +category: 'class creation', +fn: function (aString, aString2, aString3){ var self=this; -var nextValue=nil; -nextValue=self; -(function(){while((function(){return ((($receiver = nextValue).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [nextValue]);return nextValue=((($receiver = nextValue).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));})()}})(); +smalltalk.send(self, "_deprecatedAPI", []); +return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, aString2, aString3]); return self;}, -args: ["stop", "aBlock"], -source: unescape('to%3A%20stop%20do%3A%20aBlock%0A%09%22Evaluate%20aBlock%20for%20each%20number%20from%20self%20to%20aNumber.%22%0A%09%7C%20nextValue%20%7C%0A%09nextValue%20%3A%3D%20self.%0A%09%5BnextValue%20%3C%3D%20stop%5D%0A%09%09whileTrue%3A%20%0A%09%09%09%5BaBlock%20value%3A%20nextValue.%0A%09%09%09nextValue%20%3A%3D%20nextValue%20+%201%5D'), -messageSends: ["whileTrue:", unescape("%3C%3D"), "value:", unescape("+")], +args: ["aString", "aString2", "aString3"], +source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20category%3A%20aString3%0A%09%22Kept%20for%20compatibility.%22%0A%09self%20deprecatedAPI.%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), +messageSends: ["deprecatedAPI", "subclass:instanceVariableNames:package:"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_asString'), +unescape('_shallowCopy'), smalltalk.method({ -selector: unescape('asString'), -category: 'converting', +selector: unescape('shallowCopy'), +category: 'copying', fn: function (){ var self=this; -return smalltalk.send(self, "_printString", []); +return self; return self;}, args: [], -source: unescape('asString%0A%09%5Eself%20printString'), -messageSends: ["printString"], +source: unescape('shallowCopy%0A%09%5Eself'), +messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_asJavascript'), +unescape('_deepCopy'), smalltalk.method({ -selector: unescape('asJavascript'), -category: 'converting', +selector: unescape('deepCopy'), +category: 'copying', fn: function (){ var self=this; -return smalltalk.send(smalltalk.send(unescape("%28"), "__comma", [smalltalk.send(self, "_printString", [])]), "__comma", [unescape("%29")]); +return self; return self;}, args: [], -source: unescape('asJavascript%0A%09%5E%27%28%27%2C%20self%20printString%2C%20%27%29%27'), -messageSends: [unescape("%2C"), "printString"], +source: unescape('deepCopy%0A%09%5Eself'), +messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_printString'), +unescape('_ifNil_'), smalltalk.method({ -selector: unescape('printString'), -category: 'printing', -fn: function (){ +selector: unescape('ifNil%3A'), +category: 'testing', +fn: function (aBlock){ var self=this; -return String(self); +return smalltalk.send(self, "_ifNil_ifNotNil_", [aBlock, (function(){return nil;})]); return self;}, -args: [], -source: unescape('printString%0A%09%3Creturn%20String%28self%29%3E'), -messageSends: [], +args: ["aBlock"], +source: unescape('ifNil%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself%20ifNil%3A%20aBlock%20ifNotNil%3A%20%5B%5D'), +messageSends: ["ifNil:ifNotNil:"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_isNumber'), +unescape('_ifNotNil_'), smalltalk.method({ -selector: unescape('isNumber'), +selector: unescape('ifNotNil%3A'), category: 'testing', -fn: function (){ +fn: function (aBlock){ var self=this; -return true; +return self; return self;}, -args: [], -source: unescape('isNumber%0A%09%5Etrue'), +args: ["aBlock"], +source: unescape('ifNotNil%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_atRandom'), +unescape('_ifNil_ifNotNil_'), smalltalk.method({ -selector: unescape('atRandom'), -category: 'converting', -fn: function (){ +selector: unescape('ifNil%3AifNotNil%3A'), +category: 'testing', +fn: function (aBlock, anotherBlock){ var self=this; -return ((($receiver = smalltalk.send(((($receiver = smalltalk.send(smalltalk.send((smalltalk.Random || Random), "_new", []), "_next", [])).klass === smalltalk.Number) ? $receiver *self : smalltalk.send($receiver, "__star", [self])), "_truncated", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])); +return smalltalk.send(aBlock, "_value", []); return self;}, -args: [], -source: unescape('atRandom%0A%20%20%20%20%5E%28Random%20new%20next%20*%20self%29%20truncated%20+%201'), -messageSends: [unescape("+"), "truncated", unescape("*"), "next", "new"], -referencedClasses: ["Random"] +args: ["aBlock", "anotherBlock"], +source: unescape('ifNil%3A%20aBlock%20ifNotNil%3A%20anotherBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5EaBlock%20value'), +messageSends: ["value"], +referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('__at'), +unescape('_ifNotNil_ifNil_'), smalltalk.method({ -selector: unescape('@'), -category: 'converting', -fn: function (aNumber){ +selector: unescape('ifNotNil%3AifNil%3A'), +category: 'testing', +fn: function (aBlock, anotherBlock){ var self=this; -return smalltalk.send((smalltalk.Point || Point), "_x_y_", [self, aNumber]); +return smalltalk.send(anotherBlock, "_value", []); return self;}, -args: ["aNumber"], -source: unescape('@%20aNumber%0A%09%5EPoint%20x%3A%20self%20y%3A%20aNumber'), -messageSends: ["x:y:"], -referencedClasses: ["Point"] +args: ["aBlock", "anotherBlock"], +source: unescape('ifNotNil%3A%20aBlock%20ifNil%3A%20anotherBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5EanotherBlock%20value'), +messageSends: ["value"], +referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_asPoint'), +unescape('_isNil'), smalltalk.method({ -selector: unescape('asPoint'), -category: 'converting', +selector: unescape('isNil'), +category: 'testing', fn: function (){ var self=this; -return smalltalk.send((smalltalk.Point || Point), "_x_y_", [self, self]); +return true; return self;}, args: [], -source: unescape('asPoint%0A%09%5EPoint%20x%3A%20self%20y%3A%20self'), -messageSends: ["x:y:"], -referencedClasses: ["Point"] +source: unescape('isNil%0A%09%5Etrue'), +messageSends: [], +referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_clearInterval'), +unescape('_notNil'), smalltalk.method({ -selector: unescape('clearInterval'), -category: 'timeouts/intervals', +selector: unescape('notNil'), +category: 'testing', fn: function (){ var self=this; -clearInterval(Number(self)); +return false; return self;}, args: [], -source: unescape('clearInterval%0A%09%3CclearInterval%28Number%28self%29%29%3E'), +source: unescape('notNil%0A%09%5Efalse'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_asJSONObject'), +unescape('_printString'), smalltalk.method({ -selector: unescape('asJSONObject'), -category: 'converting', +selector: unescape('printString'), +category: 'printing', fn: function (){ var self=this; -return self; +return "nil"; return self;}, args: [], -source: unescape('asJSONObject%0A%09%5Eself'), +source: unescape('printString%0A%20%20%20%20%5E%27nil%27'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject); smalltalk.addMethod( -unescape('_clearTimeout'), +unescape('_subclass_instanceVariableNames_package_'), smalltalk.method({ -selector: unescape('clearTimeout'), -category: 'timeouts/intervals', +selector: unescape('subclass%3AinstanceVariableNames%3Apackage%3A'), +category: 'class creation', +fn: function (aString, aString2, aString3){ +var self=this; +return smalltalk.send(smalltalk.send((smalltalk.ClassBuilder || ClassBuilder), "_new", []), "_superclass_subclass_instanceVariableNames_package_", [self, aString, aString2, aString3]); +return self;}, +args: ["aString", "aString2", "aString3"], +source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3%0A%09%5EClassBuilder%20new%0A%09%20%20%20%20superclass%3A%20self%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), +messageSends: ["superclass:subclass:instanceVariableNames:package:", "new"], +referencedClasses: ["ClassBuilder"] +}), +smalltalk.UndefinedObject); + + +smalltalk.addMethod( +unescape('_new'), +smalltalk.method({ +selector: unescape('new'), +category: 'instance creation', fn: function (){ var self=this; -clearTimeout(Number(self)); +smalltalk.send(self, "_error_", ["You cannot create new instances of UndefinedObject. Use nil"]); return self;}, args: [], -source: unescape('clearTimeout%0A%09%3CclearTimeout%28Number%28self%29%29%3E'), -messageSends: [], +source: unescape('new%0A%09%20%20%20%20self%20error%3A%20%27You%20cannot%20create%20new%20instances%20of%20UndefinedObject.%20Use%20nil%27'), +messageSends: ["error:"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.UndefinedObject.klass); + +smalltalk.addClass('Random', smalltalk.Object, [], 'Kernel-Objects'); +smalltalk.Random.comment=unescape('%60Random%60%20is%20a%20random%20number%20generator%20and%20is%20implemented%20as%20a%20trivial%20wrapper%20around%20javascript%20%60Math.random%28%29%60%20and%20is%20used%20like%20this%3A%0A%0A%09Random%20new%20next%0A%0AThis%20will%20return%20a%20float%20x%20where%20x%20%3C%201%20and%20x%20%3E%200.%20If%20you%20want%20a%20random%20integer%20from%201%20to%2010%20you%20can%20use%20%60%23atRandom%60%0A%0A%0910%20atRandom%0A%0A...and%20if%20you%20want%20a%20random%20number%20in%20a%20specific%20interval%20this%20also%20works%3A%0A%0A%09%283%20to%3A%207%29%20atRandom%0A%0A...but%20be%20aware%20that%20%60%23to%3A%60%20does%20not%20create%20an%20Interval%20as%20in%20other%20Smalltalk%20implementations%20but%20in%20fact%20an%20%60Array%60%20of%20numbers%2C%20so%20it%27s%20better%20to%20use%3A%0A%0A%095%20atRandom%20+%202%0A%0ASince%20%60%23atRandom%60%20is%20implemented%20in%20%60SequencableCollection%60%20you%20can%20easy%20pick%20an%20element%20at%20random%3A%0A%0A%09%23%28%27a%27%20%27b%27%20%27c%27%29%20atRandom%0A%0A...or%20perhaps%20a%20letter%20from%20a%20%60String%60%3A%0A%0A%09%27abc%27%20atRandom%0A%0ASince%20Amber%20does%20not%20have%20Characters%20this%20will%20return%20a%20%60String%60%20of%20length%201%20like%20for%20example%20%60%27b%27%60.') smalltalk.addMethod( -unescape('_even'), +unescape('_next'), smalltalk.method({ -selector: unescape('even'), -category: 'testing', +selector: unescape('next'), +category: 'accessing', fn: function (){ var self=this; -return smalltalk.send((0), "__eq", [smalltalk.send(self, "_\\\\", [(2)])]); +return Math.random(); return self;}, args: [], -source: unescape('even%0A%09%5E%200%20%3D%20%28self%20%5C%5C%202%29'), -messageSends: [unescape("%3D"), unescape("%5C%5C%5C%5C")], +source: unescape('next%0A%09%3Creturn%20Math.random%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Random); smalltalk.addMethod( -unescape('_odd'), +unescape('_next_'), smalltalk.method({ -selector: unescape('odd'), -category: 'testing', -fn: function (){ +selector: unescape('next%3A'), +category: 'accessing', +fn: function (anInteger){ var self=this; -return smalltalk.send(smalltalk.send(self, "_even", []), "_not", []); +return smalltalk.send(smalltalk.send((1), "_to_", [anInteger]), "_collect_", [(function(each){return smalltalk.send(self, "_next", []);})]); return self;}, -args: [], -source: unescape('odd%0A%09%5E%20self%20even%20not'), -messageSends: ["not", "even"], +args: ["anInteger"], +source: unescape('next%3A%20anInteger%0A%20%20%20%20%5E%281%20to%3A%20anInteger%29%20collect%3A%20%5B%3Aeach%20%7C%20self%20next%5D'), +messageSends: ["collect:", "to:", "next"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Random); + + +smalltalk.addClass('Point', smalltalk.Object, ['x', 'y'], 'Kernel-Objects'); +smalltalk.Point.comment=unescape('A%20%60Point%60%20represents%20an%20x-y%20pair%20of%20numbers%20usually%20designating%20a%20geometric%20coordinate.%0APoints%20are%20traditionally%20created%20using%20the%20binary%20%60%23@%60%20message%20to%20a%20number%3A%0A%0A%09100@120%0A%0APoints%20can%20then%20be%20arithmetically%20manipulated%3A%0A%0A%09100@100%20+%20%2810@10%29%0A%0A...or%20for%20example%3A%0A%0A%09%28100@100%29%20*%202%0A%0A**NOTE%3A**%20Creating%20a%20Point%20with%20a%20negative%20y-value%20will%20need%20a%20space%20after%20%60@%60%20in%20order%20to%20avoid%20a%20parsing%20error%3A%0A%0A%09100@%20-100%20%22but%20100@-100%20would%20not%20parse%22%0A%0AAmber%20does%20not%20have%20much%20behavior%20in%20this%20class%20out-of-the-box.') smalltalk.addMethod( -unescape('_negated'), +unescape('_x'), smalltalk.method({ -selector: unescape('negated'), -category: 'arithmetic', +selector: unescape('x'), +category: 'accessing', fn: function (){ var self=this; -return (0) - self; +return self['@x']; return self;}, args: [], -source: unescape('negated%0A%09%5E0%20-%20self'), -messageSends: [unescape("-")], +source: unescape('x%0A%09%5Ex'), +messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('__eq_eq'), +unescape('_y'), smalltalk.method({ -selector: unescape('%3D%3D'), -category: 'comparing', -fn: function (aNumber){ +selector: unescape('y'), +category: 'accessing', +fn: function (){ var self=this; -try{((($receiver = smalltalk.send(smalltalk.send(aNumber, "_class", []), "__eq", [smalltalk.send(self, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq_eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq_eq', fn: function(){return false}})})();})])); -return Number(self) === Number(aNumber); -return self; -} catch(e) {if(e.name === 'stReturn' && e.selector === '__eq_eq'){return e.fn()} throw(e)}}, -args: ["aNumber"], -source: unescape('%3D%3D%20aNumber%0A%09aNumber%20class%20%3D%20self%20class%20ifFalse%3A%20%5B%5Efalse%5D.%20%0A%09%3Creturn%20Number%28self%29%20%3D%3D%3D%20Number%28aNumber%29%3E'), -messageSends: ["ifFalse:", unescape("%3D"), "class"], +return self['@y']; +return self;}, +args: [], +source: unescape('y%0A%09%5Ey'), +messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_printShowingDecimalPlaces_'), +unescape('_y_'), smalltalk.method({ -selector: unescape('printShowingDecimalPlaces%3A'), -category: 'printing', -fn: function (placesDesired){ +selector: unescape('y%3A'), +category: 'accessing', +fn: function (aNumber){ var self=this; -return self.toFixed(placesDesired); +(self['@y']=aNumber); return self;}, -args: ["placesDesired"], -source: unescape('printShowingDecimalPlaces%3A%20placesDesired%0A%09%3Creturn%20self.toFixed%28placesDesired%29%3E'), +args: ["aNumber"], +source: unescape('y%3A%20aNumber%0A%09y%20%3A%3D%20aNumber'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_%5C'), +unescape('_x_'), smalltalk.method({ -selector: unescape('%5C'), -category: '', +selector: unescape('x%3A'), +category: 'accessing', fn: function (aNumber){ var self=this; -return self % aNumber; +(self['@x']=aNumber); return self;}, args: ["aNumber"], -source: unescape(''), +source: unescape('x%3A%20aNumber%0A%09x%20%3A%3D%20aNumber'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_to_by_'), +unescape('__star'), smalltalk.method({ -selector: unescape('to%3Aby%3A'), -category: 'converting', -fn: function (stop, step){ +selector: unescape('*'), +category: 'arithmetic', +fn: function (aPoint){ var self=this; -var array=nil; -var value=nil; -var pos=nil; -value=self; -array=smalltalk.send((smalltalk.Array || Array), "_new", []); -pos=(1); -((($receiver = smalltalk.send(step, "__eq", [(0)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_error_", [unescape("step%20must%20be%20non-zero")]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self, "_error_", [unescape("step%20must%20be%20non-zero")]);})])); -((($receiver = ((($receiver = step).klass === smalltalk.Number) ? $receiver <(0) : smalltalk.send($receiver, "__lt", [(0)]))).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver >=stop : smalltalk.send($receiver, "__gt_eq", [stop]));})()) {(function(){smalltalk.send(array, "_at_put_", [pos, value]);pos=((($receiver = pos).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));return value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step]));})()}})();})() : (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(array, "_at_put_", [pos, value]);pos=((($receiver = pos).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));return value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step]));})()}})();})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver >=stop : smalltalk.send($receiver, "__gt_eq", [stop]));})()) {(function(){smalltalk.send(array, "_at_put_", [pos, value]);pos=((($receiver = pos).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));return value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step]));})()}})();}), (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(array, "_at_put_", [pos, value]);pos=((($receiver = pos).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));return value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step]));})()}})();})])); -return array; +return smalltalk.send((smalltalk.Point || Point), "_x_y_", [((($receiver = smalltalk.send(self, "_x", [])).klass === smalltalk.Number) ? $receiver *smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", []) : smalltalk.send($receiver, "__star", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", [])])), ((($receiver = smalltalk.send(self, "_y", [])).klass === smalltalk.Number) ? $receiver *smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", []) : smalltalk.send($receiver, "__star", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", [])]))]); return self;}, -args: ["stop", "step"], -source: unescape('to%3A%20stop%20by%3A%20step%0A%09%7C%20array%20value%20pos%20%7C%0A%09value%20%3A%3D%20self.%0A%09array%20%3A%3D%20Array%20new.%0A%09pos%20%3A%3D%201.%0A%09step%20%3D%200%20ifTrue%3A%20%5Bself%20error%3A%20%27step%20must%20be%20non-zero%27%5D.%0A%09step%20%3C%200%0A%09%09ifTrue%3A%20%5B%5B%20value%20%3E%3D%20stop%20%5D%20whileTrue%3A%20%5B%0A%09%20%20%20%20%09%09%09array%20at%3A%20pos%20put%3A%20value.%0A%09%20%20%20%20%09%09%09pos%20%3A%3D%20pos%20+%201.%0A%09%20%20%20%20%09%09%09value%20%3A%3D%20value%20+%20step%5D%5D%0A%09%09ifFalse%3A%20%5B%5B%20value%20%3C%3D%20stop%20%5D%20whileTrue%3A%20%5B%0A%09%20%20%20%20%09%09%09array%20at%3A%20pos%20put%3A%20value.%0A%09%20%20%09%09%09pos%20%3A%3D%20pos%20+%201.%0A%09%20%20%20%20%09%09%09value%20%3A%3D%20value%20+%20step%5D%5D.%0A%09%5Earray'), -messageSends: ["new", "ifTrue:", unescape("%3D"), "error:", "ifTrue:ifFalse:", unescape("%3C"), "whileTrue:", unescape("%3E%3D"), "at:put:", unescape("+"), unescape("%3C%3D")], -referencedClasses: ["Array"] +args: ["aPoint"], +source: unescape('*%20aPoint%0A%09%5EPoint%20x%3A%20self%20x%20*%20aPoint%20asPoint%20x%20y%3A%20self%20y%20*%20aPoint%20asPoint%20y'), +messageSends: ["x:y:", unescape("*"), "x", "asPoint", "y"], +referencedClasses: ["Point"] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_to_by_do_'), +unescape('__plus'), smalltalk.method({ -selector: unescape('to%3Aby%3Ado%3A'), -category: 'enumerating', -fn: function (stop, step, aBlock){ +selector: unescape('+'), +category: 'arithmetic', +fn: function (aPoint){ var self=this; -var value=nil; -value=self; -((($receiver = smalltalk.send(step, "__eq", [(0)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self, "_error_", [unescape("step%20must%20be%20non-zero")]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self, "_error_", [unescape("step%20must%20be%20non-zero")]);})])); -((($receiver = ((($receiver = step).klass === smalltalk.Number) ? $receiver <(0) : smalltalk.send($receiver, "__lt", [(0)]))).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver >=stop : smalltalk.send($receiver, "__gt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [value]);return value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step]));})()}})();})() : (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [value]);return value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step]));})()}})();})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver >=stop : smalltalk.send($receiver, "__gt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [value]);return value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step]));})()}})();}), (function(){return (function(){while((function(){return ((($receiver = value).klass === smalltalk.Number) ? $receiver <=stop : smalltalk.send($receiver, "__lt_eq", [stop]));})()) {(function(){smalltalk.send(aBlock, "_value_", [value]);return value=((($receiver = value).klass === smalltalk.Number) ? $receiver +step : smalltalk.send($receiver, "__plus", [step]));})()}})();})])); +return smalltalk.send((smalltalk.Point || Point), "_x_y_", [((($receiver = smalltalk.send(self, "_x", [])).klass === smalltalk.Number) ? $receiver +smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", []) : smalltalk.send($receiver, "__plus", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", [])])), ((($receiver = smalltalk.send(self, "_y", [])).klass === smalltalk.Number) ? $receiver +smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", []) : smalltalk.send($receiver, "__plus", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", [])]))]); return self;}, -args: ["stop", "step", "aBlock"], -source: unescape('to%3A%20stop%20by%3A%20step%20do%3A%20aBlock%0A%09%7C%20value%20%7C%0A%09value%20%3A%3D%20self.%0A%09step%20%3D%200%20ifTrue%3A%20%5Bself%20error%3A%20%27step%20must%20be%20non-zero%27%5D.%0A%09step%20%3C%200%0A%09%09ifTrue%3A%20%5B%5B%20value%20%3E%3D%20stop%20%5D%20whileTrue%3A%20%5B%0A%09%20%20%20%20%09%09%09aBlock%20value%3A%20value.%0A%09%20%20%20%20%09%09%09value%20%3A%3D%20value%20+%20step%5D%5D%0A%09%09ifFalse%3A%20%5B%5B%20value%20%3C%3D%20stop%20%5D%20whileTrue%3A%20%5B%0A%09%20%20%20%20%09%09%09aBlock%20value%3A%20value.%0A%09%20%20%20%20%09%09%09value%20%3A%3D%20value%20+%20step%5D%5D'), -messageSends: ["ifTrue:", unescape("%3D"), "error:", "ifTrue:ifFalse:", unescape("%3C"), "whileTrue:", unescape("%3E%3D"), "value:", unescape("+"), unescape("%3C%3D")], -referencedClasses: [] +args: ["aPoint"], +source: unescape('+%20aPoint%0A%09%5EPoint%20x%3A%20self%20x%20+%20aPoint%20asPoint%20x%20y%3A%20self%20y%20+%20aPoint%20asPoint%20y'), +messageSends: ["x:y:", unescape("+"), "x", "asPoint", "y"], +referencedClasses: ["Point"] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_deepCopy'), +unescape('__minus'), smalltalk.method({ -selector: unescape('deepCopy'), -category: 'copying', -fn: function (){ +selector: unescape('-'), +category: 'arithmetic', +fn: function (aPoint){ var self=this; -return smalltalk.send(self, "_copy", []); +return smalltalk.send((smalltalk.Point || Point), "_x_y_", [((($receiver = smalltalk.send(self, "_x", [])).klass === smalltalk.Number) ? $receiver -smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", []) : smalltalk.send($receiver, "__minus", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", [])])), ((($receiver = smalltalk.send(self, "_y", [])).klass === smalltalk.Number) ? $receiver -smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", []) : smalltalk.send($receiver, "__minus", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", [])]))]); return self;}, -args: [], -source: unescape('deepCopy%0A%09%5Eself%20copy'), -messageSends: ["copy"], -referencedClasses: [] +args: ["aPoint"], +source: unescape('-%20aPoint%0A%09%5EPoint%20x%3A%20self%20x%20-%20aPoint%20asPoint%20x%20y%3A%20self%20y%20-%20aPoint%20asPoint%20y'), +messageSends: ["x:y:", unescape("-"), "x", "asPoint", "y"], +referencedClasses: ["Point"] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_copy'), +unescape('__slash'), smalltalk.method({ -selector: unescape('copy'), -category: 'copying', -fn: function (){ +selector: unescape('/'), +category: 'arithmetic', +fn: function (aPoint){ var self=this; -return self; +return smalltalk.send((smalltalk.Point || Point), "_x_y_", [((($receiver = smalltalk.send(self, "_x", [])).klass === smalltalk.Number) ? $receiver /smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", []) : smalltalk.send($receiver, "__slash", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", [])])), ((($receiver = smalltalk.send(self, "_y", [])).klass === smalltalk.Number) ? $receiver /smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", []) : smalltalk.send($receiver, "__slash", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", [])]))]); return self;}, -args: [], -source: unescape('copy%0A%09%5Eself'), -messageSends: [], -referencedClasses: [] +args: ["aPoint"], +source: unescape('/%20aPoint%0A%09%5EPoint%20x%3A%20self%20x%20/%20aPoint%20asPoint%20x%20y%3A%20self%20y%20/%20aPoint%20asPoint%20y'), +messageSends: ["x:y:", unescape("/"), "x", "asPoint", "y"], +referencedClasses: ["Point"] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_%5C%5C'), +unescape('_asPoint'), smalltalk.method({ -selector: unescape('%5C%5C'), -category: 'arithmetic', -fn: function (aNumber){ +selector: unescape('asPoint'), +category: 'converting', +fn: function (){ var self=this; -return self % aNumber; +return self; return self;}, -args: ["aNumber"], -source: unescape('%5C%5C%20aNumber%0A%09%3Creturn%20self%20%25%20aNumber%3E'), +args: [], +source: unescape('asPoint%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_sqrt'), +unescape('__eq'), smalltalk.method({ -selector: unescape('sqrt'), +selector: unescape('%3D'), category: 'arithmetic', -fn: function (){ +fn: function (aPoint){ var self=this; -return Math.sqrt(self); +return smalltalk.send(smalltalk.send(smalltalk.send(aPoint, "_class", []), "__eq", [smalltalk.send(self, "_class", [])]), "_and_", [(function(){return smalltalk.send(smalltalk.send(smalltalk.send(aPoint, "_x", []), "__eq", [smalltalk.send(self, "_x", [])]), "_&", [smalltalk.send(smalltalk.send(aPoint, "_y", []), "__eq", [smalltalk.send(self, "_y", [])])]);})]); return self;}, -args: [], -source: unescape('sqrt%0A%09%3Creturn%20Math.sqrt%28self%29%3E'), -messageSends: [], +args: ["aPoint"], +source: unescape('%3D%20aPoint%0A%09%5EaPoint%20class%20%3D%20self%20class%20and%3A%20%5B%0A%09%09%28aPoint%20x%20%3D%20self%20x%29%20%26%20%28aPoint%20y%20%3D%20self%20y%29%5D'), +messageSends: ["and:", unescape("%3D"), "class", unescape("%26"), "x", "y"], referencedClasses: [] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_squared'), +unescape('_printString'), smalltalk.method({ -selector: unescape('squared'), -category: 'arithmetic', +selector: unescape('printString'), +category: 'printing', fn: function (){ var self=this; -return self * self; +return smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(stream){smalltalk.send(stream, "_nextPutAll_", [smalltalk.send(smalltalk.send(self['@x'], "_printString", []), "__comma", [unescape("@")])]);((($receiver = smalltalk.send(smalltalk.send(self['@y'], "_notNil", []), "_and_", [(function(){return smalltalk.send(self['@y'], "_negative", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(stream, "_space", []);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(stream, "_space", []);})]));return smalltalk.send(stream, "_nextPutAll_", [smalltalk.send(self['@y'], "_printString", [])]);})]); return self;}, args: [], -source: unescape('squared%0A%09%5Eself%20*%20self'), -messageSends: [unescape("*")], -referencedClasses: [] +source: unescape('printString%0A%09%22Print%20receiver%20in%20classic%20x@y%20notation.%22%0A%0A%09%5EString%20streamContents%3A%20%5B%3Astream%20%7C%0A%09%09stream%20nextPutAll%3A%20x%20printString%2C%20%27@%27.%0A%09%09%28y%20notNil%20and%3A%20%5By%20negative%5D%29%0A%09%09%09ifTrue%3A%20%5B%0A%09%09%09%09%22Avoid%20ambiguous%20@-%20construct%22%0A%09%09%09%09stream%20space%5D.%0A%09%09stream%20nextPutAll%3A%20y%20printString%5D'), +messageSends: ["streamContents:", "nextPutAll:", unescape("%2C"), "printString", "ifTrue:", "and:", "notNil", "negative", "space"], +referencedClasses: ["String"] }), -smalltalk.Number); +smalltalk.Point); smalltalk.addMethod( -unescape('_pi'), +unescape('_x_y_'), smalltalk.method({ -selector: unescape('pi'), +selector: unescape('x%3Ay%3A'), category: 'instance creation', -fn: function (){ +fn: function (aNumber, anotherNumber){ var self=this; -return Math.PI; +return (function($rec){smalltalk.send($rec, "_x_", [aNumber]);smalltalk.send($rec, "_y_", [anotherNumber]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, -args: [], -source: unescape('pi%0A%09%3Creturn%20Math.PI%3E'), -messageSends: [], +args: ["aNumber", "anotherNumber"], +source: unescape('x%3A%20aNumber%20y%3A%20anotherNumber%0A%09%5Eself%20new%0A%09%09x%3A%20aNumber%3B%0A%09%09y%3A%20anotherNumber%3B%0A%09%09yourself'), +messageSends: ["x:", "y:", "yourself", "new"], referencedClasses: [] }), -smalltalk.Number.klass); +smalltalk.Point.klass); -smalltalk.addClass('BlockClosure', smalltalk.Object, [], 'Kernel'); +smalltalk.addClass('JSObjectProxy', smalltalk.Object, ['jsObject'], 'Kernel-Objects'); +smalltalk.JSObjectProxy.comment=unescape('JSObjectProxy%20handles%20sending%20messages%20to%20JavaScript%20object%2C%20therefore%20accessing%20JavaScript%20objects%20from%20Amber%20is%20transparent.%0AJSOjbectProxy%20makes%20intensive%20use%20of%20%60%23doesNotUnderstand%3A%60.%0A%0A%23%23%20Examples%0A%0AJSObjectProxy%20objects%20are%20instanciated%20by%20Amber%20when%20a%20Smalltalk%20message%20is%20sent%20to%20a%20JavaScript%20object.%0A%0A%20%20%20%20window%20alert%3A%20%27hello%20world%27.%0A%20%20%20%20window%20inspect.%0A%20%20%20%20%28window%20jQuery%3A%20%27body%27%29%20append%3A%20%27hello%20world%27%0A%0ASmalltalk%20messages%20sends%20are%20converted%20to%20JavaScript%20function%20calls%20or%20object%20property%20access%20_%28in%20this%20order%29_.%20If%20n%20one%20of%20them%20match%2C%20a%20%60MessageNotUnderstood%60%20error%20will%20be%20thrown.%20%0A%0A%23%23%20Message%20conversion%20rules%0A%0A-%20%60someUser%20name%60%20becomes%20%20%60someUser.name%60%0A-%20%60someUser%20name%3A%20%27John%27%60%20becomes%20%60someUser%20name%20%3D%20%22John%22%60%0A-%20%60console%20log%3A%20%27hello%20world%27%60%20becomes%20%60console.log%28%27hello%20world%27%29%60%0A-%20%60%28window%20jQuery%3A%20%27foo%27%29%20css%3A%20%27background%27%20color%3A%20%27red%27%60%20becomes%20%60window.jQuery%28%27foo%27%29.css%28%27background%27%2C%20%27red%27%29%60%0A%0A__Note%3A__%20For%20keyword-based%20messages%2C%20only%20the%20first%20keyword%20is%20kept%3A%20%60window%20foo%3A%201%20bar%3A%202%60%20is%20equivalent%20to%20%60window%20foo%3A%201%20baz%3A%202%60.') smalltalk.addMethod( -unescape('_compiledSource'), +unescape('_jsObject_'), smalltalk.method({ -selector: unescape('compiledSource'), +selector: unescape('jsObject%3A'), category: 'accessing', -fn: function (){ +fn: function (aJSObject){ var self=this; -return self.toString(); +(self['@jsObject']=aJSObject); return self;}, -args: [], -source: unescape('compiledSource%0A%09%3Creturn%20self.toString%28%29%3E'), +args: ["aJSObject"], +source: unescape('jsObject%3A%20aJSObject%0A%09jsObject%20%3A%3D%20aJSObject'), messageSends: [], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.JSObjectProxy); smalltalk.addMethod( -unescape('_whileTrue_'), +unescape('_jsObject'), smalltalk.method({ -selector: unescape('whileTrue%3A'), -category: 'controlling', -fn: function (aBlock){ +selector: unescape('jsObject'), +category: 'accessing', +fn: function (){ var self=this; -while(self()) {aBlock()}; +return self['@jsObject']; return self;}, -args: ["aBlock"], -source: unescape('whileTrue%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Cwhile%28self%28%29%29%20%7BaBlock%28%29%7D%3E'), +args: [], +source: unescape('jsObject%0A%09%5EjsObject'), messageSends: [], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.JSObjectProxy); smalltalk.addMethod( -unescape('_whileFalse_'), +unescape('_printString'), smalltalk.method({ -selector: unescape('whileFalse%3A'), -category: 'controlling', -fn: function (aBlock){ +selector: unescape('printString'), +category: 'proxy', +fn: function (){ var self=this; -while(!self()) {aBlock()}; +return smalltalk.send(smalltalk.send(self, "_jsObject", []), "_toString", []); return self;}, -args: ["aBlock"], -source: unescape('whileFalse%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Cwhile%28%21self%28%29%29%20%7BaBlock%28%29%7D%3E'), -messageSends: [], +args: [], +source: unescape('printString%0A%09%5Eself%20jsObject%20toString'), +messageSends: ["toString", "jsObject"], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.JSObjectProxy); smalltalk.addMethod( -unescape('_value'), +unescape('_inspectOn_'), smalltalk.method({ -selector: unescape('value'), -category: 'evaluating', -fn: function (){ +selector: unescape('inspectOn%3A'), +category: 'proxy', +fn: function (anInspector){ var self=this; -return self();; +var variables=nil; +(variables=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", [])); +smalltalk.send(variables, "_at_put_", [unescape("%23self"), smalltalk.send(self, "_jsObject", [])]); +smalltalk.send(anInspector, "_setLabel_", [smalltalk.send(self, "_printString", [])]); +for(var i in self['@jsObject']) { + variables._at_put_(i, self['@jsObject'][i]); + }; +smalltalk.send(anInspector, "_setVariables_", [variables]); return self;}, -args: [], -source: unescape('value%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%28%29%3B%3E'), -messageSends: [], -referencedClasses: [] +args: ["anInspector"], +source: unescape('inspectOn%3A%20anInspector%0A%09%7C%20variables%20%7C%0A%09variables%20%3A%3D%20Dictionary%20new.%0A%09variables%20at%3A%20%27%23self%27%20put%3A%20self%20jsObject.%0A%09anInspector%20setLabel%3A%20self%20printString.%0A%09%3Cfor%28var%20i%20in%20self%5B%27@jsObject%27%5D%29%20%7B%0A%09%09variables._at_put_%28i%2C%20self%5B%27@jsObject%27%5D%5Bi%5D%29%3B%0A%09%7D%3E.%0A%09anInspector%20setVariables%3A%20variables'), +messageSends: ["new", "at:put:", "jsObject", "setLabel:", "printString", "setVariables:"], +referencedClasses: ["Dictionary"] }), -smalltalk.BlockClosure); +smalltalk.JSObjectProxy); smalltalk.addMethod( -unescape('_value_'), +unescape('_doesNotUnderstand_'), smalltalk.method({ -selector: unescape('value%3A'), -category: 'evaluating', -fn: function (anArg){ +selector: unescape('doesNotUnderstand%3A'), +category: 'proxy', +fn: function (aMessage){ var self=this; -return self(anArg);; +var obj=nil; +var selector=nil; +var jsSelector=nil; +var arguments=nil; +(obj=smalltalk.send(self, "_jsObject", [])); +(selector=smalltalk.send(aMessage, "_selector", [])); +(jsSelector=smalltalk.send(selector, "_asJavaScriptSelector", [])); +(arguments=smalltalk.send(aMessage, "_arguments", [])); +if(obj[jsSelector] != undefined) {return smalltalk.send(obj, jsSelector, arguments)}; +smalltalk.send(self, "_doesNotUnderstand_", [aMessage], smalltalk.Object); return self;}, -args: ["anArg"], -source: unescape('value%3A%20anArg%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%28anArg%29%3B%3E'), -messageSends: [], +args: ["aMessage"], +source: unescape('doesNotUnderstand%3A%20aMessage%0A%09%7C%20obj%20selector%20jsSelector%20arguments%20%7C%0A%09obj%20%3A%3D%20self%20jsObject.%0A%09selector%20%3A%3D%20aMessage%20selector.%0A%09jsSelector%20%3A%3D%20selector%20asJavaScriptSelector.%0A%09arguments%20%3A%3D%20aMessage%20arguments.%0A%09%3Cif%28obj%5BjsSelector%5D%20%21%3D%20undefined%29%20%7Breturn%20smalltalk.send%28obj%2C%20jsSelector%2C%20arguments%29%7D%3E.%0A%09super%20doesNotUnderstand%3A%20aMessage'), +messageSends: ["jsObject", "selector", "asJavaScriptSelector", "arguments", "doesNotUnderstand:"], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.JSObjectProxy); smalltalk.addMethod( -unescape('_value_value_'), +unescape('_at_'), smalltalk.method({ -selector: unescape('value%3Avalue%3A'), -category: 'evaluating', -fn: function (firstArg, secondArg){ +selector: unescape('at%3A'), +category: 'accessing', +fn: function (aSymbol){ var self=this; -return self(firstArg, secondArg);; +var attr=nil; +(attr=smalltalk.send(aSymbol, "_asString", [])); +return self['@jsObject'][attr]; return self;}, -args: ["firstArg", "secondArg"], -source: unescape('value%3A%20firstArg%20value%3A%20secondArg%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%28firstArg%2C%20secondArg%29%3B%3E'), -messageSends: [], +args: ["aSymbol"], +source: unescape('at%3A%20aSymbol%0A%09%7C%20attr%20%7C%0A%09attr%20%3A%3D%20aSymbol%20asString.%0A%09%3Creturn%20self%5B%27@jsObject%27%5D%5Battr%5D%3E'), +messageSends: ["asString"], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.JSObjectProxy); smalltalk.addMethod( -unescape('_value_value_value_'), +unescape('_at_put_'), smalltalk.method({ -selector: unescape('value%3Avalue%3Avalue%3A'), -category: 'evaluating', -fn: function (firstArg, secondArg, thirdArg){ +selector: unescape('at%3Aput%3A'), +category: 'accessing', +fn: function (aSymbol, anObject){ var self=this; -return self(firstArg, secondArg, thirdArg);; +var attr=nil; +(attr=smalltalk.send(aSymbol, "_asString", [])); +self['@jsObject'][attr] = anObject; return self;}, -args: ["firstArg", "secondArg", "thirdArg"], -source: unescape('value%3A%20firstArg%20value%3A%20secondArg%20value%3A%20thirdArg%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%28firstArg%2C%20secondArg%2C%20thirdArg%29%3B%3E'), -messageSends: [], +args: ["aSymbol", "anObject"], +source: unescape('at%3A%20aSymbol%20put%3A%20anObject%0A%09%7C%20attr%20%7C%0A%09attr%20%3A%3D%20aSymbol%20asString.%0A%09%3Cself%5B%27@jsObject%27%5D%5Battr%5D%20%3D%20anObject%3E'), +messageSends: ["asString"], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.JSObjectProxy); + smalltalk.addMethod( -unescape('_valueWithPossibleArguments_'), +unescape('_on_'), smalltalk.method({ -selector: unescape('valueWithPossibleArguments%3A'), -category: 'evaluating', -fn: function (aCollection){ +selector: unescape('on%3A'), +category: 'instance creation', +fn: function (aJSObject){ var self=this; -return self.apply(null, aCollection);; +return (function($rec){smalltalk.send($rec, "_jsObject_", [aJSObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, -args: ["aCollection"], -source: unescape('valueWithPossibleArguments%3A%20aCollection%0A%09%3Creturn%20self.apply%28null%2C%20aCollection%29%3B%3E'), -messageSends: [], +args: ["aJSObject"], +source: unescape('on%3A%20aJSObject%0A%09%5Eself%20new%0A%09%09jsObject%3A%20aJSObject%3B%0A%09%09yourself'), +messageSends: ["jsObject:", "yourself", "new"], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.JSObjectProxy.klass); + +smalltalk.addPackage('Kernel-Classes', {}); +smalltalk.addClass('Behavior', smalltalk.Object, [], 'Kernel-Classes'); +smalltalk.Behavior.comment=unescape('Behavior%20is%20the%20superclass%20of%20all%20class%20objects.%20%0A%0AIt%20defines%20the%20protocol%20for%20creating%20instances%20of%20a%20class%20with%20%60%23basicNew%60%20and%20%60%23new%60%20%28see%20%60boot.js%60%20for%20class%20constructors%20details%29.%0AInstances%20know%20about%20the%20subclass/superclass%20relationships%20between%20classes%2C%20contain%20the%20description%20that%20instances%20are%20created%20from%2C%20%0Aand%20hold%20the%20method%20dictionary%20that%27s%20associated%20with%20each%20class.%0A%0ABehavior%20also%20%20provides%20methods%20for%20compiling%20methods%2C%20examining%20the%20method%20dictionary%2C%20and%20iterating%20over%20the%20class%20hierarchy.') smalltalk.addMethod( -unescape('_on_do_'), +unescape('_new'), smalltalk.method({ -selector: unescape('on%3Ado%3A'), -category: 'error handling', -fn: function (anErrorClass, aBlock){ +selector: unescape('new'), +category: 'instance creation', +fn: function (){ var self=this; -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 smalltalk.send(smalltalk.send(self, "_basicNew", []), "_initialize", []); return self;}, -args: ["anErrorClass", "aBlock"], -source: unescape('on%3A%20anErrorClass%20do%3A%20aBlock%0A%09self%20try%3A%20self%20catch%3A%20%5B%3Aerror%20%7C%0A%09%20%20%20%20%28error%20isKindOf%3A%20anErrorClass%29%20%0A%09%20%20%20%20%20ifTrue%3A%20%5BaBlock%20value%3A%20error%5D%0A%09%20%20%20%20%20ifFalse%3A%20%5Berror%20signal%5D%5D'), -messageSends: ["try:catch:", "ifTrue:ifFalse:", "isKindOf:", "value:", "signal"], +args: [], +source: unescape('new%0A%09%5Eself%20basicNew%20initialize'), +messageSends: ["initialize", "basicNew"], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_valueWithTimeout_'), +unescape('_basicNew'), smalltalk.method({ -selector: unescape('valueWithTimeout%3A'), -category: 'timeout/interval', -fn: function (aNumber){ +selector: unescape('basicNew'), +category: 'instance creation', +fn: function (){ var self=this; -return setTimeout(self, aNumber); +return new self.fn(); return self;}, -args: ["aNumber"], -source: unescape('valueWithTimeout%3A%20aNumber%0A%09%3Creturn%20setTimeout%28self%2C%20aNumber%29%3E'), +args: [], +source: unescape('basicNew%0A%09%3Creturn%20new%20self.fn%28%29%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_valueWithInterval_'), +unescape('_name'), smalltalk.method({ -selector: unescape('valueWithInterval%3A'), -category: 'timeout/interval', -fn: function (aNumber){ +selector: unescape('name'), +category: 'accessing', +fn: function (){ var self=this; -return setInterval(self, aNumber); +return self.className || nil; return self;}, -args: ["aNumber"], -source: unescape('valueWithInterval%3A%20aNumber%0A%09%3Creturn%20setInterval%28self%2C%20aNumber%29%3E'), +args: [], +source: unescape('name%0A%09%3Creturn%20self.className%20%7C%7C%20nil%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_whileFalse'), +unescape('_superclass'), smalltalk.method({ -selector: unescape('whileFalse'), -category: 'controlling', +selector: unescape('superclass'), +category: 'accessing', fn: function (){ var self=this; -smalltalk.send(self, "_whileFalse_", [(function(){return nil;})]); +return self.superclass || nil; return self;}, args: [], -source: unescape('whileFalse%0A%09%22inlined%20in%20the%20Compiler%22%0A%09self%20whileFalse%3A%20%5B%5D'), -messageSends: ["whileFalse:"], +source: unescape('superclass%0A%09%3Creturn%20self.superclass%20%7C%7C%20nil%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_whileTrue'), +unescape('_subclasses'), smalltalk.method({ -selector: unescape('whileTrue'), -category: 'controlling', +selector: unescape('subclasses'), +category: 'accessing', fn: function (){ var self=this; -smalltalk.send(self, "_whileTrue_", [(function(){return nil;})]); +return smalltalk.subclasses(self); return self;}, args: [], -source: unescape('whileTrue%0A%09%22inlined%20in%20the%20Compiler%22%0A%09self%20whileTrue%3A%20%5B%5D'), -messageSends: ["whileTrue:"], +source: unescape('subclasses%0A%09%3Creturn%20smalltalk.subclasses%28self%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_new'), +unescape('_allSubclasses'), smalltalk.method({ -selector: unescape('new'), -category: 'evaluating', +selector: unescape('allSubclasses'), +category: 'accessing', fn: function (){ var self=this; -return new self(); +var result=nil; +(result=smalltalk.send(self, "_subclasses", [])); +smalltalk.send(smalltalk.send(self, "_subclasses", []), "_do_", [(function(each){return smalltalk.send(result, "_addAll_", [smalltalk.send(each, "_allSubclasses", [])]);})]); +return result; return self;}, args: [], -source: unescape('new%0A%09%22Use%20the%20receiver%20as%20a%20JS%20constructor.%20%0A%09*Do%20not*%20use%20this%20method%20to%20instanciate%20Smalltalk%20objects%21%22%0A%09%3Creturn%20new%20self%28%29%3E'), -messageSends: [], +source: unescape('allSubclasses%0A%09%7C%20result%20%7C%0A%09result%20%3A%3D%20self%20subclasses.%0A%09self%20subclasses%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20result%20addAll%3A%20each%20allSubclasses%5D.%0A%09%5Eresult'), +messageSends: ["subclasses", "do:", "addAll:", "allSubclasses"], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_applyTo_arguments_'), +unescape('_withAllSubclasses'), smalltalk.method({ -selector: unescape('applyTo%3Aarguments%3A'), -category: 'evaluating', -fn: function (anObject, aCollection){ +selector: unescape('withAllSubclasses'), +category: 'accessing', +fn: function (){ var self=this; -return self.apply(anObject, aCollection); +return (function($rec){smalltalk.send($rec, "_addAll_", [smalltalk.send(self, "_allSubclasses", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.Array || Array), "_with_", [self])); return self;}, -args: ["anObject", "aCollection"], -source: unescape('applyTo%3A%20anObject%20arguments%3A%20aCollection%0A%09%3Creturn%20self.apply%28anObject%2C%20aCollection%29%3E'), -messageSends: [], -referencedClasses: [] +args: [], +source: unescape('withAllSubclasses%0A%09%5E%28Array%20with%3A%20self%29%20addAll%3A%20self%20allSubclasses%3B%20yourself'), +messageSends: ["addAll:", "allSubclasses", "yourself", "with:"], +referencedClasses: ["Array"] }), -smalltalk.BlockClosure); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_timeToRun'), +unescape('_prototype'), smalltalk.method({ -selector: unescape('timeToRun'), -category: 'evaluating', +selector: unescape('prototype'), +category: 'accessing', fn: function (){ var self=this; -return smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [self]); +return self.fn.prototype; return self;}, args: [], -source: unescape('timeToRun%0A%09%22Answer%20the%20number%20of%20milliseconds%20taken%20to%20execute%20this%20block.%22%0A%0A%09%5E%20Date%20millisecondsToRun%3A%20self'), -messageSends: ["millisecondsToRun:"], -referencedClasses: ["Date"] +source: unescape('prototype%0A%09%3Creturn%20self.fn.prototype%3E'), +messageSends: [], +referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_numArgs'), +unescape('_methodDictionary'), smalltalk.method({ -selector: unescape('numArgs'), +selector: unescape('methodDictionary'), category: 'accessing', fn: function (){ var self=this; -return self.length; +var dict = smalltalk.HashedCollection._new(); + var methods = self.fn.prototype.methods; + for(var i in methods) { + if(methods[i].selector) { + dict._at_put_(methods[i].selector, methods[i]); + } + }; + return dict; return self;}, args: [], -source: unescape('numArgs%0A%09%3Creturn%20self.length%3E'), +source: unescape('methodDictionary%0A%09%3Cvar%20dict%20%3D%20smalltalk.HashedCollection._new%28%29%3B%0A%09var%20methods%20%3D%20self.fn.prototype.methods%3B%0A%09for%28var%20i%20in%20methods%29%20%7B%0A%09%09if%28methods%5Bi%5D.selector%29%20%7B%0A%09%09%09dict._at_put_%28methods%5Bi%5D.selector%2C%20methods%5Bi%5D%29%3B%0A%09%09%7D%0A%09%7D%3B%0A%09return%20dict%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.BlockClosure); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_ensure_'), +unescape('_methodsFor_'), smalltalk.method({ -selector: unescape('ensure%3A'), -category: 'evaluating', -fn: function (aBlock){ +selector: unescape('methodsFor%3A'), +category: 'accessing', +fn: function (aString){ var self=this; -var success=nil; -success=false; -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 (function($rec){smalltalk.send($rec, "_class_category_", [self, aString]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.ClassCategoryReader || ClassCategoryReader), "_new", [])); return self;}, -args: ["aBlock"], -source: unescape('ensure%3A%20aBlock%0A%09%7C%20success%20%7C%0A%09success%20%3A%3D%20false.%0A%09%5Bself%20value.%20success%20%3A%3D%20true.%20aBlock%20value%5D%0A%09%09on%3A%20Error%0A%09%09do%3A%20%5B%3Aex%20%7C%0A%09%09%09success%20ifFalse%3A%20%5BaBlock%20value%5D.%0A%09%09%09ex%20signal%5D'), -messageSends: ["on:do:", "value", "ifFalse:", "signal"], -referencedClasses: ["Error"] +args: ["aString"], +source: unescape('methodsFor%3A%20aString%0A%09%5EClassCategoryReader%20new%0A%09%20%20%20%20class%3A%20self%20category%3A%20aString%3B%0A%09%20%20%20%20yourself'), +messageSends: ["class:category:", "yourself", "new"], +referencedClasses: ["ClassCategoryReader"] }), -smalltalk.BlockClosure); - - +smalltalk.Behavior); -smalltalk.addClass('Boolean', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( -unescape('__eq'), +unescape('_addCompiledMethod_'), smalltalk.method({ -selector: unescape('%3D'), -category: 'comparing', -fn: function (aBoolean){ +selector: unescape('addCompiledMethod%3A'), +category: 'compiling', +fn: function (aMethod){ var self=this; -try{((($receiver = smalltalk.send(smalltalk.send(aBoolean, "_class", []), "__eq", [smalltalk.send(self, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})])); -return Boolean(self == true) == aBoolean; -return self; -} catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}, -args: ["aBoolean"], -source: unescape('%3D%20aBoolean%0A%09aBoolean%20class%20%3D%20self%20class%20ifFalse%3A%20%5B%5Efalse%5D.%0A%09%3Creturn%20Boolean%28self%20%3D%3D%20true%29%20%3D%3D%20aBoolean%3E'), -messageSends: ["ifFalse:", unescape("%3D"), "class"], +smalltalk.addMethod(aMethod.selector._asSelector(), aMethod, self); +return self;}, +args: ["aMethod"], +source: unescape('addCompiledMethod%3A%20aMethod%0A%09%3Csmalltalk.addMethod%28aMethod.selector._asSelector%28%29%2C%20aMethod%2C%20self%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_shallowCopy'), +unescape('_instanceVariableNames'), smalltalk.method({ -selector: unescape('shallowCopy'), -category: 'copying', +selector: unescape('instanceVariableNames'), +category: 'accessing', fn: function (){ var self=this; -return self; +return self.iVarNames; return self;}, args: [], -source: unescape('shallowCopy%0A%09%5Eself'), +source: unescape('instanceVariableNames%0A%09%3Creturn%20self.iVarNames%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_deepCopy'), +unescape('_comment'), smalltalk.method({ -selector: unescape('deepCopy'), -category: 'copying', +selector: unescape('comment'), +category: 'accessing', fn: function (){ var self=this; -return self; +return (($receiver = smalltalk.send(self, "_basicAt_", ["comment"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver; return self;}, args: [], -source: unescape('deepCopy%0A%09%5Eself'), -messageSends: [], +source: unescape('comment%0A%20%20%20%20%5E%28self%20basicAt%3A%20%27comment%27%29%20ifNil%3A%20%5B%27%27%5D'), +messageSends: ["ifNil:", "basicAt:"], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_ifTrue_'), +unescape('_comment_'), smalltalk.method({ -selector: unescape('ifTrue%3A'), -category: 'controlling', -fn: function (aBlock){ +selector: unescape('comment%3A'), +category: 'accessing', +fn: function (aString){ var self=this; -return smalltalk.send(self, "_ifTrue_ifFalse_", [aBlock, (function(){return nil;})]); +smalltalk.send(self, "_basicAt_put_", ["comment", aString]); return self;}, -args: ["aBlock"], -source: unescape('ifTrue%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself%20ifTrue%3A%20aBlock%20ifFalse%3A%20%5B%5D'), -messageSends: ["ifTrue:ifFalse:"], +args: ["aString"], +source: unescape('comment%3A%20aString%0A%20%20%20%20self%20basicAt%3A%20%27comment%27%20put%3A%20aString'), +messageSends: ["basicAt:put:"], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_ifFalse_'), +unescape('_commentStamp'), smalltalk.method({ -selector: unescape('ifFalse%3A'), -category: 'controlling', -fn: function (aBlock){ +selector: unescape('commentStamp'), +category: 'accessing', +fn: function (){ var self=this; -return smalltalk.send(self, "_ifTrue_ifFalse_", [(function(){return nil;}), aBlock]); +return (function($rec){smalltalk.send($rec, "_class_", [self]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send((smalltalk.ClassCommentReader || ClassCommentReader), "_new", [])); return self;}, -args: ["aBlock"], -source: unescape('ifFalse%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself%20ifTrue%3A%20%5B%5D%20ifFalse%3A%20aBlock'), -messageSends: ["ifTrue:ifFalse:"], -referencedClasses: [] +args: [], +source: unescape('commentStamp%0A%20%20%20%20%5EClassCommentReader%20new%0A%09class%3A%20self%3B%0A%09yourself'), +messageSends: ["class:", "yourself", "new"], +referencedClasses: ["ClassCommentReader"] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_ifFalse_ifTrue_'), +unescape('_removeCompiledMethod_'), smalltalk.method({ -selector: unescape('ifFalse%3AifTrue%3A'), -category: 'controlling', -fn: function (aBlock, anotherBlock){ +selector: unescape('removeCompiledMethod%3A'), +category: 'compiling', +fn: function (aMethod){ var self=this; -return smalltalk.send(self, "_ifTrue_ifFalse_", [anotherBlock, aBlock]); +delete self.fn.prototype[aMethod.selector._asSelector()]; + delete self.fn.prototype.methods[aMethod.selector]; + smalltalk.init(self);; return self;}, -args: ["aBlock", "anotherBlock"], -source: unescape('ifFalse%3A%20aBlock%20ifTrue%3A%20anotherBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself%20ifTrue%3A%20anotherBlock%20ifFalse%3A%20aBlock'), -messageSends: ["ifTrue:ifFalse:"], +args: ["aMethod"], +source: unescape('removeCompiledMethod%3A%20aMethod%0A%09%3Cdelete%20self.fn.prototype%5BaMethod.selector._asSelector%28%29%5D%3B%0A%09delete%20self.fn.prototype.methods%5BaMethod.selector%5D%3B%0A%09smalltalk.init%28self%29%3B%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_ifTrue_ifFalse_'), +unescape('_inheritsFrom_'), smalltalk.method({ -selector: unescape('ifTrue%3AifFalse%3A'), -category: 'controlling', -fn: function (aBlock, anotherBlock){ +selector: unescape('inheritsFrom%3A'), +category: 'testing', +fn: function (aClass){ var self=this; - - if(self == true) { - return aBlock(); - } else { - return anotherBlock(); - } - ; +return smalltalk.send(smalltalk.send(aClass, "_allSubclasses", []), "_includes_", [self]); return self;}, -args: ["aBlock", "anotherBlock"], -source: unescape('ifTrue%3A%20aBlock%20ifFalse%3A%20anotherBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3C%0A%09%20%20%20%20if%28self%20%3D%3D%20true%29%20%7B%0A%09%09return%20aBlock%28%29%3B%0A%09%20%20%20%20%7D%20else%20%7B%0A%09%09return%20anotherBlock%28%29%3B%0A%09%20%20%20%20%7D%0A%09%3E'), -messageSends: [], +args: ["aClass"], +source: unescape('inheritsFrom%3A%20aClass%0A%09%5EaClass%20allSubclasses%20includes%3A%20self'), +messageSends: ["includes:", "allSubclasses"], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_and_'), +unescape('_protocols'), smalltalk.method({ -selector: unescape('and%3A'), -category: 'controlling', -fn: function (aBlock){ +selector: unescape('protocols'), +category: 'accessing', +fn: function (){ var self=this; -return smalltalk.send(smalltalk.send(self, "__eq", [true]), "_ifTrue_ifFalse_", [aBlock, (function(){return false;})]); +var protocols=nil; +(protocols=smalltalk.send((smalltalk.Array || Array), "_new", [])); +smalltalk.send(smalltalk.send(self, "_methodDictionary", []), "_do_", [(function(each){return ((($receiver = smalltalk.send(protocols, "_includes_", [smalltalk.send(each, "_category", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(protocols, "_add_", [smalltalk.send(each, "_category", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(protocols, "_add_", [smalltalk.send(each, "_category", [])]);})]));})]); +return smalltalk.send(protocols, "_sort", []); return self;}, -args: ["aBlock"], -source: unescape('and%3A%20aBlock%0A%09%5Eself%20%3D%20true%0A%09%20%20%20%20ifTrue%3A%20aBlock%0A%09%20%20%20%20ifFalse%3A%20%5Bfalse%5D'), -messageSends: ["ifTrue:ifFalse:", unescape("%3D")], -referencedClasses: [] +args: [], +source: unescape('protocols%0A%20%20%20%20%7C%20protocols%20%7C%0A%20%20%20%20protocols%20%3A%3D%20Array%20new.%0A%20%20%20%20self%20methodDictionary%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20%28protocols%20includes%3A%20each%20category%29%20ifFalse%3A%20%5B%0A%09%09protocols%20add%3A%20each%20category%5D%5D.%0A%20%20%20%20%5Eprotocols%20sort'), +messageSends: ["new", "do:", "methodDictionary", "ifFalse:", "includes:", "category", "add:", "sort"], +referencedClasses: ["Array"] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_or_'), +unescape('_protocolsDo_'), smalltalk.method({ -selector: unescape('or%3A'), -category: 'controlling', +selector: unescape('protocolsDo%3A'), +category: 'accessing', fn: function (aBlock){ var self=this; -return smalltalk.send(smalltalk.send(self, "__eq", [true]), "_ifTrue_ifFalse_", [(function(){return true;}), aBlock]); +var methodsByCategory=nil; +(methodsByCategory=smalltalk.send((smalltalk.HashedCollection || HashedCollection), "_new", [])); +smalltalk.send(smalltalk.send(smalltalk.send(self, "_methodDictionary", []), "_values", []), "_do_", [(function(m){return smalltalk.send(smalltalk.send(methodsByCategory, "_at_ifAbsentPut_", [smalltalk.send(m, "_category", []), (function(){return smalltalk.send((smalltalk.Array || Array), "_new", []);})]), "_add_", [m]);})]); +smalltalk.send(smalltalk.send(self, "_protocols", []), "_do_", [(function(category){return smalltalk.send(aBlock, "_value_value_", [category, smalltalk.send(methodsByCategory, "_at_", [category])]);})]); return self;}, args: ["aBlock"], -source: unescape('or%3A%20aBlock%0A%09%5Eself%20%3D%20true%0A%09%20%20%20%20ifTrue%3A%20%5Btrue%5D%0A%09%20%20%20%20ifFalse%3A%20aBlock'), -messageSends: ["ifTrue:ifFalse:", unescape("%3D")], -referencedClasses: [] +source: unescape('protocolsDo%3A%20aBlock%0A%09%22Execute%20aBlock%20for%20each%20method%20category%20with%0A%09its%20collection%20of%20methods%20in%20the%20sort%20order%20of%20category%20name.%22%0A%0A%09%7C%20methodsByCategory%20%7C%0A%09methodsByCategory%20%3A%3D%20HashedCollection%20new.%0A%09self%20methodDictionary%20values%20do%3A%20%5B%3Am%20%7C%0A%09%09%28methodsByCategory%20at%3A%20m%20category%20ifAbsentPut%3A%20%5BArray%20new%5D%29%0A%20%09%09%09add%3A%20m%5D.%20%0A%09self%20protocols%20do%3A%20%5B%3Acategory%20%7C%0A%09%09aBlock%20value%3A%20category%20value%3A%20%28methodsByCategory%20at%3A%20category%29%5D'), +messageSends: ["new", "do:", "values", "methodDictionary", "add:", "at:ifAbsentPut:", "category", "protocols", "value:value:", "at:"], +referencedClasses: ["HashedCollection", "Array"] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_not'), +unescape('_allInstanceVariableNames'), smalltalk.method({ -selector: unescape('not'), -category: 'controlling', +selector: unescape('allInstanceVariableNames'), +category: 'accessing', fn: function (){ var self=this; -return smalltalk.send(self, "__eq", [false]); +var result=nil; +(result=smalltalk.send(smalltalk.send(self, "_instanceVariableNames", []), "_copy", [])); +(($receiver = smalltalk.send(self, "_superclass", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(result, "_addAll_", [smalltalk.send(smalltalk.send(self, "_superclass", []), "_allInstanceVariableNames", [])]);})() : nil; +return result; return self;}, args: [], -source: unescape('not%0A%09%5Eself%20%3D%20false'), -messageSends: [unescape("%3D")], +source: unescape('allInstanceVariableNames%0A%09%7C%20result%20%7C%0A%09result%20%3A%3D%20self%20instanceVariableNames%20copy.%0A%09self%20superclass%20ifNotNil%3A%20%5B%0A%09%20%20%20%20result%20addAll%3A%20self%20superclass%20allInstanceVariableNames%5D.%0A%09%5Eresult'), +messageSends: ["copy", "instanceVariableNames", "ifNotNil:", "superclass", "addAll:", "allInstanceVariableNames"], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_printString'), +unescape('_methodAt_'), smalltalk.method({ -selector: unescape('printString'), -category: 'printing', -fn: function (){ +selector: unescape('methodAt%3A'), +category: 'accessing', +fn: function (aString){ var self=this; -return self.toString(); +return smalltalk.methods(self)[aString]; return self;}, -args: [], -source: unescape('printString%0A%09%3Creturn%20self.toString%28%29%3E'), +args: ["aString"], +source: unescape('methodAt%3A%20aString%0A%09%3Creturn%20smalltalk.methods%28self%29%5BaString%5D%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_asJSONObject'), +unescape('_methodsFor_stamp_'), smalltalk.method({ -selector: unescape('asJSONObject'), -category: 'converting', -fn: function (){ +selector: unescape('methodsFor%3Astamp%3A'), +category: 'accessing', +fn: function (aString, aStamp){ var self=this; -return self; +return smalltalk.send(self, "_methodsFor_", [aString]); return self;}, -args: [], -source: unescape('asJSONObject%0A%09%5Eself'), -messageSends: [], +args: ["aString", "aStamp"], +source: unescape('methodsFor%3A%20aString%20stamp%3A%20aStamp%0A%09%22Added%20for%20compatibility%2C%20right%20now%20ignores%20stamp.%22%0A%09%5Eself%20methodsFor%3A%20aString'), +messageSends: ["methodsFor:"], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_%26'), +unescape('_commentStamp_prior_'), smalltalk.method({ -selector: unescape('%26'), -category: 'controlling', -fn: function (aBoolean){ +selector: unescape('commentStamp%3Aprior%3A'), +category: 'accessing', +fn: function (aStamp, prior){ var self=this; - - if(self == true) { - return aBoolean; - } else { - return false; - } - ; +return smalltalk.send(self, "_commentStamp", []); return self;}, -args: ["aBoolean"], -source: unescape('%26%20aBoolean%0A%09%3C%0A%09%20%20%20%20if%28self%20%3D%3D%20true%29%20%7B%0A%09%09return%20aBoolean%3B%0A%09%20%20%20%20%7D%20else%20%7B%0A%09%09return%20false%3B%0A%09%20%20%20%20%7D%0A%09%3E'), -messageSends: [], +args: ["aStamp", "prior"], +source: unescape('commentStamp%3A%20aStamp%20prior%3A%20prior%0A%20%20%20%20%20%20%20%20%5Eself%20commentStamp'), +messageSends: ["commentStamp"], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('_%7C'), +unescape('_compile_'), smalltalk.method({ -selector: unescape('%7C'), -category: 'controlling', -fn: function (aBoolean){ +selector: unescape('compile%3A'), +category: 'compiling', +fn: function (aString){ var self=this; - - if(self == true) { - return true; - } else { - return aBoolean; - } - ; +smalltalk.send(self, "_compile_category_", [aString, ""]); return self;}, -args: ["aBoolean"], -source: unescape('%7C%20aBoolean%0A%09%3C%0A%09%20%20%20%20if%28self%20%3D%3D%20true%29%20%7B%0A%09%09return%20true%3B%0A%09%20%20%20%20%7D%20else%20%7B%0A%09%09return%20aBoolean%3B%0A%09%20%20%20%20%7D%0A%09%3E'), -messageSends: [], +args: ["aString"], +source: unescape('compile%3A%20aString%0A%09self%20compile%3A%20aString%20category%3A%20%27%27'), +messageSends: ["compile:category:"], referencedClasses: [] }), -smalltalk.Boolean); +smalltalk.Behavior); smalltalk.addMethod( -unescape('__eq_eq'), +unescape('_compile_category_'), smalltalk.method({ -selector: unescape('%3D%3D'), -category: 'comparing', -fn: function (aBoolean){ +selector: unescape('compile%3Acategory%3A'), +category: 'compiling', +fn: function (aString, anotherString){ var self=this; -try{((($receiver = smalltalk.send(smalltalk.send(aBoolean, "_class", []), "__eq", [smalltalk.send(self, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq_eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq_eq', fn: function(){return false}})})();})])); -return Boolean(self == true) === Boolean(aBoolean == true); -return self; -} catch(e) {if(e.name === 'stReturn' && e.selector === '__eq_eq'){return e.fn()} throw(e)}}, -args: ["aBoolean"], -source: unescape('%3D%3D%20aBoolean%0A%09aBoolean%20class%20%3D%20self%20class%20ifFalse%3A%20%5B%5Efalse%5D.%0A%09%3Creturn%20Boolean%28self%20%3D%3D%20true%29%20%3D%3D%3D%20Boolean%28aBoolean%20%3D%3D%20true%29%3E'), -messageSends: ["ifFalse:", unescape("%3D"), "class"], -referencedClasses: [] +var method=nil; +(method=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [aString, self])); +smalltalk.send(method, "_category_", [anotherString]); +smalltalk.send(self, "_addCompiledMethod_", [method]); +return self;}, +args: ["aString", "anotherString"], +source: unescape('compile%3A%20aString%20category%3A%20anotherString%0A%09%7C%20method%20%7C%0A%09method%20%3A%3D%20Compiler%20new%20load%3A%20aString%20forClass%3A%20self.%0A%09method%20category%3A%20anotherString.%0A%09self%20addCompiledMethod%3A%20method'), +messageSends: ["load:forClass:", "new", "category:", "addCompiledMethod:"], +referencedClasses: ["Compiler"] }), -smalltalk.Boolean); +smalltalk.Behavior); -smalltalk.addClass('Date', smalltalk.Object, [], 'Kernel'); -smalltalk.Date.comment=unescape('The%20Date%20class%20is%20used%20to%20work%20with%20dates%20and%20times.') +smalltalk.addClass('Class', smalltalk.Behavior, [], 'Kernel-Classes'); +smalltalk.Class.comment=unescape('Class%20is%20__the__%20class%20object.%20%0A%0AInstances%20are%20the%20classes%20of%20the%20system.%0AClass%20creation%20is%20done%20throught%20a%20%60ClassBuilder%60') smalltalk.addMethod( -unescape('_year'), +unescape('_category'), smalltalk.method({ -selector: unescape('year'), +selector: unescape('category'), category: 'accessing', fn: function (){ var self=this; -return self.getFullYear(); +return (($receiver = smalltalk.send(self, "_package", [])) == nil || $receiver == undefined) ? (function(){return "Unclassified";})() : (function(){return smalltalk.send(smalltalk.send(self, "_package", []), "_name", []);})(); return self;}, args: [], -source: unescape('year%0A%09%3Creturn%20self.getFullYear%28%29%3E'), -messageSends: [], +source: unescape('category%0A%09%5Eself%20package%20ifNil%3A%20%5B%27Unclassified%27%5D%20ifNotNil%3A%20%5Bself%20package%20name%5D'), +messageSends: ["ifNil:ifNotNil:", "package", "name"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Class); smalltalk.addMethod( -unescape('_month'), +unescape('_subclass_instanceVariableNames_'), smalltalk.method({ -selector: unescape('month'), -category: 'accessing', -fn: function (){ +selector: unescape('subclass%3AinstanceVariableNames%3A'), +category: 'class creation', +fn: function (aString, anotherString){ var self=this; -return self.getMonth() + 1; +return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, anotherString, nil]); return self;}, -args: [], -source: unescape('month%0A%09%3Creturn%20self.getMonth%28%29%20+%201%3E'), -messageSends: [], +args: ["aString", "anotherString"], +source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%0A%09%22Kept%20for%20compatibility.%22%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%20package%3A%20nil'), +messageSends: ["subclass:instanceVariableNames:package:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Class); smalltalk.addMethod( -unescape('_month_'), +unescape('_subclass_instanceVariableNames_category_'), smalltalk.method({ -selector: unescape('month%3A'), -category: 'accessing', -fn: function (aNumber){ +selector: unescape('subclass%3AinstanceVariableNames%3Acategory%3A'), +category: 'class creation', +fn: function (aString, aString2, aString3){ var self=this; -self.setMonth(aNumber - 1); +smalltalk.send(self, "_deprecatedAPI", []); +return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, aString2, aString3]); return self;}, -args: ["aNumber"], -source: unescape('month%3A%20aNumber%0A%09%3Cself.setMonth%28aNumber%20-%201%29%3E'), -messageSends: [], +args: ["aString", "aString2", "aString3"], +source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20category%3A%20aString3%0A%09%22Kept%20for%20compatibility.%22%0A%09self%20deprecatedAPI.%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), +messageSends: ["deprecatedAPI", "subclass:instanceVariableNames:package:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Class); smalltalk.addMethod( -unescape('_day'), +unescape('_isClass'), smalltalk.method({ -selector: unescape('day'), -category: 'accessing', +selector: unescape('isClass'), +category: 'testing', fn: function (){ var self=this; -return smalltalk.send(self, "_dayOfWeek", []); +return true; return self;}, args: [], -source: unescape('day%0A%09%5Eself%20dayOfWeek'), -messageSends: ["dayOfWeek"], +source: unescape('isClass%0A%09%5Etrue'), +messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Class); smalltalk.addMethod( -unescape('_dayOfWeek'), +unescape('_printString'), smalltalk.method({ -selector: unescape('dayOfWeek'), -category: 'accessing', +selector: unescape('printString'), +category: 'printing', fn: function (){ var self=this; -return self.getDay() + 1; +return smalltalk.send(self, "_name", []); return self;}, args: [], -source: unescape('dayOfWeek%0A%09%3Creturn%20self.getDay%28%29%20+%201%3E'), +source: unescape('printString%0A%09%5Eself%20name'), +messageSends: ["name"], +referencedClasses: [] +}), +smalltalk.Class); + +smalltalk.addMethod( +unescape('_rename_'), +smalltalk.method({ +selector: unescape('rename%3A'), +category: 'accessing', +fn: function (aString){ +var self=this; + + smalltalk[aString] = self; + delete smalltalk[self.className]; + self.className = aString; + ; +return self;}, +args: ["aString"], +source: unescape('rename%3A%20aString%0A%09%3C%0A%09%09smalltalk%5BaString%5D%20%3D%20self%3B%0A%09%09delete%20smalltalk%5Bself.className%5D%3B%0A%09%09self.className%20%3D%20aString%3B%0A%09%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Class); smalltalk.addMethod( -unescape('_dayOfWeek_'), +unescape('_subclass_instanceVariableNames_classVariableNames_poolDictionaries_category_'), smalltalk.method({ -selector: unescape('dayOfWeek%3A'), +selector: unescape('subclass%3AinstanceVariableNames%3AclassVariableNames%3ApoolDictionaries%3Acategory%3A'), +category: 'class creation', +fn: function (aString, aString2, classVars, pools, aString3){ +var self=this; +return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, aString2, aString3]); +return self;}, +args: ["aString", "aString2", "classVars", "pools", "aString3"], +source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20classVariableNames%3A%20classVars%20poolDictionaries%3A%20pools%20category%3A%20aString3%0A%09%22Just%20ignore%20class%20variables%20and%20pools.%20Added%20for%20compatibility.%22%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), +messageSends: ["subclass:instanceVariableNames:package:"], +referencedClasses: [] +}), +smalltalk.Class); + +smalltalk.addMethod( +unescape('_package'), +smalltalk.method({ +selector: unescape('package'), category: 'accessing', -fn: function (aNumber){ +fn: function (){ var self=this; -return self.setDay(aNumber - 1); +return self.pkg; return self;}, -args: ["aNumber"], -source: unescape('dayOfWeek%3A%20aNumber%0A%09%3Creturn%20self.setDay%28aNumber%20-%201%29%3E'), +args: [], +source: unescape('package%0A%09%3Creturn%20self.pkg%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Class); smalltalk.addMethod( -unescape('_day_'), +unescape('_package_'), smalltalk.method({ -selector: unescape('day%3A'), +selector: unescape('package%3A'), category: 'accessing', -fn: function (aNumber){ +fn: function (aPackage){ var self=this; -smalltalk.send(self, "_day_", [aNumber]); +self.pkg = aPackage; return self;}, -args: ["aNumber"], -source: unescape('day%3A%20aNumber%0A%09self%20day%3A%20aNumber'), -messageSends: ["day:"], +args: ["aPackage"], +source: unescape('package%3A%20aPackage%0A%09%3Cself.pkg%20%3D%20aPackage%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Class); smalltalk.addMethod( -unescape('_year_'), +unescape('_subclass_instanceVariableNames_package_'), smalltalk.method({ -selector: unescape('year%3A'), -category: 'accessing', -fn: function (aNumber){ +selector: unescape('subclass%3AinstanceVariableNames%3Apackage%3A'), +category: 'class creation', +fn: function (aString, aString2, aString3){ var self=this; -self.setFullYear(aNumber); +return smalltalk.send(smalltalk.send((smalltalk.ClassBuilder || ClassBuilder), "_new", []), "_superclass_subclass_instanceVariableNames_package_", [self, smalltalk.send(aString, "_asString", []), aString2, aString3]); return self;}, -args: ["aNumber"], -source: unescape('year%3A%20aNumber%0A%09%3Cself.setFullYear%28aNumber%29%3E'), -messageSends: [], -referencedClasses: [] +args: ["aString", "aString2", "aString3"], +source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3%0A%09%5EClassBuilder%20new%0A%09%20%20%20%20superclass%3A%20self%20subclass%3A%20aString%20asString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), +messageSends: ["superclass:subclass:instanceVariableNames:package:", "new", "asString"], +referencedClasses: ["ClassBuilder"] }), -smalltalk.Date); +smalltalk.Class); + + +smalltalk.addClass('Metaclass', smalltalk.Behavior, [], 'Kernel-Classes'); +smalltalk.Metaclass.comment=unescape('Metaclass%20is%20the%20root%20of%20the%20class%20hierarchy.%0A%0AMetaclass%20instances%20are%20metaclasses%2C%20one%20for%20each%20real%20class.%20%0AMetaclass%20instances%20have%20a%20single%20instance%2C%20which%20they%20hold%20onto%2C%20which%20is%20the%20class%20that%20they%20are%20the%20metaclass%20of.') smalltalk.addMethod( -unescape('_dayOfMonth'), +unescape('_instanceClass'), smalltalk.method({ -selector: unescape('dayOfMonth'), +selector: unescape('instanceClass'), category: 'accessing', fn: function (){ var self=this; -return self.getDate(); +return self.instanceClass; return self;}, args: [], -source: unescape('dayOfMonth%0A%09%3Creturn%20self.getDate%28%29%3E'), +source: unescape('instanceClass%0A%09%3Creturn%20self.instanceClass%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Metaclass); smalltalk.addMethod( -unescape('_dayOfMonth_'), +unescape('_instanceVariableNames_'), smalltalk.method({ -selector: unescape('dayOfMonth%3A'), +selector: unescape('instanceVariableNames%3A'), category: 'accessing', -fn: function (aNumber){ +fn: function (aCollection){ var self=this; -self.setDate(aNumber); +smalltalk.send(smalltalk.send((smalltalk.ClassBuilder || ClassBuilder), "_new", []), "_class_instanceVariableNames_", [self, aCollection]); return self;}, -args: ["aNumber"], -source: unescape('dayOfMonth%3A%20aNumber%0A%09%3Cself.setDate%28aNumber%29%3E'), -messageSends: [], -referencedClasses: [] +args: ["aCollection"], +source: unescape('instanceVariableNames%3A%20aCollection%0A%09ClassBuilder%20new%0A%09%20%20%20%20class%3A%20self%20instanceVariableNames%3A%20aCollection'), +messageSends: ["class:instanceVariableNames:", "new"], +referencedClasses: ["ClassBuilder"] }), -smalltalk.Date); +smalltalk.Metaclass); smalltalk.addMethod( -unescape('_asString'), +unescape('_isMetaclass'), smalltalk.method({ -selector: unescape('asString'), -category: 'converting', +selector: unescape('isMetaclass'), +category: 'testing', fn: function (){ var self=this; -return self.toString(); +return true; return self;}, args: [], -source: unescape('asString%0A%09%3Creturn%20self.toString%28%29%3E'), +source: unescape('isMetaclass%0A%09%5Etrue'), messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Metaclass); smalltalk.addMethod( unescape('_printString'), @@ -4260,1622 +5098,1663 @@ selector: unescape('printString'), category: 'printing', fn: function (){ var self=this; -return smalltalk.send(self, "_asString", []); +return smalltalk.send(smalltalk.send(smalltalk.send(self, "_instanceClass", []), "_name", []), "__comma", [" class"]); return self;}, args: [], -source: unescape('printString%0A%09%5Eself%20asString'), -messageSends: ["asString"], +source: unescape('printString%0A%09%5Eself%20instanceClass%20name%2C%20%27%20class%27'), +messageSends: [unescape("%2C"), "name", "instanceClass"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.Metaclass); + + +smalltalk.addClass('ClassBuilder', smalltalk.Object, [], 'Kernel-Classes'); +smalltalk.ClassBuilder.comment=unescape('ClassBuilder%20is%20responsible%20for%20compiling%20new%20classes%20or%20modifying%20existing%20classes%20in%20the%20system.%0A%0ARather%20than%20using%20ClassBuilder%20directly%20to%20compile%20a%20class%2C%20use%20%60Class%20%3E%3E%20subclass%3AinstanceVariableNames%3Apackage%3A%60.') smalltalk.addMethod( -unescape('_asMilliseconds'), +unescape('_superclass_subclass_'), smalltalk.method({ -selector: unescape('asMilliseconds'), -category: 'converting', -fn: function (){ +selector: unescape('superclass%3Asubclass%3A'), +category: 'class creation', +fn: function (aClass, aString){ var self=this; -return smalltalk.send(self, "_time", []); +return smalltalk.send(self, "_superclass_subclass_instanceVariableNames_package_", [aClass, aString, "", nil]); return self;}, -args: [], -source: unescape('asMilliseconds%0A%09%5Eself%20time'), -messageSends: ["time"], +args: ["aClass", "aString"], +source: unescape('superclass%3A%20aClass%20subclass%3A%20aString%0A%09%5Eself%20superclass%3A%20aClass%20subclass%3A%20aString%20instanceVariableNames%3A%20%27%27%20package%3A%20nil'), +messageSends: ["superclass:subclass:instanceVariableNames:package:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassBuilder); smalltalk.addMethod( -unescape('_time'), +unescape('_class_instanceVariableNames_'), smalltalk.method({ -selector: unescape('time'), -category: 'accessing', -fn: function (){ +selector: unescape('class%3AinstanceVariableNames%3A'), +category: 'class creation', +fn: function (aClass, aString){ var self=this; -return self.getTime(); +((($receiver = smalltalk.send(aClass, "_isMetaclass", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_error_", [smalltalk.send(smalltalk.send(aClass, "_name", []), "__comma", [" is not a metaclass"])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_error_", [smalltalk.send(smalltalk.send(aClass, "_name", []), "__comma", [" is not a metaclass"])]);})])); +smalltalk.send(aClass, "_basicAt_put_", ["iVarNames", smalltalk.send(self, "_instanceVariableNamesFor_", [aString])]); +smalltalk.send(self, "_setupClass_", [aClass]); return self;}, -args: [], -source: unescape('time%0A%09%3Creturn%20self.getTime%28%29%3E'), -messageSends: [], +args: ["aClass", "aString"], +source: unescape('class%3A%20aClass%20instanceVariableNames%3A%20aString%0A%09aClass%20isMetaclass%20ifFalse%3A%20%5Bself%20error%3A%20aClass%20name%2C%20%27%20is%20not%20a%20metaclass%27%5D.%0A%09aClass%20basicAt%3A%20%27iVarNames%27%20put%3A%20%28self%20instanceVariableNamesFor%3A%20aString%29.%0A%09self%20setupClass%3A%20aClass'), +messageSends: ["ifFalse:", "isMetaclass", "error:", unescape("%2C"), "name", "basicAt:put:", "instanceVariableNamesFor:", "setupClass:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassBuilder); smalltalk.addMethod( -unescape('_time_'), +unescape('_instanceVariableNamesFor_'), smalltalk.method({ -selector: unescape('time%3A'), -category: 'accessing', -fn: function (aNumber){ +selector: unescape('instanceVariableNamesFor%3A'), +category: 'private', +fn: function (aString){ var self=this; -self.setTime(aNumber); +return smalltalk.send(smalltalk.send(aString, "_tokenize_", [" "]), "_reject_", [(function(each){return smalltalk.send(each, "_isEmpty", []);})]); return self;}, -args: ["aNumber"], -source: unescape('time%3A%20aNumber%0A%09%3Cself.setTime%28aNumber%29%3E'), -messageSends: [], +args: ["aString"], +source: unescape('instanceVariableNamesFor%3A%20aString%0A%09%5E%28aString%20tokenize%3A%20%27%20%27%29%20reject%3A%20%5B%3Aeach%20%7C%20each%20isEmpty%5D'), +messageSends: ["reject:", "tokenize:", "isEmpty"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassBuilder); smalltalk.addMethod( -unescape('_asDateString'), +unescape('_addSubclassOf_named_instanceVariableNames_'), smalltalk.method({ -selector: unescape('asDateString'), -category: 'converting', -fn: function (){ +selector: unescape('addSubclassOf%3Anamed%3AinstanceVariableNames%3A'), +category: 'private', +fn: function (aClass, aString, aCollection){ var self=this; -return self.toDateString(); +smalltalk.addClass(aString, aClass, aCollection); + return smalltalk[aString]; return self;}, -args: [], -source: unescape('asDateString%0A%09%3Creturn%20self.toDateString%28%29%3E'), +args: ["aClass", "aString", "aCollection"], +source: unescape('addSubclassOf%3A%20aClass%20named%3A%20aString%20instanceVariableNames%3A%20aCollection%0A%09%3Csmalltalk.addClass%28aString%2C%20aClass%2C%20aCollection%29%3B%0A%09%20%20%20%20return%20smalltalk%5BaString%5D%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassBuilder); smalltalk.addMethod( -unescape('_asTimeString'), +unescape('_setupClass_'), smalltalk.method({ -selector: unescape('asTimeString'), -category: 'converting', -fn: function (){ +selector: unescape('setupClass%3A'), +category: 'private', +fn: function (aClass){ var self=this; -return self.toTimeString(); +smalltalk.init(aClass);; return self;}, -args: [], -source: unescape('asTimeString%0A%09%3Creturn%20self.toTimeString%28%29%3E'), +args: ["aClass"], +source: unescape('setupClass%3A%20aClass%0A%09%3Csmalltalk.init%28aClass%29%3B%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassBuilder); smalltalk.addMethod( -unescape('_asLocaleString'), +unescape('_superclass_subclass_instanceVariableNames_package_'), smalltalk.method({ -selector: unescape('asLocaleString'), -category: 'converting', -fn: function (){ +selector: unescape('superclass%3Asubclass%3AinstanceVariableNames%3Apackage%3A'), +category: 'class creation', +fn: function (aClass, aString, aString2, aString3){ var self=this; -return self.toLocaleString(); +var newClass=nil; +(newClass=smalltalk.send(self, "_addSubclassOf_named_instanceVariableNames_package_", [aClass, aString, smalltalk.send(self, "_instanceVariableNamesFor_", [aString2]), (($receiver = aString3) == nil || $receiver == undefined) ? (function(){return "unclassified";})() : $receiver])); +smalltalk.send(self, "_setupClass_", [newClass]); +return newClass; return self;}, -args: [], -source: unescape('asLocaleString%0A%09%3Creturn%20self.toLocaleString%28%29%3E'), -messageSends: [], +args: ["aClass", "aString", "aString2", "aString3"], +source: unescape('superclass%3A%20aClass%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3%0A%09%7C%20newClass%20%7C%0A%09newClass%20%3A%3D%20self%20addSubclassOf%3A%20aClass%0A%09%09%09%09named%3A%20aString%20instanceVariableNames%3A%20%28self%20instanceVariableNamesFor%3A%20aString2%29%0A%09%09%09%09package%3A%20%28aString3%20ifNil%3A%20%5B%27unclassified%27%5D%29.%0A%09self%20setupClass%3A%20newClass.%0A%09%5EnewClass'), +messageSends: ["addSubclassOf:named:instanceVariableNames:package:", "instanceVariableNamesFor:", "ifNil:", "setupClass:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassBuilder); smalltalk.addMethod( -unescape('_asNumber'), +unescape('_addSubclassOf_named_instanceVariableNames_package_'), smalltalk.method({ -selector: unescape('asNumber'), -category: 'converting', -fn: function (){ +selector: unescape('addSubclassOf%3Anamed%3AinstanceVariableNames%3Apackage%3A'), +category: 'private', +fn: function (aClass, aString, aCollection, packageName){ var self=this; -return smalltalk.send(self, "_asMilliseconds", []); +smalltalk.addClass(aString, aClass, aCollection, packageName); + return smalltalk[aString]; return self;}, -args: [], -source: unescape('asNumber%0A%09%5Eself%20asMilliseconds'), -messageSends: ["asMilliseconds"], +args: ["aClass", "aString", "aCollection", "packageName"], +source: unescape('addSubclassOf%3A%20aClass%20named%3A%20aString%20instanceVariableNames%3A%20aCollection%20package%3A%20packageName%0A%09%3Csmalltalk.addClass%28aString%2C%20aClass%2C%20aCollection%2C%20packageName%29%3B%0A%09%20%20%20%20return%20smalltalk%5BaString%5D%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassBuilder); smalltalk.addMethod( -unescape('_hours_'), +unescape('_copyClass_named_'), smalltalk.method({ -selector: unescape('hours%3A'), -category: 'accessing', -fn: function (aNumber){ +selector: unescape('copyClass%3Anamed%3A'), +category: 'private', +fn: function (aClass, aString){ var self=this; -self.setHours(aNumber); +var newClass=nil; +(newClass=smalltalk.send(self, "_addSubclassOf_named_instanceVariableNames_package_", [smalltalk.send(aClass, "_superclass", []), aString, smalltalk.send(aClass, "_instanceVariableNames", []), smalltalk.send(smalltalk.send(aClass, "_package", []), "_name", [])])); +smalltalk.send(self, "_setupClass_", [newClass]); +smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_methodDictionary", []), "_values", []), "_do_", [(function(each){smalltalk.send(newClass, "_addCompiledMethod_", [smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [smalltalk.send(each, "_source", []), newClass])]);return smalltalk.send(smalltalk.send(smalltalk.send(newClass, "_methodDictionary", []), "_at_", [smalltalk.send(each, "_selector", [])]), "_category_", [smalltalk.send(each, "_category", [])]);})]); +smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_class", []), "_methodDictionary", []), "_values", []), "_do_", [(function(each){smalltalk.send(smalltalk.send(newClass, "_class", []), "_addCompiledMethod_", [smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [smalltalk.send(each, "_source", []), smalltalk.send(newClass, "_class", [])])]);return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(newClass, "_class", []), "_methodDictionary", []), "_at_", [smalltalk.send(each, "_selector", [])]), "_category_", [smalltalk.send(each, "_category", [])]);})]); +smalltalk.send(self, "_setupClass_", [newClass]); +return newClass; return self;}, -args: ["aNumber"], -source: unescape('hours%3A%20aNumber%0A%09%3Cself.setHours%28aNumber%29%3E'), -messageSends: [], -referencedClasses: [] +args: ["aClass", "aString"], +source: unescape('copyClass%3A%20aClass%20named%3A%20aString%0A%09%7C%20newClass%20%7C%0A%0A%09newClass%20%3A%3D%20self%20%0A%09%09addSubclassOf%3A%20aClass%20superclass%0A%09%09named%3A%20aString%20%0A%09%09instanceVariableNames%3A%20aClass%20instanceVariableNames%20%0A%09%09package%3A%20aClass%20package%20name.%0A%0A%09self%20setupClass%3A%20newClass.%0A%0A%09aClass%20methodDictionary%20values%20do%3A%20%5B%3Aeach%20%7C%0A%09%09newClass%20addCompiledMethod%3A%20%28Compiler%20new%20load%3A%20each%20source%20forClass%3A%20newClass%29.%0A%09%09%28newClass%20methodDictionary%20at%3A%20each%20selector%29%20category%3A%20each%20category%5D.%0A%0A%09aClass%20class%20methodDictionary%20values%20do%3A%20%5B%3Aeach%20%7C%0A%09%09newClass%20class%20addCompiledMethod%3A%20%28Compiler%20new%20load%3A%20each%20source%20forClass%3A%20newClass%20class%29.%0A%09%09%28newClass%20class%20methodDictionary%20at%3A%20each%20selector%29%20category%3A%20each%20category%5D.%0A%0A%09self%20setupClass%3A%20newClass.%0A%09%5EnewClass'), +messageSends: ["addSubclassOf:named:instanceVariableNames:package:", "superclass", "instanceVariableNames", "name", "package", "setupClass:", "do:", "values", "methodDictionary", "addCompiledMethod:", "load:forClass:", "new", "source", "category:", "at:", "selector", "category", "class"], +referencedClasses: ["Compiler"] +}), +smalltalk.ClassBuilder); + + + +smalltalk.addClass('ClassCategoryReader', smalltalk.Object, ['class', 'category', 'chunkParser'], 'Kernel-Classes'); +smalltalk.ClassCategoryReader.comment=unescape('ClassCategoryReader%20represents%20a%20mechanism%20for%20retrieving%20class%20descriptions%20stored%20on%20a%20file.') +smalltalk.addMethod( +unescape('_initialize'), +smalltalk.method({ +selector: unescape('initialize'), +category: 'initialization', +fn: function (){ +var self=this; +smalltalk.send(self, "_initialize", [], smalltalk.Object); +(self['@chunkParser']=smalltalk.send((smalltalk.ChunkParser || ChunkParser), "_new", [])); +return self;}, +args: [], +source: unescape('initialize%0A%09super%20initialize.%0A%09chunkParser%20%3A%3D%20ChunkParser%20new.'), +messageSends: ["initialize", "new"], +referencedClasses: ["ChunkParser"] }), -smalltalk.Date); +smalltalk.ClassCategoryReader); smalltalk.addMethod( -unescape('_minutes_'), +unescape('_class_category_'), smalltalk.method({ -selector: unescape('minutes%3A'), +selector: unescape('class%3Acategory%3A'), category: 'accessing', -fn: function (aNumber){ +fn: function (aClass, aString){ var self=this; -self.setMinutes(aNumber); +(self['@class']=aClass); +(self['@category']=aString); return self;}, -args: ["aNumber"], -source: unescape('minutes%3A%20aNumber%0A%09%3Cself.setMinutes%28aNumber%29%3E'), +args: ["aClass", "aString"], +source: unescape('class%3A%20aClass%20category%3A%20aString%0A%09class%20%3A%3D%20aClass.%0A%09category%20%3A%3D%20aString'), messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassCategoryReader); smalltalk.addMethod( -unescape('_seconds_'), +unescape('_scanFrom_'), smalltalk.method({ -selector: unescape('seconds%3A'), -category: 'accessing', -fn: function (aNumber){ +selector: unescape('scanFrom%3A'), +category: 'fileIn', +fn: function (aChunkParser){ var self=this; -self.setSeconds(aNumber); +var chunk=nil; +(function(){while(!(function(){(chunk=smalltalk.send(aChunkParser, "_nextChunk", []));return smalltalk.send(chunk, "_isEmpty", []);})()) {(function(){return smalltalk.send(self, "_compileMethod_", [chunk]);})()}})(); return self;}, -args: ["aNumber"], -source: unescape('seconds%3A%20aNumber%0A%09%3Cself.setSeconds%28aNumber%29%3E'), -messageSends: [], +args: ["aChunkParser"], +source: unescape('scanFrom%3A%20aChunkParser%0A%09%7C%20chunk%20%7C%0A%09%5Bchunk%20%3A%3D%20aChunkParser%20nextChunk.%0A%09chunk%20isEmpty%5D%20whileFalse%3A%20%5B%0A%09%20%20%20%20self%20compileMethod%3A%20chunk%5D'), +messageSends: ["whileFalse:", "nextChunk", "isEmpty", "compileMethod:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassCategoryReader); smalltalk.addMethod( -unescape('_milliseconds_'), +unescape('_compileMethod_'), smalltalk.method({ -selector: unescape('milliseconds%3A'), -category: 'accessing', -fn: function (aNumber){ +selector: unescape('compileMethod%3A'), +category: 'private', +fn: function (aString){ var self=this; -self.setMilliseconds(aNumber); +var method=nil; +(method=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [aString, self['@class']])); +smalltalk.send(method, "_category_", [self['@category']]); +smalltalk.send(self['@class'], "_addCompiledMethod_", [method]); return self;}, -args: ["aNumber"], -source: unescape('milliseconds%3A%20aNumber%0A%09%3Cself.setMilliseconds%28aNumber%29%3E'), -messageSends: [], -referencedClasses: [] +args: ["aString"], +source: unescape('compileMethod%3A%20aString%0A%09%7C%20method%20%7C%0A%09method%20%3A%3D%20Compiler%20new%20load%3A%20aString%20forClass%3A%20class.%0A%09method%20category%3A%20category.%0A%09class%20addCompiledMethod%3A%20method'), +messageSends: ["load:forClass:", "new", "category:", "addCompiledMethod:"], +referencedClasses: ["Compiler"] }), -smalltalk.Date); +smalltalk.ClassCategoryReader); + + +smalltalk.addClass('ClassCommentReader', smalltalk.Object, ['class', 'chunkParser'], 'Kernel-Classes'); +smalltalk.ClassCommentReader.comment=unescape('ClassCommentReader%20represents%20a%20mechanism%20for%20retrieving%20class%20descriptions%20stored%20on%20a%20file.%0ASee%20%60ClassCategoryReader%60%20too.') smalltalk.addMethod( -unescape('_hours'), +unescape('_class_'), smalltalk.method({ -selector: unescape('hours'), +selector: unescape('class%3A'), category: 'accessing', -fn: function (){ +fn: function (aClass){ var self=this; -return self.getHours(); +(self['@class']=aClass); return self;}, -args: [], -source: unescape('hours%0A%09%3Creturn%20self.getHours%28%29%3E'), +args: ["aClass"], +source: unescape('class%3A%20aClass%0A%09class%20%3A%3D%20aClass'), messageSends: [], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassCommentReader); smalltalk.addMethod( -unescape('_minutes'), +unescape('_scanFrom_'), smalltalk.method({ -selector: unescape('minutes'), -category: 'accessing', -fn: function (){ +selector: unescape('scanFrom%3A'), +category: 'fileIn', +fn: function (aChunkParser){ var self=this; -return self.getMinutes(); +var chunk=nil; +(chunk=smalltalk.send(aChunkParser, "_nextChunk", [])); +((($receiver = smalltalk.send(chunk, "_isEmpty", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_setComment_", [chunk]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_setComment_", [chunk]);})])); return self;}, -args: [], -source: unescape('minutes%0A%09%3Creturn%20self.getMinutes%28%29%3E'), -messageSends: [], +args: ["aChunkParser"], +source: unescape('scanFrom%3A%20aChunkParser%0A%09%7C%20chunk%20%7C%0A%09chunk%20%3A%3D%20aChunkParser%20nextChunk.%0A%09chunk%20isEmpty%20ifFalse%3A%20%5B%0A%09%20%20%20%20self%20setComment%3A%20chunk%5D.'), +messageSends: ["nextChunk", "ifFalse:", "isEmpty", "setComment:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassCommentReader); smalltalk.addMethod( -unescape('_seconds'), +unescape('_initialize'), smalltalk.method({ -selector: unescape('seconds'), -category: 'accessing', +selector: unescape('initialize'), +category: 'initialization', fn: function (){ var self=this; -return self.getSeconds(); +smalltalk.send(self, "_initialize", [], smalltalk.Object); +(self['@chunkParser']=smalltalk.send((smalltalk.ChunkParser || ChunkParser), "_new", [])); return self;}, args: [], -source: unescape('seconds%0A%09%3Creturn%20self.getSeconds%28%29%3E'), -messageSends: [], -referencedClasses: [] +source: unescape('initialize%0A%09super%20initialize.%0A%09chunkParser%20%3A%3D%20ChunkParser%20new.'), +messageSends: ["initialize", "new"], +referencedClasses: ["ChunkParser"] }), -smalltalk.Date); +smalltalk.ClassCommentReader); smalltalk.addMethod( -unescape('_milliseconds'), +unescape('_setComment_'), smalltalk.method({ -selector: unescape('milliseconds'), -category: 'accessing', -fn: function (){ +selector: unescape('setComment%3A'), +category: 'private', +fn: function (aString){ var self=this; -return self.getMilliseconds(); +smalltalk.send(self['@class'], "_comment_", [aString]); return self;}, -args: [], -source: unescape('milliseconds%0A%09%3Creturn%20self.getMilliseconds%28%29%3E'), -messageSends: [], +args: ["aString"], +source: unescape('setComment%3A%20aString%0A%20%20%20%20class%20comment%3A%20aString'), +messageSends: ["comment:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.ClassCommentReader); + + +smalltalk.addPackage('Kernel-Methods', {}); +smalltalk.addClass('CompiledMethod', smalltalk.Object, [], 'Kernel-Methods'); smalltalk.addMethod( -unescape('__lt'), +unescape('_source'), smalltalk.method({ -selector: unescape('%3C'), -category: 'comparing', -fn: function (aDate){ +selector: unescape('source'), +category: 'accessing', +fn: function (){ var self=this; -return self < aDate; +return (($receiver = smalltalk.send(self, "_basicAt_", ["source"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver; return self;}, -args: ["aDate"], -source: unescape('%3C%20aDate%0A%09%3Creturn%20self%20%3C%20aDate%3E'), -messageSends: [], +args: [], +source: unescape('source%0A%09%5E%28self%20basicAt%3A%20%27source%27%29%20ifNil%3A%20%5B%27%27%5D'), +messageSends: ["ifNil:", "basicAt:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('__gt'), +unescape('_source_'), smalltalk.method({ -selector: unescape('%3E'), -category: 'comparing', -fn: function (aDate){ +selector: unescape('source%3A'), +category: 'accessing', +fn: function (aString){ var self=this; -return self > aDate; +smalltalk.send(self, "_basicAt_put_", ["source", aString]); return self;}, -args: ["aDate"], -source: unescape('%3E%20aDate%0A%09%3Creturn%20self%20%3E%3E%20aDate%3E'), -messageSends: [], +args: ["aString"], +source: unescape('source%3A%20aString%0A%09self%20basicAt%3A%20%27source%27%20put%3A%20aString'), +messageSends: ["basicAt:put:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('__lt_eq'), +unescape('_category'), smalltalk.method({ -selector: unescape('%3C%3D'), -category: 'comparing', -fn: function (aDate){ +selector: unescape('category'), +category: 'accessing', +fn: function (){ var self=this; -return self <= aDate; +return (($receiver = smalltalk.send(self, "_basicAt_", ["category"])) == nil || $receiver == undefined) ? (function(){return "";})() : $receiver; return self;}, -args: ["aDate"], -source: unescape('%3C%3D%20aDate%0A%09%3Creturn%20self%20%3C%3D%20aDate%3E'), -messageSends: [], +args: [], +source: unescape('category%0A%09%5E%28self%20basicAt%3A%20%27category%27%29%20ifNil%3A%20%5B%27%27%5D'), +messageSends: ["ifNil:", "basicAt:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('__gt_eq'), +unescape('_category_'), smalltalk.method({ -selector: unescape('%3E%3D'), -category: 'comparing', -fn: function (aDate){ +selector: unescape('category%3A'), +category: 'accessing', +fn: function (aString){ var self=this; -return self >= aDate; +smalltalk.send(self, "_basicAt_put_", ["category", aString]); return self;}, -args: ["aDate"], -source: unescape('%3E%3D%20aDate%0A%09%3Creturn%20self%20%3E%3E%3D%20aDate%3E'), -messageSends: [], +args: ["aString"], +source: unescape('category%3A%20aString%0A%09self%20basicAt%3A%20%27category%27%20put%3A%20aString'), +messageSends: ["basicAt:put:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('__minus'), +unescape('_selector'), smalltalk.method({ -selector: unescape('-'), -category: 'arithmetic', -fn: function (aDate){ +selector: unescape('selector'), +category: 'accessing', +fn: function (){ var self=this; -return self - aDate; +return smalltalk.send(self, "_basicAt_", ["selector"]); return self;}, -args: ["aDate"], -source: unescape('-%20aDate%0A%09%3Creturn%20self%20-%20aDate%3E'), -messageSends: [], +args: [], +source: unescape('selector%0A%09%5Eself%20basicAt%3A%20%27selector%27'), +messageSends: ["basicAt:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('__plus'), +unescape('_selector_'), smalltalk.method({ -selector: unescape('+'), -category: 'arithmetic', -fn: function (aDate){ +selector: unescape('selector%3A'), +category: 'accessing', +fn: function (aString){ var self=this; -return self + aDate; +smalltalk.send(self, "_basicAt_put_", ["selector", aString]); return self;}, -args: ["aDate"], -source: unescape('+%20aDate%0A%09%3Creturn%20self%20+%20aDate%3E'), -messageSends: [], +args: ["aString"], +source: unescape('selector%3A%20aString%0A%09self%20basicAt%3A%20%27selector%27%20put%3A%20aString'), +messageSends: ["basicAt:put:"], referencedClasses: [] }), -smalltalk.Date); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('_asJSONObject'), +unescape('_fn'), smalltalk.method({ -selector: unescape('asJSONObject'), -category: 'converting', +selector: unescape('fn'), +category: 'accessing', fn: function (){ var self=this; -return self; +return smalltalk.send(self, "_basicAt_", ["fn"]); return self;}, args: [], -source: unescape('asJSONObject%0A%09%5Eself'), -messageSends: [], +source: unescape('fn%0A%09%5Eself%20basicAt%3A%20%27fn%27'), +messageSends: ["basicAt:"], referencedClasses: [] }), -smalltalk.Date); - +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('_new_'), +unescape('_fn_'), smalltalk.method({ -selector: unescape('new%3A'), -category: 'instance creation', -fn: function (anObject){ +selector: unescape('fn%3A'), +category: 'accessing', +fn: function (aBlock){ var self=this; -return new Date(anObject); +smalltalk.send(self, "_basicAt_put_", ["fn", aBlock]); return self;}, -args: ["anObject"], -source: unescape('new%3A%20anObject%0A%09%3Creturn%20new%20Date%28anObject%29%3E'), -messageSends: [], +args: ["aBlock"], +source: unescape('fn%3A%20aBlock%0A%09self%20basicAt%3A%20%27fn%27%20put%3A%20aBlock'), +messageSends: ["basicAt:put:"], referencedClasses: [] }), -smalltalk.Date.klass); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('_fromString_'), +unescape('_messageSends'), smalltalk.method({ -selector: unescape('fromString%3A'), -category: 'instance creation', -fn: function (aString){ +selector: unescape('messageSends'), +category: 'accessing', +fn: function (){ var self=this; -return smalltalk.send(self, "_new_", [aString]); +return smalltalk.send(self, "_basicAt_", ["messageSends"]); return self;}, -args: ["aString"], -source: unescape('fromString%3A%20aString%0A%09%22Example%3A%20Date%20fromString%28%272011/04/15%2000%3A00%3A00%27%29%22%0A%09%5Eself%20new%3A%20aString'), -messageSends: ["new:"], +args: [], +source: unescape('messageSends%0A%09%5Eself%20basicAt%3A%20%27messageSends%27'), +messageSends: ["basicAt:"], referencedClasses: [] }), -smalltalk.Date.klass); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('_fromSeconds_'), +unescape('_methodClass'), smalltalk.method({ -selector: unescape('fromSeconds%3A'), -category: 'instance creation', -fn: function (aNumber){ +selector: unescape('methodClass'), +category: 'accessing', +fn: function (){ var self=this; -return smalltalk.send(self, "_fromMilliseconds_", [((($receiver = aNumber).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))]); +return smalltalk.send(self, "_basicAt_", ["methodClass"]); return self;}, -args: ["aNumber"], -source: unescape('fromSeconds%3A%20aNumber%0A%09%5Eself%20fromMilliseconds%3A%20aNumber%20*%201000'), -messageSends: ["fromMilliseconds:", unescape("*")], +args: [], +source: unescape('methodClass%0A%09%5Eself%20basicAt%3A%20%27methodClass%27'), +messageSends: ["basicAt:"], referencedClasses: [] }), -smalltalk.Date.klass); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('_fromMilliseconds_'), +unescape('_referencedClasses'), smalltalk.method({ -selector: unescape('fromMilliseconds%3A'), -category: 'instance creation', -fn: function (aNumber){ +selector: unescape('referencedClasses'), +category: 'accessing', +fn: function (){ var self=this; -return smalltalk.send(self, "_new_", [aNumber]); +return smalltalk.send(self, "_basicAt_", ["referencedClasses"]); return self;}, -args: ["aNumber"], -source: unescape('fromMilliseconds%3A%20aNumber%0A%09%5Eself%20new%3A%20aNumber'), -messageSends: ["new:"], +args: [], +source: unescape('referencedClasses%0A%09%5Eself%20basicAt%3A%20%27referencedClasses%27'), +messageSends: ["basicAt:"], referencedClasses: [] }), -smalltalk.Date.klass); +smalltalk.CompiledMethod); smalltalk.addMethod( -unescape('_today'), +unescape('_arguments'), smalltalk.method({ -selector: unescape('today'), -category: 'instance creation', +selector: unescape('arguments'), +category: 'accessing', fn: function (){ var self=this; -return smalltalk.send(self, "_new", []); +return self.args || []; return self;}, args: [], -source: unescape('today%0A%09%5Eself%20new'), -messageSends: ["new"], +source: unescape('arguments%0A%09%3Creturn%20self.args%20%7C%7C%20%5B%5D%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Date.klass); +smalltalk.CompiledMethod); + + +smalltalk.addClass('BlockClosure', smalltalk.Object, [], 'Kernel-Methods'); +smalltalk.BlockClosure.comment=unescape('A%20BlockClosure%20is%20a%20lexical%20closure.%0AThe%20JavaScript%20representation%20is%20a%20function.%0A%0AA%20BlockClosure%20is%20evaluated%20with%20the%20%23value*%20methods%20in%20the%20%27evaluating%27%20protocol.') smalltalk.addMethod( -unescape('_now'), +unescape('_compiledSource'), smalltalk.method({ -selector: unescape('now'), -category: 'instance creation', +selector: unescape('compiledSource'), +category: 'accessing', fn: function (){ var self=this; -return smalltalk.send(self, "_today", []); +return self.toString(); return self;}, args: [], -source: unescape('now%0A%09%5Eself%20today'), -messageSends: ["today"], +source: unescape('compiledSource%0A%09%3Creturn%20self.toString%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Date.klass); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_millisecondsToRun_'), +unescape('_whileTrue_'), smalltalk.method({ -selector: unescape('millisecondsToRun%3A'), -category: 'instance creation', +selector: unescape('whileTrue%3A'), +category: 'controlling', fn: function (aBlock){ var self=this; -var t=nil; -t=smalltalk.send((smalltalk.Date || Date), "_now", []); -smalltalk.send(aBlock, "_value", []); -return ((($receiver = smalltalk.send((smalltalk.Date || Date), "_now", [])).klass === smalltalk.Number) ? $receiver -t : smalltalk.send($receiver, "__minus", [t])); +while(self()) {aBlock()}; return self;}, args: ["aBlock"], -source: unescape('millisecondsToRun%3A%20aBlock%0A%09%7C%20t%20%7C%0A%09t%20%3A%3D%20Date%20now.%0A%09aBlock%20value.%0A%09%5EDate%20now%20-%20t'), -messageSends: ["now", "value", unescape("-")], -referencedClasses: ["Date"] +source: unescape('whileTrue%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Cwhile%28self%28%29%29%20%7BaBlock%28%29%7D%3E'), +messageSends: [], +referencedClasses: [] }), -smalltalk.Date.klass); - +smalltalk.BlockClosure); -smalltalk.addClass('UndefinedObject', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( -unescape('_subclass_instanceVariableNames_'), +unescape('_whileFalse_'), smalltalk.method({ -selector: unescape('subclass%3AinstanceVariableNames%3A'), -category: 'class creation', -fn: function (aString, anotherString){ +selector: unescape('whileFalse%3A'), +category: 'controlling', +fn: function (aBlock){ var self=this; -return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, anotherString, nil]); +while(!self()) {aBlock()}; return self;}, -args: ["aString", "anotherString"], -source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%20package%3A%20nil'), -messageSends: ["subclass:instanceVariableNames:package:"], +args: ["aBlock"], +source: unescape('whileFalse%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Cwhile%28%21self%28%29%29%20%7BaBlock%28%29%7D%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_subclass_instanceVariableNames_category_'), +unescape('_value'), smalltalk.method({ -selector: unescape('subclass%3AinstanceVariableNames%3Acategory%3A'), -category: 'class creation', -fn: function (aString, aString2, aString3){ +selector: unescape('value'), +category: 'evaluating', +fn: function (){ var self=this; -return smalltalk.send(self, "_subclass_instanceVariableNames_package_", [aString, aString2, aString3]); +return self();; return self;}, -args: ["aString", "aString2", "aString3"], -source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20category%3A%20aString3%0A%09%22Kept%20for%20compatibility.%22%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), -messageSends: ["subclass:instanceVariableNames:package:"], +args: [], +source: unescape('value%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%28%29%3B%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_shallowCopy'), +unescape('_value_'), smalltalk.method({ -selector: unescape('shallowCopy'), -category: 'copying', -fn: function (){ +selector: unescape('value%3A'), +category: 'evaluating', +fn: function (anArg){ var self=this; -return self; +return self(anArg);; return self;}, -args: [], -source: unescape('shallowCopy%0A%09%5Eself'), +args: ["anArg"], +source: unescape('value%3A%20anArg%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%28anArg%29%3B%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_deepCopy'), +unescape('_value_value_'), smalltalk.method({ -selector: unescape('deepCopy'), -category: 'copying', -fn: function (){ +selector: unescape('value%3Avalue%3A'), +category: 'evaluating', +fn: function (firstArg, secondArg){ var self=this; -return self; +return self(firstArg, secondArg);; return self;}, -args: [], -source: unescape('deepCopy%0A%09%5Eself'), +args: ["firstArg", "secondArg"], +source: unescape('value%3A%20firstArg%20value%3A%20secondArg%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%28firstArg%2C%20secondArg%29%3B%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_ifNil_'), +unescape('_value_value_value_'), smalltalk.method({ -selector: unescape('ifNil%3A'), -category: 'testing', -fn: function (aBlock){ +selector: unescape('value%3Avalue%3Avalue%3A'), +category: 'evaluating', +fn: function (firstArg, secondArg, thirdArg){ var self=this; -return smalltalk.send(self, "_ifNil_ifNotNil_", [aBlock, (function(){return nil;})]); +return self(firstArg, secondArg, thirdArg);; return self;}, -args: ["aBlock"], -source: unescape('ifNil%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself%20ifNil%3A%20aBlock%20ifNotNil%3A%20%5B%5D'), -messageSends: ["ifNil:ifNotNil:"], +args: ["firstArg", "secondArg", "thirdArg"], +source: unescape('value%3A%20firstArg%20value%3A%20secondArg%20value%3A%20thirdArg%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%3Creturn%20self%28firstArg%2C%20secondArg%2C%20thirdArg%29%3B%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_ifNotNil_'), +unescape('_valueWithPossibleArguments_'), smalltalk.method({ -selector: unescape('ifNotNil%3A'), -category: 'testing', -fn: function (aBlock){ +selector: unescape('valueWithPossibleArguments%3A'), +category: 'evaluating', +fn: function (aCollection){ var self=this; -return self; +return self.apply(null, aCollection);; return self;}, -args: ["aBlock"], -source: unescape('ifNotNil%3A%20aBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5Eself'), +args: ["aCollection"], +source: unescape('valueWithPossibleArguments%3A%20aCollection%0A%09%3Creturn%20self.apply%28null%2C%20aCollection%29%3B%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_ifNil_ifNotNil_'), +unescape('_on_do_'), smalltalk.method({ -selector: unescape('ifNil%3AifNotNil%3A'), -category: 'testing', -fn: function (aBlock, anotherBlock){ +selector: unescape('on%3Ado%3A'), +category: 'error handling', +fn: function (anErrorClass, aBlock){ var self=this; -return smalltalk.send(aBlock, "_value", []); +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;}, -args: ["aBlock", "anotherBlock"], -source: unescape('ifNil%3A%20aBlock%20ifNotNil%3A%20anotherBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5EaBlock%20value'), -messageSends: ["value"], +args: ["anErrorClass", "aBlock"], +source: unescape('on%3A%20anErrorClass%20do%3A%20aBlock%0A%09%5Eself%20try%3A%20self%20catch%3A%20%5B%3Aerror%20%7C%0A%09%20%20%20%20%28error%20isKindOf%3A%20anErrorClass%29%20%0A%09%20%20%20%20%20ifTrue%3A%20%5BaBlock%20value%3A%20error%5D%0A%09%20%20%20%20%20ifFalse%3A%20%5Berror%20signal%5D%5D'), +messageSends: ["try:catch:", "ifTrue:ifFalse:", "isKindOf:", "value:", "signal"], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_ifNotNil_ifNil_'), +unescape('_valueWithTimeout_'), smalltalk.method({ -selector: unescape('ifNotNil%3AifNil%3A'), -category: 'testing', -fn: function (aBlock, anotherBlock){ +selector: unescape('valueWithTimeout%3A'), +category: 'timeout/interval', +fn: function (aNumber){ var self=this; -return smalltalk.send(anotherBlock, "_value", []); +return setTimeout(self, aNumber); return self;}, -args: ["aBlock", "anotherBlock"], -source: unescape('ifNotNil%3A%20aBlock%20ifNil%3A%20anotherBlock%0A%09%22inlined%20in%20the%20Compiler%22%0A%09%5EanotherBlock%20value'), -messageSends: ["value"], +args: ["aNumber"], +source: unescape('valueWithTimeout%3A%20aNumber%0A%09%3Creturn%20setTimeout%28self%2C%20aNumber%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_isNil'), +unescape('_valueWithInterval_'), smalltalk.method({ -selector: unescape('isNil'), -category: 'testing', -fn: function (){ +selector: unescape('valueWithInterval%3A'), +category: 'timeout/interval', +fn: function (aNumber){ var self=this; -return true; +return setInterval(self, aNumber); return self;}, -args: [], -source: unescape('isNil%0A%09%5Etrue'), +args: ["aNumber"], +source: unescape('valueWithInterval%3A%20aNumber%0A%09%3Creturn%20setInterval%28self%2C%20aNumber%29%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_notNil'), +unescape('_whileFalse'), smalltalk.method({ -selector: unescape('notNil'), -category: 'testing', +selector: unescape('whileFalse'), +category: 'controlling', fn: function (){ var self=this; -return false; +smalltalk.send(self, "_whileFalse_", [(function(){return nil;})]); return self;}, args: [], -source: unescape('notNil%0A%09%5Efalse'), -messageSends: [], +source: unescape('whileFalse%0A%09%22inlined%20in%20the%20Compiler%22%0A%09self%20whileFalse%3A%20%5B%5D'), +messageSends: ["whileFalse:"], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_printString'), +unescape('_whileTrue'), smalltalk.method({ -selector: unescape('printString'), -category: 'printing', +selector: unescape('whileTrue'), +category: 'controlling', fn: function (){ var self=this; -return "nil"; +smalltalk.send(self, "_whileTrue_", [(function(){return nil;})]); return self;}, args: [], -source: unescape('printString%0A%20%20%20%20%5E%27nil%27'), -messageSends: [], +source: unescape('whileTrue%0A%09%22inlined%20in%20the%20Compiler%22%0A%09self%20whileTrue%3A%20%5B%5D'), +messageSends: ["whileTrue:"], referencedClasses: [] }), -smalltalk.UndefinedObject); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_subclass_instanceVariableNames_package_'), +unescape('_new'), smalltalk.method({ -selector: unescape('subclass%3AinstanceVariableNames%3Apackage%3A'), -category: 'class creation', -fn: function (aString, aString2, aString3){ +selector: unescape('new'), +category: 'evaluating', +fn: function (){ var self=this; -return smalltalk.send(smalltalk.send((smalltalk.ClassBuilder || ClassBuilder), "_new", []), "_superclass_subclass_instanceVariableNames_package_", [self, aString, aString2, aString3]); +return new self(); return self;}, -args: ["aString", "aString2", "aString3"], -source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3%0A%09%5EClassBuilder%20new%0A%09%20%20%20%20superclass%3A%20self%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20package%3A%20aString3'), -messageSends: ["superclass:subclass:instanceVariableNames:package:", "new"], -referencedClasses: ["ClassBuilder"] +args: [], +source: unescape('new%0A%09%22Use%20the%20receiver%20as%20a%20JS%20constructor.%20%0A%09*Do%20not*%20use%20this%20method%20to%20instanciate%20Smalltalk%20objects%21%22%0A%09%3Creturn%20new%20self%28%29%3E'), +messageSends: [], +referencedClasses: [] }), -smalltalk.UndefinedObject); - +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_new'), +unescape('_applyTo_arguments_'), smalltalk.method({ -selector: unescape('new'), -category: 'instance creation', -fn: function (){ +selector: unescape('applyTo%3Aarguments%3A'), +category: 'evaluating', +fn: function (anObject, aCollection){ var self=this; -smalltalk.send(self, "_error_", ["You cannot create new instances of UndefinedObject. Use nil"]); +return self.apply(anObject, aCollection); return self;}, -args: [], -source: unescape('new%0A%09%20%20%20%20self%20error%3A%20%27You%20cannot%20create%20new%20instances%20of%20UndefinedObject.%20Use%20nil%27'), -messageSends: ["error:"], +args: ["anObject", "aCollection"], +source: unescape('applyTo%3A%20anObject%20arguments%3A%20aCollection%0A%09%3Creturn%20self.apply%28anObject%2C%20aCollection%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.UndefinedObject.klass); - +smalltalk.BlockClosure); -smalltalk.addClass('Collection', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( -unescape('_size'), +unescape('_timeToRun'), smalltalk.method({ -selector: unescape('size'), -category: 'accessing', +selector: unescape('timeToRun'), +category: 'evaluating', fn: function (){ var self=this; -smalltalk.send(self, "_subclassResponsibility", []); +return smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [self]); return self;}, args: [], -source: unescape('size%0A%09self%20subclassResponsibility'), -messageSends: ["subclassResponsibility"], -referencedClasses: [] +source: unescape('timeToRun%0A%09%22Answer%20the%20number%20of%20milliseconds%20taken%20to%20execute%20this%20block.%22%0A%0A%09%5E%20Date%20millisecondsToRun%3A%20self'), +messageSends: ["millisecondsToRun:"], +referencedClasses: ["Date"] }), -smalltalk.Collection); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_readStream'), +unescape('_numArgs'), smalltalk.method({ -selector: unescape('readStream'), +selector: unescape('numArgs'), category: 'accessing', fn: function (){ var self=this; -return smalltalk.send(self, "_stream", []); +return self.length; return self;}, args: [], -source: unescape('readStream%0A%09%5Eself%20stream'), -messageSends: ["stream"], +source: unescape('numArgs%0A%09%3Creturn%20self.length%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Collection); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_writeStream'), +unescape('_ensure_'), smalltalk.method({ -selector: unescape('writeStream'), -category: 'accessing', -fn: function (){ +selector: unescape('ensure%3A'), +category: 'evaluating', +fn: function (aBlock){ var self=this; -return smalltalk.send(self, "_stream", []); +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;}, -args: [], -source: unescape('writeStream%0A%09%5Eself%20stream'), -messageSends: ["stream"], -referencedClasses: [] +args: ["aBlock"], +source: unescape('ensure%3A%20aBlock%0A%09%7C%20success%20%7C%0A%09success%20%3A%3D%20false.%0A%09%5E%5Bself%20value.%20success%20%3A%3D%20true.%20aBlock%20value%5D%0A%09%09on%3A%20Error%0A%09%09do%3A%20%5B%3Aex%20%7C%0A%09%09%09success%20ifFalse%3A%20%5BaBlock%20value%5D.%0A%09%09%09ex%20signal%5D'), +messageSends: ["on:do:", "value", "ifFalse:", "signal"], +referencedClasses: ["Error"] }), -smalltalk.Collection); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_stream'), +unescape('_newValue_'), smalltalk.method({ -selector: unescape('stream'), -category: 'accessing', -fn: function (){ +selector: unescape('newValue%3A'), +category: 'evaluating', +fn: function (anObject){ var self=this; -return smalltalk.send(smalltalk.send(self, "_streamClass", []), "_on_", [self]); +return new self(anObject); return self;}, -args: [], -source: unescape('stream%0A%09%5Eself%20streamClass%20on%3A%20self'), -messageSends: ["on:", "streamClass"], +args: ["anObject"], +source: unescape('newValue%3A%20anObject%0A%09%22Use%20the%20receiver%20as%20a%20JS%20constructor.%20%0A%09*Do%20not*%20use%20this%20method%20to%20instanciate%20Smalltalk%20objects%21%22%0A%09%3Creturn%20new%20self%28anObject%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Collection); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_streamClass'), +unescape('_newValue_value_'), smalltalk.method({ -selector: unescape('streamClass'), -category: 'accessing', -fn: function (){ +selector: unescape('newValue%3Avalue%3A'), +category: 'evaluating', +fn: function (anObject, anObject2){ var self=this; -return smalltalk.send(smalltalk.send(self, "_class", []), "_streamClass", []); +return new self(anObject, anObject2); return self;}, -args: [], -source: unescape('streamClass%0A%09%5Eself%20class%20streamClass'), -messageSends: ["streamClass", "class"], +args: ["anObject", "anObject2"], +source: unescape('newValue%3A%20%20anObject%20value%3A%20anObject2%0A%09%22Use%20the%20receiver%20as%20a%20JS%20constructor.%20%0A%09*Do%20not*%20use%20this%20method%20to%20instanciate%20Smalltalk%20objects%21%22%0A%09%3Creturn%20new%20self%28anObject%2C%20anObject2%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Collection); +smalltalk.BlockClosure); smalltalk.addMethod( -unescape('_add_'), +unescape('_newValue_value_value_'), smalltalk.method({ -selector: unescape('add%3A'), -category: 'adding/removing', -fn: function (anObject){ +selector: unescape('newValue%3Avalue%3Avalue%3A'), +category: 'evaluating', +fn: function (anObject, anObject2, anObject3){ var self=this; -smalltalk.send(self, "_subclassResponsibility", []); +return new self(anObject, anObject2); return self;}, -args: ["anObject"], -source: unescape('add%3A%20anObject%0A%09self%20subclassResponsibility'), -messageSends: ["subclassResponsibility"], +args: ["anObject", "anObject2", "anObject3"], +source: unescape('newValue%3A%20%20anObject%20value%3A%20anObject2%20value%3A%20anObject3%0A%09%22Use%20the%20receiver%20as%20a%20JS%20constructor.%20%0A%09*Do%20not*%20use%20this%20method%20to%20instanciate%20Smalltalk%20objects%21%22%0A%09%3Creturn%20new%20self%28anObject%2C%20anObject2%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Collection); +smalltalk.BlockClosure); + + +smalltalk.addClass('MethodContext', smalltalk.Object, [], 'Kernel-Methods'); smalltalk.addMethod( -unescape('_addAll_'), +unescape('_receiver'), smalltalk.method({ -selector: unescape('addAll%3A'), -category: 'adding/removing', -fn: function (aCollection){ +selector: unescape('receiver'), +category: 'accessing', +fn: function (){ var self=this; -smalltalk.send(aCollection, "_do_", [(function(each){return smalltalk.send(self, "_add_", [each]);})]); -return aCollection; +return self.receiver; return self;}, -args: ["aCollection"], -source: unescape('addAll%3A%20aCollection%0A%09aCollection%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20self%20add%3A%20each%5D.%0A%09%5EaCollection'), -messageSends: ["do:", "add:"], +args: [], +source: unescape('receiver%0A%09%3Creturn%20self.receiver%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Collection); +smalltalk.MethodContext); smalltalk.addMethod( -unescape('__comma'), +unescape('_selector'), smalltalk.method({ -selector: unescape('%2C'), -category: 'copying', -fn: function (aCollection){ +selector: unescape('selector'), +category: 'accessing', +fn: function (){ var self=this; -return (function($rec){smalltalk.send($rec, "_addAll_", [aCollection]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_copy", [])); +return smalltalk.convertSelector(self.selector); return self;}, -args: ["aCollection"], -source: unescape('%2C%20aCollection%0A%09%5Eself%20copy%20%0A%09%20%20%20%20addAll%3A%20aCollection%3B%20%0A%09%20%20%20%20yourself'), -messageSends: ["addAll:", "yourself", "copy"], +args: [], +source: unescape('selector%0A%09%3Creturn%20smalltalk.convertSelector%28self.selector%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Collection); +smalltalk.MethodContext); smalltalk.addMethod( -unescape('_copyWith_'), +unescape('_home'), smalltalk.method({ -selector: unescape('copyWith%3A'), -category: 'copying', -fn: function (anObject){ +selector: unescape('home'), +category: 'accessing', +fn: function (){ var self=this; -return (function($rec){smalltalk.send($rec, "_add_", [anObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_copy", [])); +return self.homeContext; return self;}, -args: ["anObject"], -source: unescape('copyWith%3A%20anObject%0A%09%5Eself%20copy%20add%3A%20anObject%3B%20yourself'), -messageSends: ["add:", "yourself", "copy"], +args: [], +source: unescape('home%0A%09%3Creturn%20self.homeContext%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Collection); +smalltalk.MethodContext); smalltalk.addMethod( -unescape('_copyWithAll_'), +unescape('_temps'), smalltalk.method({ -selector: unescape('copyWithAll%3A'), -category: 'copying', -fn: function (aCollection){ +selector: unescape('temps'), +category: 'accessing', +fn: function (){ var self=this; -return (function($rec){smalltalk.send($rec, "_addAll_", [aCollection]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_copy", [])); +return self.temps; return self;}, -args: ["aCollection"], -source: unescape('copyWithAll%3A%20aCollection%0A%09%5Eself%20copy%20addAll%3A%20aCollection%3B%20yourself'), -messageSends: ["addAll:", "yourself", "copy"], +args: [], +source: unescape('temps%0A%09%3Creturn%20self.temps%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Collection); +smalltalk.MethodContext); smalltalk.addMethod( -unescape('_asArray'), +unescape('_printString'), smalltalk.method({ -selector: unescape('asArray'), -category: 'converting', +selector: unescape('printString'), +category: 'accessing', fn: function (){ var self=this; -var array=nil; -var index=nil; -array=smalltalk.send((smalltalk.Array || Array), "_new", []); -index=(0); -smalltalk.send(self, "_do_", [(function(each){index=((($receiver = index).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));return smalltalk.send(array, "_at_put_", [index, each]);})]); -return array; +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;}, args: [], -source: unescape('asArray%0A%09%7C%20array%20index%20%7C%0A%09array%20%3A%3D%20Array%20new.%0A%09index%20%3A%3D%200.%0A%09self%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20index%20%3A%3D%20index%20+%201.%0A%09%20%20%20%20array%20at%3A%20index%20put%3A%20each%5D.%0A%09%5Earray'), -messageSends: ["new", "do:", unescape("+"), "at:put:"], -referencedClasses: ["Array"] +source: unescape('printString%0A%09%5Esuper%20printString%2C%20%27%28%27%2C%20self%20asString%2C%20%27%29%27'), +messageSends: [unescape("%2C"), "printString", "asString"], +referencedClasses: [] }), -smalltalk.Collection); +smalltalk.MethodContext); smalltalk.addMethod( -unescape('_do_'), +unescape('_asString'), smalltalk.method({ -selector: unescape('do%3A'), -category: 'enumerating', -fn: function (aBlock){ +selector: unescape('asString'), +category: 'accessing', +fn: function (){ var self=this; -for(var i=0;i aString; +var newCollection=nil; +(newCollection=smalltalk.send(smalltalk.send(self, "_class", []), "_new_", [smalltalk.send(self, "_size", [])])); +smalltalk.send(self, "_withIndexDo_", [(function(each, index){return smalltalk.send(newCollection, "_at_put_", [index, smalltalk.send(each, "_deepCopy", [])]);})]); +return newCollection; return self;}, -args: ["aString"], -source: unescape('%3E%20aString%0A%09%3Creturn%20String%28self%29%20%3E%3E%20aString%3E'), -messageSends: [], +args: [], +source: unescape('deepCopy%0A%09%7C%20newCollection%20%7C%0A%09newCollection%20%3A%3D%20self%20class%20new%3A%20self%20size.%0A%09self%20withIndexDo%3A%20%5B%3Aeach%20%3Aindex%20%7C%20%0A%09%09newCollection%20at%3A%20index%20put%3A%20each%20deepCopy%5D.%0A%09%5EnewCollection'), +messageSends: ["new:", "class", "size", "withIndexDo:", "at:put:", "deepCopy"], referencedClasses: [] }), -smalltalk.String); +smalltalk.SequenceableCollection); smalltalk.addMethod( -unescape('__lt'), +unescape('_printString'), smalltalk.method({ -selector: unescape('%3C'), -category: 'comparing', -fn: function (aString){ +selector: unescape('printString'), +category: 'printing', +fn: function (){ var self=this; -return String(self) < aString; +var str=nil; +(str=smalltalk.send("", "_writeStream", [])); +smalltalk.send(str, "_nextPutAll_", [smalltalk.send(smalltalk.send(self, "_printString", [], smalltalk.Collection), "__comma", [unescape("%20%28")])]); +smalltalk.send(self, "_do_separatedBy_", [(function(each){return smalltalk.send(str, "_nextPutAll_", [smalltalk.send(each, "_printString", [])]);}), (function(){return smalltalk.send(str, "_nextPutAll_", [" "]);})]); +smalltalk.send(str, "_nextPutAll_", [unescape("%29")]); +return smalltalk.send(str, "_contents", []); return self;}, -args: ["aString"], -source: unescape('%3C%20aString%0A%09%3Creturn%20String%28self%29%20%3C%20aString%3E'), -messageSends: [], +args: [], +source: unescape('printString%0A%09%7C%20str%20%7C%0A%09str%20%3A%3D%20%27%27%20writeStream.%0A%09str%20nextPutAll%3A%20super%20printString%2C%20%27%20%28%27.%0A%09self%20%0A%09%09do%3A%20%5B%3Aeach%20%7C%20str%20nextPutAll%3A%20each%20printString%5D%0A%09%09separatedBy%3A%20%5Bstr%20nextPutAll%3A%20%27%20%27%5D.%0A%09str%20nextPutAll%3A%20%27%29%27.%0A%09%5Estr%20contents'), +messageSends: ["writeStream", "nextPutAll:", unescape("%2C"), "printString", "do:separatedBy:", "contents"], referencedClasses: [] }), -smalltalk.String); +smalltalk.SequenceableCollection); -smalltalk.addMethod( -unescape('__gt_eq'), -smalltalk.method({ -selector: unescape('%3E%3D'), -category: 'comparing', -fn: function (aString){ -var self=this; -return String(self) >= aString; -return self;}, -args: ["aString"], -source: unescape('%3E%3D%20aString%0A%09%3Creturn%20String%28self%29%20%3E%3E%3D%20aString%3E'), -messageSends: [], -referencedClasses: [] -}), -smalltalk.String); + +smalltalk.addClass('CharacterArray', smalltalk.SequenceableCollection, [], 'Kernel-Collections'); smalltalk.addMethod( -unescape('__lt_eq'), +unescape('_at_put_'), smalltalk.method({ -selector: unescape('%3C%3D'), -category: 'comparing', -fn: function (aString){ +selector: unescape('at%3Aput%3A'), +category: 'accessing', +fn: function (anIndex, anObject){ var self=this; -return String(self) <= aString; +smalltalk.send(self, "_errorReadOnly", []); return self;}, -args: ["aString"], -source: unescape('%3C%3D%20aString%0A%09%3Creturn%20String%28self%29%20%3C%3D%20aString%3E'), -messageSends: [], +args: ["anIndex", "anObject"], +source: unescape('at%3A%20anIndex%20put%3A%20anObject%0A%09self%20errorReadOnly'), +messageSends: ["errorReadOnly"], referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_remove_'), +unescape('_add_'), smalltalk.method({ -selector: unescape('remove%3A'), +selector: unescape('add%3A'), category: 'adding', fn: function (anObject){ var self=this; smalltalk.send(self, "_errorReadOnly", []); return self;}, args: ["anObject"], -source: unescape('remove%3A%20anObject%0A%09self%20errorReadOnly'), +source: unescape('add%3A%20anObject%0A%09self%20errorReadOnly'), messageSends: ["errorReadOnly"], referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_asJSONObject'), +unescape('__comma'), smalltalk.method({ -selector: unescape('asJSONObject'), -category: 'converting', -fn: function (){ +selector: unescape('%2C'), +category: 'copying', +fn: function (aString){ var self=this; -return self; +return smalltalk.send(smalltalk.send(self, "_asString", []), "__comma", [smalltalk.send(aString, "_asString", [])]); return self;}, -args: [], -source: unescape('asJSONObject%0A%09%5Eself'), -messageSends: [], +args: ["aString"], +source: unescape('%2C%20aString%0A%09%5Eself%20asString%2C%20aString%20asString'), +messageSends: [unescape("%2C"), "asString"], referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_trimLeft_'), +unescape('_asString'), smalltalk.method({ -selector: unescape('trimLeft%3A'), -category: 'regular expressions', -fn: function (separators){ +selector: unescape('asString'), +category: 'converting', +fn: function (){ var self=this; -return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send((smalltalk.RegularExpression || RegularExpression), "_fromString_flag_", [smalltalk.send(smalltalk.send(unescape("%5E%5B"), "__comma", [separators]), "__comma", [unescape("%5D+")]), "g"]), ""]); +return smalltalk.send(self, "_subclassResponsibility", []); return self;}, -args: ["separators"], -source: unescape('trimLeft%3A%20separators%0A%0A%20%20%20%20%09%5Eself%20replaceRegexp%3A%20%28RegularExpression%20fromString%3A%20%27%5E%5B%27%2C%20separators%2C%20%27%5D+%27%20flag%3A%20%27g%27%29%20with%3A%20%27%27'), -messageSends: ["replaceRegexp:with:", "fromString:flag:", unescape("%2C")], -referencedClasses: ["RegularExpression"] +args: [], +source: unescape('asString%0A%09%5Eself%20subclassResponsibility'), +messageSends: ["subclassResponsibility"], +referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_trimRight_'), +unescape('_asNumber'), smalltalk.method({ -selector: unescape('trimRight%3A'), -category: 'regular expressions', -fn: function (separators){ +selector: unescape('asNumber'), +category: 'converting', +fn: function (){ var self=this; -return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send((smalltalk.RegularExpression || RegularExpression), "_fromString_flag_", [smalltalk.send(smalltalk.send(unescape("%5B"), "__comma", [separators]), "__comma", [unescape("%5D+%24")]), "g"]), ""]); +return smalltalk.send(smalltalk.send(self, "_asString", []), "_asNumber", []); return self;}, -args: ["separators"], -source: unescape('trimRight%3A%20separators%0A%0A%20%20%20%20%09%5Eself%20replaceRegexp%3A%20%28RegularExpression%20fromString%3A%20%27%5B%27%2C%20separators%2C%20%27%5D+%24%27%20flag%3A%20%27g%27%29%20with%3A%20%27%27'), -messageSends: ["replaceRegexp:with:", "fromString:flag:", unescape("%2C")], -referencedClasses: ["RegularExpression"] +args: [], +source: unescape('asNumber%0A%09%5Eself%20asString%20asNumber'), +messageSends: ["asNumber", "asString"], +referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_trimLeft'), +unescape('_errorReadOnly'), smalltalk.method({ -selector: unescape('trimLeft'), -category: 'regular expressions', +selector: unescape('errorReadOnly'), +category: 'error handling', fn: function (){ var self=this; -return smalltalk.send(self, "_trimLeft_", [unescape("%5Cs")]); +smalltalk.send(self, "_error_", [unescape("Object%20is%20read-only")]); return self;}, args: [], -source: unescape('trimLeft%0A%09%5Eself%20trimLeft%3A%20%27%5Cs%27'), -messageSends: ["trimLeft:"], +source: unescape('errorReadOnly%0A%09self%20error%3A%20%27Object%20is%20read-only%27'), +messageSends: ["error:"], referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_trimRight'), +unescape('_printString'), smalltalk.method({ -selector: unescape('trimRight'), -category: 'regular expressions', +selector: unescape('printString'), +category: 'printing', fn: function (){ var self=this; -return smalltalk.send(self, "_trimRight_", [unescape("%5Cs")]); +return smalltalk.send(smalltalk.send(self, "_asString", []), "_printString", []); return self;}, args: [], -source: unescape('trimRight%0A%09%5Eself%20trimRight%3A%20%27%5Cs%27'), -messageSends: ["trimRight:"], +source: unescape('printString%0A%09%5Eself%20asString%20printString'), +messageSends: ["printString", "asString"], referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_trimBoth'), +unescape('_remove_'), smalltalk.method({ -selector: unescape('trimBoth'), -category: 'regular expressions', -fn: function (){ +selector: unescape('remove%3A'), +category: 'adding', +fn: function (anObject){ var self=this; -return smalltalk.send(self, "_trimBoth_", [unescape("%5Cs")]); +smalltalk.send(self, "_errorReadOnly", []); return self;}, -args: [], -source: unescape('trimBoth%0A%09%5Eself%20trimBoth%3A%20%27%5Cs%27'), -messageSends: ["trimBoth:"], +args: ["anObject"], +source: unescape('remove%3A%20anObject%0A%09self%20errorReadOnly'), +messageSends: ["errorReadOnly"], referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_trimBoth_'), +unescape('_asUppercase'), smalltalk.method({ -selector: unescape('trimBoth%3A'), -category: 'regular expressions', -fn: function (separators){ +selector: unescape('asUppercase'), +category: 'converting', +fn: function (){ var self=this; -return smalltalk.send(smalltalk.send(self, "_trimLeft_", [separators]), "_trimRight_", [separators]); +return smalltalk.send(smalltalk.send(self, "_class", []), "_fromString_", [smalltalk.send(smalltalk.send(self, "_asString", []), "_asUppercase", [])]); return self;}, -args: ["separators"], -source: unescape('trimBoth%3A%20separators%0A%0A%20%20%20%20%09%5E%28self%20trimLeft%3A%20separators%29%20trimRight%3A%20separators'), -messageSends: ["trimRight:", "trimLeft:"], +args: [], +source: unescape('asUppercase%0A%09%5Eself%20class%20fromString%3A%20self%20asString%20asUppercase'), +messageSends: ["fromString:", "class", "asUppercase", "asString"], referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_asLowercase'), +unescape('_asSymbol'), smalltalk.method({ -selector: unescape('asLowercase'), +selector: unescape('asSymbol'), category: 'converting', fn: function (){ var self=this; -return self.toLowerCase(); +return smalltalk.send(self, "_subclassResponsibility", []); return self;}, args: [], -source: unescape('asLowercase%0A%09%3Creturn%20self.toLowerCase%28%29%3E'), -messageSends: [], +source: unescape('asSymbol%0A%09%5Eself%20subclassResponsibility'), +messageSends: ["subclassResponsibility"], referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); smalltalk.addMethod( -unescape('_asUppercase'), +unescape('_asLowercase'), smalltalk.method({ -selector: unescape('asUppercase'), +selector: unescape('asLowercase'), category: 'converting', fn: function (){ var self=this; -return self.toUpperCase(); +return smalltalk.send(smalltalk.send(self, "_class", []), "_fromString_", [smalltalk.send(smalltalk.send(self, "_asString", []), "_asLowercase", [])]); return self;}, args: [], -source: unescape('asUppercase%0A%09%3Creturn%20self.toUpperCase%28%29%3E'), -messageSends: [], +source: unescape('asLowercase%0A%09%5Eself%20class%20fromString%3A%20self%20asString%20asLowercase'), +messageSends: ["fromString:", "class", "asLowercase", "asString"], referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray); + smalltalk.addMethod( -unescape('_join_'), +unescape('_fromString_'), smalltalk.method({ -selector: unescape('join%3A'), -category: 'split join', -fn: function (aCollection){ +selector: unescape('fromString%3A'), +category: 'instance creation', +fn: function (aString){ var self=this; -return smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(stream){return smalltalk.send(aCollection, "_do_separatedBy_", [(function(each){return smalltalk.send(stream, "_nextPutAll_", [smalltalk.send(each, "_asString", [])]);}), (function(){return smalltalk.send(stream, "_nextPutAll_", [self]);})]);})]); +smalltalk.send(self, "_subclassResponsibility", []); return self;}, -args: ["aCollection"], -source: unescape('join%3A%20aCollection%20%0A%09%5E%20String%0A%09%09streamContents%3A%20%5B%3Astream%20%7C%20aCollection%0A%09%09%09%09do%3A%20%5B%3Aeach%20%7C%20stream%20nextPutAll%3A%20each%20asString%5D%20%0A%09%09%09%09separatedBy%3A%20%5Bstream%20nextPutAll%3A%20self%5D%5D'), -messageSends: ["streamContents:", "do:separatedBy:", "nextPutAll:", "asString"], -referencedClasses: ["String"] +args: ["aString"], +source: unescape('fromString%3A%20aString%0A%09self%20subclassResponsibility'), +messageSends: ["subclassResponsibility"], +referencedClasses: [] }), -smalltalk.String); +smalltalk.CharacterArray.klass); + +smalltalk.addClass('String', smalltalk.CharacterArray, [], 'Kernel-Collections'); smalltalk.addMethod( -unescape('_includesSubString_'), +unescape('__eq'), smalltalk.method({ -selector: unescape('includesSubString%3A'), -category: 'testing', -fn: function (subString){ +selector: unescape('%3D'), +category: 'comparing', +fn: function (aString){ var self=this; - return self.indexOf(subString) != -1 ; -return self;}, -args: ["subString"], -source: unescape('includesSubString%3A%20subString%0A%09%3C%20return%20self.indexOf%28subString%29%20%21%3D%20-1%20%3E'), -messageSends: [], +try{((($receiver = smalltalk.send(smalltalk.send(aString, "_class", []), "__eq", [smalltalk.send(self, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})])); +return String(self) === String(aString); +return self; +} catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}, +args: ["aString"], +source: unescape('%3D%20aString%0A%09aString%20class%20%3D%20self%20class%20ifFalse%3A%20%5B%5Efalse%5D.%0A%09%3Creturn%20String%28self%29%20%3D%3D%3D%20String%28aString%29%3E'), +messageSends: ["ifFalse:", unescape("%3D"), "class"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( -unescape('_asciiValue'), +unescape('_size'), smalltalk.method({ -selector: unescape('asciiValue'), +selector: unescape('size'), category: 'accessing', fn: function (){ var self=this; -return self.charCodeAt(0);; +return self.length; return self;}, args: [], -source: unescape('asciiValue%0A%09%3Creturn%20self.charCodeAt%280%29%3B%3E'), +source: unescape('size%0A%09%3Creturn%20self.length%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( -unescape('_lineIndicesDo_'), -smalltalk.method({ -selector: unescape('lineIndicesDo%3A'), -category: 'split join', -fn: function (aBlock){ -var self=this; -try{var cr=nil; -var lf=nil; -var start=nil; -var sz=nil; -var nextLF=nil; -var nextCR=nil; -start=(1); -sz=smalltalk.send(self, "_size", []); -cr=smalltalk.send((smalltalk.String || String), "_cr", []); -nextCR=smalltalk.send(self, "_indexOf_startingAt_", [cr, (1)]); -lf=smalltalk.send((smalltalk.String || String), "_lf", []); -nextLF=smalltalk.send(self, "_indexOf_startingAt_", [lf, (1)]); -(function(){while((function(){return ((($receiver = start).klass === smalltalk.Number) ? $receiver <=sz : smalltalk.send($receiver, "__lt_eq", [sz]));})()) {(function(){((($receiver = smalltalk.send(smalltalk.send(nextLF, "__eq", [(0)]), "_and_", [(function(){return smalltalk.send(nextCR, "__eq", [(0)]);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(aBlock, "_value_value_value_", [start, sz, sz]);return (function(){throw({name: 'stReturn', selector: '_lineIndicesDo_', fn: function(){return self}})})();})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(aBlock, "_value_value_value_", [start, sz, sz]);return (function(){throw({name: 'stReturn', selector: '_lineIndicesDo_', fn: function(){return self}})})();})]));return ((($receiver = smalltalk.send(smalltalk.send(nextCR, "__eq", [(0)]), "_or_", [(function(){return smalltalk.send((0) < nextLF, "_and_", [(function(){return ((($receiver = nextLF).klass === smalltalk.Number) ? $receiver aString._asString(); return self;}, -args: [], -source: unescape('shallowCopy%0A%09%7C%20newCollection%20%7C%0A%09newCollection%20%3A%3D%20self%20class%20new.%0A%09self%20do%3A%20%5B%3Aeach%20%7C%20newCollection%20add%3A%20each%5D.%0A%09%5EnewCollection'), -messageSends: ["new", "class", "do:", "add:"], +args: ["aString"], +source: unescape('%3E%20aString%0A%09%3Creturn%20String%28self%29%20%3E%3E%20aString._asString%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Array); +smalltalk.String); smalltalk.addMethod( -unescape('_deepCopy'), +unescape('__lt'), smalltalk.method({ -selector: unescape('deepCopy'), -category: 'copying', -fn: function (){ +selector: unescape('%3C'), +category: 'comparing', +fn: function (aString){ var self=this; -var newCollection=nil; -newCollection=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []); -smalltalk.send(self, "_do_", [(function(each){return smalltalk.send(newCollection, "_add_", [smalltalk.send(each, "_deepCopy", [])]);})]); -return newCollection; +return String(self) < aString._asString(); return self;}, -args: [], -source: unescape('deepCopy%0A%09%7C%20newCollection%20%7C%0A%09newCollection%20%3A%3D%20self%20class%20new.%0A%09self%20do%3A%20%5B%3Aeach%20%7C%20newCollection%20add%3A%20each%20deepCopy%5D.%0A%09%5EnewCollection'), -messageSends: ["new", "class", "do:", "add:", "deepCopy"], +args: ["aString"], +source: unescape('%3C%20aString%0A%09%3Creturn%20String%28self%29%20%3C%20aString._asString%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Array); +smalltalk.String); smalltalk.addMethod( -unescape('_copyFrom_to_'), +unescape('__gt_eq'), smalltalk.method({ -selector: unescape('copyFrom%3Ato%3A'), -category: 'copying', -fn: function (anIndex, anotherIndex){ +selector: unescape('%3E%3D'), +category: 'comparing', +fn: function (aString){ var self=this; -var array=nil; -array=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []); -smalltalk.send(anIndex, "_to_do_", [anotherIndex, (function(each){return smalltalk.send(array, "_add_", [smalltalk.send(self, "_at_", [each])]);})]); -return array; +return String(self) >= aString._asString(); return self;}, -args: ["anIndex", "anotherIndex"], -source: unescape('copyFrom%3A%20anIndex%20to%3A%20anotherIndex%0A%09%7C%20array%20%7C%0A%09array%20%3A%3D%20self%20class%20new.%0A%09anIndex%20to%3A%20anotherIndex%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20array%20add%3A%20%28self%20at%3A%20each%29%5D.%0A%09%5Earray'), -messageSends: ["new", "class", "to:do:", "add:", "at:"], +args: ["aString"], +source: unescape('%3E%3D%20aString%0A%09%3Creturn%20String%28self%29%20%3E%3E%3D%20aString._asString%28%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Array); +smalltalk.String); smalltalk.addMethod( -unescape('_join_'), +unescape('__lt_eq'), smalltalk.method({ -selector: unescape('join%3A'), -category: 'enumerating', +selector: unescape('%3C%3D'), +category: 'comparing', fn: function (aString){ var self=this; -return self.join(aString); +return String(self) <= aString._asString(); return self;}, args: ["aString"], -source: unescape('join%3A%20aString%0A%09%3Creturn%20self.join%28aString%29%3E'), +source: unescape('%3C%3D%20aString%0A%09%3Creturn%20String%28self%29%20%3C%3D%20aString._asString%28%29%3E'), messageSends: [], referencedClasses: [] }), -smalltalk.Array); +smalltalk.String); smalltalk.addMethod( -unescape('_asJavascript'), +unescape('_trimLeft_'), smalltalk.method({ -selector: unescape('asJavascript'), -category: 'converting', -fn: function (){ +selector: unescape('trimLeft%3A'), +category: 'regular expressions', +fn: function (separators){ var self=this; -return smalltalk.send(smalltalk.send(unescape("%5B"), "__comma", [smalltalk.send(smalltalk.send(self, "_collect_", [(function(each){return smalltalk.send(each, "_asJavascript", []);})]), "_join_", [unescape("%2C%20")])]), "__comma", [unescape("%5D")]); +return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send((smalltalk.RegularExpression || RegularExpression), "_fromString_flag_", [smalltalk.send(smalltalk.send(unescape("%5E%5B"), "__comma", [separators]), "__comma", [unescape("%5D+")]), "g"]), ""]); return self;}, -args: [], -source: unescape('asJavascript%0A%09%5E%27%5B%27%2C%20%28%28self%20collect%3A%20%5B%3Aeach%20%7C%20each%20asJavascript%5D%29%20join%3A%20%27%2C%20%27%29%2C%20%20%27%5D%27'), -messageSends: [unescape("%2C"), "join:", "collect:", "asJavascript"], -referencedClasses: [] +args: ["separators"], +source: unescape('trimLeft%3A%20separators%0A%0A%09%5Eself%20replaceRegexp%3A%20%28RegularExpression%20fromString%3A%20%27%5E%5B%27%2C%20separators%2C%20%27%5D+%27%20flag%3A%20%27g%27%29%20with%3A%20%27%27'), +messageSends: ["replaceRegexp:with:", "fromString:flag:", unescape("%2C")], +referencedClasses: ["RegularExpression"] }), -smalltalk.Array); +smalltalk.String); smalltalk.addMethod( -unescape('_sort'), +unescape('_trimRight_'), smalltalk.method({ -selector: unescape('sort'), -category: 'enumerating', -fn: function (){ +selector: unescape('trimRight%3A'), +category: 'regular expressions', +fn: function (separators){ var self=this; -return smalltalk.send(self, "_basicPerform_", ["sort"]); +return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send((smalltalk.RegularExpression || RegularExpression), "_fromString_flag_", [smalltalk.send(smalltalk.send(unescape("%5B"), "__comma", [separators]), "__comma", [unescape("%5D+%24")]), "g"]), ""]); return self;}, -args: [], -source: unescape('sort%0A%20%20%20%20%5Eself%20basicPerform%3A%20%27sort%27'), -messageSends: ["basicPerform:"], -referencedClasses: [] +args: ["separators"], +source: unescape('trimRight%3A%20separators%0A%0A%09%5Eself%20replaceRegexp%3A%20%28RegularExpression%20fromString%3A%20%27%5B%27%2C%20separators%2C%20%27%5D+%24%27%20flag%3A%20%27g%27%29%20with%3A%20%27%27'), +messageSends: ["replaceRegexp:with:", "fromString:flag:", unescape("%2C")], +referencedClasses: ["RegularExpression"] }), -smalltalk.Array); +smalltalk.String); smalltalk.addMethod( -unescape('_sort_'), +unescape('_trimLeft'), smalltalk.method({ -selector: unescape('sort%3A'), -category: 'enumerating', -fn: function (aBlock){ +selector: unescape('trimLeft'), +category: 'regular expressions', +fn: function (){ var self=this; - - return self.sort(function(a, b) { - if(aBlock(a,b)) {return -1} else {return 1} - }) - ; +return smalltalk.send(self, "_trimLeft_", [unescape("%5Cs")]); return self;}, -args: ["aBlock"], -source: unescape('sort%3A%20aBlock%0A%09%3C%0A%09%09return%20self.sort%28function%28a%2C%20b%29%20%7B%0A%09%09%09if%28aBlock%28a%2Cb%29%29%20%7Breturn%20-1%7D%20else%20%7Breturn%201%7D%0A%09%09%7D%29%0A%09%3E'), -messageSends: [], +args: [], +source: unescape('trimLeft%0A%09%5Eself%20trimLeft%3A%20%27%5Cs%27'), +messageSends: ["trimLeft:"], referencedClasses: [] }), -smalltalk.Array); +smalltalk.String); smalltalk.addMethod( -unescape('_remove_'), +unescape('_trimRight'), smalltalk.method({ -selector: unescape('remove%3A'), -category: 'adding/removing', -fn: function (anObject){ -var self=this; - - for(var i=0;i=smalltalk.send(aSymbol, "_asString", []) : smalltalk.send($receiver, "__gt_eq", [smalltalk.send(aSymbol, "_asString", [])])); return self;}, -args: ["aKey", "aValue"], -source: unescape('key%3A%20aKey%20value%3A%20aValue%0A%09%20%20%20%20%5Eself%20new%0A%09%09key%3A%20aKey%3B%0A%09%09value%3A%20aValue%3B%0A%09%09yourself'), -messageSends: ["key:", "value:", "yourself", "new"], +args: ["aSymbol"], +source: unescape('%3E%3D%20aSymbol%0A%09%5Eself%20asString%20%3E%3D%20aSymbol%20asString'), +messageSends: [unescape("%3E%3D"), "asString"], referencedClasses: [] }), -smalltalk.Association.klass); +smalltalk.Symbol); - -smalltalk.addClass('Dictionary', smalltalk.Collection, ['keys'], 'Kernel'); smalltalk.addMethod( unescape('__eq'), smalltalk.method({ selector: unescape('%3D'), category: 'comparing', -fn: function (aDictionary){ +fn: function (aSymbol){ var self=this; -try{((($receiver = smalltalk.send(smalltalk.send(self, "_class", []), "__eq", [smalltalk.send(aDictionary, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})])); -((($receiver = smalltalk.send(smalltalk.send(self, "_size", []), "__eq", [smalltalk.send(aDictionary, "_size", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})])); -(function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return smalltalk.send(smalltalk.send(self, "_associations", []), "__eq", [smalltalk.send(aDictionary, "_associations", [])])}})})(); +try{((($receiver = smalltalk.send(smalltalk.send(aSymbol, "_class", []), "__eq", [smalltalk.send(self, "_class", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})])); +(function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return smalltalk.send(smalltalk.send(self, "_asString", []), "__eq", [smalltalk.send(aSymbol, "_asString", [])])}})})(); return self; } catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}, -args: ["aDictionary"], -source: unescape('%3D%20aDictionary%0A%09self%20class%20%3D%20aDictionary%20class%20ifFalse%3A%20%5B%5Efalse%5D.%0A%09self%20size%20%3D%20aDictionary%20size%20ifFalse%3A%20%5B%5Efalse%5D.%0A%09%5Eself%20associations%20%3D%20aDictionary%20associations'), -messageSends: ["ifFalse:", unescape("%3D"), "class", "size", "associations"], +args: ["aSymbol"], +source: unescape('%3D%20aSymbol%0A%09aSymbol%20class%20%3D%20self%20class%20ifFalse%3A%20%5B%5Efalse%5D.%0A%09%5Eself%20asString%20%3D%20aSymbol%20asString'), +messageSends: ["ifFalse:", unescape("%3D"), "class", "asString"], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Symbol); smalltalk.addMethod( -unescape('_shallowCopy'), +unescape('_isSymbol'), smalltalk.method({ -selector: unescape('shallowCopy'), -category: 'copying', +selector: unescape('isSymbol'), +category: 'printing', fn: function (){ var self=this; -var copy=nil; -copy=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []); -smalltalk.send(self, "_associationsDo_", [(function(each){return smalltalk.send(copy, "_at_put_", [smalltalk.send(each, "_key", []), smalltalk.send(each, "_value", [])]);})]); -return copy; +return true; return self;}, args: [], -source: unescape('shallowCopy%0A%09%7C%20copy%20%7C%0A%09copy%20%3A%3D%20self%20class%20new.%0A%09self%20associationsDo%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20copy%20at%3A%20each%20key%20%20put%3A%20each%20value%5D.%0A%09%5Ecopy'), -messageSends: ["new", "class", "associationsDo:", "at:put:", "key", "value"], +source: unescape('isSymbol%0A%09%5Etrue'), +messageSends: [], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Symbol); smalltalk.addMethod( -unescape('_initialize'), +unescape('_asJavascript'), smalltalk.method({ -selector: unescape('initialize'), -category: 'initialization', +selector: unescape('asJavascript'), +category: 'converting', fn: function (){ var self=this; -smalltalk.send(self, "_initialize", [], smalltalk.Collection); -self['@keys']=[]; +return smalltalk.send(smalltalk.send(unescape("smalltalk.symbolFor%28%22"), "__comma", [smalltalk.send(self, "_asString", [])]), "__comma", [unescape("%22%29")]); return self;}, args: [], -source: unescape('initialize%0A%20%20%20%20%09super%20initialize.%0A%20%20%20%20%09keys%20%3A%3D%20%23%28%29'), -messageSends: ["initialize"], +source: unescape('asJavascript%0A%09%5E%27smalltalk.symbolFor%28%22%27%2C%20self%20asString%2C%20%27%22%29%27'), +messageSends: [unescape("%2C"), "asString"], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Symbol); smalltalk.addMethod( -unescape('_size'), +unescape('__gt'), smalltalk.method({ -selector: unescape('size'), -category: 'accessing', -fn: function (){ +selector: unescape('%3E'), +category: 'comparing', +fn: function (aSymbol){ var self=this; -return smalltalk.send(self['@keys'], "_size", []); +return ((($receiver = smalltalk.send(self, "_asString", [])).klass === smalltalk.Number) ? $receiver >smalltalk.send(aSymbol, "_asString", []) : smalltalk.send($receiver, "__gt", [smalltalk.send(aSymbol, "_asString", [])])); return self;}, -args: [], -source: unescape('size%0A%09%5Ekeys%20size'), -messageSends: ["size"], +args: ["aSymbol"], +source: unescape('%3E%20aSymbol%0A%09%5Eself%20asString%20%3E%20aSymbol%20asString'), +messageSends: [unescape("%3E"), "asString"], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Symbol); smalltalk.addMethod( -unescape('_associations'), +unescape('_shallowCopy'), smalltalk.method({ -selector: unescape('associations'), -category: 'accessing', +selector: unescape('shallowCopy'), +category: 'copying', fn: function (){ var self=this; -var associations=nil; -associations=[]; -smalltalk.send(self['@keys'], "_do_", [(function(each){return smalltalk.send(associations, "_add_", [smalltalk.send((smalltalk.Association || Association), "_key_value_", [each, smalltalk.send(self, "_at_", [each])])]);})]); -return associations; +return self; return self;}, args: [], -source: unescape('associations%0A%09%7C%20associations%20%7C%0A%09associations%20%3A%3D%20%23%28%29.%0A%09keys%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20associations%20add%3A%20%28Association%20key%3A%20each%20value%3A%20%28self%20at%3A%20each%29%29%5D.%0A%09%5Eassociations'), -messageSends: ["do:", "add:", "key:value:", "at:"], -referencedClasses: ["Association"] +source: unescape('shallowCopy%0A%09%5Eself'), +messageSends: [], +referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Symbol); smalltalk.addMethod( -unescape('_keys'), +unescape('_asSelector'), smalltalk.method({ -selector: unescape('keys'), -category: 'accessing', +selector: unescape('asSelector'), +category: 'converting', fn: function (){ var self=this; -return smalltalk.send(self['@keys'], "_copy", []); +return smalltalk.send(smalltalk.send(self, "_asString", []), "_asSelector", []); return self;}, args: [], -source: unescape('keys%0A%09%5Ekeys%20copy'), -messageSends: ["copy"], +source: unescape('asSelector%0A%09%5Eself%20asString%20asSelector'), +messageSends: ["asSelector", "asString"], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Symbol); + smalltalk.addMethod( -unescape('_values'), +unescape('_lookup_'), smalltalk.method({ -selector: unescape('values'), -category: 'accessing', -fn: function (){ +selector: unescape('lookup%3A'), +category: 'instance creation', +fn: function (aString){ var self=this; -return smalltalk.send(self['@keys'], "_collect_", [(function(each){return smalltalk.send(self, "_at_", [each]);})]); +return smalltalk.symbolFor(aString);; return self;}, -args: [], -source: unescape('values%0A%20%20%20%20%09%5Ekeys%20collect%3A%20%5B%3Aeach%20%7C%20self%20at%3A%20each%5D'), -messageSends: ["collect:", "at:"], +args: ["aString"], +source: unescape('lookup%3A%20aString%0A%09%3Creturn%20smalltalk.symbolFor%28aString%29%3B%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Symbol.klass); smalltalk.addMethod( -unescape('_at_put_'), +unescape('_basicNew'), smalltalk.method({ -selector: unescape('at%3Aput%3A'), -category: 'accessing', -fn: function (aKey, aValue){ +selector: unescape('basicNew'), +category: 'instance creation', +fn: function (){ var self=this; -((($receiver = smalltalk.send(self['@keys'], "_includes_", [aKey])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self['@keys'], "_add_", [aKey]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self['@keys'], "_add_", [aKey]);})])); -return smalltalk.send(self, "_basicAt_put_", [aKey, aValue]); +smalltalk.send(self, "_shouldNotImplement", []); return self;}, -args: ["aKey", "aValue"], -source: unescape('at%3A%20aKey%20put%3A%20aValue%0A%09%28keys%20includes%3A%20aKey%29%20ifFalse%3A%20%5Bkeys%20add%3A%20aKey%5D.%0A%09%5Eself%20basicAt%3A%20aKey%20put%3A%20aValue'), -messageSends: ["ifFalse:", "includes:", "add:", "basicAt:put:"], +args: [], +source: unescape('basicNew%0A%09self%20shouldNotImplement'), +messageSends: ["shouldNotImplement"], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Symbol.klass); smalltalk.addMethod( -unescape('_at_ifAbsent_'), +unescape('_fromString_'), smalltalk.method({ -selector: unescape('at%3AifAbsent%3A'), -category: 'accessing', -fn: function (aKey, aBlock){ +selector: unescape('fromString%3A'), +category: 'instance creation', +fn: function (aString){ var self=this; -return smalltalk.send(smalltalk.send(smalltalk.send(self, "_keys", []), "_includes_", [aKey]), "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self, "_basicAt_", [aKey]);}), aBlock]); +return smalltalk.send(self, "_lookup_", [aString]); return self;}, -args: ["aKey", "aBlock"], -source: unescape('at%3A%20aKey%20ifAbsent%3A%20aBlock%0A%09%5E%28self%20keys%20includes%3A%20aKey%29%0A%09%09ifTrue%3A%20%5Bself%20basicAt%3A%20aKey%5D%0A%09%09ifFalse%3A%20aBlock'), -messageSends: ["ifTrue:ifFalse:", "includes:", "keys", "basicAt:"], +args: ["aString"], +source: unescape('fromString%3A%20aString%0A%09%5Eself%20lookup%3A%20aString'), +messageSends: ["lookup:"], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Symbol.klass); + +smalltalk.addClass('Array', smalltalk.SequenceableCollection, [], 'Kernel-Collections'); smalltalk.addMethod( -unescape('_at_ifAbsentPut_'), +unescape('_size'), smalltalk.method({ -selector: unescape('at%3AifAbsentPut%3A'), +selector: unescape('size'), category: 'accessing', -fn: function (aKey, aBlock){ +fn: function (){ var self=this; -return smalltalk.send(self, "_at_ifAbsent_", [aKey, (function(){return smalltalk.send(self, "_at_put_", [aKey, smalltalk.send(aBlock, "_value", [])]);})]); +return self.length; return self;}, -args: ["aKey", "aBlock"], -source: unescape('at%3A%20aKey%20ifAbsentPut%3A%20aBlock%0A%20%20%20%20%09%5Eself%20at%3A%20aKey%20ifAbsent%3A%20%5B%0A%20%20%20%20%09%20%20%20%20self%20at%3A%20aKey%20put%3A%20aBlock%20value%5D'), -messageSends: ["at:ifAbsent:", "at:put:", "value"], +args: [], +source: unescape('size%0A%09%3Creturn%20self.length%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Array); smalltalk.addMethod( -unescape('_at_ifPresent_'), +unescape('_at_put_'), smalltalk.method({ -selector: unescape('at%3AifPresent%3A'), +selector: unescape('at%3Aput%3A'), category: 'accessing', -fn: function (aKey, aBlock){ +fn: function (anIndex, anObject){ var self=this; -return (($receiver = smalltalk.send(self, "_basicAt_", [aKey])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(aBlock, "_value_", [smalltalk.send(self, "_at_", [aKey])]);})() : nil; +return self[anIndex - 1] = anObject; return self;}, -args: ["aKey", "aBlock"], -source: unescape('at%3A%20aKey%20ifPresent%3A%20aBlock%0A%09%5E%28self%20basicAt%3A%20aKey%29%20ifNotNil%3A%20%5BaBlock%20value%3A%20%28self%20at%3A%20aKey%29%5D'), -messageSends: ["ifNotNil:", "basicAt:", "value:", "at:"], +args: ["anIndex", "anObject"], +source: unescape('at%3A%20anIndex%20put%3A%20anObject%0A%09%3Creturn%20self%5BanIndex%20-%201%5D%20%3D%20anObject%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Array); smalltalk.addMethod( -unescape('_at_ifPresent_ifAbsent_'), +unescape('_at_ifAbsent_'), smalltalk.method({ -selector: unescape('at%3AifPresent%3AifAbsent%3A'), +selector: unescape('at%3AifAbsent%3A'), category: 'accessing', -fn: function (aKey, aBlock, anotherBlock){ +fn: function (anIndex, aBlock){ var self=this; -return smalltalk.send(smalltalk.send(self, "_basicAt_", [aKey]), "_ifNil_ifNotNil_", [anotherBlock, (function(){return smalltalk.send(aBlock, "_value_", [smalltalk.send(self, "_at_", [aKey])]);})]); + + var value = self[anIndex - 1]; + if(value === undefined) { + return aBlock(); + } else { + return value; + } + ; return self;}, -args: ["aKey", "aBlock", "anotherBlock"], -source: unescape('at%3A%20aKey%20ifPresent%3A%20aBlock%20ifAbsent%3A%20anotherBlock%0A%09%5E%28self%20basicAt%3A%20aKey%29%0A%09%20%20%20%20ifNil%3A%20anotherBlock%0A%09%20%20%20%20ifNotNil%3A%20%5BaBlock%20value%3A%20%28self%20at%3A%20aKey%29%5D'), -messageSends: ["ifNil:ifNotNil:", "basicAt:", "value:", "at:"], +args: ["anIndex", "aBlock"], +source: unescape('at%3A%20anIndex%20ifAbsent%3A%20aBlock%0A%09%3C%0A%09%20%20%20%20var%20value%20%3D%20self%5BanIndex%20-%201%5D%3B%0A%09%20%20%20%20if%28value%20%3D%3D%3D%20undefined%29%20%7B%0A%09%09return%20aBlock%28%29%3B%0A%09%20%20%20%20%7D%20else%20%7B%0A%09%09return%20value%3B%0A%09%20%20%20%20%7D%0A%09%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Array); smalltalk.addMethod( unescape('_add_'), smalltalk.method({ selector: unescape('add%3A'), category: 'adding/removing', -fn: function (anAssociation){ -var self=this; -smalltalk.send(self, "_at_put_", [smalltalk.send(anAssociation, "_key", []), smalltalk.send(anAssociation, "_value", [])]); -return self;}, -args: ["anAssociation"], -source: unescape('add%3A%20anAssociation%0A%20%20%20%20%09self%20at%3A%20anAssociation%20key%20put%3A%20anAssociation%20value'), -messageSends: ["at:put:", "key", "value"], -referencedClasses: [] -}), -smalltalk.Dictionary); - -smalltalk.addMethod( -unescape('_addAll_'), -smalltalk.method({ -selector: unescape('addAll%3A'), -category: 'adding/removing', -fn: function (aDictionary){ -var self=this; -smalltalk.send(self, "_addAll_", [smalltalk.send(aDictionary, "_associations", [])], smalltalk.Collection); -return aDictionary; -return self;}, -args: ["aDictionary"], -source: unescape('addAll%3A%20aDictionary%0A%20%20%20%20%09super%20addAll%3A%20aDictionary%20associations.%0A%20%20%20%20%09%5EaDictionary'), -messageSends: ["addAll:", "associations"], -referencedClasses: [] -}), -smalltalk.Dictionary); - -smalltalk.addMethod( -unescape('__comma'), -smalltalk.method({ -selector: unescape('%2C'), -category: 'copying', -fn: function (aCollection){ -var self=this; -smalltalk.send(self, "_shouldNotImplement", []); -return self;}, -args: ["aCollection"], -source: unescape('%2C%20aCollection%0A%09self%20shouldNotImplement'), -messageSends: ["shouldNotImplement"], -referencedClasses: [] -}), -smalltalk.Dictionary); - -smalltalk.addMethod( -unescape('_copyFrom_to_'), -smalltalk.method({ -selector: unescape('copyFrom%3Ato%3A'), -category: 'copying', -fn: function (anIndex, anotherIndex){ +fn: function (anObject){ var self=this; -smalltalk.send(self, "_shouldNotImplement", []); +self.push(anObject); return anObject;; return self;}, -args: ["anIndex", "anotherIndex"], -source: unescape('copyFrom%3A%20anIndex%20to%3A%20anotherIndex%0A%09self%20shouldNotImplement'), -messageSends: ["shouldNotImplement"], +args: ["anObject"], +source: unescape('add%3A%20anObject%0A%09%3Cself.push%28anObject%29%3B%20return%20anObject%3B%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Array); smalltalk.addMethod( -unescape('_associationsDo_'), +unescape('_join_'), smalltalk.method({ -selector: unescape('associationsDo%3A'), +selector: unescape('join%3A'), category: 'enumerating', -fn: function (aBlock){ +fn: function (aString){ var self=this; -smalltalk.send(smalltalk.send(self, "_associations", []), "_do_", [aBlock]); +return self.join(aString); return self;}, -args: ["aBlock"], -source: unescape('associationsDo%3A%20aBlock%0A%20%20%20%20%09self%20associations%20do%3A%20aBlock'), -messageSends: ["do:", "associations"], +args: ["aString"], +source: unescape('join%3A%20aString%0A%09%3Creturn%20self.join%28aString%29%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Array); smalltalk.addMethod( -unescape('_keysAndValuesDo_'), +unescape('_asJavascript'), smalltalk.method({ -selector: unescape('keysAndValuesDo%3A'), -category: 'enumerating', -fn: function (aBlock){ +selector: unescape('asJavascript'), +category: 'converting', +fn: function (){ var self=this; -smalltalk.send(self, "_associationsDo_", [(function(each){return smalltalk.send(aBlock, "_value_value_", [smalltalk.send(each, "_key", []), smalltalk.send(each, "_value", [])]);})]); +return smalltalk.send(smalltalk.send(unescape("%5B"), "__comma", [smalltalk.send(smalltalk.send(self, "_collect_", [(function(each){return smalltalk.send(each, "_asJavascript", []);})]), "_join_", [unescape("%2C%20")])]), "__comma", [unescape("%5D")]); return self;}, -args: ["aBlock"], -source: unescape('keysAndValuesDo%3A%20aBlock%0A%20%20%20%20%09self%20associationsDo%3A%20%5B%3Aeach%20%7C%0A%20%20%20%20%09%20%20%20%20aBlock%20value%3A%20each%20key%20value%3A%20each%20value%5D'), -messageSends: ["associationsDo:", "value:value:", "key", "value"], +args: [], +source: unescape('asJavascript%0A%09%5E%27%5B%27%2C%20%28%28self%20collect%3A%20%5B%3Aeach%20%7C%20each%20asJavascript%5D%29%20join%3A%20%27%2C%20%27%29%2C%20%20%27%5D%27'), +messageSends: [unescape("%2C"), "join:", "collect:", "asJavascript"], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Array); smalltalk.addMethod( -unescape('_do_'), +unescape('_sort'), smalltalk.method({ -selector: unescape('do%3A'), +selector: unescape('sort'), category: 'enumerating', -fn: function (aBlock){ +fn: function (){ var self=this; -smalltalk.send(smalltalk.send(self, "_values", []), "_do_", [aBlock]); +return smalltalk.send(self, "_basicPerform_", ["sort"]); return self;}, -args: ["aBlock"], -source: unescape('do%3A%20aBlock%0A%20%20%20%20%09self%20values%20do%3A%20aBlock'), -messageSends: ["do:", "values"], +args: [], +source: unescape('sort%0A%20%20%20%20%5Eself%20basicPerform%3A%20%27sort%27'), +messageSends: ["basicPerform:"], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Array); smalltalk.addMethod( -unescape('_select_'), +unescape('_sort_'), smalltalk.method({ -selector: unescape('select%3A'), +selector: unescape('sort%3A'), category: 'enumerating', fn: function (aBlock){ var self=this; -var newDict=nil; -newDict=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []); -smalltalk.send(self, "_keysAndValuesDo_", [(function(key, value){return ((($receiver = smalltalk.send(aBlock, "_value_", [value])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(newDict, "_at_put_", [key, value]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(newDict, "_at_put_", [key, value]);})]));})]); -return newDict; + + return self.sort(function(a, b) { + if(aBlock(a,b)) {return -1} else {return 1} + }) + ; return self;}, args: ["aBlock"], -source: unescape('select%3A%20aBlock%0A%20%20%20%20%09%7C%20newDict%20%7C%0A%20%20%20%20%09newDict%20%3A%3D%20self%20class%20new.%0A%20%20%20%20%09self%20keysAndValuesDo%3A%20%5B%3Akey%20%3Avalue%20%7C%0A%20%20%20%20%09%20%20%20%20%28aBlock%20value%3A%20value%29%20ifTrue%3A%20%5BnewDict%20at%3A%20key%20put%3A%20value%5D%5D.%0A%20%20%20%20%09%5EnewDict'), -messageSends: ["new", "class", "keysAndValuesDo:", "ifTrue:", "value:", "at:put:"], +source: unescape('sort%3A%20aBlock%0A%09%3C%0A%09%09return%20self.sort%28function%28a%2C%20b%29%20%7B%0A%09%09%09if%28aBlock%28a%2Cb%29%29%20%7Breturn%20-1%7D%20else%20%7Breturn%201%7D%0A%09%09%7D%29%0A%09%3E'), +messageSends: [], referencedClasses: [] }), -smalltalk.Dictionary); +smalltalk.Array); smalltalk.addMethod( -unescape('_collect_'), +unescape('_remove_'), smalltalk.method({ -selector: unescape('collect%3A'), -category: 'enumerating', -fn: function (aBlock){ +selector: unescape('remove%3A'), +category: 'adding/removing', +fn: function (anObject){ var self=this; -var newDict=nil; -newDict=smalltalk.send(smalltalk.send(self, "_class", []), "_new", []); -smalltalk.send(self, "_keysAndValuesDo_", [(function(key, value){return smalltalk.send(newDict, "_at_put_", [key, smalltalk.send(aBlock, "_value_", [value])]);})]); -return newDict; + + for(var i=0;i(0) : smalltalk.send($receiver, "__gt", [(0)]))).klass === smalltalk.Boolean) ? ($receiver ? (function(){return self['@earlyReturn']=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return self['@earlyReturn']=true;})])); +((($receiver = ((($receiver = self['@nestedBlocks']).klass === smalltalk.Number) ? $receiver >(0) : smalltalk.send($receiver, "__gt", [(0)]))).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (self['@earlyReturn']=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (self['@earlyReturn']=true);})])); ((($receiver = self['@earlyReturn']).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%28function%28%29%7Bthrow%28")]);smalltalk.send($rec, "_nextPutAll_", [unescape("%7Bname%3A%20%27stReturn%27%2C%20selector%3A%20")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self['@currentSelector'], "_printString", [])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%2C%20fn%3A%20function%28%29%7Breturn%20")]);})(self['@stream']);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", ["return "]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return (function($rec){smalltalk.send($rec, "_nextPutAll_", [unescape("%28function%28%29%7Bthrow%28")]);smalltalk.send($rec, "_nextPutAll_", [unescape("%7Bname%3A%20%27stReturn%27%2C%20selector%3A%20")]);smalltalk.send($rec, "_nextPutAll_", [smalltalk.send(self['@currentSelector'], "_printString", [])]);return smalltalk.send($rec, "_nextPutAll_", [unescape("%2C%20fn%3A%20function%28%29%7Breturn%20")]);})(self['@stream']);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", ["return "]);})])); smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [(function(each){return smalltalk.send(self, "_visit_", [each]);})]); ((($receiver = self['@earlyReturn']).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%7D%29%7D%29%28%29")]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%7D%29%7D%29%28%29")]);})])); @@ -12381,13 +13304,13 @@ var str=nil; var receiver=nil; var superSend=nil; var inlined=nil; -str=self['@stream']; +(str=self['@stream']); ((($receiver = smalltalk.send(self['@messageSends'], "_includes_", [smalltalk.send(aNode, "_selector", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self['@messageSends'], "_add_", [smalltalk.send(aNode, "_selector", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self['@messageSends'], "_add_", [smalltalk.send(aNode, "_selector", [])]);})])); -self['@stream']=smalltalk.send("", "_writeStream", []); +(self['@stream']=smalltalk.send("", "_writeStream", [])); smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_receiver", [])]); -superSend=smalltalk.send(smalltalk.send(self['@stream'], "_contents", []), "__eq", ["super"]); -receiver=((($receiver = superSend).klass === smalltalk.Boolean) ? ($receiver ? (function(){return "self";})() : (function(){return smalltalk.send(self['@stream'], "_contents", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return "self";}), (function(){return smalltalk.send(self['@stream'], "_contents", []);})])); -self['@stream']=str; +(superSend=smalltalk.send(smalltalk.send(self['@stream'], "_contents", []), "__eq", ["super"])); +(receiver=((($receiver = superSend).klass === smalltalk.Boolean) ? ($receiver ? (function(){return "self";})() : (function(){return smalltalk.send(self['@stream'], "_contents", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return "self";}), (function(){return smalltalk.send(self['@stream'], "_contents", []);})]))); +(self['@stream']=str); ((($receiver = smalltalk.send(self, "_performOptimizations", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_inlineLiteral_receiverNode_argumentNodes_", [smalltalk.send(aNode, "_selector", []), smalltalk.send(aNode, "_receiver", []), smalltalk.send(aNode, "_arguments", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return ((($receiver = smalltalk.send(self, "_inline_receiver_argumentNodes_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(" : ", "__comma", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), "$receiver", smalltalk.send(aNode, "_arguments", []), superSend])]), "__comma", [unescape("%29")])]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(" : ", "__comma", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), "$receiver", smalltalk.send(aNode, "_arguments", []), superSend])]), "__comma", [unescape("%29")])]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})]));})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return ((($receiver = smalltalk.send(self, "_inline_receiver_argumentNodes_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(" : ", "__comma", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), "$receiver", smalltalk.send(aNode, "_arguments", []), superSend])]), "__comma", [unescape("%29")])]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(" : ", "__comma", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), "$receiver", smalltalk.send(aNode, "_arguments", []), superSend])]), "__comma", [unescape("%29")])]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})]));})]));})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return ((($receiver = smalltalk.send(self, "_inlineLiteral_receiverNode_argumentNodes_", [smalltalk.send(aNode, "_selector", []), smalltalk.send(aNode, "_receiver", []), smalltalk.send(aNode, "_arguments", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return ((($receiver = smalltalk.send(self, "_inline_receiver_argumentNodes_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(" : ", "__comma", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), "$receiver", smalltalk.send(aNode, "_arguments", []), superSend])]), "__comma", [unescape("%29")])]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(" : ", "__comma", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), "$receiver", smalltalk.send(aNode, "_arguments", []), superSend])]), "__comma", [unescape("%29")])]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})]));})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return ((($receiver = smalltalk.send(self, "_inline_receiver_argumentNodes_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(" : ", "__comma", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), "$receiver", smalltalk.send(aNode, "_arguments", []), superSend])]), "__comma", [unescape("%29")])]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(" : ", "__comma", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), "$receiver", smalltalk.send(aNode, "_arguments", []), superSend])]), "__comma", [unescape("%29")])]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})]));})]));}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(self, "_send_to_arguments_superSend_", [smalltalk.send(aNode, "_selector", []), receiver, smalltalk.send(aNode, "_arguments", []), superSend])]);})])); return self;}, args: ["aNode"], @@ -12405,10 +13328,10 @@ category: 'visiting', fn: function (aNode){ var self=this; var index=nil; -index=(0); +(index=(0)); ((($receiver = smalltalk.send(self['@tempVariables'], "_includes_", ["$rec"])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self['@tempVariables'], "_add_", ["$rec"]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self['@tempVariables'], "_add_", ["$rec"]);})])); smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%24rec%29%7B")]); -smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [(function(each){index=((($receiver = index).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]));((($receiver = smalltalk.send(index, "__eq", [smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_size", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", ["return "]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", ["return "]);})]));smalltalk.send(each, "_receiver_", [smalltalk.send(smalltalk.send((smalltalk.VariableNode || VariableNode), "_new", []), "_value_", ["$rec"])]);smalltalk.send(self, "_visit_", [each]);return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%3B")]);})]); +smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_", [(function(each){(index=((($receiver = index).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));((($receiver = smalltalk.send(index, "__eq", [smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_size", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", ["return "]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", ["return "]);})]));smalltalk.send(each, "_receiver_", [smalltalk.send(smalltalk.send((smalltalk.VariableNode || VariableNode), "_new", []), "_value_", ["$rec"])]);smalltalk.send(self, "_visit_", [each]);return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%3B")]);})]); smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%7D%29%28")]); smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_receiver", [])]); smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29")]); @@ -12443,13 +13366,15 @@ selector: unescape('visitAssignmentNode%3A'), category: 'visiting', fn: function (aNode){ var self=this; +smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28")]); smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_left", [])]); smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%3D")]); smalltalk.send(self, "_visit_", [smalltalk.send(aNode, "_right", [])]); +smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29")]); return self;}, args: ["aNode"], -source: unescape('visitAssignmentNode%3A%20aNode%0A%09self%20visit%3A%20aNode%20left.%0A%09stream%20nextPutAll%3A%20%27%3D%27.%0A%09self%20visit%3A%20aNode%20right'), -messageSends: ["visit:", "left", "nextPutAll:", "right"], +source: unescape('visitAssignmentNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20%27%28%27.%0A%09self%20visit%3A%20aNode%20left.%0A%09stream%20nextPutAll%3A%20%27%3D%27.%0A%09self%20visit%3A%20aNode%20right.%0A%09stream%20nextPutAll%3A%20%27%29%27'), +messageSends: ["nextPutAll:", "visit:", "left", "right"], referencedClasses: [] }), smalltalk.Compiler); @@ -12479,7 +13404,7 @@ category: 'visiting', fn: function (aNode){ var self=this; var varName=nil; -((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(self, "_currentClass", []), "_allInstanceVariableNames", []), "_includes_", [smalltalk.send(aNode, "_value", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("self%5B%27@"), "__comma", [smalltalk.send(aNode, "_value", [])]), "__comma", [unescape("%27%5D")])]);})() : (function(){varName=smalltalk.send(self, "_safeVariableNameFor_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(smalltalk.send(self, "_knownVariables", []), "_includes_", [varName])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){smalltalk.send(self['@unknownVariables'], "_add_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(aNode, "_assigned", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})]));})() : (function(){return ((($receiver = smalltalk.send(smalltalk.send(aNode, "_value", []), "__eq", ["thisContext"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})]));})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){smalltalk.send(self['@unknownVariables'], "_add_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(aNode, "_assigned", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})]));}), (function(){return ((($receiver = smalltalk.send(smalltalk.send(aNode, "_value", []), "__eq", ["thisContext"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})]));})]));})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("self%5B%27@"), "__comma", [smalltalk.send(aNode, "_value", [])]), "__comma", [unescape("%27%5D")])]);}), (function(){varName=smalltalk.send(self, "_safeVariableNameFor_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(smalltalk.send(self, "_knownVariables", []), "_includes_", [varName])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){smalltalk.send(self['@unknownVariables'], "_add_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(aNode, "_assigned", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})]));})() : (function(){return ((($receiver = smalltalk.send(smalltalk.send(aNode, "_value", []), "__eq", ["thisContext"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})]));})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){smalltalk.send(self['@unknownVariables'], "_add_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(aNode, "_assigned", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})]));}), (function(){return ((($receiver = smalltalk.send(smalltalk.send(aNode, "_value", []), "__eq", ["thisContext"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})]));})]));})])); +((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(self, "_currentClass", []), "_allInstanceVariableNames", []), "_includes_", [smalltalk.send(aNode, "_value", [])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("self%5B%27@"), "__comma", [smalltalk.send(aNode, "_value", [])]), "__comma", [unescape("%27%5D")])]);})() : (function(){(varName=smalltalk.send(self, "_safeVariableNameFor_", [smalltalk.send(aNode, "_value", [])]));return ((($receiver = smalltalk.send(smalltalk.send(self, "_knownVariables", []), "_includes_", [varName])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){smalltalk.send(self['@unknownVariables'], "_add_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(aNode, "_assigned", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})]));})() : (function(){return ((($receiver = smalltalk.send(smalltalk.send(aNode, "_value", []), "__eq", ["thisContext"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})]));})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){smalltalk.send(self['@unknownVariables'], "_add_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(aNode, "_assigned", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})]));}), (function(){return ((($receiver = smalltalk.send(smalltalk.send(aNode, "_value", []), "__eq", ["thisContext"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})]));})]));})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("self%5B%27@"), "__comma", [smalltalk.send(aNode, "_value", [])]), "__comma", [unescape("%27%5D")])]);}), (function(){(varName=smalltalk.send(self, "_safeVariableNameFor_", [smalltalk.send(aNode, "_value", [])]));return ((($receiver = smalltalk.send(smalltalk.send(self, "_knownVariables", []), "_includes_", [varName])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){smalltalk.send(self['@unknownVariables'], "_add_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(aNode, "_assigned", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})]));})() : (function(){return ((($receiver = smalltalk.send(smalltalk.send(aNode, "_value", []), "__eq", ["thisContext"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})]));})()) : smalltalk.send($receiver, "_ifFalse_ifTrue_", [(function(){smalltalk.send(self['@unknownVariables'], "_add_", [smalltalk.send(aNode, "_value", [])]);return ((($receiver = smalltalk.send(aNode, "_assigned", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(unescape("%28typeof%20"), "__comma", [varName]), "__comma", [unescape("%20%3D%3D%20%27undefined%27%20%3F%20nil%20%3A%20")]), "__comma", [varName]), "__comma", [unescape("%29")])]);})]));}), (function(){return ((($receiver = smalltalk.send(smalltalk.send(aNode, "_value", []), "__eq", ["thisContext"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);})() : (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28smalltalk.getThisContext%28%29%29")]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [varName]);})]));})]));})])); return self;}, args: ["aNode"], source: unescape('visitVariableNode%3A%20aNode%0A%09%7C%20varName%20%7C%0A%09%28self%20currentClass%20allInstanceVariableNames%20includes%3A%20aNode%20value%29%20%0A%09%09ifTrue%3A%20%5Bstream%20nextPutAll%3A%20%27self%5B%27%27@%27%2C%20aNode%20value%2C%20%27%27%27%5D%27%5D%0A%09%09ifFalse%3A%20%5B%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09varName%20%3A%3D%20self%20safeVariableNameFor%3A%20aNode%20value.%0A%09%09%09%28self%20knownVariables%20includes%3A%20varName%29%20%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09%09ifFalse%3A%20%5B%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09unknownVariables%20add%3A%20aNode%20value.%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09aNode%20assigned%20%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09%09ifTrue%3A%20%5Bstream%20nextPutAll%3A%20varName%5D%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09%09ifFalse%3A%20%5Bstream%20nextPutAll%3A%20%27%28typeof%20%27%2C%20varName%2C%20%27%20%3D%3D%20%27%27undefined%27%27%20%3F%20nil%20%3A%20%27%2C%20varName%2C%20%27%29%27%5D%5D%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09%09ifTrue%3A%20%5B%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09aNode%20value%20%3D%20%27thisContext%27%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09%09ifTrue%3A%20%5Bstream%20nextPutAll%3A%20%27%28smalltalk.getThisContext%28%29%29%27%5D%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%09%09%09%09ifFalse%3A%20%5Bstream%20nextPutAll%3A%20varName%5D%5D%5D'), @@ -12608,7 +13533,7 @@ category: 'compiling', fn: function (aClass){ var self=this; smalltalk.send(smalltalk.send(aClass, "_methodDictionary", []), "_do_", [(function(each){var method=nil; -method=smalltalk.send(self, "_load_forClass_", [smalltalk.send(each, "_source", []), aClass]);smalltalk.send(method, "_category_", [smalltalk.send(each, "_category", [])]);return smalltalk.send(aClass, "_addCompiledMethod_", [method]);})]); +(method=smalltalk.send(self, "_load_forClass_", [smalltalk.send(each, "_source", []), aClass]));smalltalk.send(method, "_category_", [smalltalk.send(each, "_category", [])]);return smalltalk.send(aClass, "_addCompiledMethod_", [method]);})]); ((($receiver = smalltalk.send(aClass, "_isMetaclass", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_recompile_", [smalltalk.send(aClass, "_class", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_recompile_", [smalltalk.send(aClass, "_class", [])]);})])); return self;}, args: ["aClass"], @@ -12690,7 +13615,7 @@ category: 'visiting', fn: function (aSelector, aReceiver, aCollection, aBoolean){ var self=this; return smalltalk.send((smalltalk.String || String), "_streamContents_", [(function(str){var tmp=nil; -tmp=self['@stream'];smalltalk.send(str, "_nextPutAll_", [unescape("smalltalk.send%28")]);smalltalk.send(str, "_nextPutAll_", [aReceiver]);smalltalk.send(str, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%2C%20%22"), "__comma", [smalltalk.send(aSelector, "_asSelector", [])]), "__comma", [unescape("%22%2C%20%5B")])]);self['@stream']=str;smalltalk.send(aCollection, "_do_separatedBy_", [(function(each){return smalltalk.send(self, "_visit_", [each]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%2C%20")]);})]);self['@stream']=tmp;smalltalk.send(str, "_nextPutAll_", [unescape("%5D")]);((($receiver = aBoolean).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(str, "_nextPutAll_", [smalltalk.send(unescape("%2C%20smalltalk."), "__comma", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(smalltalk.send(self, "_currentClass", []), "_superclass", [])])])]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(str, "_nextPutAll_", [smalltalk.send(unescape("%2C%20smalltalk."), "__comma", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(smalltalk.send(self, "_currentClass", []), "_superclass", [])])])]);})]));return smalltalk.send(str, "_nextPutAll_", [unescape("%29")]);})]); +(tmp=self['@stream']);smalltalk.send(str, "_nextPutAll_", [unescape("smalltalk.send%28")]);smalltalk.send(str, "_nextPutAll_", [aReceiver]);smalltalk.send(str, "_nextPutAll_", [smalltalk.send(smalltalk.send(unescape("%2C%20%22"), "__comma", [smalltalk.send(aSelector, "_asSelector", [])]), "__comma", [unescape("%22%2C%20%5B")])]);(self['@stream']=str);smalltalk.send(aCollection, "_do_separatedBy_", [(function(each){return smalltalk.send(self, "_visit_", [each]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%2C%20")]);})]);(self['@stream']=tmp);smalltalk.send(str, "_nextPutAll_", [unescape("%5D")]);((($receiver = aBoolean).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(str, "_nextPutAll_", [smalltalk.send(unescape("%2C%20smalltalk."), "__comma", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(smalltalk.send(self, "_currentClass", []), "_superclass", [])])])]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return smalltalk.send(str, "_nextPutAll_", [smalltalk.send(unescape("%2C%20smalltalk."), "__comma", [smalltalk.send(self, "_classNameFor_", [smalltalk.send(smalltalk.send(self, "_currentClass", []), "_superclass", [])])])]);})]));return smalltalk.send(str, "_nextPutAll_", [unescape("%29")]);})]); return self;}, args: ["aSelector", "aReceiver", "aCollection", "aBoolean"], source: unescape('send%3A%20aSelector%20to%3A%20aReceiver%20arguments%3A%20aCollection%20superSend%3A%20aBoolean%0A%09%5EString%20streamContents%3A%20%5B%3Astr%20%7C%7C%20tmp%20%7C%0A%20%20%20%20%20%20%20%20%09tmp%20%3A%3D%20stream.%0A%09%09str%20nextPutAll%3A%20%27smalltalk.send%28%27.%0A%09%09str%20nextPutAll%3A%20aReceiver.%0A%09%09str%20nextPutAll%3A%20%27%2C%20%22%27%2C%20aSelector%20asSelector%2C%20%27%22%2C%20%5B%27.%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20stream%20%3A%3D%20str.%0A%09%09aCollection%0A%09%20%20%20%20%09%09do%3A%20%5B%3Aeach%20%7C%20self%20visit%3A%20each%5D%0A%09%20%20%20%20%09%09separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%2C%20%27%5D.%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20stream%20%3A%3D%20tmp.%0A%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20str%20nextPutAll%3A%20%27%5D%27.%0A%09%09aBoolean%20ifTrue%3A%20%5B%0A%09%09%09str%20nextPutAll%3A%20%27%2C%20smalltalk.%27%2C%20%28self%20classNameFor%3A%20self%20currentClass%20superclass%29%5D.%0A%09%09str%20nextPutAll%3A%20%27%29%27%5D'), @@ -12723,23 +13648,23 @@ category: 'optimizations', fn: function (aSelector, anObject, aCollection){ var self=this; var inlined=nil; -inlined=false; -((($receiver = smalltalk.send(aSelector, "__eq", ["whileTrue:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(anObject, "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(anObject, "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["whileFalse:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(anObject, "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(anObject, "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["whileTrue"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(anObject, "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(anObject, "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["whileFalse"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(anObject, "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(anObject, "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("+")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20+%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20+%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20+%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20+%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("-")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20-%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20-%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20-%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20-%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("*")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20*%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20*%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20*%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20*%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("/")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20/%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20/%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20/%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20/%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3C")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3C%3D")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3E")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3E%3D")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["ifNil:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20%24receiver")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20%24receiver")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20%24receiver")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20%24receiver")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["ifNotNil:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%21%3D%20nil%20%26%26%20%24receiver%20%21%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%21%3D%20nil%20%26%26%20%24receiver%20%21%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%21%3D%20nil%20%26%26%20%24receiver%20%21%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%21%3D%20nil%20%26%26%20%24receiver%20%21%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["ifNil:ifNotNil:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["ifNotNil:ifNil:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return inlined=true;})]));})])); +(inlined=false); +((($receiver = smalltalk.send(aSelector, "__eq", ["whileTrue:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(anObject, "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(anObject, "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["whileFalse:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(anObject, "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(anObject, "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%7D%7D%29%28%29")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["whileTrue"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(anObject, "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(anObject, "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["whileFalse"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(anObject, "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(anObject, "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28function%28%29%7Bwhile%28%21")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29%20%7B%7D%7D%29%28%29")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("+")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20+%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20+%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20+%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20+%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("-")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20-%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20-%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20-%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20-%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("*")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20*%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20*%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20*%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20*%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("/")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20/%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20/%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20/%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20/%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3C")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3C%3D")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3C%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3E")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3E%3D")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(self, "_isNode_ofClass_", [anObject, (smalltalk.Number || Number)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%20%3E%3D%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["ifNil:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20%24receiver")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20%24receiver")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20%24receiver")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20%24receiver")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["ifNotNil:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%21%3D%20nil%20%26%26%20%24receiver%20%21%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%21%3D%20nil%20%26%26%20%24receiver%20%21%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%21%3D%20nil%20%26%26%20%24receiver%20%21%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%21%3D%20nil%20%26%26%20%24receiver%20%21%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["ifNil:ifNotNil:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["ifNotNil:ifNil:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%28%24receiver%20%3D%20")]);smalltalk.send(self, "_visit_", [anObject]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%29%20%3D%3D%20nil%20%7C%7C%20%24receiver%20%3D%3D%20undefined%29%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29")]);return (inlined=true);})]));})])); return inlined; return self;}, args: ["aSelector", "anObject", "aCollection"], @@ -12773,19 +13698,19 @@ category: 'optimizations', fn: function (aSelector, receiver, aCollection){ var self=this; var inlined=nil; -inlined=false; -((($receiver = smalltalk.send(aSelector, "__eq", ["ifFalse:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["ifTrue:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["ifTrue:ifFalse:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", ["ifFalse:ifTrue:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return inlined=true;})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return inlined=true;})]));})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3C")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3C")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3C")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3C%3D")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3C%3D")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3C%3D")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3E")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3E")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3E")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3E%3D")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3E%3D")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3E%3D")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("+")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20+")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20+")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("-")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20-")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20-")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("*")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20*")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20*")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})])); -((($receiver = smalltalk.send(aSelector, "__eq", [unescape("/")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20/")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20/")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return inlined=true;})])); +(inlined=false); +((($receiver = smalltalk.send(aSelector, "__eq", ["ifFalse:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["ifTrue:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20nil%29")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["ifTrue:ifFalse:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", ["ifFalse:ifTrue:"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return (inlined=true);})]));})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return ((($receiver = smalltalk.send(smalltalk.send(smalltalk.send(aCollection, "_first", []), "_isBlockNode", []), "_and_", [(function(){return smalltalk.send(smalltalk.send(aCollection, "_second", []), "_isBlockNode", []);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Boolean", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%21%20%24receiver%20%3F%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%20%3A%20")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_second", [])]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%28%29%29")]);return (inlined=true);})]));})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3C")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3C")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3C")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3C%3D")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3C%3D")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3C%3D")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3E")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3E")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3E")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("%3E%3D")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3E%3D")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20%3E%3D")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("+")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20+")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20+")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("-")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20-")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20-")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("*")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20*")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20*")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})])); +((($receiver = smalltalk.send(aSelector, "__eq", [unescape("/")])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20/")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){smalltalk.send(self, "_checkClass_for_", ["Number", receiver]);smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%24receiver%20/")]);smalltalk.send(self, "_visit_", [smalltalk.send(aCollection, "_first", [])]);return (inlined=true);})])); return inlined; return self;}, args: ["aSelector", "receiver", "aCollection"], @@ -12834,7 +13759,7 @@ selector: unescape('source%3A'), category: 'accessing', fn: function (aString){ var self=this; -self['@source']=aString; +(self['@source']=aString); return self;}, args: ["aString"], source: unescape('source%3A%20aString%0A%09source%20%3A%3D%20aString'), @@ -12868,12 +13793,12 @@ selector: unescape('visitDynamicDictionaryNode%3A'), category: 'visiting', fn: function (aNode){ var self=this; -smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("smalltalk.Dictionary._fromPairs_%28%5B")]); +smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("smalltalk.HashedCollection._fromPairs_%28%5B")]); smalltalk.send(smalltalk.send(aNode, "_nodes", []), "_do_separatedBy_", [(function(each){return smalltalk.send(self, "_visit_", [each]);}), (function(){return smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%2C")]);})]); smalltalk.send(self['@stream'], "_nextPutAll_", [unescape("%5D%29")]); return self;}, args: ["aNode"], -source: unescape('visitDynamicDictionaryNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20%27smalltalk.Dictionary._fromPairs_%28%5B%27.%0A%09%09aNode%20nodes%20%0A%09%09%09do%3A%20%5B%3Aeach%20%7C%20self%20visit%3A%20each%5D%0A%09%09%09separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%2C%27%5D.%0A%09%09stream%20nextPutAll%3A%20%27%5D%29%27'), +source: unescape('visitDynamicDictionaryNode%3A%20aNode%0A%09stream%20nextPutAll%3A%20%27smalltalk.HashedCollection._fromPairs_%28%5B%27.%0A%09%09aNode%20nodes%20%0A%09%09%09do%3A%20%5B%3Aeach%20%7C%20self%20visit%3A%20each%5D%0A%09%09%09separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%2C%27%5D.%0A%09%09stream%20nextPutAll%3A%20%27%5D%29%27'), messageSends: ["nextPutAll:", "do:separatedBy:", "nodes", "visit:"], referencedClasses: [] }), @@ -12921,7 +13846,7 @@ category: 'compiling', fn: function (aClass){ var self=this; smalltalk.send(smalltalk.send(aClass, "_methodDictionary", []), "_do_", [(function(each){var method=nil; -method=smalltalk.send(smalltalk.send(self, "_new", []), "_load_forClass_", [smalltalk.send(each, "_source", []), aClass]);smalltalk.send(method, "_category_", [smalltalk.send(each, "_category", [])]);return smalltalk.send(aClass, "_addCompiledMethod_", [method]);})]); +(method=smalltalk.send(smalltalk.send(self, "_new", []), "_load_forClass_", [smalltalk.send(each, "_source", []), aClass]));smalltalk.send(method, "_category_", [smalltalk.send(each, "_category", [])]);return smalltalk.send(aClass, "_addCompiledMethod_", [method]);})]); ((($receiver = smalltalk.send(aClass, "_isMetaclass", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_recompile_", [smalltalk.send(aClass, "_class", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_recompile_", [smalltalk.send(aClass, "_class", [])]);})])); return self;}, args: ["aClass"], @@ -12970,7 +13895,7 @@ selector: unescape('performOptimizations%3A'), category: 'accessing', fn: function (aBoolean){ var self=this; -self['@performOptimizations']=aBoolean; +(self['@performOptimizations']=aBoolean); return self;}, args: ["aBoolean"], source: unescape('performOptimizations%3A%20aBoolean%0A%09performOptimizations%20%3A%3D%20aBoolean'), @@ -13778,7 +14703,7 @@ smalltalk.parser = (function(){ var result2 = result1 !== null ? (function(val) { return smalltalk.ValueNode._new() - ._value_(val.join("").replace(/\"/ig, '"')) + ._value_(smalltalk.symbolFor(val.join("").replace(/\"/ig, '"'))) })(result1[1]) : null; if (result2 !== null) { @@ -14364,9 +15289,8 @@ smalltalk.parser = (function(){ } var result2 = result1 !== null ? (function(val) { - return smalltalk.ValueNode._new() - ._value_(val) - })(result1) + return smalltalk.ValueNode._new()._value_(val) + })(result1) : null; if (result2 !== null) { var result0 = result2; @@ -17052,7 +17976,7 @@ selector: unescape('createInterface'), category: 'actions', fn: function (){ var self=this; -self['@interface']=smalltalk.send(self['@readline'], "_createInterface_stdout_", [smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdin", []), smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", [])]); +(self['@interface']=smalltalk.send(self['@readline'], "_createInterface_stdout_", [smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdin", []), smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", [])])); smalltalk.send(self['@interface'], "_on_do_", ["line", (function(buffer){return smalltalk.send(self, "_eval_", [buffer]);})]); smalltalk.send(self['@interface'], "_on_do_", ["close", (function(){return smalltalk.send(self, "_close", []);})]); smalltalk.send(self, "_setPrompt", []); @@ -17105,7 +18029,7 @@ category: 'actions', fn: function (buffer){ var self=this; var result=nil; -((($receiver = smalltalk.send(buffer, "_isEmpty", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_try_catch_", [(function(){result=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_loadExpression_", [buffer]);return smalltalk.send((smalltalk.Transcript || Transcript), "_show_", [result]);}), (function(e){return ((($receiver = smalltalk.send(e, "_isSmalltalkError", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);})() : (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);}), (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})]));})]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_try_catch_", [(function(){result=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_loadExpression_", [buffer]);return smalltalk.send((smalltalk.Transcript || Transcript), "_show_", [result]);}), (function(e){return ((($receiver = smalltalk.send(e, "_isSmalltalkError", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);})() : (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);}), (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})]));})]);})])); +((($receiver = smalltalk.send(buffer, "_isEmpty", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_try_catch_", [(function(){(result=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_loadExpression_", [buffer]));return smalltalk.send((smalltalk.Transcript || Transcript), "_show_", [result]);}), (function(e){return ((($receiver = smalltalk.send(e, "_isSmalltalkError", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);})() : (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);}), (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})]));})]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_try_catch_", [(function(){(result=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_loadExpression_", [buffer]));return smalltalk.send((smalltalk.Transcript || Transcript), "_show_", [result]);}), (function(e){return ((($receiver = smalltalk.send(e, "_isSmalltalkError", [])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);})() : (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return smalltalk.send(smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_new", []), "_handleError_", [e]);}), (function(){return smalltalk.send(smalltalk.send((typeof process == 'undefined' ? nil : process), "_stdout", []), "_write_", [smalltalk.send(e, "_jsStack", [])]);})]));})]);})])); smalltalk.send(self['@interface'], "_prompt", []); return self;}, args: ["buffer"], @@ -17123,8 +18047,8 @@ category: 'initialization', fn: function (){ var self=this; smalltalk.send(self, "_initialize", [], smalltalk.Object); -self['@readline']=smalltalk.send((typeof require == 'undefined' ? nil : require), "_value_", ["readline"]); -self['@util']=smalltalk.send((typeof require == 'undefined' ? nil : require), "_value_", ["util"]); +(self['@readline']=smalltalk.send((typeof require == 'undefined' ? nil : require), "_value_", ["readline"])); +(self['@util']=smalltalk.send((typeof require == 'undefined' ? nil : require), "_value_", ["util"])); return self;}, args: [], source: unescape('initialize%0A%09super%20initialize.%0A%09readline%20%3A%3D%20require%20value%3A%20%27readline%27.%0A%09util%20%3A%3D%20require%20value%3A%20%27util%27'),