From bc060f980cb4e43d0aa03762c8a9cd6110faddbc Mon Sep 17 00:00:00 2001 From: pooryorick Date: Mon, 27 Mar 2023 19:56:36 +0000 Subject: Remove unneeded parts from test in fileName.test. --- tests/fileName.test | 4 ---- 1 file changed, 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] -- cgit v0.12