summaryrefslogtreecommitdiffstats
path: root/fortran/test
diff options
context:
space:
mode:
authorM. Scot Breitenfeld <brtnfld@hdfgroup.org>2016-12-07 20:38:23 (GMT)
committerM. Scot Breitenfeld <brtnfld@hdfgroup.org>2016-12-07 20:38:23 (GMT)
commit5fa2d1e8c4022a9d37785f939c4a45866447f930 (patch)
tree4317d966c8eb581a2b32056e47d10e31e2a44383 /fortran/test
parent37484b0d8b7e1cab7f31aae6d811cb71c66bc073 (diff)
downloadhdf5-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/test')
-rw-r--r--fortran/test/tf_F08.f905
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