diff options
Diffstat (limited to 'fortran')
-rw-r--r-- | fortran/src/H5f90global.f90 | 2 | ||||
-rw-r--r-- | fortran/test/tH5Z.f90 | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/fortran/src/H5f90global.f90 b/fortran/src/H5f90global.f90 index 47dfee6..8b6979c 100644 --- a/fortran/src/H5f90global.f90 +++ b/fortran/src/H5f90global.f90 @@ -521,6 +521,7 @@ INTEGER :: H5Z_FILTER_ERROR_F INTEGER :: H5Z_FILTER_NONE_F + INTEGER :: H5Z_FILTER_ALL_F INTEGER :: H5Z_FILTER_DEFLATE_F INTEGER :: H5Z_FILTER_SHUFFLE_F INTEGER :: H5Z_FILTER_FLETCHER32_F @@ -533,6 +534,7 @@ EQUIVALENCE(H5Z_flags(1), H5Z_FILTER_ERROR_F) EQUIVALENCE(H5Z_flags(2), H5Z_FILTER_NONE_F) + EQUIVALENCE(H5Z_flags(2), H5Z_FILTER_ALL_F) EQUIVALENCE(H5Z_flags(3), H5Z_FILTER_DEFLATE_F) EQUIVALENCE(H5Z_flags(4), H5Z_FILTER_SHUFFLE_F) EQUIVALENCE(H5Z_flags(5), H5Z_FILTER_FLETCHER32_F) diff --git a/fortran/test/tH5Z.f90 b/fortran/test/tH5Z.f90 index 214d2ab..7005e14 100644 --- a/fortran/test/tH5Z.f90 +++ b/fortran/test/tH5Z.f90 @@ -130,7 +130,7 @@ endif ! Delete all filters - CALL h5premove_filter_f(crtpr_id, H5Z_FILTER_NONE_F, error) + CALL h5premove_filter_f(crtpr_id, H5Z_FILTER_ALL_F, error) CALL check("h5premove_filter_f", error, total_error) ! Verify the correct number of filters now |