diff options
| author | Steve Bennett <steveb@workware.net.au> | 2011-06-28 19:06:21 +1000 |
|---|---|---|
| committer | Steve Bennett <steveb@workware.net.au> | 2011-06-29 14:28:37 +1000 |
| commit | 9eb6f96f3046cedb65928b9f4d4f775bcea22a4c (patch) | |
| tree | e250bbac2cad2700096a94de84649e6b13fd0b96 /tests | |
| parent | 60b114e3ef3db187e1d079a2b72c4ab2e6c263a6 (diff) | |
| download | jimtcl-9eb6f96f3046cedb65928b9f4d4f775bcea22a4c.zip jimtcl-9eb6f96f3046cedb65928b9f4d4f775bcea22a4c.tar.gz jimtcl-9eb6f96f3046cedb65928b9f4d4f775bcea22a4c.tar.bz2 | |
Mark tests which require utf-8 support
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/regexp2.test | 4 | ||||
| -rw-r--r-- | tests/regmin.test | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/tests/regexp2.test b/tests/regexp2.test index ef90560..165c187 100644 --- a/tests/regexp2.test +++ b/tests/regexp2.test @@ -382,11 +382,11 @@ test regexpComp-7.17 {regsub utf compliance} { } } {0 0} -test regexpComp-7.18 {regsub utf8 in char range} { +test regexpComp-7.18 {regsub utf8 in char range} utf8 { regsub {[\u4e4ex]b} xyza\u4e4ebijka\u4e4ebpqr 555 } xyza555ijka\u4e4ebpqr -test regexpComp-7.19 {regsub utf8 in complemented char range} { +test regexpComp-7.19 {regsub utf8 in complemented char range} utf8 { regsub -all {[^x\u4e4e]b} xyza\u4e4ebizbjxbka\u4e4fbpqr 555 } xyza\u4e4ebi555jxbka555pqr diff --git a/tests/regmin.test b/tests/regmin.test index 8ff1eb2..15a1932 100644 --- a/tests/regmin.test +++ b/tests/regmin.test @@ -36,11 +36,11 @@ test regexpmin-1.8 {Minimal html} { regexp -inline {<(.+?)>} <foo><bar><grill> } {<foo> foo} -test regexpmin-2.1 {utf8 repeat} { +test regexpmin-2.1 {utf8 repeat} utf8 { regexp -inline {a\u00df+} a\udf\udf\udf\udf\ub5z } "a\udf\udf\udf\udf" -test regexpmin-2.2 {utf8 min repeat} { +test regexpmin-2.2 {utf8 min repeat} utf8 { regexp -inline {a\u00df+?} a\udf\udf\udf\udf\ub5z } "a\udf" |