diff options
| -rw-r--r-- | tests/fileName.test | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/tests/fileName.test b/tests/fileName.test index ebdda11..d70c09c 100644 --- a/tests/fileName.test +++ b/tests/fileName.test @@ -1640,8 +1640,6 @@ apply [list {} { valgrind, which is useful since Valgrind provides information about the error location, but [memory] doesn't. } -setup { - makeFile {puts "In script"} script - if {[namespace which ::memory] eq {}} { set memcheckcmd [list ::apply [list script { uplevel 1 $script @@ -1650,8 +1648,6 @@ apply [list {} { } else { set memcheckcmd ::tcltests::scriptmemcheck } - } -cleanup { - removeFile script } -body { {*}$memcheckcmd { set interp [interp create] |