mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-11 22:31:12 +02:00
Code Activity

Merge remote-tracking branch 'lightening/master'

Browse source
This commit is contained in:
Andy Wingo 2019-06-20 10:55:13 +02:00
commit 3b7061323e
1 changed files with 9 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

9
libguile/lightening/lightening/x86-cpu.c
View file

@ -2561,13 +2561,22 @@ jmpi_with_link(jit_state_t *_jit, jit_word_t i0)
static void
pop_link_register(jit_state_t *_jit)
{
/* Treat this instruction as having no effect on the stack size; its
* effect is non-local (across functions) and handled manually. */
int saved_frame_size = _jit->frame_size;
popr(_jit, jit_gpr_regno (JIT_LR));
_jit->frame_size = saved_frame_size;
}
static void
push_link_register(jit_state_t *_jit)
{
/* See comment in pop_link_register. */
int saved_frame_size = _jit->frame_size;
pushr(_jit, jit_gpr_regno (JIT_LR));
_jit->frame_size = saved_frame_size;
}
static void