diff options
author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2008-06-18 19:53:28 (GMT) |
---|---|---|
committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2008-06-18 19:53:28 (GMT) |
commit | b98dea5cf1a6fc0e4ce37621720cf339148d3e3b (patch) | |
tree | 89330bd1d6d8b866f1a6d90df8a86ceb3957fc38 /fortran/src/H5f90global.f90 | |
parent | 922a109192727c1d091e81069acd743da082872f (diff) | |
download | hdf5-b98dea5cf1a6fc0e4ce37621720cf339148d3e3b.zip hdf5-b98dea5cf1a6fc0e4ce37621720cf339148d3e3b.tar.gz hdf5-b98dea5cf1a6fc0e4ce37621720cf339148d3e3b.tar.bz2 |
[svn-r15233] Description:
Added the function h5tget_native_type and associated
requirements.
Diffstat (limited to 'fortran/src/H5f90global.f90')
-rw-r--r-- | fortran/src/H5f90global.f90 | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/fortran/src/H5f90global.f90 b/fortran/src/H5f90global.f90 index 251e49c..bf2d715 100644 --- a/fortran/src/H5f90global.f90 +++ b/fortran/src/H5f90global.f90 @@ -625,11 +625,10 @@ EQUIVALENCE(H5S_flags(19), H5S_SEL_HYPERSLABS_F) EQUIVALENCE(H5S_flags(20), H5S_SEL_ALL_F) - ! ! H5T flags declaration ! - INTEGER, PARAMETER :: H5T_FLAGS_LEN = 31 + INTEGER, PARAMETER :: H5T_FLAGS_LEN = 33 INTEGER H5T_flags(H5T_FLAGS_LEN) !DEC$if defined(BUILD_HDF5_DLL) !DEC$ ATTRIBUTES DLLEXPORT :: /H5T_FLAGS/ @@ -667,6 +666,8 @@ INTEGER :: H5T_STR_NULLPAD_F INTEGER :: H5T_STR_SPACEPAD_F INTEGER :: H5T_STR_ERROR_F + INTEGER :: H5T_DIR_ASCEND_F + INTEGER :: H5T_DIR_DESCEND_F EQUIVALENCE(H5T_flags(1), H5T_NO_CLASS_F) EQUIVALENCE(H5T_flags(2), H5T_INTEGER_F) @@ -699,6 +700,8 @@ EQUIVALENCE(H5T_flags(29), H5T_STR_ERROR_F) EQUIVALENCE(H5T_flags(30), H5T_VLEN_F) EQUIVALENCE(H5T_flags(31), H5T_ARRAY_F) + EQUIVALENCE(H5T_flags(32), H5T_DIR_ASCEND_F) + EQUIVALENCE(H5T_flags(33), H5T_DIR_DESCEND_F) ! ! H5Z flags declaration |