[Guile-commits] 01/02: Fix JIT compilation of bind-rest

[Andy Wingo]

wingo pushed a commit to branch lightning
in repository guile.

commit d0c9d20626d8b8f82646bf1811398de3c49d1551
Author: Andy Wingo <address@hidden>
Date:   Fri Aug 24 14:59:47 2018 +0200

    Fix JIT compilation of bind-rest
    
    * libguile/jit.c (compile_bind_rest): Fix.
---
 libguile/jit.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libguile/jit.c b/libguile/jit.c
index 303a544..c71c52c 100644
--- a/libguile/jit.c
+++ b/libguile/jit.c
@@ -1441,8 +1441,8 @@ compile_bind_rest (scm_jit_state *j, uint32_t dst)
   emit_store_current_ip (j, t);
   emit_call_r_i (j, scm_vm_intrinsics.cons_rest, THREAD, dst);
   jit_retval (t);
-  emit_sp_set_scm (j, 0, t);
   compile_reset_frame (j, dst + 1);
+  emit_sp_set_scm (j, 0, t);
   
   jit_patch (k);
 }