Frank Shearar uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-fbs.180.mcz

==================== Summary ====================

Name: Tests-fbs.180
Author: fbs
Time: 2 January 2013, 11:53:05.464 am
UUID: 92a01e46-c207-431d-9433-5dbd5c9fc712
Ancestors: Tests-fbs.179

This does _not_ fix the failing test. I'm renaming in a separate commit so that the actual fix is apparent (when someone does so).

=============== Diff against Tests-fbs.179 ===============

Item was added:
+ ----- Method: ClassRemovalTest>>testClassRemovalAndRecompilationWontCreateDuplicateVariableBindings (in category 'tests') -----
+ testClassRemovalAndRecompilationWontCreateDuplicateVariableBindings
+ 
+ 	self 
+ 		assert: isClean
+ 		description: 'The system category or the classes about to be created already exist.'.
+ 	"Create a class"	
+ 	Object subclass: self className1
+ 		instanceVariableNames: ''
+ 		classVariableNames: ''
+ 		poolDictionaries: ''
+ 		category: self systemCategoryName.
+ 	"Create another"
+ 	Object subclass: self className2
+ 		instanceVariableNames: ''
+ 		classVariableNames: ''
+ 		poolDictionaries: ''
+ 		category: self systemCategoryName.
+ 	"Compile a method in the second which references the first"
+ 	(Smalltalk at: self className2)
+ 		compile: 'foo ^', self className1
+ 		classified: 'accessing'.
+ 	"Remove the first class"
+ 	(Smalltalk at: self className1) removeFromSystem.
+ 	"Compile the first class again"
+ 	Object subclass: self className1
+ 		instanceVariableNames: ''
+ 		classVariableNames: ''
+ 		poolDictionaries: ''
+ 		category: self systemCategoryName.
+ 	self
+ 		deny: (Smalltalk at: self className2) new foo isObsolete
+ 		description: '#foo refers to an obsolete class'.
+ 	self
+ 		assert: (Smalltalk at: self className1) ==
+ 			(Smalltalk at: self className2) new foo
+ 		description: '#foo refers to a different class'!

Item was removed:
- ----- Method: ClassRemovalTest>>testClassRemovalAndRecompilcationWontCreateDuplicateVariableBindings (in category 'tests') -----
- testClassRemovalAndRecompilcationWontCreateDuplicateVariableBindings
- 
- 	self 
- 		assert: isClean
- 		description: 'The system category or the classes about to be created already exist.'.
- 	"Create a class"	
- 	Object subclass: self className1
- 		instanceVariableNames: ''
- 		classVariableNames: ''
- 		poolDictionaries: ''
- 		category: self systemCategoryName.
- 	"Create another"
- 	Object subclass: self className2
- 		instanceVariableNames: ''
- 		classVariableNames: ''
- 		poolDictionaries: ''
- 		category: self systemCategoryName.
- 	"Compile a method in the second which references the first"
- 	(Smalltalk at: self className2)
- 		compile: 'foo ^', self className1
- 		classified: 'accessing'.
- 	"Remove the first class"
- 	(Smalltalk at: self className1) removeFromSystem.
- 	"Compile the first class again"
- 	Object subclass: self className1
- 		instanceVariableNames: ''
- 		classVariableNames: ''
- 		poolDictionaries: ''
- 		category: self systemCategoryName.
- 	self
- 		deny: (Smalltalk at: self className2) new foo isObsolete
- 		description: '#foo refers to an obsolete class'.
- 	self
- 		assert: (Smalltalk at: self className1) ==
- 			(Smalltalk at: self className2) new foo
- 		description: '#foo refers to a different class'!