diff options
author | dgp <dgp@users.sourceforge.net> | 2019-03-08 14:47:45 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2019-03-08 14:47:45 (GMT) |
commit | 3e074a01a25b4f670b3558513ce29e29b20a9357 (patch) | |
tree | 879a1855eb1b46d3f6cc67e8df9104984f3567d0 /tests/proc.test | |
parent | 1bbb59721706e015ba729694e3b6c68886755662 (diff) | |
parent | df5dff900864760f02f1b93de275b401a5505f0e (diff) | |
download | tcl-3e074a01a25b4f670b3558513ce29e29b20a9357.zip tcl-3e074a01a25b4f670b3558513ce29e29b20a9357.tar.gz tcl-3e074a01a25b4f670b3558513ce29e29b20a9357.tar.bz2 |
merge 8.6
Diffstat (limited to 'tests/proc.test')
-rw-r--r-- | tests/proc.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/proc.test b/tests/proc.test index 1893d0f..43d76d8 100644 --- a/tests/proc.test +++ b/tests/proc.test @@ -321,6 +321,9 @@ test proc-4.8 {TclCreateProc, procbody obj, no leak on multiple iterations} -set rename getbytes {} unset -nocomplain end i tmp leakedBytes } -result 0 +test proc-4.9 {[39fed4dae5] Valid Tcl_PkgPresent return} procbodytest { + procbodytest::check +} 1 test proc-5.1 {Bytecompiling noop; test for correct argument substitution} -body { proc p args {} ; # this will be bytecompiled into t |