summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorapnadkarni <apnmbx-wits@yahoo.com>2022-07-22 11:10:15 (GMT)
committerapnadkarni <apnmbx-wits@yahoo.com>2022-07-22 11:10:15 (GMT)
commit5f5c1bf7f1f0c4fb33e50301c87ad228cc1cc366 (patch)
treebf7b683bd347e29ff327df8e775cc3af78c4b88f /tests
parent951e955d2c89cad1bd96d2e9ec08233d1a14f2f1 (diff)
downloadtcl-5f5c1bf7f1f0c4fb33e50301c87ad228cc1cc366.zip
tcl-5f5c1bf7f1f0c4fb33e50301c87ad228cc1cc366.tar.gz
tcl-5f5c1bf7f1f0c4fb33e50301c87ad228cc1cc366.tar.bz2
Fix and test crash using apply when the passed argument
does NOT have already Lambda internal representation but the body of the lambda DOES have an internal ByteCode representation.
Diffstat (limited to 'tests')
-rw-r--r--tests/apply.test9
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/apply.test b/tests/apply.test
index e2be172..32dff08 100644
--- a/tests/apply.test
+++ b/tests/apply.test
@@ -22,6 +22,8 @@ if {[info commands ::apply] eq {}} {
}
testConstraint memory [llength [info commands memory]]
+testConstraint applylambda [llength [info commands testapplylambda]]
+
# Tests for wrong number of arguments
@@ -306,6 +308,13 @@ test apply-9.3 {leaking internal rep} -setup {
unset -nocomplain end i x tmp leakedBytes
} -result 0
+# Tests for specific bugs
+test apply-10.1 {Test for precompiled bytecode body} -constraints {
+ applylambda
+} -body {
+ testapplylambda
+} -result 42
+
# Tests for the avoidance of recompilation
# cleanup