#QUALITY by exept
authorClaus Gittinger <cg@exept.de>
Mon, 29 Jul 2019 11:07:08 +0200
changeset 2340 e5fc1b9034b6
parent 2339 702d69ba62b9
child 2341 91b141d06afa
#QUALITY by exept class: RegressionTests::RxTests changed: #testCharacterSet
RegressionTests__RxTests.st
--- a/RegressionTests__RxTests.st	Sun Jul 28 16:41:30 2019 +0200
+++ b/RegressionTests__RxTests.st	Mon Jul 29 11:07:08 2019 +0200
@@ -1716,6 +1716,7 @@
     self assert: ('0' matchesRegex: '[01]').
     self deny: ('3' matchesRegex: '[01]').
     self deny: ('11' matchesRegex: '[01]'). "-- false: a set matches only one character"
+    self assert: ('[01]' asRegex hasMatchesIn:'11' ). "-- true"
     self deny: ('01' matchesRegex: '[01]').
 !