#FEATURE by exept
class: CharacterArray class
changed: #matchScanArrayFrom:escapeCharacter:
BadGLOBPatternError notification
(grafted from ca3d27371486581fdb0fbdca397daaedf04a7ca8)
--- a/CharacterArray.st Sun Jun 25 08:06:53 2023 +0000
+++ b/CharacterArray.st Sun Jun 25 08:09:52 2023 +0000
@@ -1089,7 +1089,7 @@
matchSet := IdentitySet new.
idx := idx + 1.
idx > end ifTrue:[
- ^ nil
+ ^ BadGLOBPatternError raiseAsQuery
].
char := aString at:idx.
c1 := nil.
@@ -1101,7 +1101,7 @@
((char == $-) and:[ c1 notNil ]) ifTrue:[
idx := idx + 1.
idx > end ifTrue:[
- ^ nil
+ ^ BadGLOBPatternError raiseAsQuery
].
c2 := aString at:idx.
c1 to:c2 do:[:c |
@@ -1117,7 +1117,7 @@
]
].
idx > end ifTrue:[
- ^ nil
+ ^ BadGLOBPatternError raiseAsQuery
].
].
char := aString at:idx
@@ -1153,11 +1153,16 @@
String matchScanArrayFrom:'[A-Z$_][A-Za-z0-9$\[\]]*'
String matchScanArrayFrom:'[A-Z$\[\]]*'
String matchScanArrayFrom:'[A-Z$_\[][A-Za-z0-9$\-\] ]*'
+
+ String matchScanArrayFrom:'abc#'
+ String matchScanArrayFrom:'*#*'
+ String matchScanArrayFrom:'\[a-' escapeCharacter:$\
."
"Modified: / 02-04-1997 / 16:20:29 / cg"
"Modified: / 03-12-2018 / 15:41:54 / Stefan Vogel"
"Modified (comment): / 23-07-2020 / 10:04:58 / alkurz"
+ "Modified: / 25-06-2023 / 10:08:45 / cg"
! !
!CharacterArray class methodsFor:'queries'!
@@ -6845,6 +6850,7 @@
"Modified (format): / 21-03-2019 / 12:56:24 / Claus Gittinger"
! !
+
!CharacterArray methodsFor:'printing & storing'!
article