diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-08-15 20:23:54 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-08-15 20:23:54 (GMT) |
commit | 539dee14dd53a081a6787a33d0cc731b5b2f329f (patch) | |
tree | ee872a83d3c887e120a260f12250968fde5101bf /tests/regexp.test | |
parent | 5eed049c6cf5c50b4c4994f26c13d27a48581f78 (diff) | |
download | tcl-539dee14dd53a081a6787a33d0cc731b5b2f329f.zip tcl-539dee14dd53a081a6787a33d0cc731b5b2f329f.tar.gz tcl-539dee14dd53a081a6787a33d0cc731b5b2f329f.tar.bz2 |
Improve bunch of error-messages
Diffstat (limited to 'tests/regexp.test')
-rw-r--r-- | tests/regexp.test | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/regexp.test b/tests/regexp.test index 16c775e..9e6b29a 100644 --- a/tests/regexp.test +++ b/tests/regexp.test @@ -275,10 +275,10 @@ test regexp-6.3 {regexp errors} { } {1 {bad option "-gorp": must be -all, -about, -indices, -inline, -expanded, -line, -linestop, -lineanchor, -nocase, -start, or --}} test regexp-6.4 {regexp errors} { list [catch {regexp a( b} msg] $msg -} {1 {couldn't compile regular expression pattern: parentheses () not balanced}} +} {1 {cannot compile regular expression pattern: parentheses () not balanced}} test regexp-6.5 {regexp errors} { list [catch {regexp a( b} msg] $msg -} {1 {couldn't compile regular expression pattern: parentheses () not balanced}} +} {1 {cannot compile regular expression pattern: parentheses () not balanced}} test regexp-6.6 {regexp errors} { list [catch {regexp a a f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1 f1} msg] $msg } {0 1} @@ -296,7 +296,7 @@ test regexp-6.9 {regexp errors, -start bad int check} { } {1 {bad index "bogus": must be integer?[+-]integer? or end?[+-]integer?}} test regexp-6.10 {regexp errors} { list [catch {regexp {a[} b} msg] $msg -} {1 {couldn't compile regular expression pattern: brackets [] not balanced}} +} {1 {cannot compile regular expression pattern: brackets [] not balanced}} test regexp-7.1 {basic regsub operation} { list [regsub aa+ xaxaaaxaa 111&222 foo] $foo @@ -481,7 +481,7 @@ test regexp-11.5 {regsub errors} { } {1 {bad option "-gorp": must be -all, -command, -expanded, -line, -linestop, -lineanchor, -nocase, -start, or --}} test regexp-11.6 {regsub errors} { list [catch {regsub -nocase a( b c d} msg] $msg -} {1 {couldn't compile regular expression pattern: parentheses () not balanced}} +} {1 {cannot compile regular expression pattern: parentheses () not balanced}} test regexp-11.7 {regsub errors} -setup { unset -nocomplain f1 } -body { @@ -889,7 +889,7 @@ test regexp-22.4 {Bug 3606139} -setup { [a 668]([a 55])[a 668]([a 55])[a 668]([a 55])[a 511]] {}] a } -cleanup { rename a {} -} -returnCodes 1 -match glob -result {couldn't compile regular expression pattern: *} +} -returnCodes 1 -match glob -result {cannot compile regular expression pattern: *} test regexp-22.5 {Bug 3610026} -setup { set e {} set cp 99 |