diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-09-10 08:24:59 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-09-10 08:24:59 (GMT) |
| commit | 893b3f3b6945cbed2de0e75bf3b0ce06ceaf391c (patch) | |
| tree | dd2cb87a1afb416ea575ca2e1208ddd2b672ea6e /tests/upvar.test | |
| parent | e19c2ce585d7fe309059bb96044b08dbfa850a6b (diff) | |
| parent | 186cc4a17e82ce9bd90edccc45ab943c63b40c30 (diff) | |
| download | tcl-893b3f3b6945cbed2de0e75bf3b0ce06ceaf391c.zip tcl-893b3f3b6945cbed2de0e75bf3b0ce06ceaf391c.tar.gz tcl-893b3f3b6945cbed2de0e75bf3b0ce06ceaf391c.tar.bz2 | |
[2486824] Improve error message; not all that upvars is an upvar.
Diffstat (limited to 'tests/upvar.test')
| -rw-r--r-- | tests/upvar.test | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/tests/upvar.test b/tests/upvar.test index e93f58a..5ea870d 100644 --- a/tests/upvar.test +++ b/tests/upvar.test @@ -339,7 +339,7 @@ test upvar-8.9 {upvar won't create namespace variable that refers to procedure v unset ::test_ns_1::a } MakeLink 1 -} -result {bad variable name "a": upvar won't create namespace variable that refers to procedure variable} +} -result {bad variable name "a": can't create namespace variable that refers to procedure variable} test upvar-8.10 {upvar will create element alias for new array element} -setup { catch {unset upvarArray} } -body { @@ -578,7 +578,6 @@ test upvar-NS-3.3 {CompileWord OBOE} -setup { } -cleanup { rename linenumber {} } -result 1 - # cleanup ::tcltest::cleanupTests |