summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5_f.c
diff options
context:
space:
mode:
authorElena Pourmal <epourmal@hdfgroup.org>2004-07-03 02:39:24 (GMT)
committerElena Pourmal <epourmal@hdfgroup.org>2004-07-03 02:39:24 (GMT)
commit3a6668b2f948d266bf7c99d641c331ff09021ceb (patch)
tree3f65c3449d328d82b37fbe458bcb033d5ac3c26f /fortran/src/H5_f.c
parent0f7e7766509bdf92eda32e08f50dc8197a231710 (diff)
downloadhdf5-3a6668b2f948d266bf7c99d641c331ff09021ceb.zip
hdf5-3a6668b2f948d266bf7c99d641c331ff09021ceb.tar.gz
hdf5-3a6668b2f948d266bf7c99d641c331ff09021ceb.tar.bz2
[svn-r8799]
Purpose: Maintenance Description: H5_SZIP_CHIP_OPTION_MASK was deleted from the list of the available parameters for the H5Pset_szip function. Solution: Updated Fortran source, tests and documentation to reflect this change. Platforms tested: arabica (too small for h5committest) Misc. update:
Diffstat (limited to 'fortran/src/H5_f.c')
-rw-r--r--fortran/src/H5_f.c10
1 files changed, 3 insertions, 7 deletions
diff --git a/fortran/src/H5_f.c b/fortran/src/H5_f.c
index d740d29..4e0ecbc 100644
--- a/fortran/src/H5_f.c
+++ b/fortran/src/H5_f.c
@@ -381,14 +381,10 @@ int_f
nh5init1_flags_c(int_f *h5lib_flags)
{
int ret_value = -1;
- 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;
+ unsigned prm_1 = H5_SZIP_EC_OPTION_MASK;
+ unsigned prm_2 = 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;
+ h5lib_flags[1] = (int_f)prm_2;
ret_value = 0;
return ret_value;
}