diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-04-30 14:39:57 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-04-30 14:39:57 (GMT) |
| commit | 82c1ce78d5fe5bc102be39f4fc4e74301c9492dd (patch) | |
| tree | a0609eb060029c56a9c1906fc53e1d146bc221f1 /fortran | |
| parent | 213aa4d0603ed360d6f92a92a78d8599b90a48ca (diff) | |
| download | hdf5-82c1ce78d5fe5bc102be39f4fc4e74301c9492dd.zip hdf5-82c1ce78d5fe5bc102be39f4fc4e74301c9492dd.tar.gz hdf5-82c1ce78d5fe5bc102be39f4fc4e74301c9492dd.tar.bz2 | |
[svn-r26983] Added C_CHAR to compound type.
Diffstat (limited to 'fortran')
| -rw-r--r-- | fortran/test/tf.F90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/test/tf.F90 b/fortran/test/tf.F90 index 4dc339f..c308243 100644 --- a/fortran/test/tf.F90 +++ b/fortran/test/tf.F90 @@ -32,7 +32,7 @@ MODULE TH5_MISC - USE ISO_C_BINDING + USE, INTRINSIC :: ISO_C_BINDING IMPLICIT NONE @@ -44,7 +44,7 @@ MODULE TH5_MISC REAL :: a INTEGER :: x DOUBLE PRECISION :: y - CHARACTER(LEN=1) :: z + CHARACTER(KIND=C_CHAR, LEN=1) :: z END TYPE comp_datatype PUBLIC :: H5_SIZEOF |