diff options
| author | M. Scot Breitenfeld <brtnfld@hdfgroup.org> | 2016-12-07 20:38:23 (GMT) |
|---|---|---|
| committer | M. Scot Breitenfeld <brtnfld@hdfgroup.org> | 2016-12-07 20:38:23 (GMT) |
| commit | 5fa2d1e8c4022a9d37785f939c4a45866447f930 (patch) | |
| tree | 4317d966c8eb581a2b32056e47d10e31e2a44383 /fortran | |
| parent | 37484b0d8b7e1cab7f31aae6d811cb71c66bc073 (diff) | |
| download | hdf5-5fa2d1e8c4022a9d37785f939c4a45866447f930.zip hdf5-5fa2d1e8c4022a9d37785f939c4a45866447f930.tar.gz hdf5-5fa2d1e8c4022a9d37785f939c4a45866447f930.tar.bz2 | |
HDFFV-10036: HDF5 Fails to compile fortran tests with NAG and -i8 and -r8 flags
Fix.
Diffstat (limited to 'fortran')
| -rw-r--r-- | fortran/test/tf_F08.f90 | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/fortran/test/tf_F08.f90 b/fortran/test/tf_F08.f90 index 9844702..6d6a817 100644 --- a/fortran/test/tf_F08.f90 +++ b/fortran/test/tf_F08.f90 @@ -45,11 +45,12 @@ MODULE TH5_MISC_PROVISIONAL INTEGER, PARAMETER :: dp = SELECTED_REAL_KIND(10) ! This should map to REAL*8 on most modern processors ! generic compound datatype - TYPE, BIND(C) :: comp_datatype + TYPE :: comp_datatype + SEQUENCE REAL :: a INTEGER :: x DOUBLE PRECISION :: y - CHARACTER(LEN=1) :: z + CHARACTER(KIND=C_CHAR) :: z END TYPE comp_datatype PUBLIC :: H5_SIZEOF |