summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2014-07-23 18:50:06 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2014-07-23 18:50:06 (GMT)
commitc85497442b4a228b6d636d59fb5e51a932933142 (patch)
tree271e8219919f5b17117b36261434d93d7c864d42
parent00e4cbc963d06c2f9d786e3520ceb510ff502c9a (diff)
downloadhdf5-c85497442b4a228b6d636d59fb5e51a932933142.zip
hdf5-c85497442b4a228b6d636d59fb5e51a932933142.tar.gz
hdf5-c85497442b4a228b6d636d59fb5e51a932933142.tar.bz2
[svn-r25475] Fixed for nh5pget_fill_valuec_c where we called the wrong function
ret_value = nh5pset_fill_value_c(prp_id, type_id, _fcdtocp(fillvalue)) HDFFV-8879 Tested: jam( intel, gnu)
-rw-r--r--fortran/src/H5Pf.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/fortran/src/H5Pf.c b/fortran/src/H5Pf.c
index 1306aa6..b66709a 100644
--- a/fortran/src/H5Pf.c
+++ b/fortran/src/H5Pf.c
@@ -558,7 +558,7 @@ nh5pget_fill_value_integer_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue
/*
* Call h5pget_fill_value_c function.
*/
- return nh5pset_fill_value_c(prp_id, type_id, fillvalue);
+ return nh5pget_fill_value_c(prp_id, type_id, fillvalue);
}
int_f
@@ -567,7 +567,7 @@ nh5pget_fill_value_real_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
/*
* Call h5pget_fill_value_c function.
*/
- return nh5pset_fill_value_c(prp_id, type_id, fillvalue);
+ return nh5pget_fill_value_c(prp_id, type_id, fillvalue);
}
int_f
@@ -576,7 +576,7 @@ nh5pget_fill_value_double_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
/*
* Call h5pget_fill_value_c function.
*/
- return nh5pset_fill_value_c(prp_id, type_id, fillvalue);
+ return nh5pget_fill_value_c(prp_id, type_id, fillvalue);
}
/****if* H5Pf/h5pget_version_c