diff options
author | Andy Wingo <wingo@pobox.com> | 2018-08-24 14:59:47 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2018-08-24 14:59:47 +0200 |
commit | d0c9d20626d8b8f82646bf1811398de3c49d1551 (patch) | |
tree | e54a846ab5a43ee8c34d12184bbdaa2b4c934ad5 /libguile/jit.c | |
parent | 3920b991250720568f9f2c2db8f2ed04fe588638 (diff) | |
download | guile-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.c | 2 |
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); } |