[Pkg] The Trunk: Tests-nice.44.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Jan 16 19:54:07 UTC 2010

Nicolas Cellier uploaded a new version of Tests to project The Trunk:

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

Name: Tests-nice.44
Author: nice
Time: 16 January 2010, 8:53:56.027 pm
UUID: 496851c3-9896-49ae-b9f4-6a005284e26c
Ancestors: Tests-ul.43

Fast up a test with selectorsAndMethodsDo:

=============== Diff against Tests-ul.43 ===============

Item was changed:
  ----- Method: DecompilerTests>>decompileClassesSelect: (in category 'utilities') -----
  decompileClassesSelect: aBlock
  	(Smalltalk classNames select: aBlock) do:
  		[:cn | | cls |
  		cls := Smalltalk at: cn.
  		Smalltalk garbageCollect.
  		 Transcript cr; show: cn.
+ 		 cls selectorsAndMethodsDo:
+ 			[:selector :meth |
- 		 cls selectorsDo:
- 			[:selector | | methodNode oldMethod newMethod oldCodeString newCodeString |
  			(self isFailure: cls sel: selector) ifFalse:
  				[" to help making progress
  						isStoredProblems: cls theNonMetaClass
  						sel: selector
  						meta: cls isMeta)
  					ifFalse: [ "
  				Transcript nextPut: $.; flush.
+ 				self checkDecompileMethod: meth]]]!
- 				self checkDecompileMethod: (cls compiledMethodAt: selector)]]]!

More information about the Packages mailing list