[Guile-commits] 66/437: warning patrol (allocai.c, ppc)

[Andy Wingo]

wingo pushed a commit to branch lightning
in repository guile.

commit 3a199529db801d4d467c4d10d27e158d51b4a6c6
Author: Paolo Bonzini <address@hidden>
Date:   Mon Mar 17 09:10:57 2008 +0100

    warning patrol (allocai.c, ppc)
    
    2008-03-15  Paolo Bonzini  <address@hidden>
    
        * lightning/ppc/core.h: Avoid some "value computed is not used"
        warnings.
        * lightning/ppc/funcs.h: Remove unused variables.
        * lightnings/tests/allocai.c: Silence other warnings.
---
 ChangeLog             | 6 ++++++
 lightning/ppc/core.h  | 2 +-
 lightning/ppc/funcs.h | 3 +--
 tests/allocai.c       | 4 ++--
 4 files changed, 10 insertions(+), 5 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 868d0eb..7467008 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2008-03-15  Paolo Bonzini  <address@hidden>
+
+       * lightning/ppc/core.h: Avoid some "value computed is not used"
+       warnings.
+       * lightnings/tests/allocai.c: Silence other warnings.
+
 2008-03-14  Paolo Bonzini  <address@hidden>
 
        * lightningize.in: Fix some problems (not all).
diff --git a/lightning/ppc/core.h b/lightning/ppc/core.h
index 2afa6c3..c26566d 100644
--- a/lightning/ppc/core.h
+++ b/lightning/ppc/core.h
@@ -196,7 +196,7 @@ struct jit_local_state {
 #define jit_bosubi_ui(label, rs, is)   (jit_chk_ims ((is), SUBICri((rs), (rs), 
is), SUBCrr((rs), JIT_AUX)),       MCRXRi(0), BEQi((label)), _jit.x.pc)
 #define jit_boaddr_ui(label, s1, s2)   (                                       
     ADDCrr((s1), (s1), (s2)),     MCRXRi(0), BEQi((label)), _jit.x.pc)
 #define jit_bosubr_ui(label, s1, s2)   (                                       
     SUBCrr((s1), (s1), (s2)),     MCRXRi(0), BEQi((label)), _jit.x.pc)
-#define jit_calli(label)               (jit_movi_p(JIT_AUX, (label)), 
MTCTRr(JIT_AUX), BCTRL(), _jitl.nextarg_puti = _jitl.nextarg_putf = 
_jitl.nextarg_putd = 0, _jit.x.pc)
+#define jit_calli(label)               ((void)jit_movi_p(JIT_AUX, (label)), 
MTCTRr(JIT_AUX), BCTRL(), _jitl.nextarg_puti = _jitl.nextarg_putf = 
_jitl.nextarg_putd = 0, _jit.x.pc)
 #define jit_callr(reg)                 (MTCTRr(reg), BCTRL())
 #define jit_divi_i(d, rs, is)          jit_big_ims((is), DIVWrrr ((d), (rs), 
JIT_AUX))
 #define jit_divi_ui(d, rs, is) jit_big_imu((is), DIVWUrrr((d), (rs), JIT_AUX))
diff --git a/lightning/ppc/funcs.h b/lightning/ppc/funcs.h
index 011ae6e..131687b 100644
--- a/lightning/ppc/funcs.h
+++ b/lightning/ppc/funcs.h
@@ -92,7 +92,6 @@ _jit_epilog(jit_state *jit)
 {
   int n = _jitl.nbArgs;
   int first_saved_reg = JIT_AUX - n;
-  int num_saved_regs = 32 - first_saved_reg;
   int frame_size = (_jitl.frame_size + 15) & ~15;
 
 #ifdef __APPLE__
@@ -123,7 +122,7 @@ _jit_epilog(jit_state *jit)
 static void
 _jit_prolog(jit_state *jit, int n)
 {
-  int orig_frame_size, frame_size;
+  int frame_size;
   int i;
   int first_saved_reg = JIT_AUX - n;
   int num_saved_regs = 32 - first_saved_reg;
diff --git a/tests/allocai.c b/tests/allocai.c
index c9947b4..8350dc6 100644
--- a/tests/allocai.c
+++ b/tests/allocai.c
@@ -69,10 +69,10 @@ generate_function_proxy (int_return_int_t func)
 
   /* Display a failure message.  */
   jit_patch (branch);
-  jit_movi_p (JIT_R2, failure_message);
+  (void)jit_movi_p (JIT_R2, failure_message);
   jit_prepare (1);
   jit_pusharg_p (JIT_R2);
-  jit_finish (printf);
+  (void)jit_finish (printf);
 
   /* Leave.  */
   jit_movr_i (JIT_RET, JIT_V1);