smalltalk.addClass('Object', smalltalk.nil, [], 'Kernel'); smalltalk.addMethod( '__eq', smalltalk.method({ selector: '=', category: 'comparing', fn: function (anObject){ var self=this; return self == anObject; return self;}, source: unescape('%3D%20anObject%0A%09%3Creturn%20self%20%3D%3D%20anObject%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_~_eq', smalltalk.method({ selector: '~=', category: 'comparing', fn: function (anObject){ var self=this; return smalltalk.send(smalltalk.send(self, "__eq", [anObject]), "__eq_eq", [false]); return self;}, source: unescape('%7E%3D%20anObject%0A%09%5E%28self%20%3D%20anObject%29%20%3D%3D%20false'), messageSends: [unescape("%3D%3D"), unescape("%3D")], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_initialize', smalltalk.method({ selector: 'initialize', category: 'initialization', fn: function (){ var self=this; return self;}, source: unescape('initialize'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_yourself', smalltalk.method({ selector: 'yourself', category: 'accessing', fn: function (){ var self=this; return self; return self;}, source: unescape('yourself%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_class', smalltalk.method({ selector: 'class', category: 'accessing', fn: function (){ var self=this; return self.klass; return self;}, source: unescape('class%0A%09%3Creturn%20self.klass%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_size', smalltalk.method({ selector: 'size', category: 'accessing', fn: function (){ var self=this; smalltalk.send(self, "_error_", ["Object not indexable"]); return self;}, source: unescape('size%0A%09self%20error%3A%20%27Object%20not%20indexable%27'), messageSends: ["error:"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_copy', smalltalk.method({ selector: 'copy', category: 'copying', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_shallowCopy", []), "_postCopy", []); return self;}, source: unescape('copy%0A%09%5Eself%20shallowCopy%20postCopy'), messageSends: ["postCopy", "shallowCopy"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_shallowCopy', smalltalk.method({ selector: 'shallowCopy', category: 'copying', fn: function (){ var self=this; var copy = self.klass._new(); for(var i in self) { if(/^@.+/.test(i)) { copy[i] = self[i]; } } return copy; ; return self;}, source: unescape('shallowCopy%0A%09%3C%0A%09%20%20%20%20var%20copy%20%3D%20self.klass._new%28%29%3B%0A%09%20%20%20%20for%28var%20i%20in%20self%29%20%7B%0A%09%09if%28/%5E@.+/.test%28i%29%29%20%7B%0A%09%09%20%20%20%20copy%5Bi%5D%20%3D%20self%5Bi%5D%3B%0A%09%09%7D%0A%09%20%20%20%20%7D%0A%09%20%20%20%20return%20copy%3B%0A%09%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_deepCopy', smalltalk.method({ selector: 'deepCopy', category: 'copying', fn: function (){ var self=this; var copy = self.klass._new(); for(var i in self) { if(/^@.+/.test(i)) { copy[i] = self[i]._deepCopy(); } } return copy; ; return self;}, source: unescape('deepCopy%0A%09%3C%20%20%20%20%0A%09%20%20%20%20var%20copy%20%3D%20self.klass._new%28%29%3B%0A%09%20%20%20%20for%28var%20i%20in%20self%29%20%7B%0A%09%09if%28/%5E@.+/.test%28i%29%29%20%7B%0A%09%09%20%20%20%20copy%5Bi%5D%20%3D%20self%5Bi%5D._deepCopy%28%29%3B%0A%09%09%7D%0A%09%20%20%20%20%7D%0A%09%20%20%20%20return%20copy%3B%0A%09%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_postCopy', smalltalk.method({ selector: 'postCopy', category: 'copying', fn: function (){ var self=this; return self;}, source: unescape('postCopy'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '__minus_gt', smalltalk.method({ selector: '->', category: 'converting', fn: function (anObject){ var self=this; return smalltalk.send(smalltalk.Association, "_key_value_", [self, anObject]); return self;}, source: unescape('-%3E%20anObject%0A%09%5EAssociation%20key%3A%20self%20value%3A%20anObject'), messageSends: ["key:value:"], referencedClasses: [smalltalk.nil] }), smalltalk.Object); smalltalk.addMethod( '_asString', smalltalk.method({ selector: 'asString', category: 'converting', fn: function (){ var self=this; return smalltalk.send(self, "_printString", []); return self;}, source: unescape('asString%0A%09%5Eself%20printString'), messageSends: ["printString"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_asJavascript', smalltalk.method({ selector: 'asJavascript', category: 'converting', fn: function (){ var self=this; return smalltalk.send(self, "_asString", []); return self;}, source: unescape('asJavascript%0A%09%5Eself%20asString'), messageSends: ["asString"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_perform_', smalltalk.method({ selector: 'perform:', category: 'message handling', fn: function (aSymbol){ var self=this; return smalltalk.send(self, "_perform_withArguments_", [aSymbol, []]); return self;}, source: unescape('perform%3A%20aSymbol%0A%09%5Eself%20perform%3A%20aSymbol%20withArguments%3A%20%23%28%29'), messageSends: ["perform:withArguments:"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_perform_withArguments_', smalltalk.method({ selector: 'perform:withArguments:', category: 'message handling', fn: function (aSymbol, aCollection){ var self=this; return smalltalk.send(self, "_basicPerform_withArguments_", [smalltalk.send(aSymbol, "_asSelector", []), aCollection]); return self;}, source: unescape('perform%3A%20aSymbol%20withArguments%3A%20aCollection%0A%09%5Eself%20basicPerform%3A%20aSymbol%20asSelector%20withArguments%3A%20aCollection'), messageSends: ["basicPerform:withArguments:", "asSelector"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_instVarAt_', smalltalk.method({ selector: 'instVarAt:', category: 'accessing', fn: function (aString){ var self=this; return self['@'+aString]; return self;}, source: unescape('instVarAt%3A%20aString%0A%09%3Creturn%20self%5B%27@%27+aString%5D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_instVarAt_put_', smalltalk.method({ selector: 'instVarAt:put:', category: 'accessing', fn: function (aString, anObject){ var self=this; self['@' + aString] = anObject; return self;}, source: unescape('instVarAt%3A%20aString%20put%3A%20anObject%0A%09%3Cself%5B%27@%27%20+%20aString%5D%20%3D%20anObject%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_basicAt_', smalltalk.method({ selector: 'basicAt:', category: 'accessing', fn: function (aString){ var self=this; return self[aString]; return self;}, source: unescape('basicAt%3A%20aString%0A%09%3Creturn%20self%5BaString%5D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_basicAt_put_', smalltalk.method({ selector: 'basicAt:put:', category: 'accessing', fn: function (aString, anObject){ var self=this; return self[aString] = anObject; return self;}, source: unescape('basicAt%3A%20aString%20put%3A%20anObject%0A%09%3Creturn%20self%5BaString%5D%20%3D%20anObject%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_error_', smalltalk.method({ selector: 'error:', category: 'error handling', fn: function (aString){ var self=this; smalltalk.send(smalltalk.Error, "_signal_", [aString]); return self;}, source: unescape('error%3A%20aString%0A%09Error%20signal%3A%20aString'), messageSends: ["signal:"], referencedClasses: [smalltalk.Error] }), smalltalk.Object); smalltalk.addMethod( '_subclassResponsibility', smalltalk.method({ selector: 'subclassResponsibility', category: 'error handling', fn: function (){ var self=this; smalltalk.send(self, "_error_", ["This method is a responsibility of a subclass"]); return self;}, source: unescape('subclassResponsibility%0A%09self%20error%3A%20%27This%20method%20is%20a%20responsibility%20of%20a%20subclass%27'), messageSends: ["error:"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_shouldNotImplement', smalltalk.method({ selector: 'shouldNotImplement', category: 'error handling', fn: function (){ var self=this; smalltalk.send(self, "_error_", [smalltalk.send("This method should not be implemented in ", "__comma", [smalltalk.send(smalltalk.send(self, "_class", []), "_name", [])])]); return self;}, source: unescape('shouldNotImplement%0A%09self%20error%3A%20%27This%20method%20should%20not%20be%20implemented%20in%20%27%2C%20self%20class%20name'), messageSends: ["error:", unescape("%2C"), "name", "class"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_try_catch_', smalltalk.method({ selector: 'try:catch:', category: 'error handling', fn: function (aBlock, anotherBlock){ var self=this; try{aBlock()} catch(e) {anotherBlock(e)}; return self;}, source: unescape('try%3A%20aBlock%20catch%3A%20anotherBlock%0A%09%3Ctry%7BaBlock%28%29%7D%20catch%28e%29%20%7BanotherBlock%28e%29%7D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_printString', smalltalk.method({ selector: 'printString', category: 'printing', fn: function (){ var self=this; return smalltalk.send("a ", "__comma", [smalltalk.send(smalltalk.send(self, "_class", []), "_name", [])]); return self;}, source: unescape('printString%0A%09%5E%27a%20%27%2C%20self%20class%20name'), messageSends: [unescape("%2C"), "name", "class"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_printNl', smalltalk.method({ selector: 'printNl', category: 'printing', fn: function (){ var self=this; console.log(self); return self;}, source: unescape('printNl%0A%09%3Cconsole.log%28self%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_isKindOf_', smalltalk.method({ selector: 'isKindOf:', category: 'testing', fn: function (aClass){ var self=this; return smalltalk.send(smalltalk.send(self, "_isMemberOf_", [aClass]), "_ifTrue_ifFalse_", [(function(){return true;}), (function(){return smalltalk.send(smalltalk.send(self, "_class", []), "_inheritsFrom_", [aClass]);})]); return self;}, source: unescape('isKindOf%3A%20aClass%0A%09%5E%28self%20isMemberOf%3A%20aClass%29%0A%09%20%20%20%20ifTrue%3A%20%5Btrue%5D%0A%09%20%20%20%20ifFalse%3A%20%5Bself%20class%20inheritsFrom%3A%20aClass%5D'), messageSends: ["ifTrue:ifFalse:", "isMemberOf:", "inheritsFrom:", "class"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_isMemberOf_', smalltalk.method({ selector: 'isMemberOf:', category: 'testing', fn: function (aClass){ var self=this; return smalltalk.send(smalltalk.send(self, "_class", []), "__eq", [aClass]); return self;}, source: unescape('isMemberOf%3A%20aClass%0A%09%5Eself%20class%20%3D%20aClass'), messageSends: [unescape("%3D"), "class"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_ifNil_', smalltalk.method({ selector: 'ifNil:', category: 'testing', fn: function (aBlock){ var self=this; return self; return self;}, source: unescape('ifNil%3A%20aBlock%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_ifNil_ifNotNil_', smalltalk.method({ selector: 'ifNil:ifNotNil:', category: 'testing', fn: function (aBlock, anotherBlock){ var self=this; return smalltalk.send(anotherBlock, "_value", []); return self;}, source: unescape('ifNil%3A%20aBlock%20ifNotNil%3A%20anotherBlock%0A%09%5EanotherBlock%20value'), messageSends: ["value"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_ifNotNil_', smalltalk.method({ selector: 'ifNotNil:', category: 'testing', fn: function (aBlock){ var self=this; return smalltalk.send(aBlock, "_value", []); return self;}, source: unescape('ifNotNil%3A%20aBlock%0A%09%5EaBlock%20value'), messageSends: ["value"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_ifNotNil_ifNil_', smalltalk.method({ selector: 'ifNotNil:ifNil:', category: 'testing', fn: function (aBlock, anotherBlock){ var self=this; return smalltalk.send(aBlock, "_value", []); return self;}, source: unescape('ifNotNil%3A%20aBlock%20ifNil%3A%20anotherBlock%0A%09%5EaBlock%20value'), messageSends: ["value"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_isNil', smalltalk.method({ selector: 'isNil', category: 'testing', fn: function (){ var self=this; return false; return self;}, source: unescape('isNil%0A%09%5Efalse'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_notNil', smalltalk.method({ selector: 'notNil', category: 'testing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_isNil", []), "_not", []); return self;}, source: unescape('notNil%0A%09%5Eself%20isNil%20not'), messageSends: ["not", "isNil"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_isClass', smalltalk.method({ selector: 'isClass', category: 'testing', fn: function (){ var self=this; return false; return self;}, source: unescape('isClass%0A%09%5Efalse'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_isMetaclass', smalltalk.method({ selector: 'isMetaclass', category: 'testing', fn: function (){ var self=this; return false; return self;}, source: unescape('isMetaclass%0A%09%5Efalse'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_isNumber', smalltalk.method({ selector: 'isNumber', category: 'testing', fn: function (){ var self=this; return false; return self;}, source: unescape('isNumber%0A%09%5Efalse'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_isString', smalltalk.method({ selector: 'isString', category: 'testing', fn: function (){ var self=this; return false; return self;}, source: unescape('isString%0A%09%5Efalse'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_isParseFailure', smalltalk.method({ selector: 'isParseFailure', category: 'testing', fn: function (){ var self=this; return false; return self;}, source: unescape('isParseFailure%0A%09%5Efalse'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_basicPerform_', smalltalk.method({ selector: 'basicPerform:', category: 'message handling', fn: function (aSymbol){ var self=this; return smalltalk.send(self, "_basicPerform_withArguments_", [aSymbol, []]); return self;}, source: unescape('basicPerform%3A%20aSymbol%20%0A%09%5Eself%20basicPerform%3A%20aSymbol%20withArguments%3A%20%23%28%29'), messageSends: ["basicPerform:withArguments:"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_basicPerform_withArguments_', smalltalk.method({ selector: 'basicPerform:withArguments:', category: 'message handling', fn: function (aSymbol, aCollection){ var self=this; return self[aSymbol].apply(self, aCollection);; return self;}, source: unescape('basicPerform%3A%20aSymbol%20withArguments%3A%20aCollection%0A%09%3Creturn%20self%5BaSymbol%5D.apply%28self%2C%20aCollection%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_basicDelete_', smalltalk.method({ selector: 'basicDelete:', category: 'accessing', fn: function (aString){ var self=this; delete self[aString]; return self;}, source: unescape('basicDelete%3A%20aString%0A%20%20%20%20%3Cdelete%20self%5BaString%5D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_doesNotUnderstand_', smalltalk.method({ selector: 'doesNotUnderstand:', category: 'error handling', fn: function (aMessage){ var self=this; (function($rec){smalltalk.send($rec, "_receiver_", [self]);smalltalk.send($rec, "_message_", [aMessage]);return smalltalk.send($rec, "_signal", []);})(smalltalk.send(smalltalk.MessageNotUnderstood, "_new", [])); return self;}, source: unescape('doesNotUnderstand%3A%20aMessage%0A%09MessageNotUnderstood%20new%0A%09%09receiver%3A%20self%3B%0A%09%09message%3A%20aMessage%3B%0A%09%09signal'), messageSends: ["receiver:", "message:", "signal", "new"], referencedClasses: [smalltalk.nil] }), smalltalk.Object); smalltalk.addMethod( '_asJSON', smalltalk.method({ selector: 'asJSON', category: 'converting', fn: function (){ var self=this; return JSON.stringify(self._asJSONObject()); return self;}, source: unescape('asJSON%0A%09%3Creturn%20JSON.stringify%28self._asJSONObject%28%29%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_asJSONObject', smalltalk.method({ selector: 'asJSONObject', category: 'converting', fn: function (){ var self=this; var object=nil; object=smalltalk.send(smalltalk.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 self;}, 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: [smalltalk.Object] }), smalltalk.Object); smalltalk.addMethod( '_halt', smalltalk.method({ selector: 'halt', category: 'error handling', fn: function (){ var self=this; smalltalk.send(self, "_error_", ["Halt encountered"]); return self;}, source: unescape('halt%0A%09self%20error%3A%20%27Halt%20encountered%27'), messageSends: ["error:"], referencedClasses: [] }), smalltalk.Object); smalltalk.addMethod( '_initialize', smalltalk.method({ selector: 'initialize', category: 'initialization', fn: function (){ var self=this; return self;}, source: unescape('initialize%0A%09%22no%20op%22'), messageSends: [], referencedClasses: [] }), smalltalk.Object.klass); smalltalk.addClass('Smalltalk', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_classes', smalltalk.method({ selector: 'classes', category: 'accessing', fn: function (){ var self=this; return self.classes(); return self;}, source: unescape('classes%0A%09%3Creturn%20self.classes%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Smalltalk); smalltalk.addMethod( '_debugMode', smalltalk.method({ selector: 'debugMode', category: 'accessing', fn: function (){ var self=this; return self.debugMode; return self;}, source: unescape('debugMode%0A%09%3Creturn%20self.debugMode%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Smalltalk); smalltalk.addMethod( '_debugMode_', smalltalk.method({ selector: 'debugMode:', category: 'accessing', fn: function (aBoolean){ var self=this; self.debugMode = aBoolean; return self;}, source: unescape('debugMode%3A%20aBoolean%0A%09%3Cself.debugMode%20%3D%20aBoolean%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Smalltalk); smalltalk.addMethod( '_readJSON_', smalltalk.method({ selector: 'readJSON:', category: 'accessing', fn: function (anObject){ var self=this; return self.readJSObject(anObject); return self;}, source: unescape('readJSON%3A%20anObject%0A%09%3Creturn%20self.readJSObject%28anObject%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Smalltalk); smalltalk.addMethod( '_at_', smalltalk.method({ selector: 'at:', category: 'accessing', fn: function (aString){ var self=this; return self[aString]; return self;}, source: unescape('at%3A%20aString%0A%09%3Creturn%20self%5BaString%5D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Smalltalk); smalltalk.Smalltalk.klass.iVarNames = ['current']; smalltalk.addMethod( '_current', smalltalk.method({ selector: 'current', category: 'accessing', fn: function (){ var self=this; return smalltalk; return self;}, source: unescape('current%0A%09%3Creturn%20smalltalk%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Smalltalk.klass); smalltalk.addClass('Behavior', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_new', smalltalk.method({ selector: 'new', category: 'instance creation', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_basicNew", []), "_initialize", []); return self;}, source: unescape('new%0A%09%5Eself%20basicNew%20initialize'), messageSends: ["initialize", "basicNew"], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_basicNew', smalltalk.method({ selector: 'basicNew', category: 'instance creation', fn: function (){ var self=this; return new self.fn(); return self;}, source: unescape('basicNew%0A%09%3Creturn%20new%20self.fn%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_name', smalltalk.method({ selector: 'name', category: 'accessing', fn: function (){ var self=this; return self.className || nil; return self;}, source: unescape('name%0A%09%3Creturn%20self.className%20%7C%7C%20nil%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_superclass', smalltalk.method({ selector: 'superclass', category: 'accessing', fn: function (){ var self=this; return self.superclass || nil; return self;}, source: unescape('superclass%0A%09%3Creturn%20self.superclass%20%7C%7C%20nil%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_subclasses', smalltalk.method({ selector: 'subclasses', category: 'accessing', fn: function (){ var self=this; return smalltalk.subclasses(self); return self;}, source: unescape('subclasses%0A%09%3Creturn%20smalltalk.subclasses%28self%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_allSubclasses', smalltalk.method({ selector: 'allSubclasses', category: 'accessing', fn: function (){ 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; return self;}, 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.Behavior); smalltalk.addMethod( '_withAllSubclasses', smalltalk.method({ selector: 'withAllSubclasses', category: 'accessing', fn: function (){ var self=this; return (function($rec){smalltalk.send($rec, "_addAll_", [smalltalk.send(self, "_allSubclasses", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(smalltalk.Array, "_with_", [self])); return self;}, source: unescape('withAllSubclasses%0A%09%5E%28Array%20with%3A%20self%29%20addAll%3A%20self%20allSubclasses%3B%20yourself'), messageSends: ["addAll:", "allSubclasses", "yourself", "with:"], referencedClasses: [smalltalk.Array] }), smalltalk.Behavior); smalltalk.addMethod( '_prototype', smalltalk.method({ selector: 'prototype', category: 'accessing', fn: function (){ var self=this; return self.fn.prototype; return self;}, source: unescape('prototype%0A%09%3Creturn%20self.fn.prototype%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_methodDictionary', smalltalk.method({ selector: 'methodDictionary', category: 'accessing', fn: function (){ 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; return self;}, 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: [], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_methodsFor_', smalltalk.method({ selector: 'methodsFor:', category: 'accessing', fn: function (aString){ var self=this; return (function($rec){smalltalk.send($rec, "_class_category_", [self, aString]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(smalltalk.ClassCategoryReader, "_new", [])); return self;}, 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: [smalltalk.nil] }), smalltalk.Behavior); smalltalk.addMethod( '_addCompiledMethod_', smalltalk.method({ selector: 'addCompiledMethod:', category: 'accessing', fn: function (aMethod){ var self=this; smalltalk.addMethod(aMethod.selector._asSelector(), aMethod, self); return self;}, source: unescape('addCompiledMethod%3A%20aMethod%0A%09%3Csmalltalk.addMethod%28aMethod.selector._asSelector%28%29%2C%20aMethod%2C%20self%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_instanceVariableNames', smalltalk.method({ selector: 'instanceVariableNames', category: 'accessing', fn: function (){ var self=this; return self.iVarNames; return self;}, source: unescape('instanceVariableNames%0A%09%3Creturn%20self.iVarNames%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_comment', smalltalk.method({ selector: 'comment', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_basicAt_", ["comment"]), "_ifNil_", [(function(){return "";})]); return self;}, 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.Behavior); smalltalk.addMethod( '_comment_', smalltalk.method({ selector: 'comment:', category: 'accessing', fn: function (aString){ var self=this; smalltalk.send(self, "_basicAt_put_", ["comment", aString]); return self;}, source: unescape('comment%3A%20aString%0A%20%20%20%20self%20basicAt%3A%20%27comment%27%20put%3A%20aString'), messageSends: ["basicAt:put:"], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_commentStamp', smalltalk.method({ selector: 'commentStamp', category: 'accessing', fn: function (){ var self=this; return (function($rec){smalltalk.send($rec, "_class_", [self]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(smalltalk.ClassCommentReader, "_new", [])); return self;}, source: unescape('commentStamp%0A%20%20%20%20%5EClassCommentReader%20new%0A%09class%3A%20self%3B%0A%09yourself'), messageSends: ["class:", "yourself", "new"], referencedClasses: [smalltalk.nil] }), smalltalk.Behavior); smalltalk.addMethod( '_removeCompiledMethod_', smalltalk.method({ selector: 'removeCompiledMethod:', category: 'accessing', fn: function (aMethod){ var self=this; delete self.fn.prototype[aMethod.selector._asSelector()]; delete self.fn.prototype.methods[aMethod.selector]; return self;}, 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%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_inheritsFrom_', smalltalk.method({ selector: 'inheritsFrom:', category: 'instance creation', fn: function (aClass){ var self=this; return smalltalk.send(smalltalk.send(aClass, "_allSubclasses", []), "_includes_", [self]); return self;}, source: unescape('inheritsFrom%3A%20aClass%0A%09%5EaClass%20allSubclasses%20includes%3A%20self'), messageSends: ["includes:", "allSubclasses"], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addMethod( '_protocols', smalltalk.method({ selector: 'protocols', category: 'accessing', fn: function (){ var self=this; var protocols=nil; protocols=smalltalk.send(smalltalk.Array, "_new", []); smalltalk.send(smalltalk.send(self, "_methodDictionary", []), "_do_", [(function(each){return smalltalk.send(smalltalk.send(protocols, "_includes_", [smalltalk.send(each, "_category", [])]), "_ifFalse_", [(function(){return smalltalk.send(protocols, "_add_", [smalltalk.send(each, "_category", [])]);})]);})]); return smalltalk.send(protocols, "_sort", []); return self;}, 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: [smalltalk.Array] }), smalltalk.Behavior); smalltalk.addMethod( '_protocolsDo_', smalltalk.method({ selector: 'protocolsDo:', category: 'accessing', fn: function (aBlock){ var self=this; var methodsByCategory=nil; methodsByCategory=smalltalk.send(smalltalk.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, "_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;}, 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: [smalltalk.nil,smalltalk.Array] }), smalltalk.Behavior); smalltalk.addMethod( '_allInstanceVariableNames', smalltalk.method({ selector: 'allInstanceVariableNames', category: 'accessing', fn: function (){ var self=this; var result=nil; result=smalltalk.send(self, "_instanceVariableNames", []); smalltalk.send(smalltalk.send(self, "_superclass", []), "_ifNotNil_", [(function(){return smalltalk.send(result, "_addAll_", [smalltalk.send(smalltalk.send(self, "_superclass", []), "_allInstanceVariableNames", [])]);})]); return result; return self;}, source: unescape('allInstanceVariableNames%0A%09%7C%20result%20%7C%0A%09result%20%3A%3D%20self%20instanceVariableNames.%0A%09self%20superclass%20ifNotNil%3A%20%5B%0A%09%20%20%20%20result%20addAll%3A%20self%20superclass%20allInstanceVariableNames%5D.%0A%09%5Eresult'), messageSends: ["instanceVariableNames", "ifNotNil:", "superclass", "addAll:", "allInstanceVariableNames"], referencedClasses: [] }), smalltalk.Behavior); smalltalk.addClass('Class', smalltalk.Behavior, [], 'Kernel'); smalltalk.addMethod( '_category', smalltalk.method({ selector: 'category', category: 'accessing', fn: function (){ var self=this; return self.category; return self;}, source: unescape('category%0A%09%3Creturn%20self.category%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Class); smalltalk.addMethod( '_category_', smalltalk.method({ selector: 'category:', category: 'accessing', fn: function (aString){ var self=this; self.category = aString; return self;}, source: unescape('category%3A%20aString%0A%09%3Cself.category%20%3D%20aString%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Class); smalltalk.addMethod( '_subclass_instanceVariableNames_', smalltalk.method({ selector: 'subclass:instanceVariableNames:', category: 'class creation', fn: function (aString, anotherString){ var self=this; return smalltalk.send(self, "_subclass_instanceVariableNames_category_", [aString, anotherString, nil]); return self;}, source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%20category%3A%20nil'), messageSends: ["subclass:instanceVariableNames:category:"], referencedClasses: [] }), smalltalk.Class); smalltalk.addMethod( '_subclass_instanceVariableNames_category_', smalltalk.method({ selector: 'subclass:instanceVariableNames:category:', category: 'class creation', fn: function (aString, aString2, aString3){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.ClassBuilder, "_new", []), "_superclass_subclass_instanceVariableNames_category_", [self, aString, aString2, aString3]); return self;}, source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20category%3A%20aString3%0A%09%5EClassBuilder%20new%0A%09%20%20%20%20superclass%3A%20self%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20category%3A%20aString3'), messageSends: ["superclass:subclass:instanceVariableNames:category:", "new"], referencedClasses: [smalltalk.nil] }), smalltalk.Class); smalltalk.addMethod( '_isClass', smalltalk.method({ selector: 'isClass', category: 'testing', fn: function (){ var self=this; return true; return self;}, source: unescape('isClass%0A%09%5Etrue'), messageSends: [], referencedClasses: [] }), smalltalk.Class); smalltalk.addMethod( '_printString', smalltalk.method({ selector: 'printString', category: 'printing', fn: function (){ var self=this; return smalltalk.send(self, "_name", []); return self;}, source: unescape('printString%0A%09%5Eself%20name'), messageSends: ["name"], referencedClasses: [] }), smalltalk.Class); smalltalk.addMethod( '_rename_', smalltalk.method({ selector: 'rename:', category: 'accessing', fn: function (aString){ var self=this; smalltalk[aString] = self; delete smalltalk[self.className]; self.className = aString; ; return self;}, 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.Class); smalltalk.addClass('Metaclass', smalltalk.Behavior, [], 'Kernel'); smalltalk.addMethod( '_instanceClass', smalltalk.method({ selector: 'instanceClass', category: 'accessing', fn: function (){ var self=this; return self.instanceClass; return self;}, source: unescape('instanceClass%0A%09%3Creturn%20self.instanceClass%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Metaclass); smalltalk.addMethod( '_instanceVariableNames_', smalltalk.method({ selector: 'instanceVariableNames:', category: 'accessing', fn: function (aCollection){ var self=this; smalltalk.send(smalltalk.send(smalltalk.ClassBuilder, "_new", []), "_class_instanceVariableNames_", [self, aCollection]); return self;}, source: unescape('instanceVariableNames%3A%20aCollection%0A%09ClassBuilder%20new%0A%09%20%20%20%20class%3A%20self%20instanceVariableNames%3A%20aCollection'), messageSends: ["class:instanceVariableNames:", "new"], referencedClasses: [smalltalk.nil] }), smalltalk.Metaclass); smalltalk.addMethod( '_isMetaclass', smalltalk.method({ selector: 'isMetaclass', category: 'testing', fn: function (){ var self=this; return true; return self;}, source: unescape('isMetaclass%0A%09%5Etrue'), messageSends: [], referencedClasses: [] }), smalltalk.Metaclass); smalltalk.addMethod( '_printString', smalltalk.method({ selector: 'printString', category: 'printing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.send(self, "_instanceClass", []), "_name", []), "__comma", [" class"]); return self;}, source: unescape('printString%0A%09%5Eself%20instanceClass%20name%2C%20%27%20class%27'), messageSends: [unescape("%2C"), "name", "instanceClass"], referencedClasses: [] }), smalltalk.Metaclass); smalltalk.addClass('CompiledMethod', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_source', smalltalk.method({ selector: 'source', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_basicAt_", ["source"]), "_ifNil_", [(function(){return "";})]); return self;}, 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.CompiledMethod); smalltalk.addMethod( '_source_', smalltalk.method({ selector: 'source:', category: 'accessing', fn: function (aString){ var self=this; smalltalk.send(self, "_basicAt_put_", ["source", aString]); return self;}, source: unescape('source%3A%20aString%0A%09self%20basicAt%3A%20%27source%27%20put%3A%20aString'), messageSends: ["basicAt:put:"], referencedClasses: [] }), smalltalk.CompiledMethod); smalltalk.addMethod( '_category', smalltalk.method({ selector: 'category', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_basicAt_", ["category"]), "_ifNil_", [(function(){return "";})]); return self;}, 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.CompiledMethod); smalltalk.addMethod( '_category_', smalltalk.method({ selector: 'category:', category: 'accessing', fn: function (aString){ var self=this; smalltalk.send(self, "_basicAt_put_", ["category", aString]); return self;}, source: unescape('category%3A%20aString%0A%09self%20basicAt%3A%20%27category%27%20put%3A%20aString'), messageSends: ["basicAt:put:"], referencedClasses: [] }), smalltalk.CompiledMethod); smalltalk.addMethod( '_selector', smalltalk.method({ selector: 'selector', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_basicAt_", ["selector"]); return self;}, source: unescape('selector%0A%09%5Eself%20basicAt%3A%20%27selector%27'), messageSends: ["basicAt:"], referencedClasses: [] }), smalltalk.CompiledMethod); smalltalk.addMethod( '_selector_', smalltalk.method({ selector: 'selector:', category: 'accessing', fn: function (aString){ var self=this; smalltalk.send(self, "_basicAt_put_", ["selector", aString]); return self;}, source: unescape('selector%3A%20aString%0A%09self%20basicAt%3A%20%27selector%27%20put%3A%20aString'), messageSends: ["basicAt:put:"], referencedClasses: [] }), smalltalk.CompiledMethod); smalltalk.addMethod( '_fn', smalltalk.method({ selector: 'fn', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_basicAt_", ["fn"]); return self;}, source: unescape('fn%0A%09%5Eself%20basicAt%3A%20%27fn%27'), messageSends: ["basicAt:"], referencedClasses: [] }), smalltalk.CompiledMethod); smalltalk.addMethod( '_fn_', smalltalk.method({ selector: 'fn:', category: 'accessing', fn: function (aBlock){ var self=this; smalltalk.send(self, "_basicAt_put_", ["fn", aBlock]); return self;}, source: unescape('fn%3A%20aBlock%0A%09self%20basicAt%3A%20%27fn%27%20put%3A%20aBlock'), messageSends: ["basicAt:put:"], referencedClasses: [] }), smalltalk.CompiledMethod); smalltalk.addMethod( '_messageSends', smalltalk.method({ selector: 'messageSends', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_basicAt_", ["messageSends"]); return self;}, source: unescape('messageSends%0A%09%5Eself%20basicAt%3A%20%27messageSends%27'), messageSends: ["basicAt:"], referencedClasses: [] }), smalltalk.CompiledMethod); smalltalk.addMethod( '_methodClass', smalltalk.method({ selector: 'methodClass', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_basicAt_", ["methodClass"]); return self;}, source: unescape('methodClass%0A%09%5Eself%20basicAt%3A%20%27methodClass%27'), messageSends: ["basicAt:"], referencedClasses: [] }), smalltalk.CompiledMethod); smalltalk.addMethod( '_referencedClasses', smalltalk.method({ selector: 'referencedClasses', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_basicAt_", ["referencedClasses"]); return self;}, source: unescape('referencedClasses%0A%09%5Eself%20basicAt%3A%20%27referencedClasses%27'), messageSends: ["basicAt:"], referencedClasses: [] }), smalltalk.CompiledMethod); smalltalk.addClass('Number', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '__eq', smalltalk.method({ selector: '=', category: 'comparing', fn: function (aNumber){ var self=this; return Number(self) == aNumber; return self;}, source: unescape('%3D%20aNumber%0A%09%3Creturn%20Number%28self%29%20%3D%3D%20aNumber%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '__gt', smalltalk.method({ selector: '>', category: 'comparing', fn: function (aNumber){ var self=this; return self > aNumber; return self;}, source: unescape('%3E%20aNumber%0A%09%3Creturn%20self%20%3E%3E%20aNumber%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '__lt', smalltalk.method({ selector: '<', category: 'comparing', fn: function (aNumber){ var self=this; return self < aNumber; return self;}, source: unescape('%3C%20aNumber%0A%09%3Creturn%20self%20%3C%20aNumber%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '__gt_eq', smalltalk.method({ selector: '>=', category: 'comparing', fn: function (aNumber){ var self=this; return self >= aNumber; return self;}, source: unescape('%3E%3D%20aNumber%0A%09%3Creturn%20self%20%3E%3E%3D%20aNumber%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '__lt_eq', smalltalk.method({ selector: '<=', category: 'comparing', fn: function (aNumber){ var self=this; return self <= aNumber; return self;}, source: unescape('%3C%3D%20aNumber%0A%09%3Creturn%20self%20%3C%3D%20aNumber%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '__plus', smalltalk.method({ selector: '+', category: 'arithmetic', fn: function (aNumber){ var self=this; return self + aNumber; return self;}, source: unescape('+%20aNumber%0A%09%3Creturn%20self%20+%20aNumber%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '__minus', smalltalk.method({ selector: '-', category: 'arithmetic', fn: function (aNumber){ var self=this; return self - aNumber; return self;}, source: unescape('-%20aNumber%0A%09%3Creturn%20self%20-%20aNumber%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '__star', smalltalk.method({ selector: '*', category: 'arithmetic', fn: function (aNumber){ var self=this; return self * aNumber; return self;}, source: unescape('*%20aNumber%0A%09%3Creturn%20self%20*%20aNumber%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '__slash', smalltalk.method({ selector: '/', category: 'arithmetic', fn: function (aNumber){ var self=this; return self / aNumber; return self;}, source: unescape('/%20aNumber%0A%09%3Creturn%20self%20/%20aNumber%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_max_', smalltalk.method({ selector: 'max:', category: 'arithmetic', fn: function (aNumber){ var self=this; return Math.max(self, aNumber);; return self;}, source: unescape('max%3A%20aNumber%0A%09%3Creturn%20Math.max%28self%2C%20aNumber%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_min_', smalltalk.method({ selector: 'min:', category: 'arithmetic', fn: function (aNumber){ var self=this; return Math.min(self, aNumber);; return self;}, source: unescape('min%3A%20aNumber%0A%09%3Creturn%20Math.min%28self%2C%20aNumber%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_rounded', smalltalk.method({ selector: 'rounded', category: 'converting', fn: function (){ var self=this; return Math.round(self);; return self;}, source: unescape('rounded%0A%09%3Creturn%20Math.round%28self%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_truncated', smalltalk.method({ selector: 'truncated', category: 'converting', fn: function (){ var self=this; return Math.floor(self);; return self;}, source: unescape('truncated%0A%09%3Creturn%20Math.floor%28self%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_to_', smalltalk.method({ selector: 'to:', category: 'converting', fn: function (aNumber){ var self=this; var array=nil; var first=nil; var last=nil; var count=nil; first=smalltalk.send(self, "_truncated", []); last=smalltalk.send(smalltalk.send(aNumber, "_truncated", []), "__plus", [(1)]); count=(1); smalltalk.send(smalltalk.send(first, "__lt_eq", [last]), "_ifFalse_", [(function(){return smalltalk.send(self, "_error_", ["Wrong interval"]);})]); array=smalltalk.send(smalltalk.Array, "_new", []); smalltalk.send(smalltalk.send(last, "__minus", [first]), "_timesRepeat_", [(function(){smalltalk.send(array, "_at_put_", [count, first]);count=smalltalk.send(count, "__plus", [(1)]);return first=smalltalk.send(first, "__plus", [(1)]);})]); return array; return self;}, 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%09%28first%20%3C%3D%20last%29%20ifFalse%3A%20%5Bself%20error%3A%20%27Wrong%20interval%27%5D.%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("+"), "ifFalse:", unescape("%3C%3D"), "error:", "new", "timesRepeat:", unescape("-"), "at:put:"], referencedClasses: [smalltalk.Array] }), smalltalk.Number); smalltalk.addMethod( '_timesRepeat_', smalltalk.method({ selector: 'timesRepeat:', category: 'enumerating', fn: function (aBlock){ var self=this; var integer=nil; var count=nil; integer=smalltalk.send(self, "_truncated", []); count=(1); smalltalk.send((function(){return smalltalk.send(count, "__gt", [self]);}), "_whileFalse_", [(function(){smalltalk.send(aBlock, "_value", []);return count=smalltalk.send(count, "__plus", [(1)]);})]); return self;}, 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.Number); smalltalk.addMethod( '_to_do_', smalltalk.method({ selector: 'to:do:', category: 'enumerating', fn: function (aNumber, aBlock){ var self=this; return smalltalk.send(smalltalk.send(self, "_to_", [aNumber]), "_do_", [aBlock]); return self;}, source: unescape('to%3A%20aNumber%20do%3A%20aBlock%0A%09%5E%28self%20to%3A%20aNumber%29%20do%3A%20aBlock'), messageSends: ["do:", "to:"], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_asString', smalltalk.method({ selector: 'asString', category: 'converting', fn: function (){ var self=this; return smalltalk.send(self, "_printString", []); return self;}, source: unescape('asString%0A%09%5Eself%20printString'), messageSends: ["printString"], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_asJavascript', smalltalk.method({ selector: '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;}, 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( '_printString', smalltalk.method({ selector: 'printString', category: 'printing', fn: function (){ var self=this; return String(self); return self;}, source: unescape('printString%0A%09%3Creturn%20String%28self%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_isNumber', smalltalk.method({ selector: 'isNumber', category: 'testing', fn: function (){ var self=this; return true; return self;}, source: unescape('isNumber%0A%09%5Etrue'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_atRandom', smalltalk.method({ selector: 'atRandom', category: 'converting', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.Random, "_new", []), "_next", []), "__star", [self]), "_truncated", []), "__plus", [(1)]); return self;}, 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: [smalltalk.nil] }), smalltalk.Number); smalltalk.addMethod( '__at', smalltalk.method({ selector: '@', category: 'converting', fn: function (aNumber){ var self=this; return smalltalk.send(smalltalk.Point, "_x_y_", [self, aNumber]); return self;}, source: unescape('@%20aNumber%0A%09%5EPoint%20x%3A%20self%20y%3A%20aNumber'), messageSends: ["x:y:"], referencedClasses: [smalltalk.nil] }), smalltalk.Number); smalltalk.addMethod( '_asPoint', smalltalk.method({ selector: 'asPoint', category: 'converting', fn: function (){ var self=this; return smalltalk.send(smalltalk.Point, "_x_y_", [self, self]); return self;}, source: unescape('asPoint%0A%09%5EPoint%20x%3A%20self%20y%3A%20self'), messageSends: ["x:y:"], referencedClasses: [smalltalk.nil] }), smalltalk.Number); smalltalk.addMethod( '_clearInterval', smalltalk.method({ selector: 'clearInterval', category: 'timeouts/intervals', fn: function (){ var self=this; clearInterval(Number(self)); return self;}, source: unescape('clearInterval%0A%09%3CclearInterval%28Number%28self%29%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_asJSONObject', smalltalk.method({ selector: 'asJSONObject', category: 'converting', fn: function (){ var self=this; return self; return self;}, source: unescape('asJSONObject%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_clearTimeout', smalltalk.method({ selector: 'clearTimeout', category: 'timeouts/intervals', fn: function (){ var self=this; clearTimeout(Number(self)); return self;}, source: unescape('clearTimeout%0A%09%3CclearTimeout%28Number%28self%29%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number); smalltalk.addMethod( '_pi', smalltalk.method({ selector: 'pi', category: 'instance creation', fn: function (){ var self=this; return Math.PI; return self;}, source: unescape('pi%0A%09%3Creturn%20Math.PI%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Number.klass); smalltalk.addClass('BlockClosure', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_compiledSource', smalltalk.method({ selector: 'compiledSource', category: 'accessing', fn: function (){ var self=this; return self.toString(); return self;}, source: unescape('compiledSource%0A%09%3Creturn%20self.toString%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_whileTrue_', smalltalk.method({ selector: 'whileTrue:', category: 'controlling', fn: function (aBlock){ var self=this; while(self()) {aBlock()}; return self;}, source: unescape('whileTrue%3A%20aBlock%0A%09%3Cwhile%28self%28%29%29%20%7BaBlock%28%29%7D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_whileFalse_', smalltalk.method({ selector: 'whileFalse:', category: 'controlling', fn: function (aBlock){ var self=this; while(!self()) {aBlock()}; return self;}, source: unescape('whileFalse%3A%20aBlock%0A%09%3Cwhile%28%21self%28%29%29%20%7BaBlock%28%29%7D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_value', smalltalk.method({ selector: 'value', category: 'evaluating', fn: function (){ var self=this; return self();; return self;}, source: unescape('value%0A%09%3Creturn%20self%28%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_value_', smalltalk.method({ selector: 'value:', category: 'evaluating', fn: function (anArg){ var self=this; return self(anArg);; return self;}, source: unescape('value%3A%20anArg%0A%09%3Creturn%20self%28anArg%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_value_value_', smalltalk.method({ selector: 'value:value:', category: 'evaluating', fn: function (firstArg, secondArg){ var self=this; return self(firstArg, secondArg);; return self;}, source: unescape('value%3A%20firstArg%20value%3A%20secondArg%0A%09%3Creturn%20self%28firstArg%2C%20secondArg%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_value_value_value_', smalltalk.method({ selector: 'value:value:value:', category: 'evaluating', fn: function (firstArg, secondArg, thirdArg){ var self=this; return self(firstArg, secondArg, thirdArg);; return self;}, source: unescape('value%3A%20firstArg%20value%3A%20secondArg%20value%3A%20thirdArg%0A%09%3Creturn%20self%28firstArg%2C%20secondArg%2C%20thirdArg%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_valueWithPossibleArguments_', smalltalk.method({ selector: 'valueWithPossibleArguments:', category: 'evaluating', fn: function (aCollection){ var self=this; return self.apply(null, aCollection);; return self;}, source: unescape('valueWithPossibleArguments%3A%20aCollection%0A%09%3Creturn%20self.apply%28null%2C%20aCollection%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_on_do_', smalltalk.method({ selector: 'on:do:', category: 'error handling', fn: function (anErrorClass, aBlock){ var self=this; smalltalk.send(self, "_try_catch_", [self, (function(error){return smalltalk.send(smalltalk.send(error, "_isKindOf_", [anErrorClass]), "_ifTrue_ifFalse_", [(function(){return smalltalk.send(aBlock, "_value_", [error]);}), (function(){return smalltalk.send(error, "_signal", []);})]);})]); return self;}, 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"], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_valueWithTimeout_', smalltalk.method({ selector: 'valueWithTimeout:', category: 'timeout/interval', fn: function (aNumber){ var self=this; return setTimeout(self, aNumber); return self;}, source: unescape('valueWithTimeout%3A%20aNumber%0A%09%3Creturn%20setTimeout%28self%2C%20aNumber%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addMethod( '_valueWithInterval_', smalltalk.method({ selector: 'valueWithInterval:', category: 'timeout/interval', fn: function (aNumber){ var self=this; return setInterval(self, aNumber); return self;}, source: unescape('valueWithInterval%3A%20aNumber%0A%09%3Creturn%20setInterval%28self%2C%20aNumber%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.BlockClosure); smalltalk.addClass('Boolean', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '__eq', smalltalk.method({ selector: '=', category: 'comparing', fn: function (aBoolean){ var self=this; return Boolean(self == true) == aBoolean; return self;}, source: unescape('%3D%20aBoolean%0A%09%3Creturn%20Boolean%28self%20%3D%3D%20true%29%20%3D%3D%20aBoolean%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Boolean); smalltalk.addMethod( '_shallowCopy', smalltalk.method({ selector: 'shallowCopy', category: 'copying', fn: function (){ var self=this; return self; return self;}, source: unescape('shallowCopy%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.Boolean); smalltalk.addMethod( '_deepCopy', smalltalk.method({ selector: 'deepCopy', category: 'copying', fn: function (){ var self=this; return self; return self;}, source: unescape('deepCopy%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.Boolean); smalltalk.addMethod( '_ifTrue_', smalltalk.method({ selector: 'ifTrue:', category: 'controlling', fn: function (aBlock){ var self=this; return smalltalk.send(self, "_ifTrue_ifFalse_", [aBlock, (function(){return nil;})]); return self;}, source: unescape('ifTrue%3A%20aBlock%0A%09%5Eself%20ifTrue%3A%20aBlock%20ifFalse%3A%20%5B%5D'), messageSends: ["ifTrue:ifFalse:"], referencedClasses: [] }), smalltalk.Boolean); smalltalk.addMethod( '_ifFalse_', smalltalk.method({ selector: 'ifFalse:', category: 'controlling', fn: function (aBlock){ var self=this; return smalltalk.send(self, "_ifTrue_ifFalse_", [(function(){return nil;}), aBlock]); return self;}, source: unescape('ifFalse%3A%20aBlock%0A%09%5Eself%20ifTrue%3A%20%5B%5D%20ifFalse%3A%20aBlock'), messageSends: ["ifTrue:ifFalse:"], referencedClasses: [] }), smalltalk.Boolean); smalltalk.addMethod( '_ifFalse_ifTrue_', smalltalk.method({ selector: 'ifFalse:ifTrue:', category: 'controlling', fn: function (aBlock, anotherBlock){ var self=this; return smalltalk.send(self, "_ifTrue_ifFalse_", [anotherBlock, aBlock]); return self;}, source: unescape('ifFalse%3A%20aBlock%20ifTrue%3A%20anotherBlock%0A%09%5Eself%20ifTrue%3A%20anotherBlock%20ifFalse%3A%20aBlock'), messageSends: ["ifTrue:ifFalse:"], referencedClasses: [] }), smalltalk.Boolean); smalltalk.addMethod( '_ifTrue_ifFalse_', smalltalk.method({ selector: 'ifTrue:ifFalse:', category: 'controlling', fn: function (aBlock, anotherBlock){ var self=this; if(self == true) { return aBlock(); } else { return anotherBlock(); } ; return self;}, source: unescape('ifTrue%3A%20aBlock%20ifFalse%3A%20anotherBlock%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( '_and_', smalltalk.method({ selector: 'and:', category: 'controlling', fn: function (aBlock){ var self=this; return smalltalk.send(smalltalk.send(self, "__eq", [true]), "_ifTrue_ifFalse_", [aBlock, (function(){return false;})]); return self;}, 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( '_or_', smalltalk.method({ selector: 'or:', category: 'controlling', fn: function (aBlock){ var self=this; return smalltalk.send(smalltalk.send(self, "__eq", [true]), "_ifTrue_ifFalse_", [(function(){return true;}), aBlock]); return self;}, 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( '_not', smalltalk.method({ selector: 'not', category: 'controlling', fn: function (){ var self=this; return smalltalk.send(self, "__eq", [false]); return self;}, source: unescape('not%0A%09%5Eself%20%3D%20false'), messageSends: [unescape("%3D")], referencedClasses: [] }), smalltalk.Boolean); smalltalk.addMethod( '_printString', smalltalk.method({ selector: 'printString', category: 'printing', fn: function (){ var self=this; return self.toString(); return self;}, source: unescape('printString%0A%09%3Creturn%20self.toString%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Boolean); smalltalk.addMethod( '_asJSONObject', smalltalk.method({ selector: 'asJSONObject', category: 'comparing', fn: function (){ var self=this; return self; return self;}, source: unescape('asJSONObject%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.Boolean); smalltalk.addClass('Date', smalltalk.Object, [], 'Kernel'); smalltalk.Date.comment=unescape('The%20Date%20class%20is%20used%20to%20work%20with%20dates%20and%20times.') smalltalk.addMethod( '_year', smalltalk.method({ selector: 'year', category: 'accessing', fn: function (){ var self=this; return self.getFullYear(); return self;}, source: unescape('year%0A%09%3Creturn%20self.getFullYear%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_month', smalltalk.method({ selector: 'month', category: 'accessing', fn: function (){ var self=this; return self.getMonth() + 1; return self;}, source: unescape('month%0A%09%3Creturn%20self.getMonth%28%29%20+%201%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_month_', smalltalk.method({ selector: 'month:', category: 'accessing', fn: function (aNumber){ var self=this; self.setMonth(aNumber - 1); return self;}, source: unescape('month%3A%20aNumber%0A%09%3Cself.setMonth%28aNumber%20-%201%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_day', smalltalk.method({ selector: 'day', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_dayOfWeek", []); return self;}, source: unescape('day%0A%09%5Eself%20dayOfWeek'), messageSends: ["dayOfWeek"], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_dayOfWeek', smalltalk.method({ selector: 'dayOfWeek', category: 'accessing', fn: function (){ var self=this; return self.getDay() + 1; return self;}, source: unescape('dayOfWeek%0A%09%3Creturn%20self.getDay%28%29%20+%201%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_dayOfWeek_', smalltalk.method({ selector: 'dayOfWeek:', category: 'accessing', fn: function (aNumber){ var self=this; return self.setDay(aNumber - 1); return self;}, source: unescape('dayOfWeek%3A%20aNumber%0A%09%3Creturn%20self.setDay%28aNumber%20-%201%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_day_', smalltalk.method({ selector: 'day:', category: 'accessing', fn: function (aNumber){ var self=this; smalltalk.send(self, "_day_", [aNumber]); return self;}, source: unescape('day%3A%20aNumber%0A%09self%20day%3A%20aNumber'), messageSends: ["day:"], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_year_', smalltalk.method({ selector: 'year:', category: 'accessing', fn: function (aNumber){ var self=this; self.setFullYear(aNumber); return self;}, source: unescape('year%3A%20aNumber%0A%09%3Cself.setFullYear%28aNumber%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_dayOfMonth', smalltalk.method({ selector: 'dayOfMonth', category: 'accessing', fn: function (){ var self=this; return self.getDate(); return self;}, source: unescape('dayOfMonth%0A%09%3Creturn%20self.getDate%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_dayOfMonth_', smalltalk.method({ selector: 'dayOfMonth:', category: 'accessing', fn: function (aNumber){ var self=this; self.setDate(aNumber); return self;}, source: unescape('dayOfMonth%3A%20aNumber%0A%09%3Cself.setDate%28aNumber%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_asString', smalltalk.method({ selector: 'asString', category: 'converting', fn: function (){ var self=this; return self.toString(); return self;}, source: unescape('asString%0A%09%3Creturn%20self.toString%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_printString', smalltalk.method({ selector: 'printString', category: 'printing', fn: function (){ var self=this; return smalltalk.send(self, "_asString", []); return self;}, source: unescape('printString%0A%09%5Eself%20asString'), messageSends: ["asString"], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_asMilliseconds', smalltalk.method({ selector: 'asMilliseconds', category: 'converting', fn: function (){ var self=this; return smalltalk.send(self, "_time", []); return self;}, source: unescape('asMilliseconds%0A%09%5Eself%20time'), messageSends: ["time"], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_time', smalltalk.method({ selector: 'time', category: 'accessing', fn: function (){ var self=this; return self.getTime(); return self;}, source: unescape('time%0A%09%3Creturn%20self.getTime%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_time_', smalltalk.method({ selector: 'time:', category: 'accessing', fn: function (aNumber){ var self=this; self.setTime(aNumber); return self;}, source: unescape('time%3A%20aNumber%0A%09%3Cself.setTime%28aNumber%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_asDateString', smalltalk.method({ selector: 'asDateString', category: 'converting', fn: function (){ var self=this; return self.toDateString(); return self;}, source: unescape('asDateString%0A%09%3Creturn%20self.toDateString%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_asTimeString', smalltalk.method({ selector: 'asTimeString', category: 'converting', fn: function (){ var self=this; return self.toTimeString(); return self;}, source: unescape('asTimeString%0A%09%3Creturn%20self.toTimeString%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_asLocaleString', smalltalk.method({ selector: 'asLocaleString', category: 'converting', fn: function (){ var self=this; return self.toLocaleString(); return self;}, source: unescape('asLocaleString%0A%09%3Creturn%20self.toLocaleString%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_asNumber', smalltalk.method({ selector: 'asNumber', category: 'converting', fn: function (){ var self=this; return smalltalk.send(self, "_asMilliseconds", []); return self;}, source: unescape('asNumber%0A%09%5Eself%20asMilliseconds'), messageSends: ["asMilliseconds"], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_hours_', smalltalk.method({ selector: 'hours:', category: 'accessing', fn: function (aNumber){ var self=this; self.setHours(aNumber); return self;}, source: unescape('hours%3A%20aNumber%0A%09%3Cself.setHours%28aNumber%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_minutes_', smalltalk.method({ selector: 'minutes:', category: 'accessing', fn: function (aNumber){ var self=this; self.setMinutes(aNumber); return self;}, source: unescape('minutes%3A%20aNumber%0A%09%3Cself.setMinutes%28aNumber%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_seconds_', smalltalk.method({ selector: 'seconds:', category: 'accessing', fn: function (aNumber){ var self=this; self.setSeconds(aNumber); return self;}, source: unescape('seconds%3A%20aNumber%0A%09%3Cself.setSeconds%28aNumber%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_milliseconds_', smalltalk.method({ selector: 'milliseconds:', category: 'accessing', fn: function (aNumber){ var self=this; self.setMilliseconds(aNumber); return self;}, source: unescape('milliseconds%3A%20aNumber%0A%09%3Cself.setMilliseconds%28aNumber%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_hours', smalltalk.method({ selector: 'hours', category: 'accessing', fn: function (){ var self=this; return self.getHours(); return self;}, source: unescape('hours%0A%09%3Creturn%20self.getHours%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_minutes', smalltalk.method({ selector: 'minutes', category: 'accessing', fn: function (){ var self=this; return self.getMinutes(); return self;}, source: unescape('minutes%0A%09%3Creturn%20self.getMinutes%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_seconds', smalltalk.method({ selector: 'seconds', category: 'accessing', fn: function (){ var self=this; return self.getSeconds(); return self;}, source: unescape('seconds%0A%09%3Creturn%20self.getSeconds%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_milliseconds', smalltalk.method({ selector: 'milliseconds', category: 'accessing', fn: function (){ var self=this; return self.getMilliseconds(); return self;}, source: unescape('milliseconds%0A%09%3Creturn%20self.getMilliseconds%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '__lt', smalltalk.method({ selector: '<', category: 'comparing', fn: function (aDate){ var self=this; return self < aDate; return self;}, source: unescape('%3C%20aDate%0A%09%3Creturn%20self%20%3C%20aDate%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '__gt', smalltalk.method({ selector: '>', category: 'comparing', fn: function (aDate){ var self=this; return self > aDate; return self;}, source: unescape('%3E%20aDate%0A%09%3Creturn%20self%20%3E%3E%20aDate%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '__lt_eq', smalltalk.method({ selector: '<=', category: 'comparing', fn: function (aDate){ var self=this; self <= aDate; return self;}, source: unescape('%3C%3D%20aDate%0A%09%3Cself%20%3C%3D%20aDate%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '__gt_eq', smalltalk.method({ selector: '>=', category: 'comparing', fn: function (aDate){ var self=this; self >= aDate; return self;}, source: unescape('%3E%3D%20aDate%0A%09%3Cself%20%3E%3E%3D%20aDate%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '__minus', smalltalk.method({ selector: '-', category: 'arithmetic', fn: function (aDate){ var self=this; return self - aDate; return self;}, source: unescape('-%20aDate%0A%09%3Creturn%20self%20-%20aDate%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '__plus', smalltalk.method({ selector: '+', category: 'arithmetic', fn: function (aDate){ var self=this; return self + aDate; return self;}, source: unescape('+%20aDate%0A%09%3Creturn%20self%20+%20aDate%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_asJSONObject', smalltalk.method({ selector: 'asJSONObject', category: 'converting', fn: function (){ var self=this; return self; return self;}, source: unescape('asJSONObject%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.Date); smalltalk.addMethod( '_new_', smalltalk.method({ selector: 'new:', category: 'instance creation', fn: function (anObject){ var self=this; return new Date(anObject); return self;}, source: unescape('new%3A%20anObject%0A%09%3Creturn%20new%20Date%28anObject%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Date.klass); smalltalk.addMethod( '_fromString_', smalltalk.method({ selector: 'fromString:', category: 'instance creation', fn: function (aString){ var self=this; return smalltalk.send(self, "_new_", [aString]); return self;}, 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.Date.klass); smalltalk.addMethod( '_fromSeconds_', smalltalk.method({ selector: 'fromSeconds:', category: 'instance creation', fn: function (aNumber){ var self=this; return smalltalk.send(self, "_fromMilliseconds_", [smalltalk.send(aNumber, "__star", [(1000)])]); return self;}, source: unescape('fromSeconds%3A%20aNumber%0A%09%5Eself%20fromMilliseconds%3A%20aNumber%20*%201000'), messageSends: ["fromMilliseconds:", unescape("*")], referencedClasses: [] }), smalltalk.Date.klass); smalltalk.addMethod( '_fromMilliseconds_', smalltalk.method({ selector: 'fromMilliseconds:', category: 'instance creation', fn: function (aNumber){ var self=this; return smalltalk.send(self, "_new_", [aNumber]); return self;}, source: unescape('fromMilliseconds%3A%20aNumber%0A%09%5Eself%20new%3A%20aNumber'), messageSends: ["new:"], referencedClasses: [] }), smalltalk.Date.klass); smalltalk.addMethod( '_today', smalltalk.method({ selector: 'today', category: 'instance creation', fn: function (){ var self=this; return smalltalk.send(self, "_new", []); return self;}, source: unescape('today%0A%09%5Eself%20new'), messageSends: ["new"], referencedClasses: [] }), smalltalk.Date.klass); smalltalk.addMethod( '_now', smalltalk.method({ selector: 'now', category: 'instance creation', fn: function (){ var self=this; return smalltalk.send(self, "_today", []); return self;}, source: unescape('now%0A%09%5Eself%20today'), messageSends: ["today"], referencedClasses: [] }), smalltalk.Date.klass); smalltalk.addMethod( '_millisecondsToRun_', smalltalk.method({ selector: 'millisecondsToRun:', category: 'instance creation', fn: function (aBlock){ var self=this; var t=nil; t=smalltalk.send(smalltalk.Date, "_now", []); smalltalk.send(aBlock, "_value", []); return smalltalk.send(smalltalk.send(smalltalk.Date, "_now", []), "__minus", [t]); return self;}, 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: [smalltalk.Date] }), smalltalk.Date.klass); smalltalk.addClass('UndefinedObject', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_subclass_instanceVariableNames_', smalltalk.method({ selector: 'subclass:instanceVariableNames:', category: 'class creation', fn: function (aString, anotherString){ var self=this; return smalltalk.send(self, "_subclass_instanceVariableNames_category_", [aString, anotherString, nil]); return self;}, source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%0A%09%5Eself%20subclass%3A%20aString%20instanceVariableNames%3A%20anotherString%20category%3A%20nil'), messageSends: ["subclass:instanceVariableNames:category:"], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_subclass_instanceVariableNames_category_', smalltalk.method({ selector: 'subclass:instanceVariableNames:category:', category: 'class creation', fn: function (aString, aString2, aString3){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.ClassBuilder, "_new", []), "_superclass_subclass_instanceVariableNames_category_", [self, aString, aString2, aString3]); return self;}, source: unescape('subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20category%3A%20aString3%0A%09%5EClassBuilder%20new%0A%09%20%20%20%20superclass%3A%20self%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20category%3A%20aString3'), messageSends: ["superclass:subclass:instanceVariableNames:category:", "new"], referencedClasses: [smalltalk.nil] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_shallowCopy', smalltalk.method({ selector: 'shallowCopy', category: 'copying', fn: function (){ var self=this; return self; return self;}, source: unescape('shallowCopy%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_deepCopy', smalltalk.method({ selector: 'deepCopy', category: 'copying', fn: function (){ var self=this; return self; return self;}, source: unescape('deepCopy%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_ifNil_', smalltalk.method({ selector: 'ifNil:', category: 'testing', fn: function (aBlock){ var self=this; return smalltalk.send(self, "_ifNil_ifNotNil_", [aBlock, (function(){return nil;})]); return self;}, source: unescape('ifNil%3A%20aBlock%0A%09%5Eself%20ifNil%3A%20aBlock%20ifNotNil%3A%20%5B%5D'), messageSends: ["ifNil:ifNotNil:"], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_ifNotNil_', smalltalk.method({ selector: 'ifNotNil:', category: 'testing', fn: function (aBlock){ var self=this; return self; return self;}, source: unescape('ifNotNil%3A%20aBlock%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_ifNil_ifNotNil_', smalltalk.method({ selector: 'ifNil:ifNotNil:', category: 'testing', fn: function (aBlock, anotherBlock){ var self=this; return smalltalk.send(aBlock, "_value", []); return self;}, source: unescape('ifNil%3A%20aBlock%20ifNotNil%3A%20anotherBlock%0A%09%5EaBlock%20value'), messageSends: ["value"], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_ifNotNil_ifNil_', smalltalk.method({ selector: 'ifNotNil:ifNil:', category: 'testing', fn: function (aBlock, anotherBlock){ var self=this; return smalltalk.send(anotherBlock, "_value", []); return self;}, source: unescape('ifNotNil%3A%20aBlock%20ifNil%3A%20anotherBlock%0A%09%5EanotherBlock%20value'), messageSends: ["value"], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_isNil', smalltalk.method({ selector: 'isNil', category: 'testing', fn: function (){ var self=this; return true; return self;}, source: unescape('isNil%0A%09%5Etrue'), messageSends: [], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_notNil', smalltalk.method({ selector: 'notNil', category: 'testing', fn: function (){ var self=this; return false; return self;}, source: unescape('notNil%0A%09%5Efalse'), messageSends: [], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_printString', smalltalk.method({ selector: 'printString', category: 'printing', fn: function (){ var self=this; return "nil"; return self;}, source: unescape('printString%0A%20%20%20%20%5E%27nil%27'), messageSends: [], referencedClasses: [] }), smalltalk.UndefinedObject); smalltalk.addMethod( '_new', smalltalk.method({ selector: 'new', category: 'instance creation', fn: function (){ var self=this; smalltalk.send(self, "_error_", ["You cannot create new instances of UndefinedObject. Use nil"]); return self;}, 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.UndefinedObject.klass); smalltalk.addClass('Collection', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_size', smalltalk.method({ selector: 'size', category: 'accessing', fn: function (){ var self=this; smalltalk.send(self, "_subclassResponsibility", []); return self;}, source: unescape('size%0A%09self%20subclassResponsibility'), messageSends: ["subclassResponsibility"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_readStream', smalltalk.method({ selector: 'readStream', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_stream", []); return self;}, source: unescape('readStream%0A%09%5Eself%20stream'), messageSends: ["stream"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_writeStream', smalltalk.method({ selector: 'writeStream', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_stream", []); return self;}, source: unescape('writeStream%0A%09%5Eself%20stream'), messageSends: ["stream"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_stream', smalltalk.method({ selector: 'stream', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_streamClass", []), "_on_", [self]); return self;}, source: unescape('stream%0A%09%5Eself%20streamClass%20on%3A%20self'), messageSends: ["on:", "streamClass"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_streamClass', smalltalk.method({ selector: 'streamClass', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_class", []), "_streamClass", []); return self;}, source: unescape('streamClass%0A%09%5Eself%20class%20streamClass'), messageSends: ["streamClass", "class"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_add_', smalltalk.method({ selector: 'add:', category: 'adding/removing', fn: function (anObject){ var self=this; smalltalk.send(self, "_subclassResponsibility", []); return self;}, source: unescape('add%3A%20anObject%0A%09self%20subclassResponsibility'), messageSends: ["subclassResponsibility"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_addAll_', smalltalk.method({ selector: 'addAll:', category: 'adding/removing', fn: function (aCollection){ var self=this; smalltalk.send(aCollection, "_do_", [(function(each){return smalltalk.send(self, "_add_", [each]);})]); return aCollection; return self;}, 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:"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '__comma', smalltalk.method({ selector: ',', category: 'copying', fn: function (aCollection){ var self=this; return (function($rec){smalltalk.send($rec, "_addAll_", [aCollection]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_copy", [])); return self;}, 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"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_copyWith_', smalltalk.method({ selector: 'copyWith:', category: 'copying', fn: function (anObject){ var self=this; return (function($rec){smalltalk.send($rec, "_add_", [anObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_copy", [])); return self;}, source: unescape('copyWith%3A%20anObject%0A%09%5Eself%20copy%20add%3A%20anObject%3B%20yourself'), messageSends: ["add:", "yourself", "copy"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_copyWithAll_', smalltalk.method({ selector: 'copyWithAll:', category: 'copying', fn: function (aCollection){ var self=this; return (function($rec){smalltalk.send($rec, "_addAll_", [aCollection]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_copy", [])); return self;}, source: unescape('copyWithAll%3A%20aCollection%0A%09%5Eself%20copy%20addAll%3A%20aCollection%3B%20yourself'), messageSends: ["addAll:", "yourself", "copy"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_asArray', smalltalk.method({ selector: 'asArray', category: 'converting', fn: function (){ var self=this; var array=nil; var index=nil; array=smalltalk.send(smalltalk.Array, "_new", []); index=(0); smalltalk.send(self, "_do_", [(function(each){index=smalltalk.send(index, "__plus", [(1)]);return smalltalk.send(array, "_at_put_", [index, each]);})]); return array; return self;}, 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: [smalltalk.Array] }), smalltalk.Collection); smalltalk.addMethod( '_do_', smalltalk.method({ selector: 'do:', category: 'enumerating', fn: function (aBlock){ var self=this; for(var i=0;i<self.length;i++){aBlock(self[i]);}; return self;}, source: unescape('do%3A%20aBlock%0A%09%3Cfor%28var%20i%3D0%3Bi%3Cself.length%3Bi++%29%7BaBlock%28self%5Bi%5D%29%3B%7D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_collect_', smalltalk.method({ selector: 'collect:', category: 'enumerating', fn: function (aBlock){ 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(aBlock, "_value_", [each])]);})]); return newCollection; return self;}, source: unescape('collect%3A%20aBlock%0A%09%7C%20newCollection%20%7C%0A%09newCollection%20%3A%3D%20self%20class%20new.%0A%09self%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20newCollection%20add%3A%20%28aBlock%20value%3A%20each%29%5D.%0A%09%5EnewCollection'), messageSends: ["new", "class", "do:", "add:", "value:"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_detect_', smalltalk.method({ selector: 'detect:', category: 'enumerating', fn: function (aBlock){ var self=this; return smalltalk.send(self, "_detect_ifNone_", [aBlock, (function(){return smalltalk.send(self, "_errorNotFound", []);})]); return self;}, source: unescape('detect%3A%20aBlock%0A%09%5Eself%20detect%3A%20aBlock%20ifNone%3A%20%5Bself%20errorNotFound%5D'), messageSends: ["detect:ifNone:", "errorNotFound"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_detect_ifNone_', smalltalk.method({ selector: 'detect:ifNone:', category: 'enumerating', fn: function (aBlock, anotherBlock){ var self=this; for(var i = 0; i < self.length; i++) if(aBlock(self[i])) return self[i]; return anotherBlock(); ; return self;}, source: unescape('detect%3A%20aBlock%20ifNone%3A%20anotherBlock%0A%09%3C%0A%09%09for%28var%20i%20%3D%200%3B%20i%20%3C%20self.length%3B%20i++%29%0A%09%09%09if%28aBlock%28self%5Bi%5D%29%29%0A%09%09%09%09return%20self%5Bi%5D%3B%0A%09%09return%20anotherBlock%28%29%3B%0A%09%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_do_separatedBy_', smalltalk.method({ selector: 'do:separatedBy:', category: 'enumerating', fn: function (aBlock, anotherBlock){ var self=this; var first=nil; first=true; smalltalk.send(self, "_do_", [(function(each){smalltalk.send(first, "_ifTrue_ifFalse_", [(function(){return first=false;}), (function(){return smalltalk.send(anotherBlock, "_value", []);})]);return smalltalk.send(aBlock, "_value_", [each]);})]); return self;}, source: unescape('do%3A%20aBlock%20separatedBy%3A%20anotherBlock%0A%20%20%20%20%09%7C%20first%20%7C%0A%20%20%20%20%09first%20%3A%3D%20true.%0A%20%20%20%20%09self%20do%3A%20%5B%3Aeach%20%7C%0A%20%20%20%20%09%20%20%20%20first%0A%20%20%20%20%09%09ifTrue%3A%20%5Bfirst%20%3A%3D%20false%5D%0A%20%20%20%20%09%09ifFalse%3A%20%5BanotherBlock%20value%5D.%0A%20%20%20%20%09%20%20%20%20aBlock%20value%3A%20each%5D'), messageSends: ["do:", "ifTrue:ifFalse:", "value", "value:"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_inject_into_', smalltalk.method({ selector: 'inject:into:', category: 'enumerating', fn: function (anObject, aBlock){ var self=this; var result=nil; result=anObject; smalltalk.send(self, "_do_", [(function(each){return result=smalltalk.send(aBlock, "_value_value_", [result, each]);})]); return result; return self;}, source: unescape('inject%3A%20anObject%20into%3A%20aBlock%0A%09%7C%20result%20%7C%0A%09result%20%3A%3D%20anObject.%0A%09self%20do%3A%20%5B%3Aeach%20%7C%20%0A%09%20%20%20%20result%20%3A%3D%20aBlock%20value%3A%20result%20value%3A%20each%5D.%0A%09%5Eresult'), messageSends: ["do:", "value:value:"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_reject_', smalltalk.method({ selector: 'reject:', category: 'enumerating', fn: function (aBlock){ var self=this; return smalltalk.send(self, "_select_", [(function(each){return smalltalk.send(smalltalk.send(aBlock, "_value_", [each]), "__eq", [false]);})]); return self;}, source: unescape('reject%3A%20aBlock%0A%09%5Eself%20select%3A%20%5B%3Aeach%20%7C%20%28aBlock%20value%3A%20each%29%20%3D%20false%5D'), messageSends: ["select:", unescape("%3D"), "value:"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_select_', smalltalk.method({ selector: 'select:', category: 'enumerating', fn: function (aBlock){ var self=this; var stream=nil; stream=smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "_new", []), "_writeStream", []); smalltalk.send(self, "_do_", [(function(each){return smalltalk.send(smalltalk.send(aBlock, "_value_", [each]), "_ifTrue_", [(function(){return smalltalk.send(stream, "_nextPut_", [each]);})]);})]); return smalltalk.send(stream, "_contents", []); return self;}, source: unescape('select%3A%20aBlock%0A%09%7C%20stream%20%7C%0A%09stream%20%3A%3D%20self%20class%20new%20writeStream.%0A%09self%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20%28aBlock%20value%3A%20each%29%20ifTrue%3A%20%5B%0A%09%09stream%20nextPut%3A%20each%5D%5D.%0A%09%5Estream%20contents'), messageSends: ["writeStream", "new", "class", "do:", "ifTrue:", "value:", "nextPut:", "contents"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_errorNotFound', smalltalk.method({ selector: 'errorNotFound', category: 'error handling', fn: function (){ var self=this; smalltalk.send(self, "_error_", ["Object is not in the collection"]); return self;}, source: unescape('errorNotFound%0A%09self%20error%3A%20%27Object%20is%20not%20in%20the%20collection%27'), messageSends: ["error:"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_includes_', smalltalk.method({ selector: 'includes:', category: 'testing', fn: function (anObject){ var self=this; var i = self.length; while (i--) { if (smalltalk.send(self[i], "__eq", [anObject])) {return true;} } return false ; return self;}, source: unescape('includes%3A%20anObject%0A%09%3C%0A%09%09var%20i%20%3D%20self.length%3B%0A%09%09while%20%28i--%29%20%7B%0A%09%09%09if%20%28smalltalk.send%28self%5Bi%5D%2C%20%22__eq%22%2C%20%5BanObject%5D%29%29%20%7Breturn%20true%3B%7D%09%0A%09%09%7D%0A%09%09return%20false%0A%09%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_notEmpty', smalltalk.method({ selector: 'notEmpty', category: 'testing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_isEmpty", []), "_not", []); return self;}, source: unescape('notEmpty%0A%09%5Eself%20isEmpty%20not'), messageSends: ["not", "isEmpty"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_isEmpty', smalltalk.method({ selector: 'isEmpty', category: 'testing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_size", []), "__eq", [(0)]); return self;}, source: unescape('isEmpty%0A%09%5Eself%20size%20%3D%200'), messageSends: [unescape("%3D"), "size"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_remove_', smalltalk.method({ selector: 'remove:', category: 'adding/removing', fn: function (anObject){ var self=this; smalltalk.send(self, "_subclassResponsibility", []); return self;}, source: unescape('remove%3A%20anObject%0A%20%20%20%20self%20subclassResponsibility'), messageSends: ["subclassResponsibility"], referencedClasses: [] }), smalltalk.Collection); smalltalk.addMethod( '_streamClass', smalltalk.method({ selector: 'streamClass', category: 'accessing', fn: function (){ var self=this; return smalltalk.Stream; return self;}, source: unescape('streamClass%0A%09%20%20%20%20%5EStream'), messageSends: [], referencedClasses: [smalltalk.nil] }), smalltalk.Collection.klass); smalltalk.addMethod( '_with_', smalltalk.method({ selector: 'with:', category: 'instance creation', fn: function (anObject){ var self=this; return (function($rec){smalltalk.send($rec, "_add_", [anObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, source: unescape('with%3A%20anObject%0A%09%20%20%20%20%5Eself%20new%0A%09%09add%3A%20anObject%3B%0A%09%09yourself'), messageSends: ["add:", "yourself", "new"], referencedClasses: [] }), smalltalk.Collection.klass); smalltalk.addMethod( '_with_with_', smalltalk.method({ selector: 'with:with:', category: 'instance creation', fn: function (anObject, anotherObject){ var self=this; return (function($rec){smalltalk.send($rec, "_add_", [anObject]);smalltalk.send($rec, "_add_", [anotherObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, source: unescape('with%3A%20anObject%20with%3A%20anotherObject%0A%09%20%20%20%20%5Eself%20new%0A%09%09add%3A%20anObject%3B%0A%09%09add%3A%20anotherObject%3B%0A%09%09yourself'), messageSends: ["add:", "yourself", "new"], referencedClasses: [] }), smalltalk.Collection.klass); smalltalk.addMethod( '_with_with_with_', smalltalk.method({ selector: 'with:with:with:', category: 'instance creation', fn: function (firstObject, secondObject, thirdObject){ var self=this; return (function($rec){smalltalk.send($rec, "_add_", [firstObject]);smalltalk.send($rec, "_add_", [secondObject]);smalltalk.send($rec, "_add_", [thirdObject]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, source: unescape('with%3A%20firstObject%20with%3A%20secondObject%20with%3A%20thirdObject%0A%09%20%20%20%20%5Eself%20new%0A%09%09add%3A%20firstObject%3B%0A%09%09add%3A%20secondObject%3B%0A%09%09add%3A%20thirdObject%3B%0A%09%09yourself'), messageSends: ["add:", "yourself", "new"], referencedClasses: [] }), smalltalk.Collection.klass); smalltalk.addMethod( '_withAll_', smalltalk.method({ selector: 'withAll:', category: 'instance creation', fn: function (aCollection){ var self=this; return (function($rec){smalltalk.send($rec, "_addAll_", [aCollection]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, source: unescape('withAll%3A%20aCollection%0A%09%20%20%20%20%5Eself%20new%0A%09%09addAll%3A%20aCollection%3B%0A%09%09yourself'), messageSends: ["addAll:", "yourself", "new"], referencedClasses: [] }), smalltalk.Collection.klass); smalltalk.addClass('SequenceableCollection', smalltalk.Collection, [], 'Kernel'); smalltalk.addMethod( '_at_', smalltalk.method({ selector: 'at:', category: 'accessing', fn: function (anIndex){ var self=this; return smalltalk.send(self, "_at_ifAbsent_", [anIndex, (function(){return smalltalk.send(self, "_errorNotFound", []);})]); return self;}, source: unescape('at%3A%20anIndex%0A%09%5Eself%20at%3A%20anIndex%20ifAbsent%3A%20%5B%0A%09%20%20%20%20self%20errorNotFound%5D'), messageSends: ["at:ifAbsent:", "errorNotFound"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_at_ifAbsent_', smalltalk.method({ selector: 'at:ifAbsent:', category: 'accessing', fn: function (anIndex, aBlock){ var self=this; smalltalk.send(self, "_subclassResponsibility", []); return self;}, source: unescape('at%3A%20anIndex%20ifAbsent%3A%20aBlock%0A%09self%20subclassResponsibility'), messageSends: ["subclassResponsibility"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_at_put_', smalltalk.method({ selector: 'at:put:', category: 'accessing', fn: function (anIndex, anObject){ var self=this; smalltalk.send(self, "_subclassResponsibility", []); return self;}, source: unescape('at%3A%20anIndex%20put%3A%20anObject%0A%09self%20subclassResponsibility'), messageSends: ["subclassResponsibility"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_copyFrom_to_', smalltalk.method({ selector: 'copyFrom:to:', category: 'copying', fn: function (anIndex, anotherIndex){ var self=this; smalltalk.send(self, "_subclassResponsibility", []); return self;}, source: unescape('copyFrom%3A%20anIndex%20to%3A%20anotherIndex%0A%09self%20subclassResponsibility'), messageSends: ["subclassResponsibility"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_first', smalltalk.method({ selector: 'first', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_at_", [(1)]); return self;}, source: unescape('first%0A%09%5Eself%20at%3A%201'), messageSends: ["at:"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_fourth', smalltalk.method({ selector: 'fourth', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_at_", [(4)]); return self;}, source: unescape('fourth%0A%09%5Eself%20at%3A%204'), messageSends: ["at:"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_last', smalltalk.method({ selector: 'last', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_at_", [smalltalk.send(self, "_size", [])]); return self;}, source: unescape('last%0A%09%5Eself%20at%3A%20self%20size'), messageSends: ["at:", "size"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_second', smalltalk.method({ selector: 'second', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_at_", [(2)]); return self;}, source: unescape('second%0A%09%5Eself%20at%3A%202'), messageSends: ["at:"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_third', smalltalk.method({ selector: 'third', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_at_", [(3)]); return self;}, source: unescape('third%0A%09%5Eself%20at%3A%203'), messageSends: ["at:"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_removeLast', smalltalk.method({ selector: 'removeLast', category: 'adding', fn: function (){ var self=this; smalltalk.send(self, "_remove_", [smalltalk.send(self, "_last", [])]); return self;}, source: unescape('removeLast%0A%09self%20remove%3A%20self%20last'), messageSends: ["remove:", "last"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_addLast_', smalltalk.method({ selector: 'addLast:', category: 'adding', fn: function (anObject){ var self=this; smalltalk.send(self, "_add_", [anObject]); return self;}, source: unescape('addLast%3A%20anObject%0A%09self%20add%3A%20anObject'), messageSends: ["add:"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_withIndexDo_', smalltalk.method({ selector: 'withIndexDo:', category: 'enumerating', fn: function (aBlock){ var self=this; for(var i=0;i<self.length;i++){aBlock(self[i], i+1);}; return self;}, source: unescape('withIndexDo%3A%20aBlock%0A%09%3Cfor%28var%20i%3D0%3Bi%3Cself.length%3Bi++%29%7BaBlock%28self%5Bi%5D%2C%20i+1%29%3B%7D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_allButFirst', smalltalk.method({ selector: 'allButFirst', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_copyFrom_to_", [(2), smalltalk.send(self, "_size", [])]); return self;}, source: unescape('allButFirst%0A%09%5Eself%20copyFrom%3A%202%20to%3A%20self%20size'), messageSends: ["copyFrom:to:", "size"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_allButLast', smalltalk.method({ selector: 'allButLast', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_copyFrom_to_", [(1), smalltalk.send(smalltalk.send(self, "_size", []), "__minus", [(1)])]); return self;}, source: unescape('allButLast%0A%09%5Eself%20copyFrom%3A%201%20to%3A%20self%20size%20-%201'), messageSends: ["copyFrom:to:", unescape("-"), "size"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_indexOf_', smalltalk.method({ selector: 'indexOf:', category: 'accessing', fn: function (anObject){ var self=this; return smalltalk.send(self, "_indexOf_ifAbsent_", [anObject, (function(){return smalltalk.send(self, "_errorNotFound", []);})]); return self;}, source: unescape('indexOf%3A%20anObject%0A%09%5Eself%20indexOf%3A%20anObject%20ifAbsent%3A%20%5Bself%20errorNotFound%5D'), messageSends: ["indexOf:ifAbsent:", "errorNotFound"], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addMethod( '_indexOf_ifAbsent_', smalltalk.method({ selector: 'indexOf:ifAbsent:', category: 'accessing', fn: function (anObject, aBlock){ var self=this; for(var i=0;i<self.length;i++){ if(self[i].__eq(anObject)) {return i+1} } return aBlock(); ; return self;}, source: unescape('indexOf%3A%20anObject%20ifAbsent%3A%20aBlock%0A%09%3C%0A%09%09for%28var%20i%3D0%3Bi%3Cself.length%3Bi++%29%7B%0A%09%09%09if%28self%5Bi%5D.__eq%28anObject%29%29%20%7Breturn%20i+1%7D%0A%09%09%7D%0A%09%09return%20aBlock%28%29%3B%0A%09%3E'), messageSends: [], referencedClasses: [] }), smalltalk.SequenceableCollection); smalltalk.addClass('String', smalltalk.SequenceableCollection, [], 'Kernel'); smalltalk.addMethod( '__eq', smalltalk.method({ selector: '=', category: 'comparing', fn: function (aString){ var self=this; return String(self) == aString; return self;}, source: unescape('%3D%20aString%0A%09%3Creturn%20String%28self%29%20%3D%3D%20aString%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_size', smalltalk.method({ selector: 'size', category: 'accessing', fn: function (){ var self=this; return self.length; return self;}, source: unescape('size%0A%09%3Creturn%20self.length%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_at_', smalltalk.method({ selector: 'at:', category: 'accessing', fn: function (anIndex){ var self=this; return self[anIndex - 1]; return self;}, source: unescape('at%3A%20anIndex%0A%09%3Creturn%20self%5BanIndex%20-%201%5D%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_at_put_', smalltalk.method({ selector: 'at:put:', category: 'accessing', fn: function (anIndex, anObject){ var self=this; smalltalk.send(self, "_errorReadOnly", []); return self;}, source: unescape('at%3A%20anIndex%20put%3A%20anObject%0A%20%20%20%20%09self%20errorReadOnly'), messageSends: ["errorReadOnly"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_at_ifAbsent_', smalltalk.method({ selector: 'at:ifAbsent:', category: 'accessing', fn: function (anIndex, aBlock){ var self=this; smalltalk.send(smalltalk.send(self, "_at_", [anIndex]), "_ifNil_", [(function(){return aBlock;})]); return self;}, source: unescape('at%3A%20anIndex%20ifAbsent%3A%20aBlock%0A%20%20%20%20%09%28self%20at%3A%20anIndex%29%20ifNil%3A%20%5BaBlock%5D'), messageSends: ["ifNil:", "at:"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_escaped', smalltalk.method({ selector: 'escaped', category: 'accessing', fn: function (){ var self=this; return escape(self); return self;}, source: unescape('escaped%0A%09%3Creturn%20escape%28self%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_unescaped', smalltalk.method({ selector: 'unescaped', category: 'accessing', fn: function (){ var self=this; return unescape(self); return self;}, source: unescape('unescaped%0A%09%3Creturn%20unescape%28self%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_add_', smalltalk.method({ selector: 'add:', category: 'adding', fn: function (anObject){ var self=this; smalltalk.send(self, "_errorReadOnly", []); return self;}, source: unescape('add%3A%20anObject%0A%20%20%20%20%09self%20errorReadOnly'), messageSends: ["errorReadOnly"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '__comma', smalltalk.method({ selector: ',', category: 'copying', fn: function (aString){ var self=this; return self + aString; return self;}, source: unescape('%2C%20aString%0A%09%3Creturn%20self%20+%20aString%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_copyFrom_to_', smalltalk.method({ selector: 'copyFrom:to:', category: 'copying', fn: function (anIndex, anotherIndex){ var self=this; return self.substring(anIndex - 1, anotherIndex); return self;}, source: unescape('copyFrom%3A%20anIndex%20to%3A%20anotherIndex%0A%09%3Creturn%20self.substring%28anIndex%20-%201%2C%20anotherIndex%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_shallowCopy', smalltalk.method({ selector: 'shallowCopy', category: 'copying', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_class", []), "_fromString_", [self]); return self;}, source: unescape('shallowCopy%0A%20%20%20%20%09%5Eself%20class%20fromString%3A%20self'), messageSends: ["fromString:", "class"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_deepCopy', smalltalk.method({ selector: 'deepCopy', category: 'copying', fn: function (){ var self=this; return smalltalk.send(self, "_shallowCopy", []); return self;}, source: unescape('deepCopy%0A%20%20%20%20%09%5Eself%20shallowCopy'), messageSends: ["shallowCopy"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_asSelector', smalltalk.method({ selector: 'asSelector', category: 'converting', fn: function (){ var self=this; var selector=nil; selector=smalltalk.send("_", "__comma", [self]); selector=smalltalk.send(selector, "_replace_with_", [":", "_"]); selector=smalltalk.send(selector, "_replace_with_", [unescape("%5B+%5D"), "_plus"]); selector=smalltalk.send(selector, "_replace_with_", [unescape("-"), "_minus"]); selector=smalltalk.send(selector, "_replace_with_", [unescape("%5B*%5D"), "_star"]); selector=smalltalk.send(selector, "_replace_with_", [unescape("%5B/%5D"), "_slash"]); selector=smalltalk.send(selector, "_replace_with_", [unescape("%3E"), "_gt"]); selector=smalltalk.send(selector, "_replace_with_", [unescape("%3C"), "_lt"]); selector=smalltalk.send(selector, "_replace_with_", [unescape("%3D"), "_eq"]); selector=smalltalk.send(selector, "_replace_with_", [unescape("%2C"), "_comma"]); selector=smalltalk.send(selector, "_replace_with_", [unescape("%5B@%5D"), "_at"]); return selector; return self;}, source: unescape('asSelector%0A%09%22If%20you%20change%20this%20method%2C%20change%20smalltalk.convertSelector%20too%20%28see%20js/boot.js%20file%29%22%0A%0A%09%7C%20selector%20%7C%0A%09selector%20%3A%3D%20%27_%27%2C%20self.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27%3A%27%20with%3A%20%27_%27.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27%5B+%5D%27%20with%3A%20%27_plus%27.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27-%27%20with%3A%20%27_minus%27.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27%5B*%5D%27%20with%3A%20%27_star%27.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27%5B/%5D%27%20with%3A%20%27_slash%27.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27%3E%27%20with%3A%20%27_gt%27.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27%3C%27%20with%3A%20%27_lt%27.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27%3D%27%20with%3A%20%27_eq%27.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27%2C%27%20with%3A%20%27_comma%27.%0A%20%20%20%20%09selector%20%3A%3D%20selector%20replace%3A%20%27%5B@%5D%27%20with%3A%20%27_at%27.%0A%09%5Eselector'), messageSends: [unescape("%2C"), "replace:with:"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_asJavascript', smalltalk.method({ selector: 'asJavascript', category: 'converting', fn: function (){ var self=this; if(self.search(/^[a-zA-Z0-9_:.$ ]*$/) == -1) return "unescape(\"" + escape(self) + "\")"; else return "\"" + self + "\""; ; return self;}, source: unescape('asJavascript%0A%09%3C%0A%09%09if%28self.search%28/%5E%5Ba-zA-Z0-9_%3A.%24%20%5D*%24/%29%20%3D%3D%20-1%29%0A%09%09%09return%20%22unescape%28%5C%22%22%20+%20escape%28self%29%20+%20%22%5C%22%29%22%3B%0A%09%09else%0A%09%09%09return%20%22%5C%22%22%20+%20self%20+%20%22%5C%22%22%3B%0A%09%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_replace_with_', smalltalk.method({ selector: 'replace:with:', category: 'regular expressions', fn: function (aString, anotherString){ var self=this; return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send(smalltalk.RegularExpression, "_fromString_flag_", [aString, "g"]), anotherString]); return self;}, source: unescape('replace%3A%20aString%20with%3A%20anotherString%0A%20%20%20%20%09%5Eself%20replaceRegexp%3A%20%28RegularExpression%20fromString%3A%20aString%20flag%3A%20%27g%27%29%20with%3A%20anotherString'), messageSends: ["replaceRegexp:with:", "fromString:flag:"], referencedClasses: [smalltalk.RegularExpression] }), smalltalk.String); smalltalk.addMethod( '_replaceRegexp_with_', smalltalk.method({ selector: 'replaceRegexp:with:', category: 'regular expressions', fn: function (aRegexp, aString){ var self=this; return self.replace(aRegexp, aString); return self;}, source: unescape('replaceRegexp%3A%20aRegexp%20with%3A%20aString%0A%09%3Creturn%20self.replace%28aRegexp%2C%20aString%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_tokenize_', smalltalk.method({ selector: 'tokenize:', category: 'converting', fn: function (aString){ var self=this; return self.split(aString); return self;}, source: unescape('tokenize%3A%20aString%0A%09%3Creturn%20self.split%28aString%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_match_', smalltalk.method({ selector: 'match:', category: 'regular expressions', fn: function (aRegexp){ var self=this; return self.search(aRegexp) != -1; return self;}, source: unescape('match%3A%20aRegexp%0A%09%3Creturn%20self.search%28aRegexp%29%20%21%3D%20-1%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_asString', smalltalk.method({ selector: 'asString', category: 'converting', fn: function (){ var self=this; return self; return self;}, source: unescape('asString%0A%20%20%20%20%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_asNumber', smalltalk.method({ selector: 'asNumber', category: 'converting', fn: function (){ var self=this; return Number(self); return self;}, source: unescape('asNumber%0A%09%3Creturn%20Number%28self%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_asParser', smalltalk.method({ selector: 'asParser', category: 'converting', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.PPStringParser, "_new", []), "_string_", [self]); return self;}, source: unescape('asParser%0A%20%20%20%20%09%5EPPStringParser%20new%20string%3A%20self'), messageSends: ["string:", "new"], referencedClasses: [smalltalk.nil] }), smalltalk.String); smalltalk.addMethod( '_asChoiceParser', smalltalk.method({ selector: 'asChoiceParser', category: 'converting', fn: function (){ var self=this; return smalltalk.send(smalltalk.PPChoiceParser, "_withAll_", [smalltalk.send(smalltalk.send(self, "_asArray", []), "_collect_", [(function(each){return smalltalk.send(each, "_asParser", []);})])]); return self;}, source: unescape('asChoiceParser%0A%20%20%20%20%09%5EPPChoiceParser%20withAll%3A%20%28self%20asArray%20collect%3A%20%5B%3Aeach%20%7C%20each%20asParser%5D%29'), messageSends: ["withAll:", "collect:", "asArray", "asParser"], referencedClasses: [smalltalk.nil] }), smalltalk.String); smalltalk.addMethod( '_asCharacterParser', smalltalk.method({ selector: 'asCharacterParser', category: 'converting', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.PPCharacterParser, "_new", []), "_string_", [self]); return self;}, source: unescape('asCharacterParser%0A%20%20%20%20%09%5EPPCharacterParser%20new%20string%3A%20self'), messageSends: ["string:", "new"], referencedClasses: [smalltalk.nil] }), smalltalk.String); smalltalk.addMethod( '_errorReadOnly', smalltalk.method({ selector: 'errorReadOnly', category: 'error handling', fn: function (){ var self=this; smalltalk.send(self, "_error_", [unescape("Object%20is%20read-only")]); return self;}, source: unescape('errorReadOnly%0A%20%20%20%20%09self%20error%3A%20%27Object%20is%20read-only%27'), messageSends: ["error:"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_printString', smalltalk.method({ selector: 'printString', category: 'printing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(unescape("%27"), "__comma", [self]), "__comma", [unescape("%27")]); return self;}, source: unescape('printString%0A%20%20%20%20%09%5E%27%27%27%27%2C%20self%2C%20%27%27%27%27'), messageSends: [unescape("%2C")], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_printNl', smalltalk.method({ selector: 'printNl', category: 'printing', fn: function (){ var self=this; console.log(self); return self;}, source: unescape('printNl%0A%09%3Cconsole.log%28self%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_isString', smalltalk.method({ selector: 'isString', category: 'testing', fn: function (){ var self=this; return true; return self;}, source: unescape('isString%0A%20%20%20%20%09%5Etrue'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '__gt', smalltalk.method({ selector: '>', category: 'comparing', fn: function (aString){ var self=this; return String(self) > aString; return self;}, source: unescape('%3E%20aString%0A%09%3Creturn%20String%28self%29%20%3E%3E%20aString%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '__lt', smalltalk.method({ selector: '<', category: 'comparing', fn: function (aString){ var self=this; return String(self) < aString; return self;}, source: unescape('%3C%20aString%0A%09%3Creturn%20String%28self%29%20%3C%20aString%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '__gt_eq', smalltalk.method({ selector: '>=', category: 'comparing', fn: function (aString){ var self=this; return String(self) >= aString; return self;}, source: unescape('%3E%3D%20aString%0A%09%3Creturn%20String%28self%29%20%3E%3E%3D%20aString%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '__lt_eq', smalltalk.method({ selector: '<=', category: 'comparing', fn: function (aString){ var self=this; return String(self) <= aString; return self;}, source: unescape('%3C%3D%20aString%0A%09%3Creturn%20String%28self%29%20%3C%3D%20aString%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_remove_', smalltalk.method({ selector: 'remove:', category: 'adding', fn: function (anObject){ var self=this; smalltalk.send(self, "_errorReadOnly", []); return self;}, source: unescape('remove%3A%20anObject%0A%09self%20errorReadOnly'), messageSends: ["errorReadOnly"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_asJSONObject', smalltalk.method({ selector: 'asJSONObject', category: 'converting', fn: function (){ var self=this; return self; return self;}, source: unescape('asJSONObject%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_trimLeft_', smalltalk.method({ selector: 'trimLeft:', category: 'regular expressions', fn: function (separators){ var self=this; return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send(smalltalk.RegularExpression, "_fromString_flag_", [smalltalk.send(smalltalk.send(unescape("%5E%5B"), "__comma", [separators]), "__comma", [unescape("%5D+")]), "g"]), ""]); return self;}, 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: [smalltalk.RegularExpression] }), smalltalk.String); smalltalk.addMethod( '_trimRight_', smalltalk.method({ selector: 'trimRight:', category: 'regular expressions', fn: function (separators){ var self=this; return smalltalk.send(self, "_replaceRegexp_with_", [smalltalk.send(smalltalk.RegularExpression, "_fromString_flag_", [smalltalk.send(smalltalk.send(unescape("%5B"), "__comma", [separators]), "__comma", [unescape("%5D+%24")]), "g"]), ""]); return self;}, 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: [smalltalk.RegularExpression] }), smalltalk.String); smalltalk.addMethod( '_trimLeft', smalltalk.method({ selector: 'trimLeft', category: 'regular expressions', fn: function (){ var self=this; return smalltalk.send(self, "_trimLeft_", [unescape("%5Cs")]); return self;}, source: unescape('trimLeft%0A%09%5Eself%20trimLeft%3A%20%27%5Cs%27'), messageSends: ["trimLeft:"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_trimRight', smalltalk.method({ selector: 'trimRight', category: 'regular expressions', fn: function (){ var self=this; return smalltalk.send(self, "_trimRight_", [unescape("%5Cs")]); return self;}, source: unescape('trimRight%0A%09%5Eself%20trimRight%3A%20%27%5Cs%27'), messageSends: ["trimRight:"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_trimBoth', smalltalk.method({ selector: 'trimBoth', category: 'regular expressions', fn: function (){ var self=this; return smalltalk.send(self, "_trimBoth_", [unescape("%5Cs")]); return self;}, source: unescape('trimBoth%0A%09%5Eself%20trimBoth%3A%20%27%5Cs%27'), messageSends: ["trimBoth:"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_trimBoth_', smalltalk.method({ selector: 'trimBoth:', category: 'regular expressions', fn: function (separators){ var self=this; return smalltalk.send(smalltalk.send(self, "_trimLeft_", [separators]), "_trimRight_", [separators]); return self;}, source: unescape('trimBoth%3A%20separators%0A%0A%20%20%20%20%09%5E%28self%20trimLeft%3A%20separators%29%20trimRight%3A%20separators'), messageSends: ["trimRight:", "trimLeft:"], referencedClasses: [] }), smalltalk.String); smalltalk.addMethod( '_streamClass', smalltalk.method({ selector: 'streamClass', category: 'accessing', fn: function (){ var self=this; return smalltalk.StringStream; return self;}, source: unescape('streamClass%0A%09%20%20%20%20%5EStringStream'), messageSends: [], referencedClasses: [smalltalk.nil] }), smalltalk.String.klass); smalltalk.addMethod( '_fromString_', smalltalk.method({ selector: 'fromString:', category: 'instance creation', fn: function (aString){ var self=this; return new self.fn(aString); return self;}, source: unescape('fromString%3A%20aString%0A%09%20%20%20%20%3Creturn%20new%20self.fn%28aString%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String.klass); smalltalk.addMethod( '_cr', smalltalk.method({ selector: 'cr', category: 'accessing', fn: function (){ var self=this; return '\r'; return self;}, source: unescape('cr%0A%09%3Creturn%20%27%5Cr%27%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String.klass); smalltalk.addMethod( '_lf', smalltalk.method({ selector: 'lf', category: 'accessing', fn: function (){ var self=this; return '\n'; return self;}, source: unescape('lf%0A%09%3Creturn%20%27%5Cn%27%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String.klass); smalltalk.addMethod( '_space', smalltalk.method({ selector: 'space', category: 'accessing', fn: function (){ var self=this; return ' '; return self;}, source: unescape('space%0A%09%3Creturn%20%27%20%27%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String.klass); smalltalk.addMethod( '_tab', smalltalk.method({ selector: 'tab', category: 'accessing', fn: function (){ var self=this; return '\t'; return self;}, source: unescape('tab%0A%09%3Creturn%20%27%5Ct%27%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String.klass); smalltalk.addMethod( '_crlf', smalltalk.method({ selector: 'crlf', category: 'accessing', fn: function (){ var self=this; return '\r\n'; return self;}, source: unescape('crlf%0A%09%3Creturn%20%27%5Cr%5Cn%27%3E'), messageSends: [], referencedClasses: [] }), smalltalk.String.klass); smalltalk.addClass('Array', smalltalk.SequenceableCollection, [], 'Kernel'); smalltalk.addMethod( '_size', smalltalk.method({ selector: 'size', category: 'accessing', fn: function (){ var self=this; return self.length; return self;}, source: unescape('size%0A%09%3Creturn%20self.length%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_at_put_', smalltalk.method({ selector: 'at:put:', category: 'accessing', fn: function (anIndex, anObject){ var self=this; return self[anIndex - 1] = anObject; return self;}, source: unescape('at%3A%20anIndex%20put%3A%20anObject%0A%09%3Creturn%20self%5BanIndex%20-%201%5D%20%3D%20anObject%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_at_ifAbsent_', smalltalk.method({ selector: 'at:ifAbsent:', category: 'accessing', fn: function (anIndex, aBlock){ var self=this; var value = self[anIndex - 1]; if(value === undefined) { return aBlock(); } else { return value; } ; return self;}, 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.Array); smalltalk.addMethod( '_add_', smalltalk.method({ selector: 'add:', category: 'adding/removing', fn: function (anObject){ var self=this; self.push(anObject); return anObject;; return self;}, source: unescape('add%3A%20anObject%0A%09%3Cself.push%28anObject%29%3B%20return%20anObject%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_shallowCopy', smalltalk.method({ selector: 'shallowCopy', category: 'copying', fn: function (){ 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_", [each]);})]); return newCollection; return self;}, 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:"], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_deepCopy', smalltalk.method({ selector: 'deepCopy', category: 'copying', fn: function (){ 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 self;}, 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"], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_copyFrom_to_', smalltalk.method({ selector: 'copyFrom:to:', category: 'copying', fn: function (anIndex, anotherIndex){ 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 self;}, 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:"], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_join_', smalltalk.method({ selector: 'join:', category: 'enumerating', fn: function (aString){ var self=this; return self.join(aString); return self;}, source: unescape('join%3A%20aString%0A%09%3Creturn%20self.join%28aString%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_asJavascript', smalltalk.method({ selector: 'asJavascript', category: 'converting', fn: function (){ 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 self;}, 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.Array); smalltalk.addMethod( '_sort', smalltalk.method({ selector: 'sort', category: 'enumerating', fn: function (){ var self=this; return smalltalk.send(self, "_basicPerform_", ["sort"]); return self;}, source: unescape('sort%0A%20%20%20%20%5Eself%20basicPerform%3A%20%27sort%27'), messageSends: ["basicPerform:"], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_sort_', smalltalk.method({ selector: 'sort:', category: 'enumerating', fn: function (aBlock){ var self=this; return self.sort(function(a, b) { if(aBlock(a,b)) {return 1} else {return -1} }) ; return self;}, 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%201%7D%20else%20%7Breturn%20-1%7D%0A%09%09%7D%29%0A%09%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_remove_', smalltalk.method({ selector: 'remove:', category: 'adding/removing', fn: function (anObject){ var self=this; for(var i=0;i<self.length;i++) { if(self[i] == anObject) { self.splice(i,1); break; } } ; return self;}, source: unescape('remove%3A%20anObject%0A%09%3C%0A%09%09for%28var%20i%3D0%3Bi%3Cself.length%3Bi++%29%20%7B%0A%09%09%09if%28self%5Bi%5D%20%3D%3D%20anObject%29%20%7B%0A%09%09%09%09self.splice%28i%2C1%29%3B%0A%09%09%09%09break%3B%0A%09%09%09%7D%0A%09%09%7D%0A%09%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_sorted', smalltalk.method({ selector: 'sorted', category: 'enumerating', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_copy", []), "_sort", []); return self;}, source: unescape('sorted%0A%09%5Eself%20copy%20sort'), messageSends: ["sort", "copy"], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_sorted_', smalltalk.method({ selector: 'sorted:', category: 'enumerating', fn: function (aBlock){ var self=this; return smalltalk.send(smalltalk.send(self, "_copy", []), "_sorted_", [aBlock]); return self;}, source: unescape('sorted%3A%20aBlock%0A%09%5Eself%20copy%20sorted%3A%20aBlock'), messageSends: ["sorted:", "copy"], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_asJSONObject', smalltalk.method({ selector: 'asJSONObject', category: 'converting', fn: function (){ var self=this; return smalltalk.send(self, "_collect_", [(function(each){return smalltalk.send(each, "_asJSONObject", []);})]); return self;}, source: unescape('asJSONObject%0A%09%5Eself%20collect%3A%20%5B%3Aeach%20%7C%20each%20asJSONObject%5D'), messageSends: ["collect:", "asJSONObject"], referencedClasses: [] }), smalltalk.Array); smalltalk.addMethod( '_removeFrom_to_', smalltalk.method({ selector: 'removeFrom:to:', category: 'adding/removing', fn: function (aNumber, anotherNumber){ var self=this; self.splice(aNumber - 1,anotherNumber - 1); return self;}, source: unescape('removeFrom%3A%20aNumber%20to%3A%20anotherNumber%0A%09%3Cself.splice%28aNumber%20-%201%2CanotherNumber%20-%201%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Array); smalltalk.addClass('RegularExpression', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_compile_', smalltalk.method({ selector: 'compile:', category: 'evaluating', fn: function (aString){ var self=this; return self.compile(aString); return self;}, source: unescape('compile%3A%20aString%0A%09%3Creturn%20self.compile%28aString%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.RegularExpression); smalltalk.addMethod( '_exec_', smalltalk.method({ selector: 'exec:', category: 'evaluating', fn: function (aString){ var self=this; return self.exec(aString) || nil; return self;}, source: unescape('exec%3A%20aString%0A%09%3Creturn%20self.exec%28aString%29%20%7C%7C%20nil%3E'), messageSends: [], referencedClasses: [] }), smalltalk.RegularExpression); smalltalk.addMethod( '_test_', smalltalk.method({ selector: 'test:', category: 'evaluating', fn: function (aString){ var self=this; return self.test(aString); return self;}, source: unescape('test%3A%20aString%0A%09%3Creturn%20self.test%28aString%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.RegularExpression); smalltalk.addMethod( '_fromString_flag_', smalltalk.method({ selector: 'fromString:flag:', category: 'instance creation', fn: function (aString, anotherString){ var self=this; return new RegExp(aString, anotherString); return self;}, source: unescape('fromString%3A%20aString%20flag%3A%20anotherString%0A%09%3Creturn%20new%20RegExp%28aString%2C%20anotherString%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.RegularExpression.klass); smalltalk.addMethod( '_fromString_', smalltalk.method({ selector: 'fromString:', category: 'instance creation', fn: function (aString){ var self=this; return smalltalk.send(self, "_fromString_flag_", [aString, ""]); return self;}, source: unescape('fromString%3A%20aString%0A%09%20%20%20%20%5Eself%20fromString%3A%20aString%20flag%3A%20%27%27'), messageSends: ["fromString:flag:"], referencedClasses: [] }), smalltalk.RegularExpression.klass); smalltalk.addClass('Error', smalltalk.Object, ['messageText'], 'Kernel'); smalltalk.addMethod( '_messageText', smalltalk.method({ selector: 'messageText', category: 'accessing', fn: function (){ var self=this; return self['@messageText']; return self;}, source: unescape('messageText%0A%09%5EmessageText'), messageSends: [], referencedClasses: [] }), smalltalk.Error); smalltalk.addMethod( '_messageText_', smalltalk.method({ selector: 'messageText:', category: 'accessing', fn: function (aString){ var self=this; self['@messageText']=aString; return self;}, source: unescape('messageText%3A%20aString%0A%09messageText%20%3A%3D%20aString'), messageSends: [], referencedClasses: [] }), smalltalk.Error); smalltalk.addMethod( '_signal', smalltalk.method({ selector: 'signal', category: 'signaling', fn: function (){ var self=this; self.context = thisContext; self.smalltalkError = true; throw(self); return self;}, source: unescape('signal%0A%09%3Cself.context%20%3D%20thisContext%3B%20self.smalltalkError%20%3D%20true%3B%20throw%28self%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Error); smalltalk.addMethod( '_context', smalltalk.method({ selector: 'context', category: 'accessing', fn: function (){ var self=this; return self.context; return self;}, source: unescape('context%0A%09%3Creturn%20self.context%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Error); smalltalk.addMethod( '_signal_', smalltalk.method({ selector: 'signal:', category: 'instance creation', fn: function (aString){ var self=this; return (function($rec){smalltalk.send($rec, "_messageText_", [aString]);return smalltalk.send($rec, "_signal", []);})(smalltalk.send(self, "_new", [])); return self;}, source: unescape('signal%3A%20aString%0A%09%20%20%20%20%5Eself%20new%0A%09%09messageText%3A%20aString%3B%0A%09%09signal'), messageSends: ["messageText:", "signal", "new"], referencedClasses: [] }), smalltalk.Error.klass); smalltalk.addClass('MethodContext', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_receiver', smalltalk.method({ selector: 'receiver', category: 'accessing', fn: function (){ var self=this; return self.receiver; return self;}, source: unescape('receiver%0A%09%3Creturn%20self.receiver%3E'), messageSends: [], referencedClasses: [] }), smalltalk.MethodContext); smalltalk.addMethod( '_selector', smalltalk.method({ selector: 'selector', category: 'accessing', fn: function (){ var self=this; return smalltalk.convertSelector(self.selector); return self;}, source: unescape('selector%0A%09%3Creturn%20smalltalk.convertSelector%28self.selector%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.MethodContext); smalltalk.addMethod( '_home', smalltalk.method({ selector: 'home', category: 'accessing', fn: function (){ var self=this; return self.homeContext; return self;}, source: unescape('home%0A%09%3Creturn%20self.homeContext%3E'), messageSends: [], referencedClasses: [] }), smalltalk.MethodContext); smalltalk.addMethod( '_temps', smalltalk.method({ selector: 'temps', category: 'accessing', fn: function (){ var self=this; return self.temps; return self;}, source: unescape('temps%0A%09%3Creturn%20self.temps%3E'), messageSends: [], referencedClasses: [] }), smalltalk.MethodContext); smalltalk.addMethod( '_printString', smalltalk.method({ selector: 'printString', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_printString", [], smalltalk.Object), "__comma", [unescape("%28")]), "__comma", [smalltalk.send(self, "_asString", [])]), "__comma", [unescape("%29")]); return self;}, 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.MethodContext); smalltalk.addMethod( '_asString', smalltalk.method({ selector: 'asString', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_class", []), "_printString", []), "__comma", [unescape("%20%3E%3E%20")]), "__comma", [smalltalk.send(self, "_selector", [])]); return self;}, source: unescape('asString%0A%09%5Eself%20receiver%20class%20printString%2C%20%27%20%3E%3E%20%27%2C%20self%20selector'), messageSends: [unescape("%2C"), "printString", "class", "receiver", "selector"], referencedClasses: [] }), smalltalk.MethodContext); smalltalk.addClass('Association', smalltalk.Object, ['key', 'value'], 'Kernel'); smalltalk.addMethod( '__eq', smalltalk.method({ selector: '=', category: 'comparing', fn: function (anAssociation){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "__eq", [smalltalk.send(anAssociation, "_class", [])]), "_and_", [(function(){return smalltalk.send(smalltalk.send(smalltalk.send(self, "_key", []), "__eq", [smalltalk.send(anAssociation, "_key", [])]), "_and_", [(function(){return smalltalk.send(smalltalk.send(self, "_value", []), "__eq", [smalltalk.send(anAssociation, "_value", [])]);})]);})]); return self;}, source: unescape('%3D%20anAssociation%0A%09%5Eself%20class%20%3D%20anAssociation%20class%20and%3A%20%5B%0A%09%20%20%20%20self%20key%20%3D%20anAssociation%20key%20and%3A%20%5B%0A%09%09self%20value%20%3D%20anAssociation%20value%5D%5D'), messageSends: ["and:", unescape("%3D"), "class", "key", "value"], referencedClasses: [] }), smalltalk.Association); smalltalk.addMethod( '_key_', smalltalk.method({ selector: 'key:', category: 'accessing', fn: function (aKey){ var self=this; self['@key']=aKey; return self;}, source: unescape('key%3A%20aKey%0A%09key%20%3A%3D%20aKey'), messageSends: [], referencedClasses: [] }), smalltalk.Association); smalltalk.addMethod( '_key', smalltalk.method({ selector: 'key', category: 'accessing', fn: function (){ var self=this; return self['@key']; return self;}, source: unescape('key%0A%09%5Ekey'), messageSends: [], referencedClasses: [] }), smalltalk.Association); smalltalk.addMethod( '_value_', smalltalk.method({ selector: 'value:', category: 'accessing', fn: function (aValue){ var self=this; self['@value']=aValue; return self;}, source: unescape('value%3A%20aValue%0A%09value%20%3A%3D%20aValue'), messageSends: [], referencedClasses: [] }), smalltalk.Association); smalltalk.addMethod( '_value', smalltalk.method({ selector: 'value', category: 'accessing', fn: function (){ var self=this; return self['@value']; return self;}, source: unescape('value%0A%09%5Evalue'), messageSends: [], referencedClasses: [] }), smalltalk.Association); smalltalk.addMethod( '_key_value_', smalltalk.method({ selector: 'key:value:', category: 'instance creation', fn: function (aKey, aValue){ var self=this; return (function($rec){smalltalk.send($rec, "_key_", [aKey]);smalltalk.send($rec, "_value_", [aValue]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, 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"], referencedClasses: [] }), smalltalk.Association.klass); smalltalk.addClass('Dictionary', smalltalk.Collection, ['keys'], 'Kernel'); smalltalk.addMethod( '__eq', smalltalk.method({ selector: '=', category: 'comparing', fn: function (aDictionary){ var self=this; try{smalltalk.send(smalltalk.send(smalltalk.send(self, "_class", []), "__eq", [smalltalk.send(aDictionary, "_class", [])]), "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})]); smalltalk.send(self, "_associationsDo_", [(function(assoc){return smalltalk.send(smalltalk.send(smalltalk.send(aDictionary, "_at_ifAbsent_", [smalltalk.send(assoc, "_key", []), (function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})]), "__eq", [smalltalk.send(assoc, "_value", [])]), "_ifFalse_", [(function(){return (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return false}})})();})]);})]); (function(){throw({name: 'stReturn', selector: '__eq', fn: function(){return true}})})(); return self; } catch(e) {if(e.name === 'stReturn' && e.selector === '__eq'){return e.fn()} throw(e)}}, source: unescape('%3D%20aDictionary%0A%09self%20class%20%3D%20aDictionary%20class%20ifFalse%3A%20%5B%5Efalse%5D.%0A%09self%20associationsDo%3A%20%5B%3Aassoc%20%7C%0A%09%20%20%20%20%28aDictionary%20at%3A%20assoc%20key%20ifAbsent%3A%20%5B%5Efalse%5D%29%20%3D%20assoc%20value%20%0A%09%09ifFalse%3A%20%5B%5Efalse%5D%5D.%0A%09%5Etrue'), messageSends: ["ifFalse:", unescape("%3D"), "class", "associationsDo:", "at:ifAbsent:", "key", "value"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_shallowCopy', smalltalk.method({ selector: 'shallowCopy', category: 'copying', 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 self;}, 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"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_initialize', smalltalk.method({ selector: 'initialize', category: 'initialization', fn: function (){ var self=this; smalltalk.send(self, "_initialize", [], smalltalk.Collection); self['@keys']=[]; return self;}, 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"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_size', smalltalk.method({ selector: 'size', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self['@keys'], "_size", []); return self;}, source: unescape('size%0A%09%5Ekeys%20size'), messageSends: ["size"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_associations', smalltalk.method({ selector: 'associations', category: 'accessing', 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, "_key_value_", [each, smalltalk.send(self, "_at_", [each])])]);})]); return associations; return self;}, 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: [smalltalk.Association] }), smalltalk.Dictionary); smalltalk.addMethod( '_keys', smalltalk.method({ selector: 'keys', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self['@keys'], "_copy", []); return self;}, source: unescape('keys%0A%09%5Ekeys%20copy'), messageSends: ["copy"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_values', smalltalk.method({ selector: 'values', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self['@keys'], "_collect_", [(function(each){return smalltalk.send(self, "_at_", [each]);})]); return self;}, 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:"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_at_put_', smalltalk.method({ selector: 'at:put:', category: 'accessing', fn: function (aKey, aValue){ var self=this; smalltalk.send(smalltalk.send(self['@keys'], "_includes_", [aKey]), "_ifFalse_", [(function(){return smalltalk.send(self['@keys'], "_add_", [aKey]);})]); return smalltalk.send(self, "_basicAt_put_", [aKey, aValue]); return self;}, 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:"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_at_ifAbsent_', smalltalk.method({ selector: 'at:ifAbsent:', category: 'accessing', fn: function (aKey, aBlock){ 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 self;}, 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:"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_at_ifAbsentPut_', smalltalk.method({ selector: 'at:ifAbsentPut:', category: 'accessing', fn: function (aKey, aBlock){ var self=this; return smalltalk.send(self, "_at_ifAbsent_", [aKey, (function(){return smalltalk.send(self, "_at_put_", [aKey, smalltalk.send(aBlock, "_value", [])]);})]); return self;}, 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"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_at_ifPresent_', smalltalk.method({ selector: 'at:ifPresent:', category: 'accessing', fn: function (aKey, aBlock){ var self=this; return smalltalk.send(smalltalk.send(self, "_basicAt_", [aKey]), "_ifNotNil_", [(function(){return smalltalk.send(aBlock, "_value_", [smalltalk.send(self, "_at_", [aKey])]);})]); return self;}, 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:"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_at_ifPresent_ifAbsent_', smalltalk.method({ selector: 'at:ifPresent:ifAbsent:', category: 'accessing', fn: function (aKey, aBlock, anotherBlock){ 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])]);})]); return self;}, 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:"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_add_', smalltalk.method({ selector: 'add:', category: 'adding/removing', fn: function (anAssociation){ var self=this; smalltalk.send(self, "_at_put_", [smalltalk.send(anAssociation, "_key", []), smalltalk.send(anAssociation, "_value", [])]); return self;}, 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( '_addAll_', smalltalk.method({ selector: 'addAll:', category: 'adding/removing', fn: function (aDictionary){ var self=this; smalltalk.send(self, "_addAll_", [smalltalk.send(aDictionary, "_associations", [])], smalltalk.Collection); return aDictionary; return self;}, 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( '__comma', smalltalk.method({ selector: ',', category: 'copying', fn: function (aCollection){ var self=this; smalltalk.send(self, "_shouldNotImplement", []); return self;}, source: unescape('%2C%20aCollection%0A%09self%20shouldNotImplement'), messageSends: ["shouldNotImplement"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_copyFrom_to_', smalltalk.method({ selector: 'copyFrom:to:', category: 'copying', fn: function (anIndex, anotherIndex){ var self=this; smalltalk.send(self, "_shouldNotImplement", []); return self;}, source: unescape('copyFrom%3A%20anIndex%20to%3A%20anotherIndex%0A%09self%20shouldNotImplement'), messageSends: ["shouldNotImplement"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_associationsDo_', smalltalk.method({ selector: 'associationsDo:', category: 'enumerating', fn: function (aBlock){ var self=this; smalltalk.send(smalltalk.send(self, "_associations", []), "_do_", [aBlock]); return self;}, source: unescape('associationsDo%3A%20aBlock%0A%20%20%20%20%09self%20associations%20do%3A%20aBlock'), messageSends: ["do:", "associations"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_keysAndValuesDo_', smalltalk.method({ selector: 'keysAndValuesDo:', category: 'enumerating', fn: function (aBlock){ var self=this; smalltalk.send(self, "_associationsDo_", [(function(each){return smalltalk.send(aBlock, "_value_value_", [smalltalk.send(each, "_key", []), smalltalk.send(each, "_value", [])]);})]); return self;}, 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"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_do_', smalltalk.method({ selector: 'do:', category: 'enumerating', fn: function (aBlock){ var self=this; smalltalk.send(smalltalk.send(self, "_values", []), "_do_", [aBlock]); return self;}, source: unescape('do%3A%20aBlock%0A%20%20%20%20%09self%20values%20do%3A%20aBlock'), messageSends: ["do:", "values"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_select_', smalltalk.method({ selector: 'select:', 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 smalltalk.send(smalltalk.send(aBlock, "_value_", [value]), "_ifTrue_", [(function(){return smalltalk.send(newDict, "_at_put_", [key, value]);})]);})]); return newDict; return self;}, 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:"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_collect_', smalltalk.method({ selector: 'collect:', 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 smalltalk.send(newDict, "_at_put_", [key, smalltalk.send(aBlock, "_value_", [value])]);})]); return newDict; return self;}, source: unescape('collect%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%20newDict%20at%3A%20key%20put%3A%20%28aBlock%20value%3A%20value%29%5D.%0A%20%20%20%20%09%5EnewDict'), messageSends: ["new", "class", "keysAndValuesDo:", "at:put:", "value:"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_detect_ifNone_', smalltalk.method({ selector: 'detect:ifNone:', category: 'enumerating', fn: function (aBlock, anotherBlock){ var self=this; return smalltalk.send(smalltalk.send(self, "_values", []), "_detect_ifNone_", [aBlock, anotherBlock]); return self;}, source: unescape('detect%3A%20aBlock%20ifNone%3A%20anotherBlock%0A%09%5Eself%20values%20detect%3A%20aBlock%20ifNone%3A%20anotherBlock'), messageSends: ["detect:ifNone:", "values"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_includes_', smalltalk.method({ selector: 'includes:', category: 'enumerating', fn: function (anObject){ var self=this; return smalltalk.send(smalltalk.send(self, "_values", []), "_includes_", [anObject]); return self;}, source: unescape('includes%3A%20anObject%0A%09%5Eself%20values%20includes%3A%20anObject'), messageSends: ["includes:", "values"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_remove_', smalltalk.method({ selector: 'remove:', category: 'adding/removing', fn: function (aKey){ var self=this; smalltalk.send(self, "_removeKey_", [aKey]); return self;}, source: unescape('remove%3A%20aKey%0A%20%20%20%20self%20removeKey%3A%20aKey'), messageSends: ["removeKey:"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_removeKey_', smalltalk.method({ selector: 'removeKey:', category: 'adding/removing', fn: function (aKey){ var self=this; smalltalk.send(self['@keys'], "_remove_", [aKey]); return self;}, source: unescape('removeKey%3A%20aKey%0A%20%20%20%20keys%20remove%3A%20aKey'), messageSends: ["remove:"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_at_', smalltalk.method({ selector: 'at:', category: 'accessing', fn: function (aKey){ var self=this; return smalltalk.send(self, "_at_ifAbsent_", [aKey, (function(){return smalltalk.send(self, "_errorNotFound", []);})]); return self;}, source: unescape('at%3A%20aKey%0A%09%5Eself%20at%3A%20aKey%20ifAbsent%3A%20%5Bself%20errorNotFound%5D'), messageSends: ["at:ifAbsent:", "errorNotFound"], referencedClasses: [] }), smalltalk.Dictionary); smalltalk.addMethod( '_asJSONObject', smalltalk.method({ selector: 'asJSONObject', category: 'converting', fn: function (){ var self=this; var object=nil; object=smalltalk.send(smalltalk.Object, "_new", []); smalltalk.send(self, "_keysAndValuesDo_", [(function(key, value){return smalltalk.send(object, "_basicAt_put_", [key, smalltalk.send(value, "_asJSONObject", [])]);})]); return object; return self;}, source: unescape('asJSONObject%0A%09%7C%20object%20%7C%0A%09object%20%3A%3D%20Object%20new.%0A%09self%20keysAndValuesDo%3A%20%5B%3Akey%20%3Avalue%20%7C%0A%09%09object%20basicAt%3A%20key%20put%3A%20value%20asJSONObject%5D.%0A%09%5Eobject'), messageSends: ["new", "keysAndValuesDo:", "basicAt:put:", "asJSONObject"], referencedClasses: [smalltalk.Object] }), smalltalk.Dictionary); smalltalk.addClass('ClassBuilder', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_superclass_subclass_', smalltalk.method({ selector: 'superclass:subclass:', category: 'class creation', fn: function (aClass, aString){ var self=this; smalltalk.send(self, "_superclass_subclass_instanceVariableNames_category_", [aClass, aString, "", nil]); return self;}, source: unescape('superclass%3A%20aClass%20subclass%3A%20aString%0A%09self%20superclass%3A%20aClass%20subclass%3A%20aString%20instanceVariableNames%3A%20%27%27%20category%3A%20nil'), messageSends: ["superclass:subclass:instanceVariableNames:category:"], referencedClasses: [] }), smalltalk.ClassBuilder); smalltalk.addMethod( '_superclass_subclass_instanceVariableNames_category_', smalltalk.method({ selector: 'superclass:subclass:instanceVariableNames:category:', category: 'class creation', fn: function (aClass, aString, aString2, aString3){ var self=this; var newClass=nil; newClass=smalltalk.send(self, "_addSubclassOf_named_instanceVariableNames_", [aClass, aString, smalltalk.send(self, "_instanceVariableNamesFor_", [aString2])]); smalltalk.send(self, "_setupClass_", [newClass]); smalltalk.send(newClass, "_category_", [smalltalk.send(aString3, "_ifNil_", [(function(){return "unclassified";})])]); return self;}, source: unescape('superclass%3A%20aClass%20subclass%3A%20aString%20instanceVariableNames%3A%20aString2%20category%3A%20aString3%0A%09%7C%20newClass%20%7C%0A%09newClass%20%3A%3D%20self%20addSubclassOf%3A%20aClass%20named%3A%20aString%20instanceVariableNames%3A%20%28self%20instanceVariableNamesFor%3A%20aString2%29.%0A%09self%20setupClass%3A%20newClass.%0A%09newClass%20category%3A%20%28aString3%20ifNil%3A%20%5B%27unclassified%27%5D%29'), messageSends: ["addSubclassOf:named:instanceVariableNames:", "instanceVariableNamesFor:", "setupClass:", "category:", "ifNil:"], referencedClasses: [] }), smalltalk.ClassBuilder); smalltalk.addMethod( '_class_instanceVariableNames_', smalltalk.method({ selector: 'class:instanceVariableNames:', category: 'class creation', fn: function (aClass, aString){ var self=this; smalltalk.send(smalltalk.send(aClass, "_isMetaclass", []), "_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;}, 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.ClassBuilder); smalltalk.addMethod( '_instanceVariableNamesFor_', smalltalk.method({ selector: 'instanceVariableNamesFor:', category: 'private', fn: function (aString){ var self=this; return smalltalk.send(smalltalk.send(aString, "_tokenize_", [" "]), "_reject_", [(function(each){return smalltalk.send(each, "_isEmpty", []);})]); return self;}, 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.ClassBuilder); smalltalk.addMethod( '_addSubclassOf_named_instanceVariableNames_', smalltalk.method({ selector: 'addSubclassOf:named:instanceVariableNames:', category: 'private', fn: function (aClass, aString, aCollection){ var self=this; smalltalk.addClass(aString, aClass, aCollection); return smalltalk[aString]; return self;}, 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.ClassBuilder); smalltalk.addMethod( '_setupClass_', smalltalk.method({ selector: 'setupClass:', category: 'private', fn: function (aClass){ var self=this; smalltalk.init(aClass);; return self;}, source: unescape('setupClass%3A%20aClass%0A%09%3Csmalltalk.init%28aClass%29%3B%3E'), messageSends: [], referencedClasses: [] }), smalltalk.ClassBuilder); smalltalk.addClass('ClassCategoryReader', smalltalk.Object, ['class', 'category', 'chunkParser'], 'Kernel'); smalltalk.addMethod( '_initialize', smalltalk.method({ selector: 'initialize', category: 'initialization', fn: function (){ var self=this; smalltalk.send(self, "_initialize", [], smalltalk.Object); self['@chunkParser']=smalltalk.send(smalltalk.ChunkParser, "_new", []); return self;}, source: unescape('initialize%0A%09super%20initialize.%0A%09chunkParser%20%3A%3D%20ChunkParser%20new.'), messageSends: ["initialize", "new"], referencedClasses: [smalltalk.nil] }), smalltalk.ClassCategoryReader); smalltalk.addMethod( '_class_category_', smalltalk.method({ selector: 'class:category:', category: 'accessing', fn: function (aClass, aString){ var self=this; self['@class']=aClass; self['@category']=aString; return self;}, source: unescape('class%3A%20aClass%20category%3A%20aString%0A%09class%20%3A%3D%20aClass.%0A%09category%20%3A%3D%20aString'), messageSends: [], referencedClasses: [] }), smalltalk.ClassCategoryReader); smalltalk.addMethod( '_scanFrom_', smalltalk.method({ selector: 'scanFrom:', category: 'fileIn', fn: function (aStream){ var self=this; var nextChunk=nil; nextChunk=smalltalk.send(smalltalk.send(smalltalk.send(self['@chunkParser'], "_emptyChunk", []), "__slash", [smalltalk.send(self['@chunkParser'], "_chunk", [])]), "_parse_", [aStream]); smalltalk.send(smalltalk.send(nextChunk, "_isEmptyChunk", []), "_ifFalse_", [(function(){smalltalk.send(self, "_compileMethod_", [smalltalk.send(nextChunk, "_contents", [])]);return smalltalk.send(self, "_scanFrom_", [aStream]);})]); return self;}, source: unescape('scanFrom%3A%20aStream%0A%09%7C%20nextChunk%20%7C%0A%09nextChunk%20%3A%3D%20%28chunkParser%20emptyChunk%20/%20chunkParser%20chunk%29%20parse%3A%20aStream.%0A%09nextChunk%20isEmptyChunk%20ifFalse%3A%20%5B%0A%09%20%20%20%20self%20compileMethod%3A%20nextChunk%20contents.%0A%09%20%20%20%20self%20scanFrom%3A%20aStream%5D.'), messageSends: ["parse:", unescape("/"), "emptyChunk", "chunk", "ifFalse:", "isEmptyChunk", "compileMethod:", "contents", "scanFrom:"], referencedClasses: [] }), smalltalk.ClassCategoryReader); smalltalk.addMethod( '_compileMethod_', smalltalk.method({ selector: 'compileMethod:', category: 'private', fn: function (aString){ var self=this; var method=nil; method=smalltalk.send(smalltalk.send(smalltalk.Compiler, "_new", []), "_load_forClass_", [aString, self['@class']]); smalltalk.send(method, "_category_", [self['@category']]); smalltalk.send(self['@class'], "_addCompiledMethod_", [method]); return self;}, 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: [smalltalk.nil] }), smalltalk.ClassCategoryReader); smalltalk.addClass('Stream', smalltalk.Object, ['collection', 'position', 'streamSize'], 'Kernel'); smalltalk.addMethod( '_collection', smalltalk.method({ selector: 'collection', category: 'accessing', fn: function (){ var self=this; return self['@collection']; return self;}, source: unescape('collection%0A%09%5Ecollection'), messageSends: [], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_setCollection_', smalltalk.method({ selector: 'setCollection:', category: 'accessing', fn: function (aCollection){ var self=this; self['@collection']=aCollection; return self;}, source: unescape('setCollection%3A%20aCollection%0A%09collection%20%3A%3D%20aCollection'), messageSends: [], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_position', smalltalk.method({ selector: 'position', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self['@position'], "_ifNil_", [(function(){return self['@position']=(0);})]); return self;}, source: unescape('position%0A%09%5Eposition%20ifNil%3A%20%5Bposition%20%3A%3D%200%5D'), messageSends: ["ifNil:"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_position_', smalltalk.method({ selector: 'position:', category: 'accessing', fn: function (anInteger){ var self=this; self['@position']=anInteger; return self;}, source: unescape('position%3A%20anInteger%0A%09position%20%3A%3D%20anInteger'), messageSends: [], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_streamSize', smalltalk.method({ selector: 'streamSize', category: 'accessing', fn: function (){ var self=this; return self['@streamSize']; return self;}, source: unescape('streamSize%0A%09%5EstreamSize'), messageSends: [], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_setStreamSize_', smalltalk.method({ selector: 'setStreamSize:', category: 'accessing', fn: function (anInteger){ var self=this; self['@streamSize']=anInteger; return self;}, source: unescape('setStreamSize%3A%20anInteger%0A%09streamSize%20%3A%3D%20anInteger'), messageSends: [], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_contents', smalltalk.method({ selector: 'contents', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_collection", []), "_copyFrom_to_", [(1), smalltalk.send(self, "_streamSize", [])]); return self;}, source: unescape('contents%0A%09%5Eself%20collection%0A%09%20%20%20%20copyFrom%3A%201%20%0A%09%20%20%20%20to%3A%20self%20streamSize'), messageSends: ["copyFrom:to:", "collection", "streamSize"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_size', smalltalk.method({ selector: 'size', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(self, "_streamSize", []); return self;}, source: unescape('size%0A%09%5Eself%20streamSize'), messageSends: ["streamSize"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_reset', smalltalk.method({ selector: 'reset', category: 'actions', fn: function (){ var self=this; smalltalk.send(self, "_position_", [(0)]); return self;}, source: unescape('reset%0A%09self%20position%3A%200'), messageSends: ["position:"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_close', smalltalk.method({ selector: 'close', category: 'actions', fn: function (){ var self=this; return self;}, source: unescape('close'), messageSends: [], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_flush', smalltalk.method({ selector: 'flush', category: 'actions', fn: function (){ var self=this; return self;}, source: unescape('flush'), messageSends: [], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_resetContents', smalltalk.method({ selector: 'resetContents', category: 'actions', fn: function (){ var self=this; smalltalk.send(self, "_reset", []); smalltalk.send(self, "_setStreamSize_", [(0)]); return self;}, source: unescape('resetContents%0A%09self%20reset.%0A%09self%20setStreamSize%3A%200'), messageSends: ["reset", "setStreamSize:"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_do_', smalltalk.method({ selector: 'do:', category: 'enumerating', fn: function (aBlock){ var self=this; smalltalk.send((function(){return smalltalk.send(self, "_atEnd", []);}), "_whileFalse_", [(function(){return smalltalk.send(aBlock, "_value_", [smalltalk.send(self, "_next", [])]);})]); return self;}, source: unescape('do%3A%20aBlock%0A%09%5Bself%20atEnd%5D%20whileFalse%3A%20%5BaBlock%20value%3A%20self%20next%5D'), messageSends: ["whileFalse:", "atEnd", "value:", "next"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_setToEnd', smalltalk.method({ selector: 'setToEnd', category: 'positioning', fn: function (){ var self=this; smalltalk.send(self, "_position_", [smalltalk.send(self, "_size", [])]); return self;}, source: unescape('setToEnd%0A%09self%20position%3A%20self%20size'), messageSends: ["position:", "size"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_skip_', smalltalk.method({ selector: 'skip:', category: 'positioning', fn: function (anInteger){ var self=this; smalltalk.send(self, "_position_", [smalltalk.send(smalltalk.send(smalltalk.send(self, "_position", []), "__plus", [anInteger]), "_min_max_", [smalltalk.send(self, "_size", []), (0)])]); return self;}, source: unescape('skip%3A%20anInteger%0A%09self%20position%3A%20%28%28self%20position%20+%20anInteger%29%20min%3A%20self%20size%20max%3A%200%29'), messageSends: ["position:", "min:max:", unescape("+"), "position", "size"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_next', smalltalk.method({ selector: 'next', category: 'reading', fn: function (){ var self=this; smalltalk.send(self, "_position_", [smalltalk.send(smalltalk.send(self, "_position", []), "__plus", [(1)])]); return smalltalk.send(self['@collection'], "_at_", [smalltalk.send(self, "_position", [])]); return self;}, source: unescape('next%0A%09self%20position%3A%20self%20position%20+%201.%20%0A%09%5Ecollection%20at%3A%20self%20position'), messageSends: ["position:", unescape("+"), "position", "at:"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_next_', smalltalk.method({ selector: 'next:', category: 'reading', fn: function (anInteger){ var self=this; var tempCollection=nil; tempCollection=smalltalk.send(smalltalk.send(smalltalk.send(self, "_collection", []), "_class", []), "_new", []); smalltalk.send(anInteger, "_timesRepeat_", [(function(){return smalltalk.send(smalltalk.send(self, "_atEnd", []), "_ifFalse_", [(function(){return smalltalk.send(tempCollection, "_add_", [smalltalk.send(self, "_next", [])]);})]);})]); return tempCollection; return self;}, source: unescape('next%3A%20anInteger%0A%09%7C%20tempCollection%20%7C%0A%09tempCollection%20%3A%3D%20self%20collection%20class%20new.%0A%09anInteger%20timesRepeat%3A%20%5B%0A%09%20%20%20%20self%20atEnd%20ifFalse%3A%20%5B%0A%09%09tempCollection%20add%3A%20self%20next%5D%5D.%0A%09%5EtempCollection'), messageSends: ["new", "class", "collection", "timesRepeat:", "ifFalse:", "atEnd", "add:", "next"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_nextPut_', smalltalk.method({ selector: 'nextPut:', category: 'writing', fn: function (anObject){ var self=this; smalltalk.send(self, "_position_", [smalltalk.send(smalltalk.send(self, "_position", []), "__plus", [(1)])]); smalltalk.send(smalltalk.send(self, "_collection", []), "_at_put_", [smalltalk.send(self, "_position", []), anObject]); smalltalk.send(self, "_setStreamSize_", [smalltalk.send(smalltalk.send(self, "_streamSize", []), "_max_", [smalltalk.send(self, "_position", [])])]); return self;}, source: unescape('nextPut%3A%20anObject%0A%09self%20position%3A%20self%20position%20+%201.%0A%09self%20collection%20at%3A%20self%20position%20put%3A%20anObject.%0A%09self%20setStreamSize%3A%20%28self%20streamSize%20max%3A%20self%20position%29'), messageSends: ["position:", unescape("+"), "position", "at:put:", "collection", "setStreamSize:", "max:", "streamSize"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_nextPutAll_', smalltalk.method({ selector: 'nextPutAll:', category: 'writing', fn: function (aCollection){ var self=this; smalltalk.send(aCollection, "_do_", [(function(each){return smalltalk.send(self, "_nextPut_", [each]);})]); return self;}, source: unescape('nextPutAll%3A%20aCollection%0A%09aCollection%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20self%20nextPut%3A%20each%5D'), messageSends: ["do:", "nextPut:"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_peek', smalltalk.method({ selector: 'peek', category: 'reading', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_atEnd", []), "_ifFalse_", [(function(){return smalltalk.send(smalltalk.send(self, "_collection", []), "_at_", [smalltalk.send(smalltalk.send(self, "_position", []), "__plus", [(1)])]);})]); return self;}, source: unescape('peek%0A%09%5Eself%20atEnd%20ifFalse%3A%20%5B%0A%09%20%20%20%20self%20collection%20at%3A%20self%20position%20+%201%5D'), messageSends: ["ifFalse:", "atEnd", "at:", "collection", unescape("+"), "position"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_atEnd', smalltalk.method({ selector: 'atEnd', category: 'testing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_position", []), "__eq", [smalltalk.send(self, "_size", [])]); return self;}, source: unescape('atEnd%0A%09%5Eself%20position%20%3D%20self%20size'), messageSends: [unescape("%3D"), "position", "size"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_atStart', smalltalk.method({ selector: 'atStart', category: 'testing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_position", []), "__eq", [(0)]); return self;}, source: unescape('atStart%0A%09%5Eself%20position%20%3D%200'), messageSends: [unescape("%3D"), "position"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_isEmpty', smalltalk.method({ selector: 'isEmpty', category: 'testing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(self, "_size", []), "__eq", [(0)]); return self;}, source: unescape('isEmpty%0A%09%5Eself%20size%20%3D%200'), messageSends: [unescape("%3D"), "size"], referencedClasses: [] }), smalltalk.Stream); smalltalk.addMethod( '_on_', smalltalk.method({ selector: 'on:', category: 'instance creation', fn: function (aCollection){ var self=this; return (function($rec){smalltalk.send($rec, "_setCollection_", [aCollection]);smalltalk.send($rec, "_setStreamSize_", [smalltalk.send(aCollection, "_size", [])]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, source: unescape('on%3A%20aCollection%0A%09%20%20%20%20%5Eself%20new%20%0A%09%09setCollection%3A%20aCollection%3B%0A%09%09setStreamSize%3A%20aCollection%20size%3B%0A%09%09yourself'), messageSends: ["setCollection:", "setStreamSize:", "size", "yourself", "new"], referencedClasses: [] }), smalltalk.Stream.klass); smalltalk.addClass('StringStream', smalltalk.Stream, [], 'Kernel'); smalltalk.addMethod( '_next_', smalltalk.method({ selector: 'next:', category: 'reading', fn: function (anInteger){ var self=this; var tempCollection=nil; tempCollection=smalltalk.send(smalltalk.send(smalltalk.send(self, "_collection", []), "_class", []), "_new", []); smalltalk.send(anInteger, "_timesRepeat_", [(function(){return smalltalk.send(smalltalk.send(self, "_atEnd", []), "_ifFalse_", [(function(){return tempCollection=smalltalk.send(tempCollection, "__comma", [smalltalk.send(self, "_next", [])]);})]);})]); return tempCollection; return self;}, source: unescape('next%3A%20anInteger%0A%09%7C%20tempCollection%20%7C%0A%09tempCollection%20%3A%3D%20self%20collection%20class%20new.%0A%09anInteger%20timesRepeat%3A%20%5B%0A%09%20%20%20%20self%20atEnd%20ifFalse%3A%20%5B%0A%09%09tempCollection%20%3A%3D%20tempCollection%2C%20self%20next%5D%5D.%0A%09%5EtempCollection'), messageSends: ["new", "class", "collection", "timesRepeat:", "ifFalse:", "atEnd", unescape("%2C"), "next"], referencedClasses: [] }), smalltalk.StringStream); smalltalk.addMethod( '_nextPut_', smalltalk.method({ selector: 'nextPut:', category: 'writing', fn: function (aString){ var self=this; smalltalk.send(self, "_nextPutAll_", [aString]); return self;}, source: unescape('nextPut%3A%20aString%0A%09self%20nextPutAll%3A%20aString'), messageSends: ["nextPutAll:"], referencedClasses: [] }), smalltalk.StringStream); smalltalk.addMethod( '_nextPutAll_', smalltalk.method({ selector: 'nextPutAll:', category: 'writing', fn: function (aString){ var self=this; smalltalk.send(self, "_setCollection_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_collection", []), "_copyFrom_to_", [(1), smalltalk.send(self, "_position", [])]), "__comma", [aString]), "__comma", [smalltalk.send(smalltalk.send(self, "_collection", []), "_copyFrom_to_", [smalltalk.send(smalltalk.send(smalltalk.send(self, "_position", []), "__plus", [(1)]), "__plus", [smalltalk.send(aString, "_size", [])]), smalltalk.send(smalltalk.send(self, "_collection", []), "_size", [])])])]); smalltalk.send(self, "_position_", [smalltalk.send(smalltalk.send(self, "_position", []), "__plus", [smalltalk.send(aString, "_size", [])])]); smalltalk.send(self, "_setStreamSize_", [smalltalk.send(smalltalk.send(self, "_streamSize", []), "_max_", [smalltalk.send(self, "_position", [])])]); return self;}, source: unescape('nextPutAll%3A%20aString%0A%09self%20setCollection%3A%20%0A%09%20%20%20%20%28self%20collection%20copyFrom%3A%201%20to%3A%20self%20position%29%2C%0A%09%20%20%20%20aString%2C%0A%09%20%20%20%20%28self%20collection%20copyFrom%3A%20%28self%20position%20+%201%20+%20aString%20size%29%20to%3A%20self%20collection%20size%29.%0A%09self%20position%3A%20self%20position%20+%20aString%20size.%0A%09self%20setStreamSize%3A%20%28self%20streamSize%20max%3A%20self%20position%29'), messageSends: ["setCollection:", unescape("%2C"), "copyFrom:to:", "collection", "position", unescape("+"), "size", "position:", "setStreamSize:", "max:", "streamSize"], referencedClasses: [] }), smalltalk.StringStream); smalltalk.addMethod( '_cr', smalltalk.method({ selector: 'cr', category: 'writing', fn: function (){ var self=this; return smalltalk.send(self, "_nextPutAll_", [smalltalk.send(smalltalk.String, "_cr", [])]); return self;}, source: unescape('cr%0A%09%5Eself%20nextPutAll%3A%20String%20cr'), messageSends: ["nextPutAll:", "cr"], referencedClasses: [smalltalk.String] }), smalltalk.StringStream); smalltalk.addMethod( '_crlf', smalltalk.method({ selector: 'crlf', category: 'writing', fn: function (){ var self=this; return smalltalk.send(self, "_nextPutAll_", [smalltalk.send(smalltalk.String, "_crlf", [])]); return self;}, source: unescape('crlf%0A%09%5Eself%20nextPutAll%3A%20String%20crlf'), messageSends: ["nextPutAll:", "crlf"], referencedClasses: [smalltalk.String] }), smalltalk.StringStream); smalltalk.addMethod( '_lf', smalltalk.method({ selector: 'lf', category: 'writing', fn: function (){ var self=this; return smalltalk.send(self, "_nextPutAll_", [smalltalk.send(smalltalk.String, "_lf", [])]); return self;}, source: unescape('lf%0A%09%5Eself%20nextPutAll%3A%20String%20lf'), messageSends: ["nextPutAll:", "lf"], referencedClasses: [smalltalk.String] }), smalltalk.StringStream); smalltalk.addClass('ClassCommentReader', smalltalk.Object, ['class', 'chunkParser'], 'Kernel'); smalltalk.addMethod( '_class_', smalltalk.method({ selector: 'class:', category: 'accessing', fn: function (aClass){ var self=this; self['@class']=aClass; return self;}, source: unescape('class%3A%20aClass%0A%09class%20%3A%3D%20aClass'), messageSends: [], referencedClasses: [] }), smalltalk.ClassCommentReader); smalltalk.addMethod( '_scanFrom_', smalltalk.method({ selector: 'scanFrom:', category: 'fileIn', fn: function (aStream){ var self=this; var nextChunk=nil; nextChunk=smalltalk.send(smalltalk.send(smalltalk.send(self['@chunkParser'], "_emptyChunk", []), "__slash", [smalltalk.send(self['@chunkParser'], "_chunk", [])]), "_parse_", [aStream]); smalltalk.send(smalltalk.send(nextChunk, "_isEmptyChunk", []), "_ifFalse_", [(function(){return smalltalk.send(self, "_setComment_", [smalltalk.send(nextChunk, "_contents", [])]);})]); return self;}, source: unescape('scanFrom%3A%20aStream%0A%09%7C%20nextChunk%20%7C%0A%09nextChunk%20%3A%3D%20%28chunkParser%20emptyChunk%20/%20chunkParser%20chunk%29%20parse%3A%20aStream.%0A%09nextChunk%20isEmptyChunk%20ifFalse%3A%20%5B%0A%09%20%20%20%20self%20setComment%3A%20nextChunk%20contents%5D.'), messageSends: ["parse:", unescape("/"), "emptyChunk", "chunk", "ifFalse:", "isEmptyChunk", "setComment:", "contents"], referencedClasses: [] }), smalltalk.ClassCommentReader); smalltalk.addMethod( '_initialize', smalltalk.method({ selector: 'initialize', category: 'initialization', fn: function (){ var self=this; smalltalk.send(self, "_initialize", [], smalltalk.Object); self['@chunkParser']=smalltalk.send(smalltalk.ChunkParser, "_new", []); return self;}, source: unescape('initialize%0A%09super%20initialize.%0A%09chunkParser%20%3A%3D%20ChunkParser%20new.'), messageSends: ["initialize", "new"], referencedClasses: [smalltalk.nil] }), smalltalk.ClassCommentReader); smalltalk.addMethod( '_setComment_', smalltalk.method({ selector: 'setComment:', category: 'private', fn: function (aString){ var self=this; smalltalk.send(self['@class'], "_comment_", [aString]); return self;}, source: unescape('setComment%3A%20aString%0A%20%20%20%20class%20comment%3A%20aString'), messageSends: ["comment:"], referencedClasses: [] }), smalltalk.ClassCommentReader); smalltalk.addClass('Random', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_next', smalltalk.method({ selector: 'next', category: 'accessing', fn: function (){ var self=this; return Math.random(); return self;}, source: unescape('next%0A%09%3Creturn%20Math.random%28%29%3E'), messageSends: [], referencedClasses: [] }), smalltalk.Random); smalltalk.addMethod( '_next_', smalltalk.method({ selector: 'next:', category: 'accessing', fn: function (anInteger){ var self=this; return smalltalk.send((1), "_to_collect_", [anInteger, (function(each){return smalltalk.send(self, "_next", []);})]); return self;}, source: unescape('next%3A%20anInteger%0A%20%20%20%20%5E1%20to%3A%20anInteger%20collect%3A%20%5B%3Aeach%20%7C%20self%20next%5D'), messageSends: ["to:collect:", "next"], referencedClasses: [] }), smalltalk.Random); smalltalk.addClass('Point', smalltalk.Object, ['x', 'y'], 'Kernel'); smalltalk.addMethod( '_x', smalltalk.method({ selector: 'x', category: 'accessing', fn: function (){ var self=this; return self['@x']; return self;}, source: unescape('x%0A%09%5Ex'), messageSends: [], referencedClasses: [] }), smalltalk.Point); smalltalk.addMethod( '_y', smalltalk.method({ selector: 'y', category: 'accessing', fn: function (){ var self=this; return self['@y']; return self;}, source: unescape('y%0A%09%5Ey'), messageSends: [], referencedClasses: [] }), smalltalk.Point); smalltalk.addMethod( '_y_', smalltalk.method({ selector: 'y:', category: 'accessing', fn: function (aNumber){ var self=this; self['@y']=aNumber; return self;}, source: unescape('y%3A%20aNumber%0A%09y%20%3A%3D%20aNumber'), messageSends: [], referencedClasses: [] }), smalltalk.Point); smalltalk.addMethod( '_x_', smalltalk.method({ selector: 'x:', category: 'accessing', fn: function (aNumber){ var self=this; self['@x']=aNumber; return self;}, source: unescape('x%3A%20aNumber%0A%09x%20%3A%3D%20aNumber'), messageSends: [], referencedClasses: [] }), smalltalk.Point); smalltalk.addMethod( '__star', smalltalk.method({ selector: '*', category: 'arithmetic', fn: function (aPoint){ var self=this; return smalltalk.send(smalltalk.Point, "_x_y_", [smalltalk.send(smalltalk.send(self, "_x", []), "__star", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", [])]), smalltalk.send(smalltalk.send(self, "_y", []), "__star", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", [])])]); return self;}, 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: [smalltalk.Point] }), smalltalk.Point); smalltalk.addMethod( '__plus', smalltalk.method({ selector: '+', category: 'arithmetic', fn: function (aPoint){ var self=this; return smalltalk.send(smalltalk.Point, "_x_y_", [smalltalk.send(smalltalk.send(self, "_x", []), "__plus", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", [])]), smalltalk.send(smalltalk.send(self, "_y", []), "__plus", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", [])])]); return self;}, 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: [smalltalk.Point] }), smalltalk.Point); smalltalk.addMethod( '__minus', smalltalk.method({ selector: '-', category: 'arithmetic', fn: function (aPoint){ var self=this; return smalltalk.send(smalltalk.Point, "_x_y_", [smalltalk.send(smalltalk.send(self, "_x", []), "__minus", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", [])]), smalltalk.send(smalltalk.send(self, "_y", []), "__minus", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", [])])]); return self;}, 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: [smalltalk.Point] }), smalltalk.Point); smalltalk.addMethod( '__slash', smalltalk.method({ selector: '/', category: 'arithmetic', fn: function (aPoint){ var self=this; return smalltalk.send(smalltalk.Point, "_x_y_", [smalltalk.send(smalltalk.send(self, "_x", []), "__slash", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_x", [])]), smalltalk.send(smalltalk.send(self, "_y", []), "__slash", [smalltalk.send(smalltalk.send(aPoint, "_asPoint", []), "_y", [])])]); return self;}, 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: [smalltalk.Point] }), smalltalk.Point); smalltalk.addMethod( '_asPoint', smalltalk.method({ selector: 'asPoint', category: 'converting', fn: function (){ var self=this; return self; return self;}, source: unescape('asPoint%0A%09%5Eself'), messageSends: [], referencedClasses: [] }), smalltalk.Point); smalltalk.addMethod( '_x_y_', smalltalk.method({ selector: 'x:y:', category: 'instance creation', fn: function (aNumber, anotherNumber){ var self=this; return (function($rec){smalltalk.send($rec, "_x_", [aNumber]);smalltalk.send($rec, "_y_", [anotherNumber]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, 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.Point.klass); smalltalk.addClass('Message', smalltalk.Object, ['selector', 'arguments'], 'Kernel'); smalltalk.addMethod( '_selector', smalltalk.method({ selector: 'selector', category: 'accessing', fn: function (){ var self=this; return self['@selector']; return self;}, source: unescape('selector%0A%09%5Eselector'), messageSends: [], referencedClasses: [] }), smalltalk.Message); smalltalk.addMethod( '_selector_', smalltalk.method({ selector: 'selector:', category: 'accessing', fn: function (aString){ var self=this; self['@selector']=aString; return self;}, source: unescape('selector%3A%20aString%0A%09selector%20%3A%3D%20aString'), messageSends: [], referencedClasses: [] }), smalltalk.Message); smalltalk.addMethod( '_arguments_', smalltalk.method({ selector: 'arguments:', category: 'accessing', fn: function (anArray){ var self=this; self['@arguments']=anArray; return self;}, source: unescape('arguments%3A%20anArray%0A%09arguments%20%3A%3D%20anArray'), messageSends: [], referencedClasses: [] }), smalltalk.Message); smalltalk.addMethod( '_arguments', smalltalk.method({ selector: 'arguments', category: 'accessing', fn: function (){ var self=this; return self['@arguments']; return self;}, source: unescape('arguments%0A%09%5Earguments'), messageSends: [], referencedClasses: [] }), smalltalk.Message); smalltalk.addMethod( '_selector_arguments_', smalltalk.method({ selector: 'selector:arguments:', category: 'instance creation', fn: function (aString, anArray){ var self=this; return (function($rec){smalltalk.send($rec, "_selector_", [aString]);smalltalk.send($rec, "_arguments_", [anArray]);return smalltalk.send($rec, "_yourself", []);})(smalltalk.send(self, "_new", [])); return self;}, source: unescape('selector%3A%20aString%20arguments%3A%20anArray%0A%09%5Eself%20new%0A%09%09selector%3A%20aString%3B%0A%09%09arguments%3A%20anArray%3B%0A%09%09yourself'), messageSends: ["selector:", "arguments:", "yourself", "new"], referencedClasses: [] }), smalltalk.Message.klass); smalltalk.addClass('MessageNotUnderstood', smalltalk.Error, ['message', 'receiver'], 'Kernel'); smalltalk.addMethod( '_message', smalltalk.method({ selector: 'message', category: 'accessing', fn: function (){ var self=this; return self['@message']; return self;}, source: unescape('message%0A%09%5Emessage'), messageSends: [], referencedClasses: [] }), smalltalk.MessageNotUnderstood); smalltalk.addMethod( '_message_', smalltalk.method({ selector: 'message:', category: 'accessing', fn: function (aMessage){ var self=this; self['@message']=aMessage; return self;}, source: unescape('message%3A%20aMessage%0A%09message%20%3A%3D%20aMessage'), messageSends: [], referencedClasses: [] }), smalltalk.MessageNotUnderstood); smalltalk.addMethod( '_receiver', smalltalk.method({ selector: 'receiver', category: 'accessing', fn: function (){ var self=this; return self['@receiver']; return self;}, source: unescape('receiver%0A%09%5Ereceiver'), messageSends: [], referencedClasses: [] }), smalltalk.MessageNotUnderstood); smalltalk.addMethod( '_receiver_', smalltalk.method({ selector: 'receiver:', category: 'accessing', fn: function (anObject){ var self=this; self['@receiver']=anObject; return self;}, source: unescape('receiver%3A%20anObject%0A%09receiver%20%3A%3D%20anObject'), messageSends: [], referencedClasses: [] }), smalltalk.MessageNotUnderstood); smalltalk.addMethod( '_messageText', smalltalk.method({ selector: 'messageText', category: 'accessing', fn: function (){ var self=this; return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_asString", []), "__comma", [unescape("%20does%20not%20understand%20%23")]), "__comma", [smalltalk.send(smalltalk.send(self, "_message", []), "_selector", [])]); return self;}, source: unescape('messageText%0A%09%5Eself%20receiver%20asString%2C%20%27%20does%20not%20understand%20%23%27%2C%20self%20message%20selector'), messageSends: [unescape("%2C"), "asString", "receiver", "selector", "message"], referencedClasses: [] }), smalltalk.MessageNotUnderstood); smalltalk.addClass('ErrorHandler', smalltalk.Object, [], 'Kernel'); smalltalk.addMethod( '_handleError_', smalltalk.method({ selector: 'handleError:', category: 'error handling', fn: function (anError){ var self=this; smalltalk.send(smalltalk.send(anError, "_context", []), "_ifNotNil_", [(function(){return smalltalk.send(self, "_logErrorContext_", [smalltalk.send(anError, "_context", [])]);})]); smalltalk.send(self, "_logError_", [anError]); return self;}, source: unescape('handleError%3A%20anError%0A%09anError%20context%20ifNotNil%3A%20%5Bself%20logErrorContext%3A%20anError%20context%5D.%0A%09self%20logError%3A%20anError'), messageSends: ["ifNotNil:", "context", "logErrorContext:", "logError:"], referencedClasses: [] }), smalltalk.ErrorHandler); smalltalk.addMethod( '_logContext_', smalltalk.method({ selector: 'logContext:', category: 'private', fn: function (aContext){ var self=this; smalltalk.send(smalltalk.send(aContext, "_home", []), "_ifNotNil_", [(function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})]); smalltalk.send(self, "_log_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aContext, "_receiver", []), "_asString", []), "__comma", [unescape("%3E%3E")]), "__comma", [smalltalk.send(aContext, "_selector", [])])]); return self;}, source: unescape('logContext%3A%20aContext%0A%09aContext%20home%20ifNotNil%3A%20%5B%0A%09%09self%20logContext%3A%20aContext%20home%5D.%0A%09self%20log%3A%20aContext%20receiver%20asString%2C%20%27%3E%3E%27%2C%20aContext%20selector'), messageSends: ["ifNotNil:", "home", "logContext:", "log:", unescape("%2C"), "asString", "receiver", "selector"], referencedClasses: [] }), smalltalk.ErrorHandler); smalltalk.addMethod( '_logErrorContext_', smalltalk.method({ selector: 'logErrorContext:', category: 'private', fn: function (aContext){ var self=this; smalltalk.send(aContext, "_ifNotNil_", [(function(){return smalltalk.send(smalltalk.send(aContext, "_home", []), "_ifNotNil_", [(function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})]);})]); return self;}, source: unescape('logErrorContext%3A%20aContext%0A%09aContext%20ifNotNil%3A%20%5B%0A%09%09aContext%20home%20ifNotNil%3A%20%5B%0A%09%09%09self%20logContext%3A%20aContext%20home%5D%5D'), messageSends: ["ifNotNil:", "home", "logContext:"], referencedClasses: [] }), smalltalk.ErrorHandler); smalltalk.addMethod( '_logError_', smalltalk.method({ selector: 'logError:', category: 'private', fn: function (anError){ var self=this; smalltalk.send(self, "_log_", [smalltalk.send(anError, "_messageText", [])]); return self;}, source: unescape('logError%3A%20anError%0A%09self%20log%3A%20anError%20messageText'), messageSends: ["log:", "messageText"], referencedClasses: [] }), smalltalk.ErrorHandler); smalltalk.addMethod( '_log_', smalltalk.method({ selector: 'log:', category: 'private', fn: function (aString){ var self=this; smalltalk.send(console, "_log_", [aString]); return self;}, source: unescape('log%3A%20aString%0A%09console%20log%3A%20aString'), messageSends: ["log:"], referencedClasses: [] }), smalltalk.ErrorHandler); smalltalk.ErrorHandler.klass.iVarNames = ['current']; smalltalk.addMethod( '_current', smalltalk.method({ selector: 'current', category: 'accessing', fn: function (){ var self=this; return self['@current']; return self;}, source: unescape('current%0A%09%5Ecurrent'), messageSends: [], referencedClasses: [] }), smalltalk.ErrorHandler.klass); smalltalk.addMethod( '_initialize', smalltalk.method({ selector: 'initialize', category: 'initialization', fn: function (){ var self=this; smalltalk.send(self, "_register", []); return self;}, source: unescape('initialize%0A%09self%20register'), messageSends: ["register"], referencedClasses: [] }), smalltalk.ErrorHandler.klass); smalltalk.addMethod( '_register', smalltalk.method({ selector: 'register', category: 'initialization', fn: function (){ var self=this; smalltalk.send(smalltalk.ErrorHandler, "_setCurrent_", [smalltalk.send(self, "_new", [])]); return self;}, source: unescape('register%0A%09ErrorHandler%20setCurrent%3A%20self%20new'), messageSends: ["setCurrent:", "new"], referencedClasses: [smalltalk.ErrorHandler] }), smalltalk.ErrorHandler.klass); smalltalk.addMethod( '_setCurrent_', smalltalk.method({ selector: 'setCurrent:', category: 'accessing', fn: function (anHandler){ var self=this; self['@current']=anHandler; return self;}, source: unescape('setCurrent%3A%20anHandler%0A%09current%20%3A%3D%20anHandler'), messageSends: [], referencedClasses: [] }), smalltalk.ErrorHandler.klass);