diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-02-04 20:48:50 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-02-04 20:48:50 (GMT) |
| commit | dc4030f2881b65755afd2a1d87bfc804a85b0ff8 (patch) | |
| tree | e514fbd26c2901b73a5c635c59e70aeaba42775b /tests/set.test | |
| parent | 5537ab67eb915869ddd76bfbe1a7881c6faca15a (diff) | |
| parent | f1cc0757254d92df5b8f6fc68a55f5741dfde088 (diff) | |
| download | tcl-dc4030f2881b65755afd2a1d87bfc804a85b0ff8.zip tcl-dc4030f2881b65755afd2a1d87bfc804a85b0ff8.tar.gz tcl-dc4030f2881b65755afd2a1d87bfc804a85b0ff8.tar.bz2 | |
Merge in fix for 3602706
Diffstat (limited to 'tests/set.test')
| -rw-r--r-- | tests/set.test | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/set.test b/tests/set.test index 1d88553..18119f5 100644 --- a/tests/set.test +++ b/tests/set.test @@ -524,6 +524,11 @@ test set-5.1 {error on malformed array name} testset2 { list $msg $msg1 } {{can't read "z(a)(b)": variable isn't array} {can't read "z(b)(a)": variable isn't array}} +# In a mem-debug build, this test will crash unless Bug 3602706 is fixed. +test set-5.2 {Bug 3602706} -body { + testset2 ::tcl_platform not-in-there +} -returnCodes error -result * -match glob + # cleanup catch {unset a} catch {unset b} |