[Guile-commits] 09/09: Fix -Wunused-function error for x86 not on sun

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit 5787f4e516a13d0439bc871e34831eb50c175d88
Author: Andy Wingo <address@hidden>
Date:   Sun Oct 7 16:42:21 2018 +0200

    Fix -Wunused-function error for x86 not on sun
    
    * libguile/lightning/lib/jit_x86-x87.c (_fstcwm): Surround definition
      with ifdef(sun).
---
 libguile/lightning/lib/jit_x86-x87.c | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/libguile/lightning/lib/jit_x86-x87.c 
b/libguile/lightning/lib/jit_x86-x87.c
index 95e9e9f..f6fc883 100644
--- a/libguile/lightning/lib/jit_x86-x87.c
+++ b/libguile/lightning/lib/jit_x86-x87.c
@@ -1,5 +1,5 @@
 /*
- * Copyright (C) 2012-2017  Free Software Foundation, Inc.
+ * Copyright (C) 2012-2018  Free Software Foundation, Inc.
  *
  * This file is part of GNU lightning.
  *
@@ -37,8 +37,10 @@
 #  define x87rx(code, md, rb, ri, ms)  _x87rx(_jit, code, md, rb, ri, ms)
 #  define fldcwm(md, rb, ri, ms)       x87rx(015, md, rb, ri, ms)
 #  define fstcwm(md, rb, ri, ms)       _fstcwm(_jit, md, rb, ri, ms)
+#if defined(sun)
 static void
 _fstcwm(jit_state_t*, jit_int32_t, jit_int32_t, jit_int32_t, jit_int32_t);
+#endif
 #  define fldsm(md, rb, ri, ms)                x87rx(010, md, rb, ri, ms)
 #  define fstsm(md, rb, ri, ms)                x87rx(012, md, rb, ri, ms)
 #  define fldlm(md, rb, ri, ms)                x87rx(050, md, rb, ri, ms)
@@ -422,6 +424,7 @@ _x87_b##name##i_##type(jit_state_t *_jit,                   
        \
 #  define dopi(name)                   fpr_opi(name, d, 64)
 #  define dbopi(name)                  fpr_bopi(name, d, 64)
 
+#if defined(sun)
 static void
 _fstcwm(jit_state_t *_jit, jit_int32_t md,
        jit_int32_t rb, jit_int32_t ri, jit_int32_t ms)
@@ -430,6 +433,7 @@ _fstcwm(jit_state_t *_jit, jit_int32_t md,
     rex(0, 1, rb, ri, _NOREG);
     x87rx(017, md, rb, ri, ms);
 }
+#endif
 
 static void
 _x87rx(jit_state_t *_jit, jit_int32_t code, jit_int32_t md,