summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>2003-07-10 19:39:04 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>2003-07-10 19:39:04 (GMT)
commit932101bb80e44e23ec8c2ed690f8fbc7bd08a47a (patch)
tree0fe2bcd1e23814d17bf343a99858f50e97d540b8 /fortran
parentbdd61d8a80ba159748cd56ef59299ca749749ab6 (diff)
downloadhdf5-932101bb80e44e23ec8c2ed690f8fbc7bd08a47a.zip
hdf5-932101bb80e44e23ec8c2ed690f8fbc7bd08a47a.tar.gz
hdf5-932101bb80e44e23ec8c2ed690f8fbc7bd08a47a.tar.bz2
[svn-r7201] Purpose:
Code cleanup Description: Finish converting the B-tree 'K' values to use unsigned integers, rather than signed ones, since negative amounts of entries in a B-tree node aren't meaningful. Platforms tested: FreeBSD 4.8 (sleipnir) h5committest
Diffstat (limited to 'fortran')
-rw-r--r--fortran/src/H5Pf.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/fortran/src/H5Pf.c b/fortran/src/H5Pf.c
index f647a95..9ef14bc 100644
--- a/fortran/src/H5Pf.c
+++ b/fortran/src/H5Pf.c
@@ -624,16 +624,16 @@ nh5pset_sym_k_c (hid_t_f *prp_id, int_f* ik, int_f* lk)
{
int ret_value = -1;
hid_t c_prp_id;
- int c_ik;
- int c_lk;
+ unsigned c_ik;
+ unsigned c_lk;
herr_t ret;
/*
* Call H5Pset_sym_k function.
*/
c_prp_id = (hid_t)*prp_id;
- c_ik = (int)*ik;
- c_lk = (int)*lk;
+ c_ik = (unsigned)*ik;
+ c_lk = (unsigned)*lk;
ret = H5Pset_sym_k(c_prp_id, c_ik, c_lk);
if (ret < 0) return ret_value;
@@ -659,7 +659,7 @@ nh5pget_sym_k_c (hid_t_f *prp_id, int_f* ik, int_f* lk)
int ret_value = -1;
hid_t c_prp_id;
herr_t ret;
- int c_ik;
+ unsigned c_ik;
unsigned c_lk;
/*
@@ -690,14 +690,14 @@ nh5pset_istore_k_c (hid_t_f *prp_id, int_f* ik)
{
int ret_value = -1;
hid_t c_prp_id;
- int c_ik;
+ unsigned c_ik;
herr_t ret;
/*
* Call H5Pset_istore_k function.
*/
c_prp_id = (hid_t)*prp_id;
- c_ik = (int)*ik;
+ c_ik = (unsigned)*ik;
ret = H5Pset_istore_k(c_prp_id, c_ik);
if (ret < 0) return ret_value;
@@ -722,7 +722,7 @@ nh5pget_istore_k_c (hid_t_f *prp_id, int_f* ik)
int ret_value = -1;
hid_t c_prp_id;
herr_t ret;
- int c_ik;
+ unsigned c_ik;
/*
* Call H5Pget_istore_k function.