[Guile-commits] 58/437: use CALLsr, not CALLLsr

[Andy Wingo]

wingo pushed a commit to branch lightning
in repository guile.

commit 889d7fbf8b4d1bfcfca3424890a29f099f9b2998
Author: Paolo Bonzini <address@hidden>
Date:   Mon Jan 14 08:30:50 2008 +0100

    use CALLsr, not CALLLsr
    
    2008-01-14  Paolo Bonzini  <address@hidden>
    
        * lightning/i386/core-64.h: Use CALLsr, not CALLLsr.
---
 ChangeLog                | 4 ++++
 lightning/i386/core-64.h | 8 ++++----
 2 files changed, 8 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index cbe534d..d8af414 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2008-01-14  Paolo Bonzini  <address@hidden>
+
+       * lightning/i386/core-64.h: Use CALLsr, not CALLLsr.
+
 2008-01-13  Paolo Bonzini  <address@hidden>
 
        * lightning/i386/core-i386.h: Move jit_calli and jit_callr...
diff --git a/lightning/i386/core-64.h b/lightning/i386/core-64.h
index 917a212..314913d 100644
--- a/lightning/i386/core-64.h
+++ b/lightning/i386/core-64.h
@@ -120,8 +120,8 @@ struct jit_local_state {
 #define jit_base_prolog() (PUSHQr(_EBX), PUSHQr(_R12), PUSHQr(_R13), 
PUSHQr(_EBP), MOVQrr(_ESP, _EBP))
 #define jit_prolog(n) (_jitl.nextarg_getfp = _jitl.nextarg_geti = 0, 
_jitl.alloca_offset = 0, jit_base_prolog())
 
-#define jit_calli(sub)          (MOVQir((long) (sub), JIT_REXTMP), 
CALLLsr(JIT_REXTMP))
-#define jit_callr(reg)         CALLLsr((reg))
+#define jit_calli(sub)          (MOVQir((long) (sub), JIT_REXTMP), 
CALLsr(JIT_REXTMP))
+#define jit_callr(reg)         CALLsr((reg))
 
 /* Stack isn't used for arguments: */
 #define jit_prepare_i(ni)      (_jitl.argssize = 0)
@@ -129,12 +129,12 @@ struct jit_local_state {
 #define jit_pusharg_i(rs)      (_jitl.argssize++, MOVQrr(rs, JIT_CALLTMPSTART 
+ _jitl.argssize - 1))
 #define jit_finish(sub)         (MOVQir((long) (sub), JIT_REXTMP), \
                                 jit_shift_args(), \
-                                CALLLsr(JIT_REXTMP), \
+                                CALLsr(JIT_REXTMP), \
                                 jit_restore_locals())
 #define jit_reg_is_arg(reg)     ((reg == _EDI) || (reg ==_ESI) || (reg == 
_EDX))
 #define jit_finishr(reg)       ((jit_reg_is_arg((reg)) ? MOVQrr(reg, 
JIT_REXTMP) : (void)0), \
                                  jit_shift_args(), \
-                                 CALLLsr(jit_reg_is_arg((reg)) ? JIT_REXTMP : 
(reg)), \
+                                 CALLsr(jit_reg_is_arg((reg)) ? JIT_REXTMP : 
(reg)), \
                                  jit_restore_locals())
 
 /* R12 and R13 are callee-save, instead of EDI and ESI.  Can be improved. */