diff options
| author | Steven Bosscher <stevenb@suse.de> | 2004-11-23 02:02:38 +0000 |
|---|---|---|
| committer | John David Anglin <danglin@gcc.gnu.org> | 2004-11-23 02:02:38 +0000 |
| commit | 69d3c9a43e5e9ec99d5117a0c080b1ad45cf45d0 (patch) | |
| tree | 61d4ad0cd550c3f974a87cf3001edc98e1bbd22a /libgfortran/io | |
| parent | b52d5eaa44789d6c9593c12d7d1c1419fe59b0c1 (diff) | |
| download | gcc-69d3c9a43e5e9ec99d5117a0c080b1ad45cf45d0.zip gcc-69d3c9a43e5e9ec99d5117a0c080b1ad45cf45d0.tar.gz gcc-69d3c9a43e5e9ec99d5117a0c080b1ad45cf45d0.tar.bz2 | |
re PR libfortran/15960 (missing function 'finite' on HP-UX 11.11)
PR libfortran/15960
* configure.ac: Check for finite in libm.
* libgfortran.h: Define isfinite macro if not defined.
* intrinsics/c99_functions.c: Use defined(fpclassify) instead of
HAVE_FPCLASSIFY.
* io/write.c (write_float): Use isfinite instead of finite.
* configure, config.h.in: Rebuilt.
From-SVN: r91064
Diffstat (limited to 'libgfortran/io')
| -rw-r--r-- | libgfortran/io/write.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/io/write.c b/libgfortran/io/write.c index 28bbd1b..fd4665b 100644 --- a/libgfortran/io/write.c +++ b/libgfortran/io/write.c @@ -654,7 +654,7 @@ write_float (fnode *f, const char *source, int len) if (f->format != FMT_B && f->format != FMT_O && f->format != FMT_Z) { - res = finite (n); + res = isfinite (n); if (res == 0) { nb = f->u.real.w; |