From 7a35784c6b5f7c15bf53e01a6dfb9d85ab48f755 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Wed, 7 May 2008 17:43:17 +0200 Subject: [PATCH] Avoid warning with GCC on FreeBSD 6.2 in `numbers.c'. --- libguile/ChangeLog | 5 +++++ libguile/numbers.c | 4 +++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/libguile/ChangeLog b/libguile/ChangeLog index 33f3210b2..e805e63ab 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,3 +1,8 @@ +2008-05-07 Ludovic Courtès + + * numbers.c (scm_from_complex_double): Mark as `SCM_UNUSED'. + This fixes compilation with `-Werror' on FreeBSD 6.2 (i386). + 2008-05-05 Neil Jerram * c-tokenize.lex: #define YY_NO_INPUT. diff --git a/libguile/numbers.c b/libguile/numbers.c index 1191042f8..4a458c4a1 100644 --- a/libguile/numbers.c +++ b/libguile/numbers.c @@ -170,8 +170,10 @@ xisnan (double x) #define SCM_COMPLEX_VALUE(z) \ (SCM_COMPLEX_REAL (z) + GUILE_I * SCM_COMPLEX_IMAG (z)) +static inline SCM scm_from_complex_double (complex double z) SCM_UNUSED; + /* Convert a C "complex double" to an SCM value. */ -static SCM +static inline SCM scm_from_complex_double (complex double z) { return scm_c_make_rectangular (creal (z), cimag (z));