From 9574245676c920e4c57fd02e6f6f7444dffde180 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Fri, 24 Aug 2018 16:19:51 +0200 Subject: [PATCH] Fix again the unknown-filling of alloc-frame * libguile/jit.c (compile_alloc_frame): Yet another fix, because I am an idiot. --- libguile/jit.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/libguile/jit.c b/libguile/jit.c index c71c52c19..f2fcdb9b4 100644 --- a/libguile/jit.c +++ b/libguile/jit.c @@ -1308,10 +1308,9 @@ compile_alloc_frame (scm_jit_state *j, uint32_t nlocals) jit_node_t *head, *k, *back; jit_movi (T0, SCM_UNPACK (SCM_UNDEFINED)); k = jit_bler (T3_PRESERVED, SP); - jit_subi (T3_PRESERVED, T3_PRESERVED, sizeof (union scm_vm_stack_element)); head = jit_label (); - jit_str (T3_PRESERVED, T0); jit_subi (T3_PRESERVED, T3_PRESERVED, sizeof (union scm_vm_stack_element)); + jit_str (T3_PRESERVED, T0); back = jit_bner (T3_PRESERVED, SP); jit_patch_at (back, head); jit_patch (k);