| 
					
				 | 
			
			
				@@ -7,6 +7,9 @@ selector: "addCompiledMethod:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aMethod){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var oldMethod,announcement; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $MethodAdded(){return smalltalk.MethodAdded||(typeof MethodAdded=="undefined"?nil:MethodAdded)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $MethodModified(){return smalltalk.MethodModified||(typeof MethodModified=="undefined"?nil:MethodModified)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $SystemAnnouncer(){return smalltalk.SystemAnnouncer||(typeof SystemAnnouncer=="undefined"?nil:SystemAnnouncer)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1,$2,$3,$4,$5,$6; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 oldMethod=_st(_st(self)._methodDictionary())._at_ifAbsent_(_st(aMethod)._selector(),(function(){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx2) {
return nil; 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -18,18 +21,18 @@ _st(_st(self)._organization())._addElement_(_st(aMethod)._protocol()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._basicAddCompiledMethod_(aMethod); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $2=oldMethod; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 if(($receiver = $2) == nil || $receiver == undefined){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$3=_st((smalltalk.MethodAdded || MethodAdded))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$3=_st($MethodAdded())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($3)._method_(aMethod); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $4=_st($3)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 announcement=$4; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 } else { 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$5=_st((smalltalk.MethodModified || MethodModified))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$5=_st($MethodModified())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($5)._oldMethod_(oldMethod); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($5)._method_(aMethod); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $6=_st($5)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 announcement=$6; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st(_st((smalltalk.SystemAnnouncer || SystemAnnouncer))._current())._announce_(announcement); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st(_st($SystemAnnouncer())._current())._announce_(announcement); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"addCompiledMethod:",{aMethod:aMethod,oldMethod:oldMethod,announcement:announcement},smalltalk.Behavior)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["at:ifAbsent:", "selector", "methodDictionary", "ifFalse:", "addElement:", "protocol", "organization", "includes:", "protocols", "basicAddCompiledMethod:", "ifNil:ifNotNil:", "method:", "new", "yourself", "oldMethod:", "announce:", "current"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.Behavior); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -97,18 +100,20 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "allSuperclasses", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx1) { 
var $1,$3,$4,$2; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $OrderedCollection(){return smalltalk.OrderedCollection||(typeof OrderedCollection=="undefined"?nil:OrderedCollection)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx1) { 
var $1,$2,$4,$5,$3; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $1=_st(self)._superclass(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 if(($receiver = $1) == nil || $receiver == undefined){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return []; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$2=[]; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return $2; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 } else { 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $1; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$3=_st((smalltalk.OrderedCollection || OrderedCollection))._with_(_st(self)._superclass()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st($3)._addAll_(_st(_st(self)._superclass())._allSuperclasses()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$4=_st($3)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$2=$4; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return $2; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$4=_st($OrderedCollection())._with_(_st(self)._superclass()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st($4)._addAll_(_st(_st(self)._superclass())._allSuperclasses()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$5=_st($4)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$3=$5; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return $3; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx1) {$ctx1.fill(self,"allSuperclasses",{},smalltalk.Behavior)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["ifNil:", "superclass", "addAll:", "allSuperclasses", "with:", "yourself"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.Behavior); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -190,12 +195,14 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "comment:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aString){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassCommentChanged(){return smalltalk.ClassCommentChanged||(typeof ClassCommentChanged=="undefined"?nil:ClassCommentChanged)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $SystemAnnouncer(){return smalltalk.SystemAnnouncer||(typeof SystemAnnouncer=="undefined"?nil:SystemAnnouncer)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1,$2; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._basicAt_put_("comment",aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$1=_st((smalltalk.ClassCommentChanged || ClassCommentChanged))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$1=_st($ClassCommentChanged())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($1)._theClass_(self); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $2=_st($1)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st(_st((smalltalk.SystemAnnouncer || SystemAnnouncer))._current())._announce_($2); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st(_st($SystemAnnouncer())._current())._announce_($2); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"comment:",{aString:aString},smalltalk.Behavior)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["basicAt:put:", "announce:", "theClass:", "new", "yourself", "current"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.Behavior); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -206,8 +213,9 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "commentStamp", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassCommentReader(){return smalltalk.ClassCommentReader||(typeof ClassCommentReader=="undefined"?nil:ClassCommentReader)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $2,$3,$1; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$2=_st((smalltalk.ClassCommentReader || ClassCommentReader))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$2=_st($ClassCommentReader())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($2)._class_(self); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $3=_st($2)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $1=$3; 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -246,7 +254,8 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "compile:category:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aString,anotherString){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx1) { 
_st(_st((smalltalk.Compiler || Compiler))._new())._install_forClass_category_(aString,self,anotherString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $Compiler(){return smalltalk.Compiler||(typeof Compiler=="undefined"?nil:Compiler)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx1) { 
_st(_st($Compiler())._new())._install_forClass_category_(aString,self,anotherString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"compile:category:",{aString:aString,anotherString:anotherString},smalltalk.Behavior)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["install:forClass:category:", "new"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.Behavior); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -378,8 +387,9 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "methodsFor:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aString){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassCategoryReader(){return smalltalk.ClassCategoryReader||(typeof ClassCategoryReader=="undefined"?nil:ClassCategoryReader)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $2,$3,$1; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$2=_st((smalltalk.ClassCategoryReader || ClassCategoryReader))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$2=_st($ClassCategoryReader())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($2)._class_category_(self,aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $3=_st($2)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $1=$3; 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -473,10 +483,12 @@ selector: "protocolsDo:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aBlock){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var methodsByCategory; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx1) { 
methodsByCategory=_st((smalltalk.HashedCollection || HashedCollection))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $HashedCollection(){return smalltalk.HashedCollection||(typeof HashedCollection=="undefined"?nil:HashedCollection)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $Array(){return smalltalk.Array||(typeof Array=="undefined"?nil:Array)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx1) { 
methodsByCategory=_st($HashedCollection())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(_st(_st(self)._methodDictionary())._values())._do_((function(m){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx2) {
return _st(_st(methodsByCategory)._at_ifAbsentPut_(_st(m)._category(),(function(){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx3) {
return _st((smalltalk.Array || Array))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx3) {
return _st($Array())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx3) {$ctx3.fillBlock({},$ctx1)})})))._add_(m); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx2) {$ctx2.fillBlock({m:m},$ctx1)})})); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(_st(self)._protocols())._do_((function(category){ 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -503,6 +515,8 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "removeCompiledMethod:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aMethod){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $MethodRemoved(){return smalltalk.MethodRemoved||(typeof MethodRemoved=="undefined"?nil:MethodRemoved)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $SystemAnnouncer(){return smalltalk.SystemAnnouncer||(typeof SystemAnnouncer=="undefined"?nil:SystemAnnouncer)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1,$2; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._basicRemoveCompiledMethod_(aMethod); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(_st(self)._methods())._detect_ifNone_((function(each){ 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -510,10 +524,10 @@ return smalltalk.withContext(function($ctx2) {
return _st(_st(each)._protocol()) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}),(function(){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx2) {
return _st(_st(self)._organization())._removeElement_(_st(aMethod)._protocol()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})})); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$1=_st((smalltalk.MethodRemoved || MethodRemoved))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$1=_st($MethodRemoved())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($1)._method_(aMethod); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $2=_st($1)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st(_st((smalltalk.SystemAnnouncer || SystemAnnouncer))._current())._announce_($2); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st(_st($SystemAnnouncer())._current())._announce_($2); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"removeCompiledMethod:",{aMethod:aMethod},smalltalk.Behavior)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["basicRemoveCompiledMethod:", "detect:ifNone:", "=", "protocol", "removeElement:", "organization", "methods", "announce:", "method:", "new", "yourself", "current"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.Behavior); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -585,8 +599,9 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "withAllSubclasses", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $Array(){return smalltalk.Array||(typeof Array=="undefined"?nil:Array)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $2,$3,$1; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$2=_st((smalltalk.Array || Array))._with_(self); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$2=_st($Array())._with_(self); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($2)._addAll_(_st(self)._allSubclasses()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $3=_st($2)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $1=$3; 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -635,13 +650,14 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "definition", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $String(){return smalltalk.String||(typeof String=="undefined"?nil:String)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $2,$3,$4,$5,$1; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$1=_st((smalltalk.String || String))._streamContents_((function(stream){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$1=_st($String())._streamContents_((function(stream){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx2) {
$2=stream; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($2)._nextPutAll_(_st(_st(self)._superclass())._asString()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($2)._nextPutAll_(" subclass: #"); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($2)._nextPutAll_(_st(self)._name()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st($2)._nextPutAll_(_st(_st((smalltalk.String || String))._lf()).__comma(_st((smalltalk.String || String))._tab())); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st($2)._nextPutAll_(_st(_st($String())._lf()).__comma(_st($String())._tab())); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $3=_st($2)._nextPutAll_("instanceVariableNames: '"); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $3; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(_st(self)._instanceVariableNames())._do_separatedBy_((function(each){ 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -650,7 +666,7 @@ return smalltalk.withContext(function($ctx3) {
return _st(stream)._nextPutAll_(e 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx3) {
return _st(stream)._nextPutAll_(" "); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx3) {$ctx3.fillBlock({},$ctx1)})})); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $4=stream; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st($4)._nextPutAll_(_st(_st("'").__comma(_st((smalltalk.String || String))._lf())).__comma(_st((smalltalk.String || String))._tab())); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st($4)._nextPutAll_(_st(_st("'").__comma(_st($String())._lf())).__comma(_st($String())._tab())); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($4)._nextPutAll_("package: '"); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($4)._nextPutAll_(_st(self)._category()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $5=_st($4)._nextPutAll_("'"); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -711,7 +727,8 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "rename:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aString){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx1) { 
_st(_st((smalltalk.ClassBuilder || ClassBuilder))._new())._renameClass_to_(self,aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassBuilder(){return smalltalk.ClassBuilder||(typeof ClassBuilder=="undefined"?nil:ClassBuilder)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx1) { 
_st(_st($ClassBuilder())._new())._renameClass_to_(self,aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"rename:",{aString:aString},smalltalk.Class)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["renameClass:to:", "new"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.Class); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -762,8 +779,9 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "subclass:instanceVariableNames:package:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aString,aString2,aString3){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassBuilder(){return smalltalk.ClassBuilder||(typeof ClassBuilder=="undefined"?nil:ClassBuilder)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$1=_st(_st((smalltalk.ClassBuilder || ClassBuilder))._new())._superclass_subclass_instanceVariableNames_package_(self,_st(aString)._asString(),aString2,aString3); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$1=_st(_st($ClassBuilder())._new())._superclass_subclass_instanceVariableNames_package_(self,_st(aString)._asString(),aString2,aString3); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return $1; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx1) {$ctx1.fill(self,"subclass:instanceVariableNames:package:",{aString:aString,aString2:aString2,aString3:aString3},smalltalk.Class)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["superclass:subclass:instanceVariableNames:package:", "asString", "new"]}), 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -791,8 +809,9 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "definition", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $String(){return smalltalk.String||(typeof String=="undefined"?nil:String)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $2,$3,$1; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$1=_st((smalltalk.String || String))._streamContents_((function(stream){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$1=_st($String())._streamContents_((function(stream){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx2) {
$2=stream; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($2)._nextPutAll_(_st(self)._asString()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($2)._nextPutAll_(" class "); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -827,7 +846,8 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "instanceVariableNames:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aCollection){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx1) { 
_st(_st((smalltalk.ClassBuilder || ClassBuilder))._new())._class_instanceVariableNames_(self,aCollection); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassBuilder(){return smalltalk.ClassBuilder||(typeof ClassBuilder=="undefined"?nil:ClassBuilder)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx1) { 
_st(_st($ClassBuilder())._new())._class_instanceVariableNames_(self,aCollection); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"instanceVariableNames:",{aCollection:aCollection},smalltalk.Metaclass)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["class:instanceVariableNames:", "new"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.Metaclass); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -893,8 +913,9 @@ selector: "addSubclassOf:named:instanceVariableNames:package:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aClass,aString,aCollection,packageName){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var theClass; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1,$2,$3,$4; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-theClass=_st(_st((smalltalk.Smalltalk || Smalltalk))._current())._at_(aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+theClass=_st(_st($Smalltalk())._current())._at_(aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $1=theClass; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 if(($receiver = $1) == nil || $receiver == undefined){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $1; 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -999,13 +1020,15 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "class:instanceVariableNames:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aClass,aString){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassDefinitionChanged(){return smalltalk.ClassDefinitionChanged||(typeof ClassDefinitionChanged=="undefined"?nil:ClassDefinitionChanged)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $SystemAnnouncer(){return smalltalk.SystemAnnouncer||(typeof SystemAnnouncer=="undefined"?nil:SystemAnnouncer)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1,$2; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._basicClass_instanceVariableNames_(aClass,aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._setupClass_(aClass); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$1=_st((smalltalk.ClassDefinitionChanged || ClassDefinitionChanged))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$1=_st($ClassDefinitionChanged())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($1)._theClass_(aClass); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $2=_st($1)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st(_st((smalltalk.SystemAnnouncer || SystemAnnouncer))._current())._announce_($2); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st(_st($SystemAnnouncer())._current())._announce_($2); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"class:instanceVariableNames:",{aClass:aClass,aString:aString},smalltalk.ClassBuilder)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["basicClass:instanceVariableNames:", "setupClass:", "announce:", "theClass:", "new", "yourself", "current"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.ClassBuilder); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1032,13 +1055,14 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "copyClass:to:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aClass,anotherClass){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $Compiler(){return smalltalk.Compiler||(typeof Compiler=="undefined"?nil:Compiler)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
_st(anotherClass)._comment_(_st(aClass)._comment()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(_st(_st(aClass)._methodDictionary())._values())._do_((function(each){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx2) {
return _st(_st((smalltalk.Compiler || Compiler))._new())._install_forClass_category_(_st(each)._source(),anotherClass,_st(each)._category()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx2) {
return _st(_st($Compiler())._new())._install_forClass_category_(_st(each)._source(),anotherClass,_st(each)._category()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})})); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._basicClass_instanceVariables_(_st(anotherClass)._class(),_st(_st(aClass)._class())._instanceVariableNames()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(_st(_st(_st(aClass)._class())._methodDictionary())._values())._do_((function(each){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx2) {
return _st(_st((smalltalk.Compiler || Compiler))._new())._install_forClass_category_(_st(each)._source(),_st(anotherClass)._class(),_st(each)._category()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx2) {
return _st(_st($Compiler())._new())._install_forClass_category_(_st(each)._source(),_st(anotherClass)._class(),_st(each)._category()); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})})); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._setupClass_(anotherClass); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"copyClass:to:",{aClass:aClass,anotherClass:anotherClass},smalltalk.ClassBuilder)})}, 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1095,14 +1119,16 @@ selector: "migrateClassNamed:superclass:instanceVariableNames:package:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aString,aClass,aCollection,packageName){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var oldClass,newClass,tmp; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $Smalltalk(){return smalltalk.Smalltalk||(typeof Smalltalk=="undefined"?nil:Smalltalk)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $Error(){return smalltalk.Error||(typeof Error=="undefined"?nil:Error)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1,$2,$3,$4,$5; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 tmp=_st("new*").__comma(aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-oldClass=_st(_st((smalltalk.Smalltalk || Smalltalk))._current())._at_(aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+oldClass=_st(_st($Smalltalk())._current())._at_(aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 newClass=_st(self)._addSubclassOf_named_instanceVariableNames_package_(aClass,tmp,aCollection,packageName); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._basicSwapClassNames_with_(oldClass,newClass); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st((function(){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx2) {
return _st(self)._copyClass_to_(oldClass,newClass); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-}, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}))._on_do_((smalltalk.Error || Error),(function(exception){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+}, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}))._on_do_($Error(),(function(exception){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx2) {
$1=self; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($1)._basicSwapClassNames_with_(oldClass,newClass); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $2=_st($1)._basicRemoveClass_(newClass); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1141,12 +1167,14 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "renameClass:to:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aClass,aString){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassRenamed(){return smalltalk.ClassRenamed||(typeof ClassRenamed=="undefined"?nil:ClassRenamed)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $SystemAnnouncer(){return smalltalk.SystemAnnouncer||(typeof SystemAnnouncer=="undefined"?nil:SystemAnnouncer)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1,$2; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._basicRenameClass_to_(aClass,aString); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$1=_st((smalltalk.ClassRenamed || ClassRenamed))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$1=_st($ClassRenamed())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($1)._theClass_(aClass); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $2=_st($1)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st(_st((smalltalk.SystemAnnouncer || SystemAnnouncer))._current())._announce_($2); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st(_st($SystemAnnouncer())._current())._announce_($2); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"renameClass:to:",{aClass:aClass,aString:aString},smalltalk.ClassBuilder)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["basicRenameClass:to:", "announce:", "theClass:", "new", "yourself", "current"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.ClassBuilder); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1182,6 +1210,8 @@ selector: "superclass:subclass:instanceVariableNames:package:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aClass,aString,aString2,aString3){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var newClass; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassAdded(){return smalltalk.ClassAdded||(typeof ClassAdded=="undefined"?nil:ClassAdded)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $SystemAnnouncer(){return smalltalk.SystemAnnouncer||(typeof SystemAnnouncer=="undefined"?nil:SystemAnnouncer)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1,$2,$3,$4,$6,$5,$7,$8,$9; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $1=self; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $2=aClass; 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1195,10 +1225,10 @@ $5=$6; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 newClass=_st($1)._addSubclassOf_named_instanceVariableNames_package_($2,$3,$4,$5); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st(self)._setupClass_(newClass); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-$7=_st((smalltalk.ClassAdded || ClassAdded))._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+$7=_st($ClassAdded())._new(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 _st($7)._theClass_(newClass); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $8=_st($7)._yourself(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st(_st((smalltalk.SystemAnnouncer || SystemAnnouncer))._current())._announce_($8); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st(_st($SystemAnnouncer())._current())._announce_($8); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 $9=newClass; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return $9; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx1) {$ctx1.fill(self,"superclass:subclass:instanceVariableNames:package:",{aClass:aClass,aString:aString,aString2:aString2,aString3:aString3,newClass:newClass},smalltalk.ClassBuilder)})}, 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1226,7 +1256,8 @@ smalltalk.method({ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 selector: "compileMethod:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aString){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx1) { 
_st(_st((smalltalk.Compiler || Compiler))._new())._install_forClass_category_(aString,self["@class"],self["@category"]); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $Compiler(){return smalltalk.Compiler||(typeof Compiler=="undefined"?nil:Compiler)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx1) { 
_st(_st($Compiler())._new())._install_forClass_category_(aString,self["@class"],self["@category"]); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"compileMethod:",{aString:aString},smalltalk.ClassCategoryReader)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["install:forClass:category:", "new"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.ClassCategoryReader); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1249,6 +1280,7 @@ selector: "scanFrom:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aChunkParser){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var chunk; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassBuilder(){return smalltalk.ClassBuilder||(typeof ClassBuilder=="undefined"?nil:ClassBuilder)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
_st((function(){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx2) {
chunk=_st(aChunkParser)._nextChunk(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 chunk; 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1256,7 +1288,7 @@ return _st(chunk)._isEmpty(); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}))._whileFalse_((function(){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx2) {
return _st(self)._compileMethod_(chunk); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx2) {$ctx2.fillBlock({},$ctx1)})})); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-_st(_st((smalltalk.ClassBuilder || ClassBuilder))._new())._setupClass_(self["@class"]); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+_st(_st($ClassBuilder())._new())._setupClass_(self["@class"]); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"scanFrom:",{aChunkParser:aChunkParser,chunk:chunk},smalltalk.ClassCategoryReader)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["whileFalse:", "compileMethod:", "nextChunk", "isEmpty", "setupClass:", "new"]}), 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 smalltalk.ClassCategoryReader); 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1324,6 +1356,7 @@ selector: "getNodesFrom:", 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 fn: function (aCollection){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var self=this; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 var children,others; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+function $ClassSorterNode(){return smalltalk.ClassSorterNode||(typeof ClassSorterNode=="undefined"?nil:ClassSorterNode)} 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return smalltalk.withContext(function($ctx1) { 
var $1; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 children=[]; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 others=[]; 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -1336,7 +1369,7 @@ return _st(others)._add_(each); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }; 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})})); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 self["@nodes"]=_st(children)._collect_((function(each){ 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-return smalltalk.withContext(function($ctx2) {
return _st((smalltalk.ClassSorterNode || ClassSorterNode))._on_classes_level_(each,others,_st(_st(self)._level()).__plus((1))); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+return smalltalk.withContext(function($ctx2) {
return _st($ClassSorterNode())._on_classes_level_(each,others,_st(_st(self)._level()).__plus((1))); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})})); 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 return self}, function($ctx1) {$ctx1.fill(self,"getNodesFrom:",{aCollection:aCollection,children:children,others:others},smalltalk.ClassSorterNode)})}, 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 messageSends: ["do:", "ifTrue:ifFalse:", "add:", "=", "theClass", "superclass", "collect:", "on:classes:level:", "+", "level"]}), 
			 |