summaryrefslogtreecommitdiff
path: root/libguile/numbers.c
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2007-04-17 14:12:17 +0000
committerLudovic Courtès <ludo@gnu.org>2007-04-17 14:12:17 +0000
commit1911e3da17638c31bd2fe638c9727f560fd1c1ec (patch)
tree8ea4a830d38213120929df924cd72cf0c9727793 /libguile/numbers.c
parent1d8ce4c04d984a6a60104ccf47b9b8679d44a493 (diff)
downloadguile-1911e3da17638c31bd2fe638c9727f560fd1c1ec.tar.gz
Changes from arch/CVS synchronization
Diffstat (limited to 'libguile/numbers.c')
-rw-r--r--libguile/numbers.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/libguile/numbers.c b/libguile/numbers.c
index 4454a342c..522621b22 100644
--- a/libguile/numbers.c
+++ b/libguile/numbers.c
@@ -5997,8 +5997,8 @@ scm_is_number (SCM z)
return scm_is_true (scm_number_p (z));
}
-#if HAVE_COMPLEX_DOUBLE
-#if !HAVE_CLOG
+#ifdef HAVE_COMPLEX_DOUBLE
+#ifndef HAVE_CLOG
complex double clog (complex double z);
complex double
clog (complex double z)
@@ -6007,7 +6007,7 @@ clog (complex double z)
}
#endif
-#if !HAVE_CEXP
+#ifndef HAVE_CEXP
complex double cexp (complex double z);
complex double
cexp (complex double z)
@@ -6016,7 +6016,7 @@ cexp (complex double z)
}
#endif
-#if !HAVE_CARG
+#ifndef HAVE_CARG
double carg (complex double z);
double
carg (complex double z)
@@ -6024,7 +6024,7 @@ carg (complex double z)
return atan2 (cimag(z), creal(z));
}
#endif
-#endif HAVE_COMPLEX_DOUBLE
+#endif /* HAVE_COMPLEX_DOUBLE */
/* In the following functions we dispatch to the real-arg funcs like log()