diff options
Diffstat (limited to 'fortran/src/H5_f.c')
| -rw-r--r-- | fortran/src/H5_f.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/fortran/src/H5_f.c b/fortran/src/H5_f.c index 82f4d92..e5601b9 100644 --- a/fortran/src/H5_f.c +++ b/fortran/src/H5_f.c @@ -405,12 +405,14 @@ int_f nh5init1_flags_c(int_f *h5lib_flags) { int ret_value = -1; - unsigned prm_1 = H5_SZIP_RAW_OPTION_MASK; - unsigned prm_2 = H5_SZIP_NN_OPTION_MASK; - unsigned prm_3 = H5_SZIP_RAW_OPTION_MASK | H5_SZIP_NN_OPTION_MASK; + unsigned prm_1 = H5_SZIP_ALLOW_K13_OPTION_MASK; + unsigned prm_2 = H5_SZIP_CHIP_OPTION_MASK; + unsigned prm_3 = H5_SZIP_EC_OPTION_MASK; + unsigned prm_4 = H5_SZIP_NN_OPTION_MASK; h5lib_flags[0] = (int_f)prm_1; h5lib_flags[1] = (int_f)prm_2; h5lib_flags[2] = (int_f)prm_3; + h5lib_flags[3] = (int_f)prm_4; ret_value = 0; return ret_value; } |