--- a/CharacterArray.st Tue Jan 22 15:10:37 2013 +0100
+++ b/CharacterArray.st Tue Jan 22 15:11:02 2013 +0100
@@ -326,7 +326,6 @@
"
! !
-
!CharacterArray class methodsFor:'pattern matching'!
matchEscapeCharacter
@@ -678,7 +677,6 @@
^ self == CharacterArray
! !
-
!CharacterArray methodsFor:'Compatibility-ANSI'!
addLineDelimiters
@@ -755,6 +753,25 @@
"
! !
+!CharacterArray methodsFor:'Compatibility-GNU'!
+
+% anArrayOfOperands
+ "return a copy of the receiver, where a '%i' escape
+ is replaced by the coresponding string from the argument array.
+ 'i' may be between 1 and 9 (i.e. a maximum of 9 placeholders is allowed).
+ Added for GNU-ST compatibility."
+
+ ^ self expandPlaceholdersWith:anArrayOfOperands
+
+ "
+ 'do you prefer %1 or rather %2 (not talking about %3) ?'
+ % #('smalltalk' 'c++' 'c')
+
+ 'do you %(what) ?'
+ % (Dictionary new at:#'what' put:'understand'; yourself)
+ "
+! !
+
!CharacterArray methodsFor:'Compatibility-ST/V'!
byteAt:index put:aByte
@@ -1555,7 +1572,6 @@
! !
-
!CharacterArray methodsFor:'character searching'!
includesMatchCharacters
@@ -4369,7 +4385,6 @@
! !
-
!CharacterArray methodsFor:'padded copying'!
centerPaddedTo:newSize
@@ -4894,7 +4909,6 @@
"Modified: 17.4.1997 / 12:50:23 / cg"
! !
-
!CharacterArray methodsFor:'special string converting'!
expandPlaceholdersWith:argArrayOrDictionary
@@ -5699,7 +5713,6 @@
"
! !
-
!CharacterArray methodsFor:'substring searching'!
findString:subString
@@ -6191,11 +6204,11 @@
!CharacterArray class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.491 2013-01-16 12:31:17 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.492 2013-01-22 14:11:02 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.491 2013-01-16 12:31:17 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.492 2013-01-22 14:11:02 cg Exp $'
! !