mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-13 07:10:20 +02:00
Code Activity

Merge upstream 'lightening'

Browse source 
* libguile/lightening: Merge from https://gitlab.com/wingo/lightening.
This commit is contained in:
Andy Wingo 2020-06-19 16:30:59 +02:00
commit 52baa45d40
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/lightening/lightening/lightening.c
View file

@ -380,7 +380,9 @@ jit_patch_there(jit_state_t* _jit, jit_reloc_t reloc, jit_pointer_t addr)
ptrdiff_t diff = (uint8_t*)addr - pc_base; ptrdiff_t diff = (uint8_t*)addr - pc_base;
ASSERT((diff & ((1 << reloc.rsh) - 1)) == 0); ASSERT((diff & ((1 << reloc.rsh) - 1)) == 0);
diff >>= reloc.rsh; diff >>= reloc.rsh;
#ifdef JIT_NEEDS_LITERAL_POOL
int flags = reloc.kind & ~JIT_RELOC_MASK; int flags = reloc.kind & ~JIT_RELOC_MASK;
#endif
switch (reloc.kind & JIT_RELOC_MASK) switch (reloc.kind & JIT_RELOC_MASK)
{ {