[Guile-commits] 110/437: Change jit_getarg_{c, uc, s, us, i, ui} to extr_l to sign extend on 64 bits.

[Andy Wingo]

wingo pushed a commit to branch lightning
in repository guile.

commit fb86d498a4cb70531e43256a944417f9cc7eb959
Author: Paulo Cesar Pereira de Andrade <address@hidden>
Date:   Mon Aug 23 18:26:59 2010 -0300

    Change jit_getarg_{c,uc,s,us,i,ui} to extr_l to sign extend on 64 bits.
---
 lightning/core-common.h | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lightning/core-common.h b/lightning/core-common.h
index c9efa9d..c82c26f 100644
--- a/lightning/core-common.h
+++ b/lightning/core-common.h
@@ -455,14 +455,14 @@ typedef union jit_code {
 
 #ifndef jit_getarg_c
 #ifndef JIT_AP
-#define jit_getarg_c(reg, ofs)         jit_extr_c_i  ((reg), (ofs))
-#define jit_getarg_i(reg, ofs)         jit_movr_i    ((reg), (ofs))
+#define jit_getarg_c(reg, ofs)         jit_extr_c_l  ((reg), (ofs))
+#define jit_getarg_i(reg, ofs)         jit_extr_i_l  ((reg), (ofs))
 #define jit_getarg_l(reg, ofs)         jit_movr_l    ((reg), (ofs))
 #define jit_getarg_p(reg, ofs)         jit_movr_p    ((reg), (ofs))
-#define jit_getarg_s(reg, ofs)         jit_extr_s_i  ((reg), (ofs))
-#define jit_getarg_uc(reg, ofs)                jit_extr_uc_ui((reg), (ofs))
-#define jit_getarg_ui(reg, ofs)                jit_movr_ui   ((reg), (ofs))
-#define jit_getarg_ul(reg, ofs)                jit_extr_uc_ul((reg), (ofs))
+#define jit_getarg_s(reg, ofs)         jit_extr_s_l  ((reg), (ofs))
+#define jit_getarg_uc(reg, ofs)                jit_extr_uc_ul((reg), (ofs))
+#define jit_getarg_ui(reg, ofs)                jit_extr_ui_ul((reg), (ofs))
+#define jit_getarg_ul(reg, ofs)                jit_movr_ul   ((reg), (ofs))
 #define jit_getarg_us(reg, ofs)                jit_extr_us_ul((reg), (ofs))
 #else
 #define jit_getarg_c(reg, ofs)         jit_ldxi_c((reg), JIT_AP, (ofs));