[Guile-commits] 04/13: Fix reloc for jmpi and calli

[Andy Wingo]

wingo pushed a commit to branch lightening
in repository guile.

commit e95fb91b96b318a70165546cb48be0dc9587a24b
Author: Andy Wingo <address@hidden>
Date:   Thu Apr 4 11:17:46 2019 +0200

    Fix reloc for jmpi and calli
---
 lightening/x86-cpu.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lightening/x86-cpu.c b/lightening/x86-cpu.c
index 1c1da2b..5c1b298 100644
--- a/lightening/x86-cpu.c
+++ b/lightening/x86-cpu.c
@@ -2638,7 +2638,7 @@ callr(jit_state_t *_jit, int32_t r0)
 static void
 calli(jit_state_t *_jit, jit_word_t i0)
 {
-  ptrdiff_t rel32 = i0 - (_jit->pc.w + 4);
+  ptrdiff_t rel32 = i0 - (_jit->pc.w + 1 + 4);
   if (INT32_MIN <= rel32 && rel32 <= INT32_MAX)
     {
       ic(_jit, 0xe8);
@@ -2664,7 +2664,7 @@ jmpr(jit_state_t *_jit, int32_t r0)
 static void
 jmpi(jit_state_t *_jit, jit_word_t i0)
 {
-  ptrdiff_t rel32 = i0 - (_jit->pc.w + 4);
+  ptrdiff_t rel32 = i0 - (_jit->pc.w + 1 + 4);
   if (INT32_MIN <= rel32 && rel32 <= INT32_MAX)
     {
       ic(_jit, 0xe9);