diff options
| author | Quincey Koziol <koziol@hdfgroup.org> | 2003-12-31 20:36:44 (GMT) |
|---|---|---|
| committer | Quincey Koziol <koziol@hdfgroup.org> | 2003-12-31 20:36:44 (GMT) |
| commit | a550ccd1d2832842d89df32e7c30aac5fc8bfde3 (patch) | |
| tree | a8ef19e70a8597dcafc65873022f6fed052ee292 /src/H5private.h | |
| parent | 502b49b2b91d25e16668d8eee1610f7a2fe00fc7 (diff) | |
| download | hdf5-a550ccd1d2832842d89df32e7c30aac5fc8bfde3.zip hdf5-a550ccd1d2832842d89df32e7c30aac5fc8bfde3.tar.gz hdf5-a550ccd1d2832842d89df32e7c30aac5fc8bfde3.tar.bz2 | |
[svn-r8010] 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 b074765..1d3e0db 100644 --- a/src/H5private.h +++ b/src/H5private.h @@ -600,6 +600,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) |