summaryrefslogtreecommitdiff
path: root/libguile/jit.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2018-08-24 14:59:47 +0200
committerAndy Wingo <wingo@pobox.com>2018-08-24 14:59:47 +0200
commitd0c9d20626d8b8f82646bf1811398de3c49d1551 (patch)
treee54a846ab5a43ee8c34d12184bbdaa2b4c934ad5 /libguile/jit.c
parent3920b991250720568f9f2c2db8f2ed04fe588638 (diff)
downloadguile-d0c9d20626d8b8f82646bf1811398de3c49d1551.tar.gz
Fix JIT compilation of bind-rest
* libguile/jit.c (compile_bind_rest): Fix.
Diffstat (limited to 'libguile/jit.c')
-rw-r--r--libguile/jit.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/jit.c b/libguile/jit.c
index 303a54456..c71c52c19 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);
}