--- a/CharacterArray.st Thu Apr 03 13:54:28 2014 +0200
+++ b/CharacterArray.st Thu Apr 03 14:35:22 2014 +0200
@@ -726,6 +726,7 @@
! !
+
!CharacterArray methodsFor:'Compatibility-ANSI'!
addLineDelimiters
@@ -1619,6 +1620,25 @@
^ true
! !
+!CharacterArray methodsFor:'JavaScript support'!
+
+unquote
+ "removes quotes from the receiver"
+
+ self size >= 2 ifTrue:[
+ (self startsWith:$") ifTrue:[
+ (self endsWith:$") ifTrue:[
+ ^ self copyFrom:2 to:self size-1
+ ].
+ ].
+ ].
+ ^ self
+
+ "
+ JavaScriptParser
+ evaluate:'''hello''.quote.unquote'
+ "
+! !
!CharacterArray methodsFor:'character searching'!
@@ -6936,11 +6956,11 @@
!CharacterArray class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.529 2014-03-07 22:07:07 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.530 2014-04-03 12:35:22 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.529 2014-03-07 22:07:07 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.530 2014-04-03 12:35:22 cg Exp $'
! !