diff options
| author | D. Bohdan <dbohdan@dbohdan.com> | 2021-01-09 13:29:12 +0000 |
|---|---|---|
| committer | Steve Bennett <steveb@workware.net.au> | 2021-01-10 15:19:52 +1000 |
| commit | a95647743db1816f54368c8b515b6cc6d4c3c745 (patch) | |
| tree | 685a4a7df00b8a4e27b78510e0be0fddf83b5260 /examples | |
| parent | 0f09dd9e6b5a2474f04cfa0ea97e6e2b4bc77a45 (diff) | |
| download | jimtcl-a95647743db1816f54368c8b515b6cc6d4c3c745.zip jimtcl-a95647743db1816f54368c8b515b6cc6d4c3c745.tar.gz jimtcl-a95647743db1816f54368c8b515b6cc6d4c3c745.tar.bz2 | |
jcov, jtime, jtrace: fix not removing callback
Diffstat (limited to 'examples')
| -rwxr-xr-x | examples/jcov | 2 | ||||
| -rwxr-xr-x | examples/jtime | 2 | ||||
| -rwxr-xr-x | examples/jtrace | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/examples/jcov b/examples/jcov index 1508f4b..d993784 100755 --- a/examples/jcov +++ b/examples/jcov @@ -25,7 +25,7 @@ xtrace xcov # Catch exit but not error set rc [catch -noerror -exit {source $argv0} msg opts] -xtrace +xtrace {} proc show-coverage {filename} { set info $::coverage($filename) diff --git a/examples/jtime b/examples/jtime index 1f1929f..022f25d 100755 --- a/examples/jtime +++ b/examples/jtime @@ -31,7 +31,7 @@ xtrace jtime::xtrace # Catch exit but not error set rc [catch -noerror -exit {source $argv0} msg opts] -xtrace +xtrace {} set info $jtime::fileinfo($argv0) diff --git a/examples/jtrace b/examples/jtrace index 87aee8e..21acb8f 100755 --- a/examples/jtrace +++ b/examples/jtrace @@ -20,4 +20,4 @@ xtrace jtime::xtrace # Catch exit but not error set rc [catch -noerror -exit {source $argv0} msg opts] -xtrace +xtrace {} |