diff options
author | Andy Wingo <wingo@pobox.com> | 2018-05-13 10:22:03 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2018-05-13 10:22:03 +0200 |
commit | ad96291ffe2a32b85c94639b6f250fd9be846c59 (patch) | |
tree | 96bff9742f10d1d854347abfc1283917880a53a4 /libguile/vm-engine.c | |
parent | ed8b1adeab6daf41c071c7dd125608c634070281 (diff) | |
download | guile-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.c | 2 |
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; |