From 6497384e745ce6e67776bf6c5ce8bf108bc57cbc Mon Sep 17 00:00:00 2001
From: Ben Pfaff <blp@gnu.org>
Date: Fri, 8 Dec 2006 01:41:21 +0000
Subject: [PATCH] Use gsl_finite from GSL, which is portable, instead of
 isfinite, which is not.

---
 src/data/ChangeLog  | 8 ++++++++
 src/data/data-out.c | 5 +++--
 2 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/src/data/ChangeLog b/src/data/ChangeLog
index 3be6d529..29e97ff5 100644
--- a/src/data/ChangeLog
+++ b/src/data/ChangeLog
@@ -1,3 +1,11 @@
+Thu Dec  7 17:38:26 2006  Ben Pfaff  <blp@gnu.org>
+
+	Thanks to Jason Stover for pointing out this problem.
+	
+	* data-out.c (output_number): Use gsl_finite from GSL, which is
+	portable, instead of isfinite, which is not.
+	(power256) Ditto.
+
 Thu Dec  7 15:22:38 WST 2006 John Darrington <john@darrington.wattle.id.au>
 
 	* variable.c variable.h (value_dup): New function.
diff --git a/src/data/data-out.c b/src/data/data-out.c
index 8b94da03..e7c709f6 100644
--- a/src/data/data-out.c
+++ b/src/data/data-out.c
@@ -27,6 +27,7 @@
 #include <stdint.h>
 #include <stdlib.h>
 #include <time.h>
+#include <gsl/gsl_math.h>
 
 #include "calendar.h"
 #include "format.h"
@@ -153,7 +154,7 @@ output_number (const union value *input, const struct fmt_spec *format,
 
   if (number == SYSMIS)
     output_missing (format, output);
-  else if (!isfinite (number))
+  else if (!gsl_finite (number))
     output_infinite (number, format, output);
   else 
     {
@@ -951,7 +952,7 @@ power256 (int x)
 static void
 output_infinite (double number, const struct fmt_spec *format, char *output)
 {
-  assert (!isfinite (number));
+  assert (!gsl_finite (number));
   
   if (format->w >= 3)
     {
-- 
2.30.2