|  | @@ -88,7 +88,7 @@ category: 'accessing',
 | 
	
		
			
				|  |  |  fn: function (){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var result=nil;
 | 
	
		
			
				|  |  | -(result=smalltalk.send(self, "_subclasses", []));
 | 
	
		
			
				|  |  | +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;},
 | 
	
	
		
			
				|  | @@ -138,7 +138,7 @@ selector: unescape('methodDictionary'),
 | 
	
		
			
				|  |  |  category: 'accessing',
 | 
	
		
			
				|  |  |  fn: function (){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  | -var dict = smalltalk.Dictionary._new();
 | 
	
		
			
				|  |  | +var dict = smalltalk.HashedCollection._new();
 | 
	
		
			
				|  |  |  	var methods = self.fn.prototype.methods;
 | 
	
		
			
				|  |  |  	for(var i in methods) {
 | 
	
		
			
				|  |  |  		if(methods[i].selector) {
 | 
	
	
		
			
				|  | @@ -148,7 +148,7 @@ var dict = smalltalk.Dictionary._new();
 | 
	
		
			
				|  |  |  	return dict;
 | 
	
		
			
				|  |  |  return self;},
 | 
	
		
			
				|  |  |  args: [],
 | 
	
		
			
				|  |  | -source: unescape('methodDictionary%0A%09%3Cvar%20dict%20%3D%20smalltalk.Dictionary._new%28%29%3B%0A%09var%20methods%20%3D%20self.fn.prototype.methods%3B%0A%09for%28var%20i%20in%20methods%29%20%7B%0A%09%09if%28methods%5Bi%5D.selector%29%20%7B%0A%09%09%09dict._at_put_%28methods%5Bi%5D.selector%2C%20methods%5Bi%5D%29%3B%0A%09%09%7D%0A%09%7D%3B%0A%09return%20dict%3E'),
 | 
	
		
			
				|  |  | +source: unescape('methodDictionary%0A%09%3Cvar%20dict%20%3D%20smalltalk.HashedCollection._new%28%29%3B%0A%09var%20methods%20%3D%20self.fn.prototype.methods%3B%0A%09for%28var%20i%20in%20methods%29%20%7B%0A%09%09if%28methods%5Bi%5D.selector%29%20%7B%0A%09%09%09dict._at_put_%28methods%5Bi%5D.selector%2C%20methods%5Bi%5D%29%3B%0A%09%09%7D%0A%09%7D%3B%0A%09return%20dict%3E'),
 | 
	
		
			
				|  |  |  messageSends: [],
 | 
	
		
			
				|  |  |  referencedClasses: []
 | 
	
		
			
				|  |  |  }),
 | 
	
	
		
			
				|  | @@ -292,7 +292,7 @@ category: 'accessing',
 | 
	
		
			
				|  |  |  fn: function (){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var protocols=nil;
 | 
	
		
			
				|  |  | -(protocols=smalltalk.send((smalltalk.Array || Array), "_new", []));
 | 
	
		
			
				|  |  | +protocols=smalltalk.send((smalltalk.Array || Array), "_new", []);
 | 
	
		
			
				|  |  |  smalltalk.send(smalltalk.send(self, "_methodDictionary", []), "_do_", [(function(each){return ((($receiver = smalltalk.send(protocols, "_includes_", [smalltalk.send(each, "_category", [])])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(protocols, "_add_", [smalltalk.send(each, "_category", [])]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(protocols, "_add_", [smalltalk.send(each, "_category", [])]);})]));})]);
 | 
	
		
			
				|  |  |  return smalltalk.send(protocols, "_sort", []);
 | 
	
		
			
				|  |  |  return self;},
 | 
	
	
		
			
				|  | @@ -311,7 +311,7 @@ category: 'accessing',
 | 
	
		
			
				|  |  |  fn: function (aBlock){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var methodsByCategory=nil;
 | 
	
		
			
				|  |  | -(methodsByCategory=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []));
 | 
	
		
			
				|  |  | +methodsByCategory=smalltalk.send((smalltalk.Dictionary || Dictionary), "_new", []);
 | 
	
		
			
				|  |  |  smalltalk.send(smalltalk.send(smalltalk.send(self, "_methodDictionary", []), "_values", []), "_do_", [(function(m){return smalltalk.send(smalltalk.send(methodsByCategory, "_at_ifAbsentPut_", [smalltalk.send(m, "_category", []), (function(){return smalltalk.send((smalltalk.Array || Array), "_new", []);})]), "_add_", [m]);})]);
 | 
	
		
			
				|  |  |  smalltalk.send(smalltalk.send(self, "_protocols", []), "_do_", [(function(category){return smalltalk.send(aBlock, "_value_value_", [category, smalltalk.send(methodsByCategory, "_at_", [category])]);})]);
 | 
	
		
			
				|  |  |  return self;},
 | 
	
	
		
			
				|  | @@ -330,7 +330,7 @@ category: 'accessing',
 | 
	
		
			
				|  |  |  fn: function (){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var result=nil;
 | 
	
		
			
				|  |  | -(result=smalltalk.send(smalltalk.send(self, "_instanceVariableNames", []), "_copy", []));
 | 
	
		
			
				|  |  | +result=smalltalk.send(smalltalk.send(self, "_instanceVariableNames", []), "_copy", []);
 | 
	
		
			
				|  |  |  (($receiver = smalltalk.send(self, "_superclass", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(result, "_addAll_", [smalltalk.send(smalltalk.send(self, "_superclass", []), "_allInstanceVariableNames", [])]);})() : nil;
 | 
	
		
			
				|  |  |  return result;
 | 
	
		
			
				|  |  |  return self;},
 | 
	
	
		
			
				|  | @@ -413,7 +413,7 @@ category: 'compiling',
 | 
	
		
			
				|  |  |  fn: function (aString, anotherString){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var method=nil;
 | 
	
		
			
				|  |  | -(method=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [aString, self]));
 | 
	
		
			
				|  |  | +method=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [aString, self]);
 | 
	
		
			
				|  |  |  smalltalk.send(method, "_category_", [anotherString]);
 | 
	
		
			
				|  |  |  smalltalk.send(self, "_addCompiledMethod_", [method]);
 | 
	
		
			
				|  |  |  return self;},
 | 
	
	
		
			
				|  | @@ -753,7 +753,7 @@ category: 'class creation',
 | 
	
		
			
				|  |  |  fn: function (aClass, aString, aString2, aString3){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var newClass=nil;
 | 
	
		
			
				|  |  | -(newClass=smalltalk.send(self, "_addSubclassOf_named_instanceVariableNames_package_", [aClass, aString, smalltalk.send(self, "_instanceVariableNamesFor_", [aString2]), (($receiver = aString3) == nil || $receiver == undefined) ? (function(){return "unclassified";})() : $receiver]));
 | 
	
		
			
				|  |  | +newClass=smalltalk.send(self, "_addSubclassOf_named_instanceVariableNames_package_", [aClass, aString, smalltalk.send(self, "_instanceVariableNamesFor_", [aString2]), (($receiver = aString3) == nil || $receiver == undefined) ? (function(){return "unclassified";})() : $receiver]);
 | 
	
		
			
				|  |  |  smalltalk.send(self, "_setupClass_", [newClass]);
 | 
	
		
			
				|  |  |  return newClass;
 | 
	
		
			
				|  |  |  return self;},
 | 
	
	
		
			
				|  | @@ -789,7 +789,7 @@ category: 'private',
 | 
	
		
			
				|  |  |  fn: function (aClass, aString){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var newClass=nil;
 | 
	
		
			
				|  |  | -(newClass=smalltalk.send(self, "_addSubclassOf_named_instanceVariableNames_package_", [smalltalk.send(aClass, "_superclass", []), aString, smalltalk.send(aClass, "_instanceVariableNames", []), smalltalk.send(smalltalk.send(aClass, "_package", []), "_name", [])]));
 | 
	
		
			
				|  |  | +newClass=smalltalk.send(self, "_addSubclassOf_named_instanceVariableNames_package_", [smalltalk.send(aClass, "_superclass", []), aString, smalltalk.send(aClass, "_instanceVariableNames", []), smalltalk.send(smalltalk.send(aClass, "_package", []), "_name", [])]);
 | 
	
		
			
				|  |  |  smalltalk.send(self, "_setupClass_", [newClass]);
 | 
	
		
			
				|  |  |  smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_methodDictionary", []), "_values", []), "_do_", [(function(each){smalltalk.send(newClass, "_addCompiledMethod_", [smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [smalltalk.send(each, "_source", []), newClass])]);return smalltalk.send(smalltalk.send(smalltalk.send(newClass, "_methodDictionary", []), "_at_", [smalltalk.send(each, "_selector", [])]), "_category_", [smalltalk.send(each, "_category", [])]);})]);
 | 
	
		
			
				|  |  |  smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aClass, "_class", []), "_methodDictionary", []), "_values", []), "_do_", [(function(each){smalltalk.send(smalltalk.send(newClass, "_class", []), "_addCompiledMethod_", [smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [smalltalk.send(each, "_source", []), smalltalk.send(newClass, "_class", [])])]);return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(newClass, "_class", []), "_methodDictionary", []), "_at_", [smalltalk.send(each, "_selector", [])]), "_category_", [smalltalk.send(each, "_category", [])]);})]);
 | 
	
	
		
			
				|  | @@ -814,7 +814,7 @@ category: 'initialization',
 | 
	
		
			
				|  |  |  fn: function (){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  smalltalk.send(self, "_initialize", [], smalltalk.Object);
 | 
	
		
			
				|  |  | -(self['@chunkParser']=smalltalk.send((smalltalk.ChunkParser || ChunkParser), "_new", []));
 | 
	
		
			
				|  |  | +self['@chunkParser']=smalltalk.send((smalltalk.ChunkParser || ChunkParser), "_new", []);
 | 
	
		
			
				|  |  |  return self;},
 | 
	
		
			
				|  |  |  args: [],
 | 
	
		
			
				|  |  |  source: unescape('initialize%0A%09super%20initialize.%0A%09chunkParser%20%3A%3D%20ChunkParser%20new.'),
 | 
	
	
		
			
				|  | @@ -830,8 +830,8 @@ selector: unescape('class%3Acategory%3A'),
 | 
	
		
			
				|  |  |  category: 'accessing',
 | 
	
		
			
				|  |  |  fn: function (aClass, aString){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  | -(self['@class']=aClass);
 | 
	
		
			
				|  |  | -(self['@category']=aString);
 | 
	
		
			
				|  |  | +self['@class']=aClass;
 | 
	
		
			
				|  |  | +self['@category']=aString;
 | 
	
		
			
				|  |  |  return self;},
 | 
	
		
			
				|  |  |  args: ["aClass", "aString"],
 | 
	
		
			
				|  |  |  source: unescape('class%3A%20aClass%20category%3A%20aString%0A%09class%20%3A%3D%20aClass.%0A%09category%20%3A%3D%20aString'),
 | 
	
	
		
			
				|  | @@ -848,7 +848,7 @@ category: 'fileIn',
 | 
	
		
			
				|  |  |  fn: function (aChunkParser){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var chunk=nil;
 | 
	
		
			
				|  |  | -(function(){while(!(function(){(chunk=smalltalk.send(aChunkParser, "_nextChunk", []));return smalltalk.send(chunk, "_isEmpty", []);})()) {(function(){return smalltalk.send(self, "_compileMethod_", [chunk]);})()}})();
 | 
	
		
			
				|  |  | +(function(){while(!(function(){chunk=smalltalk.send(aChunkParser, "_nextChunk", []);return smalltalk.send(chunk, "_isEmpty", []);})()) {(function(){return smalltalk.send(self, "_compileMethod_", [chunk]);})()}})();
 | 
	
		
			
				|  |  |  return self;},
 | 
	
		
			
				|  |  |  args: ["aChunkParser"],
 | 
	
		
			
				|  |  |  source: unescape('scanFrom%3A%20aChunkParser%0A%09%7C%20chunk%20%7C%0A%09%5Bchunk%20%3A%3D%20aChunkParser%20nextChunk.%0A%09chunk%20isEmpty%5D%20whileFalse%3A%20%5B%0A%09%20%20%20%20self%20compileMethod%3A%20chunk%5D'),
 | 
	
	
		
			
				|  | @@ -865,7 +865,7 @@ category: 'private',
 | 
	
		
			
				|  |  |  fn: function (aString){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var method=nil;
 | 
	
		
			
				|  |  | -(method=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [aString, self['@class']]));
 | 
	
		
			
				|  |  | +method=smalltalk.send(smalltalk.send((smalltalk.Compiler || Compiler), "_new", []), "_load_forClass_", [aString, self['@class']]);
 | 
	
		
			
				|  |  |  smalltalk.send(method, "_category_", [self['@category']]);
 | 
	
		
			
				|  |  |  smalltalk.send(self['@class'], "_addCompiledMethod_", [method]);
 | 
	
		
			
				|  |  |  return self;},
 | 
	
	
		
			
				|  | @@ -886,7 +886,7 @@ selector: unescape('class%3A'),
 | 
	
		
			
				|  |  |  category: 'accessing',
 | 
	
		
			
				|  |  |  fn: function (aClass){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  | -(self['@class']=aClass);
 | 
	
		
			
				|  |  | +self['@class']=aClass;
 | 
	
		
			
				|  |  |  return self;},
 | 
	
		
			
				|  |  |  args: ["aClass"],
 | 
	
		
			
				|  |  |  source: unescape('class%3A%20aClass%0A%09class%20%3A%3D%20aClass'),
 | 
	
	
		
			
				|  | @@ -903,7 +903,7 @@ category: 'fileIn',
 | 
	
		
			
				|  |  |  fn: function (aChunkParser){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  var chunk=nil;
 | 
	
		
			
				|  |  | -(chunk=smalltalk.send(aChunkParser, "_nextChunk", []));
 | 
	
		
			
				|  |  | +chunk=smalltalk.send(aChunkParser, "_nextChunk", []);
 | 
	
		
			
				|  |  |  ((($receiver = smalltalk.send(chunk, "_isEmpty", [])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return smalltalk.send(self, "_setComment_", [chunk]);})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return smalltalk.send(self, "_setComment_", [chunk]);})]));
 | 
	
		
			
				|  |  |  return self;},
 | 
	
		
			
				|  |  |  args: ["aChunkParser"],
 | 
	
	
		
			
				|  | @@ -921,7 +921,7 @@ category: 'initialization',
 | 
	
		
			
				|  |  |  fn: function (){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  smalltalk.send(self, "_initialize", [], smalltalk.Object);
 | 
	
		
			
				|  |  | -(self['@chunkParser']=smalltalk.send((smalltalk.ChunkParser || ChunkParser), "_new", []));
 | 
	
		
			
				|  |  | +self['@chunkParser']=smalltalk.send((smalltalk.ChunkParser || ChunkParser), "_new", []);
 | 
	
		
			
				|  |  |  return self;},
 | 
	
		
			
				|  |  |  args: [],
 | 
	
		
			
				|  |  |  source: unescape('initialize%0A%09super%20initialize.%0A%09chunkParser%20%3A%3D%20ChunkParser%20new.'),
 |