class: MethodFinder
authorClaus Gittinger <cg@exept.de>
Thu, 13 Feb 2014 11:52:15 +0100
changeset 3486 e1b722d5142b
parent 3485 d191b20c93a5
child 3487 e805a85b4155
class: MethodFinder changed: #initialize
MethodFinder.st
--- a/MethodFinder.st	Wed Feb 12 21:47:37 2014 +0100
+++ b/MethodFinder.st	Thu Feb 13 11:52:15 2014 +0100
@@ -388,8 +388,8 @@
         at: basicAt: basicSize bindWithTemp: in: size yourself 
     "testing" 
         basicType ifNil: #'ifNil:ifNotNil:' ifNotNil: #'ifNotNil:ifNil:' 
-        isColor isFloat isFraction isInMemory isInteger isMorph isNil isNumber 
-        isPoint isPseudoContext isText isTransparent isWebBrowser 
+        isColor isArray isFloat isFraction isInMemory isInteger isMorph isNil isNumber 
+        isPoint isPseudoContext isText isTransparent isWebBrowser isCollection
         knownName notNil pointsTo: wantsSteps 
     "comparing" 
         = == closeTo: hash hashMappedBy: identityHash identityHashMappedBy: identityHashPrintString 
@@ -717,18 +717,21 @@
     "accessing" 
         anyOne
     "testing" 
-        includes: includesAllOf: includesAnyOf: includesSubstringAnywhere: isEmpty notEmpty isSequenceable occurrencesOf:
+        includes: includesAllOf: includesAnyOf: includesSubstringAnywhere: 
+        isEmpty notEmpty isSequenceable occurrencesOf:
     "enumerating" 
-        collect: #'collect:thenSelect:' count: detect: #'detect:ifNone:' detectMax: detectMin: detectSum: #'inject:into:' reject: select: #'select:thenCollect:'
+        collect: #'collect:thenSelect:' count: contains:
+        detect: #'detect:ifNone:' detectMax: detectMin: detectSum: 
+        #'inject:into:' reject: select: #'select:thenCollect:'  map:
     "converting" 
-        asBag asCharacterSet asSet asSortedArray asSortedCollection asSortedCollection:
-        asStringWith:
+        asArray asBag asCharacterSet asSet asSortedArray asSortedCollection asSortedCollection:
+        asStringWith: asNilIfEmpty asOrderedCollection
     "printing"
     "private" 
-        maxSize
+        maxSize largest: smallest: 
     "arithmetic"
     "math functions" 
-        average max median min range sum
+        average max median min range sum product abs minMax
         ) do: [:sel | Approved add: sel].
 
         #(
@@ -743,7 +746,7 @@
     "comparing" 
         hasEqualElements:
     "accessing" allButFirst allButLast at:ifAbsent: atAll: atPin: atRandom: atWrap: 
-        fifth first fourth last second sixth third
+        fifth first fourth last second sixth third  nth:
         identityIndexOf: #'identityIndexOf:startingAt:' #'identityIndexOf:ifAbsent:' #'identityIndexOf:startingAt:ifAbsent:'
         indexOf:         #'indexOf:startingAt:'         #'indexOf:ifAbsent:'     #'indexOf:startingAt:ifAbsent:' 
         lastIndexOf:     #'lastIndexOf:startingAt:'     #'lastIndexOf:ifAbsent:' #'lastIndexOf:startingAt:ifAbsent:' 
@@ -767,7 +770,7 @@
         #'copyReplaceAll:with:asTokens:' 
 
     "ST/X copying"        
-        copyButLast: copyLast:  copyFrom: copyTo:
+        copyButLast: copyLast:  copyFrom: copyTo:  last: first:
     "ST/X testing"        
         longestCommonPrefix
         ) do: [:sel | Approved add: sel].
@@ -1637,10 +1640,10 @@
 !MethodFinder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.37 2014-02-05 17:51:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.38 2014-02-13 10:52:15 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.37 2014-02-05 17:51:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.38 2014-02-13 10:52:15 cg Exp $'
 ! !