[Guile-commits] 123/437: Revert change aliasing jit_movi_p to jit_movi_ul.

[Andy Wingo]

wingo pushed a commit to branch lightning
in repository guile.

commit d2239c223ad22a0e9d7a9909c46d2ac4e5bc0e7f
Author: PCPA <address@hidden>
Date:   Sun Aug 29 03:43:11 2010 -0300

    Revert change aliasing jit_movi_p to jit_movi_ul.
    
      It cannot "optimize" to use 32 bits opcode or zero the register
    because that would break jit_patch_movi.
---
 lightning/i386/core-64.h | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lightning/i386/core-64.h b/lightning/i386/core-64.h
index af26324..41b6576 100644
--- a/lightning/i386/core-64.h
+++ b/lightning/i386/core-64.h
@@ -229,7 +229,7 @@ static int jit_arg_reg_order[] = { _EDI, _ESI, _EDX, _ECX, 
_R8D, _R9D };
 
 #define jit_negr_l(d, rs)      jit_opi_((d), (rs), NEGQr(d), (XORQrr((d), 
(d)), SUBQrr((rs), (d))) )
 #define jit_movr_l(d, rs)      ((void)((rs) == (d) ? 0 : MOVQrr((rs), (d))))
-#define jit_movi_p(d, is)      (jit_movi_ul(d, is), _jit.x.pc)
+#define jit_movi_p(d, is)      (MOVQir(((long)(is)), (d)), _jit.x.pc)
 #define jit_movi_l(d, is)                                              \
     /* Value is not zero? */                                           \
     ((is)                                                              \