diff options
Diffstat (limited to 'tests/info.test')
-rw-r--r-- | tests/info.test | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/info.test b/tests/info.test index 0de1510..a12d45c 100644 --- a/tests/info.test +++ b/tests/info.test @@ -2535,9 +2535,9 @@ test info-40.18 {info cmdtype: aliases in slave interpreters} -setup { $safe eval { info cmdtype foo } -} -cleanup { +} -returnCodes error -cleanup { interp delete $safe -} -result native +} -result {not allowed to invoke subcommand cmdtype of info} test info-40.19 {info cmdtype: aliases in slave interpreters} -setup { set safe [interp create -safe] } -body { @@ -2548,9 +2548,9 @@ test info-40.19 {info cmdtype: aliases in slave interpreters} -setup { info cmdtype foo } } -} -cleanup { +} -returnCodes error -cleanup { interp delete $safe -} -result native +} -result {not allowed to invoke subcommand cmdtype of info} test info-40.20 {info cmdtype: aliases in slave interpreters} -setup { set safe [interp create -safe] } -body { @@ -2558,9 +2558,9 @@ test info-40.20 {info cmdtype: aliases in slave interpreters} -setup { interp alias {} foo {} gorp info cmdtype foo } -} -cleanup { +} -returnCodes error -cleanup { interp delete $safe -} -result alias +} -result {not allowed to invoke subcommand cmdtype of info} namespace delete ::testinfocmdtype # ------------------------------------------------------------------------- |