summaryrefslogtreecommitdiff
path: root/libguile/vm-engine.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2018-05-13 10:22:03 +0200
committerAndy Wingo <wingo@pobox.com>2018-05-13 10:22:03 +0200
commitad96291ffe2a32b85c94639b6f250fd9be846c59 (patch)
tree96bff9742f10d1d854347abfc1283917880a53a4 /libguile/vm-engine.c
parented8b1adeab6daf41c071c7dd125608c634070281 (diff)
downloadguile-ad96291ffe2a32b85c94639b6f250fd9be846c59.tar.gz
Mark call-scm<-scm-u64 as defining a result
* libguile/vm-engine.c (call-scm<-scm-u64): Add OP_DST.
Diffstat (limited to 'libguile/vm-engine.c')
-rw-r--r--libguile/vm-engine.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c
index 8c208a4f0..00a51ce6b 100644
--- a/libguile/vm-engine.c
+++ b/libguile/vm-engine.c
@@ -2185,7 +2185,7 @@ VM_NAME (scm_i_thread *thread, struct scm_vm *vp,
NEXT (2);
}
- VM_DEFINE_OP (91, call_scm_from_scm_u64, "call-scm<-scm-u64", OP2 (X8_S8_S8_S8, C32))
+ VM_DEFINE_OP (91, call_scm_from_scm_u64, "call-scm<-scm-u64", OP2 (X8_S8_S8_S8, C32) | OP_DST)
{
scm_t_uint8 dst, a, b;
SCM res;