From 9df6fb2730fb1dc3b99df5fc6d02dad2ef15f03b Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sun, 5 Aug 2007 02:41:28 +0000 Subject: [PATCH] fix x86_64 JIT bug: branching on an immediate comparsion where the immediate value does not fit in 32 bits svn: r7022 --- src/mzscheme/src/lightning/i386/core.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/mzscheme/src/lightning/i386/core.h b/src/mzscheme/src/lightning/i386/core.h index f85a524d07..a3b9757270 100644 --- a/src/mzscheme/src/lightning/i386/core.h +++ b/src/mzscheme/src/lightning/i386/core.h @@ -110,7 +110,7 @@ struct jit_local_state { #ifdef JIT_X86_64 # define jit_bra_l(rs, is, op) (_s32P((long)(is)) \ ? _jit_bra_l(rs, is, op) \ - : (jit_movi_l(JIT_REXTMP, is), jit_bra_qr(JIT_REXTMP, rs, op))) + : (MOVQir(is, JIT_REXTMP), jit_bra_qr(JIT_REXTMP, rs, op))) #else # define jit_bra_l(rs, is, op) _jit_bra_l(rs, is, op) #endif