summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2018-10-07 16:42:21 +0200
committerAndy Wingo <wingo@pobox.com>2018-10-07 16:44:13 +0200
commit5787f4e516a13d0439bc871e34831eb50c175d88 (patch)
tree786ba666fa4b682f5497f4b118b7facceea58a8d
parent8bcba78eda6d25a2a64e329619958d210085d3b2 (diff)
downloadguile-5787f4e516a13d0439bc871e34831eb50c175d88.tar.gz
Fix -Wunused-function error for x86 not on sun
* libguile/lightning/lib/jit_x86-x87.c (_fstcwm): Surround definition with ifdef(sun).
-rw-r--r--libguile/lightning/lib/jit_x86-x87.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/libguile/lightning/lib/jit_x86-x87.c b/libguile/lightning/lib/jit_x86-x87.c
index 95e9e9f19..f6fc8831c 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,