Nicolas Cellier uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-nice.299.mcz
==================== Summary ====================
Name: Tests-nice.299 Author: nice Time: 29 May 2014, 7:40:08.496 am UUID: 638a5f11-86a1-4dc6-a72d-9b4750f3a22e Ancestors: Tests-nice.298
No use to test isDoIt in the selectors, DoIt are not installed in MethodDictionary anymore.
=============== Diff against Tests-nice.298 ===============
Item was changed: ----- Method: PCCByCompilation>>methodsWithDisabledCall (in category 'ui querying') ----- methodsWithDisabledCall "Answer a SortedCollection of all the methods that contain, in source code, the substring indicating a disabled prim." "The alternative implementation ^ SystemNavigation new allMethodsWithSourceString: self disabledPrimStartString matchCase: true also searches in class comments." | list string | string := self disabledPrimStartString. list := Set new. 'Searching all method source code...' displayProgressFrom: 0 to: Smalltalk classNames size * 2 "classes with their metaclasses" during: [:bar | | classCount | classCount := 0. SystemNavigation default allBehaviorsDo: [:class | bar value: (classCount := classCount + 1). class selectorsDo: [:sel | | src | "higher priority to avoid source file accessing errors" src := [class sourceCodeAt: sel] valueAt: self higherPriority. (src findString: string startingAt: 1 caseSensitive: true) > 0 + ifTrue: [list add: (MethodReference class: class selector: sel)]]]]. - ifTrue: [sel isDoIt ifFalse: [ - list add: (MethodReference class: class selector: sel)]]]]]. ^ list asSortedCollection!
squeak-dev@lists.squeakfoundation.org