aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-coerfn.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-coerfn.boot')
-rw-r--r--src/interp/i-coerfn.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-coerfn.boot b/src/interp/i-coerfn.boot
index 5ee715f0..fa8eaeb6 100644
--- a/src/interp/i-coerfn.boot
+++ b/src/interp/i-coerfn.boot
@@ -563,7 +563,7 @@ L2Tuple(val, source is [.,S], target is [.,T]) ==
val = '_$fromCoerceable_$ => canCoerce(S,T)
null (object := coerceInt1(objNewWrap(val,source), ['List, T])) =>
coercionFailure()
- asTupleNew0 objValUnwrap object
+ asTupleNew0(getVMType T, objValUnwrap object)
L2DP(l, source is [.,S], target is [.,n,T]) ==
-- need to know size of the list