From 0ef614ecf921dfed69ed9495d937029bc41871eb Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Wed, 24 Apr 2019 22:20:00 +0200
Subject: [PATCH] Fix a JIT bug

* libguile/jit.c (compile): Reset frame size as well when restarting
  compilation.  Fixes JIT errors.
---
 libguile/jit.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/libguile/jit.c b/libguile/jit.c
index dcab1f09f..86d33a238 100644
--- a/libguile/jit.c
+++ b/libguile/jit.c
@@ -4641,6 +4641,7 @@ compile (scm_jit_state *j)
 {
   j->ip = (uint32_t *) j->start;
   set_register_state (j, SP_IN_REGISTER | FP_IN_REGISTER);
+  j->frame_size = -1;
 
   for (ptrdiff_t offset = 0; j->ip + offset < j->end; offset++)
     j->labels[offset] = NULL;