diff options
Diffstat (limited to 'tests/jim.test')
-rw-r--r-- | tests/jim.test | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/jim.test b/tests/jim.test index 08ea78d..691b21f 100644 --- a/tests/jim.test +++ b/tests/jim.test @@ -3772,12 +3772,12 @@ test regexp-6.3 {regexp errors} { } {1 {wrong # args: should be "regexp ?-nocase? ?-line? ?-indices? ?-start offset? ?-all? ?-inline? ?--? exp string ?matchVar? ?subMatchVar ...?"}} test regexp-6.4 {regexp errors} { - list [catch {regexp a( b} msg] $msg -} {1 {couldn't compile regular expression pattern: parentheses not balanced}} + catch {regexp a( b} msg +} {1} test regexp-6.5 {regexp errors} { - list [catch {regexp a( b} msg] $msg -} {1 {couldn't compile regular expression pattern: parentheses not balanced}} + catch {regexp a( b} msg +} {1} 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 @@ -3960,8 +3960,8 @@ test regexp-11.5 {regsub errors} { } {1 {wrong # args: should be "regsub ?-nocase? ?-all? ?-line? ?-start offset? ?--? exp string subSpec ?varName?"}} 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}} + catch {regsub -nocase a( b c d} msg +} {1} test regexp-11.7 {regsub errors} { catch {unset f1} |