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

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

Name: Tests-fbs.265
Author: fbs
Time: 23 November 2013, 8:51:58.613 pm
UUID: 13704942-9b36-4c42-bc86-ff31474efd16
Ancestors: Tests-fbs.264

CI-friendly error messages to help try fix some failing tests.

=============== Diff against Tests-fbs.264 ===============

Item was changed:
  ----- Method: FileDirectoryTest>>testDirectoryNicknames (in category 'existence tests') -----
  testDirectoryNicknames
  
  	| defaultDirectory |
  	defaultDirectory := FileDirectory default.
  	#('/.' '/../../.' '/././.') 
  		collect: [ :each | each copyReplaceAll: '/' with: FileDirectory slash ]
  		thenDo: [:each |
+ 			self assert: (defaultDirectory directoryExists: defaultDirectory fullName, each) description: 'Nickname of "', each, '"'. ]!
- 			self assert: (defaultDirectory directoryExists: defaultDirectory fullName, each) ]!

Item was changed:
  ----- Method: LocaleTest>>testLocaleChanged (in category 'testing') -----
  testLocaleChanged
  	"self debug: #testLocaleChanged"
  	"LanguageEnvironment >> startUp is called from Prject >> localeChanged"
  	<timeout: 60> "takes quite a while"
  	Project current updateLocaleDependents.
+ 	self assert: (ActiveHand instVarNamed: 'keyboardInterpreter') isNil description: 'non-nil keyboardInterpreter'.
+ 	self assert: (Clipboard default instVarNamed: 'interpreter') isNil description: 'non-nil interpreter'.
- 	self assert: (ActiveHand instVarNamed: 'keyboardInterpreter') isNil.
- 	self assert: (Clipboard default instVarNamed: 'interpreter') isNil.
  	Locale switchToID: (LocaleID isoLanguage: 'ja').
+ 	self assert: 'ja' equals: Locale current localeID.
- 	self assert: Preferences useFormsInPaintBox.
  	Locale switchToID: (LocaleID isoLanguage: 'en').
+ 	self assert: 'en' equals: Locale current localeID.!
- 	self assert: Preferences useFormsInPaintBox not.
- !

Item was changed:
  ----- Method: TestValueWithinFix>>testValueWithinTimingRepeat (in category 'tests') -----
  testValueWithinTimingRepeat
  	"Test timing of valueWithin:onTimeout:"
  	| time |
  	time := [
  		3 timesRepeat: [
  			[500 milliSeconds asDelay wait]
  				valueWithin: 100 milliSeconds onTimeout: []]
  	] durationToRun.
+ 
+ 	self assert: time < 350 milliSeconds description: 'Took ' + time printString.!
- 	self assert: time < 350 milliSeconds.
- !