CharacterArray.st
changeset 17468 dea693453518
parent 17442 eccdc56fffa4
child 17484 a73840203e65
--- a/CharacterArray.st	Fri Feb 13 23:48:41 2015 +0100
+++ b/CharacterArray.st	Fri Feb 13 23:51:17 2015 +0100
@@ -288,6 +288,7 @@
     "Created: 3.8.1997 / 18:16:40 / cg"
 ! !
 
+
 !CharacterArray class methodsFor:'cleanup'!
 
 lowSpaceCleanup
@@ -728,6 +729,7 @@
     ^ self == CharacterArray
 ! !
 
+
 !CharacterArray methodsFor:'Compatibility-ANSI'!
 
 addLineDelimiters
@@ -4367,6 +4369,8 @@
 ! !
 
 
+
+
 !CharacterArray methodsFor:'matching - glob expressions'!
 
 compoundMatch:aString
@@ -5050,6 +5054,7 @@
 ! !
 
 
+
 !CharacterArray methodsFor:'padded copying'!
 
 centerPaddedTo:newSize
@@ -5227,9 +5232,9 @@
         and:[thirdChar isVowel not ]]) ifTrue:[
             "/ exceptions: 3 non-vowels in a row: looks like an abbreviation
             (self size > 4) ifTrue:[
-                (firstChar = $s) ifTrue:[
-                    ((secondChar = $c and:[thirdChar = $r])
-                    or:[ (secondChar = $t and:[thirdChar = $r]) ]) ifTrue:[
+                (firstChar == $s) ifTrue:[
+                    ((secondChar == $c and:[thirdChar == $r])
+                    or:[ (secondChar == $t and:[thirdChar == $r]) ]) ifTrue:[
                         (self at:4) isVowel ifTrue:[
                             ^ 'a'
                         ]
@@ -5711,6 +5716,7 @@
     "Modified: 17.4.1997 / 12:50:23 / cg"
 ! !
 
+
 !CharacterArray methodsFor:'special string converting'!
 
 asUnixFilenameString
@@ -6701,6 +6707,7 @@
     "
 ! !
 
+
 !CharacterArray methodsFor:'substring searching'!
 
 findRangeOfString:subString
@@ -7291,14 +7298,15 @@
     ^ aVisitor visitString:self with:aParameter
 ! !
 
+
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.567 2015-02-07 15:37:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.568 2015-02-13 22:51:17 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.567 2015-02-07 15:37:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.568 2015-02-13 22:51:17 cg Exp $'
 ! !