diff options
| author | Quincey Koziol <koziol@hdfgroup.org> | 2003-07-01 14:53:37 (GMT) |
|---|---|---|
| committer | Quincey Koziol <koziol@hdfgroup.org> | 2003-07-01 14:53:37 (GMT) |
| commit | 93622d0b7a74be940d1ad11c3bf7bc58718055a2 (patch) | |
| tree | 796656b2b3278e44fdd04a6c67819d3aae823959 /fortran/src/H5f90global.f90 | |
| parent | 732bb9f065b04396254b8a5cd56d38139c2926a8 (diff) | |
| download | hdf5-93622d0b7a74be940d1ad11c3bf7bc58718055a2.zip hdf5-93622d0b7a74be940d1ad11c3bf7bc58718055a2.tar.gz hdf5-93622d0b7a74be940d1ad11c3bf7bc58718055a2.tar.bz2 | |
[svn-r7129] Purpose:
Bug fix
Description:
Propogate szip flag changes into FORTRAN source & tests
Platforms tested:
h5committest
Diffstat (limited to 'fortran/src/H5f90global.f90')
| -rw-r--r-- | fortran/src/H5f90global.f90 | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/fortran/src/H5f90global.f90 b/fortran/src/H5f90global.f90 index 7aada3e..6e33a71 100644 --- a/fortran/src/H5f90global.f90 +++ b/fortran/src/H5f90global.f90 @@ -608,19 +608,21 @@ ! ! H5 Library flags declaration ! - INTEGER, PARAMETER :: H5LIB_FLAGS_LEN = 3 + INTEGER, PARAMETER :: H5LIB_FLAGS_LEN = 4 INTEGER :: H5LIB_flags(H5LIB_FLAGS_LEN) !DEC$if defined(BUILD_HDF5_DLL) !DEC$ ATTRIBUTES DLLEXPORT :: /H5LIB_FLAGS/ !DEC$endif COMMON /H5LIB_FLAGS/ H5LIB_flags - INTEGER :: H5_SZIP_RAW_OM_F + INTEGER :: H5_SZIP_ALLOW_K13_OM_F + INTEGER :: H5_SZIP_CHIP_OM_F + INTEGER :: H5_SZIP_EC_OM_F INTEGER :: H5_SZIP_NN_OM_F - INTEGER :: H5_SZIP_RAWORNN_OM_F ! - EQUIVALENCE(H5LIB_flags(1), H5_SZIP_RAW_OM_F) - EQUIVALENCE(H5LIB_flags(2), H5_SZIP_NN_OM_F) - EQUIVALENCE(H5LIB_flags(3), H5_SZIP_RAWORNN_OM_F) + EQUIVALENCE(H5LIB_flags(1), H5_SZIP_ALLOW_K13_OM_F) + EQUIVALENCE(H5LIB_flags(2), H5_SZIP_CHIP_OM_F) + EQUIVALENCE(H5LIB_flags(3), H5_SZIP_EC_OM_F) + EQUIVALENCE(H5LIB_flags(4), H5_SZIP_NN_OM_F) END MODULE H5GLOBAL |