From 6d5ee0e89ed2a74659ed75f246b27cfa36ded0fa Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hern=C3=A1n=20Morales=20Durand?= Date: Thu, 21 Nov 2024 13:09:29 +0100 Subject: [PATCH] Correct wrongly migrated methods in ClassDescription --- src/NewTools-Finder/ClassDescription.extension.st | 11 ++--------- 1 file changed, 2 insertions(+), 9 deletions(-) diff --git a/src/NewTools-Finder/ClassDescription.extension.st b/src/NewTools-Finder/ClassDescription.extension.st index 1494c6a9..f90d3b6e 100644 --- a/src/NewTools-Finder/ClassDescription.extension.st +++ b/src/NewTools-Finder/ClassDescription.extension.st @@ -1,20 +1,13 @@ Extension { #name : 'ClassDescription' } { #category : '*NewTools-Finder' } -ClassDescription class >> allSelectorsToTestInMethodFinder [ +ClassDescription >> allSelectorsToTestInMethodFinder [ "Returns all the selectors that the class approved, so which can be tested by the MethodFinder without problem. This set is the set of selectors that the class approved plus all the selectors approved by its superclass unless if they are forbidden by the class." ^ (self approvedSelectorsForMethodFinder union: self superclass allSelectorsToTestInMethodFinder) difference: self forbiddenSelectorsForMethodFinder asSet ] -{ #category : '*NewTools-Finder' } -ClassDescription class >> allSelectorsToTestInMethodFinderWithArity: anInteger [ - "Returns all the selectors with a certain arity which are approved by the class so which can be tested in the Method Finder." - - ^ self allSelectorsToTestInMethodFinder select: [ :selector | selector numArgs = anInteger ] -] - { #category : '*NewTools-Finder' } ClassDescription >> allSelectorsToTestInMethodFinderWithArity: anInteger [ "Returns all the selectors with a certain arity which are approved by the class so which can be tested in the Method Finder." @@ -23,7 +16,7 @@ ClassDescription >> allSelectorsToTestInMethodFinderWithArity: anInteger [ ] { #category : '*NewTools-Finder' } -ClassDescription class >> approvedSelectorsForMethodFinder [ +ClassDescription >> approvedSelectorsForMethodFinder [ "The list of the selectors that the class approved. It's empty by default. An approved selector is a selector where the message send to the class could be tested by the Method Finder without problem. For instance, it does not modify