diff options
| author | Quincey Koziol <koziol@hdfgroup.org> | 2003-12-31 20:36:37 (GMT) |
|---|---|---|
| committer | Quincey Koziol <koziol@hdfgroup.org> | 2003-12-31 20:36:37 (GMT) |
| commit | 4da7b1ee9b462925818cf704c89a72fef5f55e4d (patch) | |
| tree | e9f04f8824aa714fb2346ed540a4b291ce2bb0c1 /src/H5private.h | |
| parent | b0b020d422b493228c00449391552bdfc50a33c2 (diff) | |
| download | hdf5-4da7b1ee9b462925818cf704c89a72fef5f55e4d.zip hdf5-4da7b1ee9b462925818cf704c89a72fef5f55e4d.tar.gz hdf5-4da7b1ee9b462925818cf704c89a72fef5f55e4d.tar.bz2 | |
[svn-r8009] Purpose:
Bug fix
Description:
Add special-case handling to floating-point conversion tests to avoid
problems with denormalized values on Cray T3E & T90 platforms. (Still not
working on Cray SV1, but at least it's closer).
Solution:
Detect denormalized values and don't try to operate on them on the Crays.
Platforms tested:
FreeBSD 4.9 (sleipnir)
Cray T3E (hubble.cray.com)
Cray T90 (gypsy.cray.com)
Diffstat (limited to 'src/H5private.h')
| -rw-r--r-- | src/H5private.h | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/H5private.h b/src/H5private.h index 863973e..9f22433 100644 --- a/src/H5private.h +++ b/src/H5private.h @@ -605,6 +605,17 @@ H5_DLL int HDfprintf (FILE *stream, const char *fmt, ...); #define HDfree(M) free(M) #define HDfreopen(S,M,F) freopen(S,M,F) #define HDfrexp(X,N) frexp(X,N) +/* Check for Cray-specific 'frexpf()' and 'frexpl()' routines */ +#ifdef H5_HAVE_FREXPF +#define HDfrexpf(X,N) frexpf(X,N) +#else /* H5_HAVE_FREXPF */ +#define HDfrexpf(X,N) frexp(X,N) +#endif /* H5_HAVE_FREXPF */ +#ifdef H5_HAVE_FREXPL +#define HDfrexpl(X,N) frexpl(X,N) +#else /* H5_HAVE_FREXPL */ +#define HDfrexpl(X,N) frexp(X,N) +#endif /* H5_HAVE_FREXPL */ /* fscanf() variable arguments */ #define HDfseek(F,O,W) fseek(F,O,W) #define HDfsetpos(F,P) fsetpos(F,P) |