[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 01/02: Fix bug in compile-alloc-frame
From: |
Andy Wingo |
Subject: |
[Guile-commits] 01/02: Fix bug in compile-alloc-frame |
Date: |
Fri, 24 Aug 2018 06:59:43 -0400 (EDT) |
wingo pushed a commit to branch lightning
in repository guile.
commit 02a9e76b57dda9620ba87c13a3e993673809c48c
Author: Andy Wingo <address@hidden>
Date: Fri Aug 24 12:14:29 2018 +0200
Fix bug in compile-alloc-frame
* libguile/jit.c (compile_alloc_frame): Fix alloc-frame filling in of
undefined values for when previous frame size was unknown.
---
libguile/jit.c | 1 +
1 file changed, 1 insertion(+)
diff --git a/libguile/jit.c b/libguile/jit.c
index d5d2a20..bee04db 100644
--- a/libguile/jit.c
+++ b/libguile/jit.c
@@ -1308,6 +1308,7 @@ 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));