diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-06-04 20:26:02 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-06-04 20:26:02 (GMT) |
| commit | 043173a689015960758c0276486eca9e7a223366 (patch) | |
| tree | a46d5a93e1bad794cf8bac37f1e4b41a5e200b98 /fortran/src/H5_ff.F90 | |
| parent | 4d500d49023156f1f8ef60375e63ac22e79e1749 (diff) | |
| download | hdf5-043173a689015960758c0276486eca9e7a223366.zip hdf5-043173a689015960758c0276486eca9e7a223366.tar.gz hdf5-043173a689015960758c0276486eca9e7a223366.tar.bz2 | |
[svn-r27151] fixed __float128 errors
Diffstat (limited to 'fortran/src/H5_ff.F90')
| -rw-r--r-- | fortran/src/H5_ff.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5_ff.F90 b/fortran/src/H5_ff.F90 index f4090cc..aba9d1b 100644 --- a/fortran/src/H5_ff.F90 +++ b/fortran/src/H5_ff.F90 @@ -391,7 +391,7 @@ CONTAINS h5_type = H5T_NATIVE_REAL_C_DOUBLE ELSE IF(kind.EQ.Fortran_REAL_C_LONG_DOUBLE)THEN h5_type = H5T_NATIVE_REAL_C_LONG_DOUBLE -#if H5_HAVE_FLOAT128!=0 +#if H5_PAC_FC_MAX_REAL_PRECISION > 28 ELSE IF(kind.EQ.Fortran_REAL_C_FLOAT128)THEN h5_type = H5T_NATIVE_FLOAT_128 #endif |