[squeak-dev] The Trunk: KernelTests-fbs.251.mcz

commits at source.squeak.org commits at source.squeak.org
Sat May 18 22:23:35 UTC 2013


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

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

Name: KernelTests-fbs.251
Author: fbs
Time: 18 May 2013, 11:23:10.344 pm
UUID: 8da479f4-14bd-464d-ba9a-8207f2c04200
Ancestors: KernelTests-dtl.250

Make meaningful error messages.

Cool kids categorise conscientiously.

=============== Diff against KernelTests-dtl.250 ===============

Item was changed:
+ ----- Method: CompiledMethodTest>>expectedFailures (in category 'testing') -----
- ----- Method: CompiledMethodTest>>expectedFailures (in category 'as yet unclassified') -----
  expectedFailures
  
  	Smalltalk isRunningCog ifTrue: [ ^super expectedFailures ].
  	^#(
  		"The following two are not supported by the interpreter VM. See their comments for details"
  		testPerformCanExecutelongMethodWithTemps
  		testPerformInSuperclassCanExecutelongMethodWithTemps
  	)!

Item was changed:
  ----- Method: CompiledMethodTest>>testMethodClass (in category 'tests - accessing') -----
  testMethodClass
  	| method cls |
  	method := self class >> #returnTrue.
+ 	self assert: #returnTrue equals: method selector.
- 	self assert: method selector = #returnTrue.
  	"now make an orphaned method by just deleting the class.
  	old: #unknown
+ 	new semantics: return Obsolete class"
- 	new semantics: return Absolete class"
  	Smalltalk removeClassNamed: #TUTU.
  	cls := Object
  				subclass: #TUTU
  				instanceVariableNames: ''
  				classVariableNames: ''
  				poolDictionaries: ''
  				category: 'KernelTests-Methods'.
  	cls compile: 'foo ^ 10'.
  	method := cls >> #foo.
  	Smalltalk removeClassNamed: #TUTU.
+ 	self assert: cls equals: method methodClass description: 'methodClass after class removal'.!
- 	self assert: method methodClass = cls!



More information about the Squeak-dev mailing list