diff options
author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-07-08 21:10:13 (GMT) |
---|---|---|
committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-07-08 21:10:13 (GMT) |
commit | 5ed3e8a4a773d59b9d8c731551bf7ede05de0fd2 (patch) | |
tree | 2c02bb79247bbab0fb31fb94326952e99dbaaf77 | |
parent | 93eaaed7221b440aaf1c844d61783d14a6804130 (diff) | |
download | hdf5-5ed3e8a4a773d59b9d8c731551bf7ede05de0fd2.zip hdf5-5ed3e8a4a773d59b9d8c731551bf7ede05de0fd2.tar.gz hdf5-5ed3e8a4a773d59b9d8c731551bf7ede05de0fd2.tar.bz2 |
[svn-r27354] fixed #if spec
-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 3d954af..3d5f812 100644 --- a/fortran/src/H5_ff.F90 +++ b/fortran/src/H5_ff.F90 @@ -394,7 +394,7 @@ CONTAINS h5_type = H5T_NATIVE_REAL_C_LONG_DOUBLE #endif #if H5_PAC_FC_MAX_REAL_PRECISION > 28 -#if H5_HAVE_FLOAT128 = 1 +#if H5_HAVE_FLOAT128 == 1 ELSE IF(kind.EQ.Fortran_REAL_C_FLOAT128)THEN h5_type = H5T_NATIVE_FLOAT_128 #endif |