--- a/CharacterArray.st Tue Aug 20 09:16:34 2019 +0200
+++ b/CharacterArray.st Tue Aug 20 09:27:14 2019 +0200
@@ -16,12 +16,12 @@
"{ NameSpace: Smalltalk }"
UninterpretedBytes variableByteSubclass:#CharacterArray
- instanceVariableNames:''
- classVariableNames:'DecoderTables DecodingFailedSignal EncoderTables
- EncodingFailedSignal PreviousMatches UnicodeDenormalizationMap
- UnicodeNormalizationMap'
- poolDictionaries:''
- category:'Collections-Text'
+ instanceVariableNames:''
+ classVariableNames:'DecoderTables DecodingFailedSignal EncoderTables
+ EncodingFailedSignal PreviousMatches UnicodeDenormalizationMap
+ UnicodeNormalizationMap'
+ poolDictionaries:''
+ category:'Collections-Text'
!
!CharacterArray class methodsFor:'documentation'!
@@ -417,6 +417,7 @@
"Modified: / 16-01-2018 / 18:59:04 / stefan"
! !
+
!CharacterArray class methodsFor:'cleanup'!
lowSpaceCleanup
@@ -679,6 +680,7 @@
"
! !
+
!CharacterArray class methodsFor:'pattern matching'!
matchEscapeCharacter
@@ -1086,6 +1088,7 @@
^ Unicode32String
! !
+
!CharacterArray class methodsFor:'utilities'!
through:aCharacter in:inStream
@@ -5616,6 +5619,8 @@
! !
+
+
!CharacterArray methodsFor:'matching - glob expressions'!
compoundMatch:aString
@@ -6460,6 +6465,7 @@
! !
+
!CharacterArray methodsFor:'padded copying'!
centerPaddedTo:newSize
@@ -7620,6 +7626,7 @@
"Modified: 17.4.1997 / 12:50:23 / cg"
! !
+
!CharacterArray methodsFor:'special string converting'!
asUnixFilenameString
@@ -8103,7 +8110,7 @@
idx2 := self indexOf:$) startingAt:idx+2.
self assert:(idx2 > 0) message:'closing parenthesis missing'.
key := self copyFrom:idx+2 to:idx2-1.
- idx := idx2.
+ idx := idx2-1.
(key isNumeric
and:[(numericKey := Integer readFrom:key onError:nil) notNil])
@@ -9614,6 +9621,7 @@
"
! !
+
!CharacterArray methodsFor:'substring searching'!
findRangeOfString:subString
@@ -10199,6 +10207,7 @@
^ aVisitor visitString:self with:aParameter
! !
+
!CharacterArray class methodsFor:'documentation'!
version