#REFACTORING by stefan
class: CharacterArray
changed: #indexOfSubCollection:startingAt:ifAbsent:caseSensitive:
--- a/CharacterArray.st Tue Mar 28 11:57:52 2017 +0200
+++ b/CharacterArray.st Tue Mar 28 14:58:58 2017 +0200
@@ -345,7 +345,6 @@
"Created: 3.8.1997 / 18:16:40 / cg"
! !
-
!CharacterArray class methodsFor:'cleanup'!
lowSpaceCleanup
@@ -4874,8 +4873,6 @@
! !
-
-
!CharacterArray methodsFor:'matching - glob expressions'!
compoundMatch:aString
@@ -7586,7 +7583,7 @@
tester := [:c1 :c2 | c1 sameAs: c2 ].
startIndex := self findFirst:[:c | c sameAs:firstChar] startingAt:index.
].
- [startIndex == 0] whileFalse:[
+ [startIndex ~~ 0] whileTrue:[
runIdx := startIndex.
found := true.
1 to:subSize do:[:i |
@@ -7610,7 +7607,8 @@
].
^ exceptionBlock value
- "Modified: 23.2.1996 / 15:35:15 / cg"
+ "Modified: / 23-02-1996 / 15:35:15 / cg"
+ "Modified: / 28-03-2017 / 14:55:35 / stefan"
!
indexOfSubCollection:subString startingAt:index ifAbsent:exceptionBlock caseSensitive:caseSensitive ignoreDiacritics:ignoreDiacritics
@@ -8224,7 +8222,6 @@
^ aVisitor visitString:self with:aParameter
! !
-
!CharacterArray class methodsFor:'documentation'!
version