|  | @@ -5388,13 +5388,13 @@ fn: function (anObject,anotherObject){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  return smalltalk.withContext(function($ctx1) { 
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  | -		if (anotherObject.store[anObject]) { return false; }
 | 
	
		
			
				|  |  | +		if (anObject in anotherObject.store) { return false; }
 | 
	
		
			
				|  |  |  		self['@size']++;
 | 
	
		
			
				|  |  |  		return anotherObject.store[anObject] = true;
 | 
	
		
			
				|  |  |  	;
 | 
	
		
			
				|  |  |  return self}, function($ctx1) {$ctx1.fill(self,"add:in:",{anObject:anObject,anotherObject:anotherObject},smalltalk.Set)})},
 | 
	
		
			
				|  |  |  args: ["anObject", "anotherObject"],
 | 
	
		
			
				|  |  | -source: "add: anObject in: anotherObject\x0a\x09<\x0a\x09\x09if (anotherObject.store[anObject]) { return false; }\x0a\x09\x09self['@size']++;\x0a\x09\x09return anotherObject.store[anObject] = true;\x0a\x09>",
 | 
	
		
			
				|  |  | +source: "add: anObject in: anotherObject\x0a\x09<\x0a\x09\x09if (anObject in anotherObject.store) { return false; }\x0a\x09\x09self['@size']++;\x0a\x09\x09return anotherObject.store[anObject] = true;\x0a\x09>",
 | 
	
		
			
				|  |  |  messageSends: [],
 | 
	
		
			
				|  |  |  referencedClasses: []
 | 
	
		
			
				|  |  |  }),
 | 
	
	
		
			
				|  | @@ -5545,10 +5545,10 @@ protocol: 'private',
 | 
	
		
			
				|  |  |  fn: function (anObject,anotherObject){
 | 
	
		
			
				|  |  |  var self=this;
 | 
	
		
			
				|  |  |  return smalltalk.withContext(function($ctx1) { 
 | 
	
		
			
				|  |  | -return !!anotherObject.store[anObject];
 | 
	
		
			
				|  |  | +return anObject in anotherObject.store;
 | 
	
		
			
				|  |  |  return self}, function($ctx1) {$ctx1.fill(self,"includes:in:",{anObject:anObject,anotherObject:anotherObject},smalltalk.Set)})},
 | 
	
		
			
				|  |  |  args: ["anObject", "anotherObject"],
 | 
	
		
			
				|  |  | -source: "includes: anObject in: anotherObject\x0a\x09<return !!anotherObject.store[anObject]>",
 | 
	
		
			
				|  |  | +source: "includes: anObject in: anotherObject\x0a\x09<return anObject in anotherObject.store>",
 | 
	
		
			
				|  |  |  messageSends: [],
 | 
	
		
			
				|  |  |  referencedClasses: []
 | 
	
		
			
				|  |  |  }),
 |