[Guile-commits] 07/16: Mark call-scm<-scm-u64 as defining a result

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit ad96291ffe2a32b85c94639b6f250fd9be846c59
Author: Andy Wingo <address@hidden>
Date:   Sun May 13 10:22:03 2018 +0200

    Mark call-scm<-scm-u64 as defining a result
    
    * libguile/vm-engine.c (call-scm<-scm-u64): Add OP_DST.
---
 libguile/vm-engine.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c
index 8c208a4..00a51ce 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;