diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2013-09-19 19:37:05 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2013-09-19 19:37:05 (GMT) |
commit | cadf55303e72b696eedb9b29a469156b27fffa47 (patch) | |
tree | 23f2c88c13f3e65d4f934bf432296cd40c46388d /tests/var.test | |
parent | f19c90364c590451e85ba125933b3aa1fd9acd20 (diff) | |
download | tcl-cadf55303e72b696eedb9b29a469156b27fffa47.zip tcl-cadf55303e72b696eedb9b29a469156b27fffa47.tar.gz tcl-cadf55303e72b696eedb9b29a469156b27fffa47.tar.bz2 |
[3970f54c4e]: Corrected regression in argument order processing in [unset].
Diffstat (limited to 'tests/var.test')
-rw-r--r-- | tests/var.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/var.test b/tests/var.test index 6d4be26..208b361 100644 --- a/tests/var.test +++ b/tests/var.test @@ -748,6 +748,9 @@ test var-15.1 {segfault in [unset], [Bug 735335]} { namespace eval test A useSomeUnlikelyNameHere namespace eval test unset useSomeUnlikelyNameHere } {} +test var-15.2 {compiled unset evaluation order, Bug 3970f54c4e} { + apply {{} {unset foo [return ok]}} +} ok test var-16.1 {CallVarTraces: save/restore interp error state} { trace add variable ::errorCode write " ;#" |