mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 11:50:28 +02:00
Code Activity

Fix a JIT bug

Browse source 
* libguile/jit.c (compile): Reset frame size as well when restarting
  compilation.  Fixes JIT errors.
This commit is contained in:
Andy Wingo 2019-04-24 22:20:00 +02:00
parent 9a32b4b1ad
commit 0ef614ecf9
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/jit.c
View file

@ -4641,6 +4641,7 @@ compile (scm_jit_state *j)
{ {
j->ip = (uint32_t *) j->start; j->ip = (uint32_t *) j->start;
set_register_state (j, SP_IN_REGISTER | FP_IN_REGISTER); 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++) for (ptrdiff_t offset = 0; j->ip + offset < j->end; offset++)
j->labels[offset] = NULL; j->labels[offset] = NULL;