diff options
author | Quincey Koziol <koziol@hdfgroup.org> | 2007-11-01 18:24:08 (GMT) |
---|---|---|
committer | Quincey Koziol <koziol@hdfgroup.org> | 2007-11-01 18:24:08 (GMT) |
commit | 24f2310b1284c569ea277be00f57248bfd306378 (patch) | |
tree | a28e3e8ec585c963f73fc4ed1294f30f940e3a34 /fortran/src | |
parent | ecaf22fa0450205a508c961b59dbe616d0449b0a (diff) | |
download | hdf5-24f2310b1284c569ea277be00f57248bfd306378.zip hdf5-24f2310b1284c569ea277be00f57248bfd306378.tar.gz hdf5-24f2310b1284c569ea277be00f57248bfd306378.tar.bz2 |
[svn-r14229] Description:
Change H5O[gs]et_comment to H5O[gs]et_comment_by_name and re-add simpler
forms of H5O[gs]et_comment.
Tested on:
FreeBSD/32 6.2 (duty) in debug mode
FreeBSD/64 6.2 (liberty) w/C++ & FORTRAN, in debug mode
Linux/32 2.6 (kagiso) w/PGI compilers, w/C++ & FORTRAN, w/threadsafe,
in debug mode
Linux/64-amd64 2.6 (smirom) w/default API=1.6.x, w/C++ & FORTRAN,
in production mode
Linux/64-ia64 2.6 (cobalt) w/Intel compilers, w/C++ & FORTRAN,
in production mode
Solaris/32 2.10 (linew) w/deprecated symbols disabled, w/C++ & FORTRAN,
w/szip filter, in production mode
Mac OS X/32 10.4.10 (amazon) in debug mode
Linux/64-ia64 2.4 (tg-login3) w/parallel, w/FORTRAN, in production mode
Diffstat (limited to 'fortran/src')
-rw-r--r-- | fortran/src/H5Gf.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/fortran/src/H5Gf.c b/fortran/src/H5Gf.c index 27b6682..0316c03 100644 --- a/fortran/src/H5Gf.c +++ b/fortran/src/H5Gf.c @@ -560,7 +560,7 @@ DONE: /*---------------------------------------------------------------------------- * Name: h5gset_comment_c - * Purpose: Call H5Gset_comment to set comments for the specified object + * Purpose: Call H5Oset_comment_by_name to set comments for the specified object * Inputs: loc_id - identifier of file or group * name - name of object whose comment is to be set or reset * namelen - the name lenghth @@ -588,9 +588,9 @@ nh5gset_comment_c(hid_t_f *loc_id, _fcd name, int_f *namelen, _fcd comment, goto DONE; /* - * Call H5Gset_comment function + * Call H5Oset_comment_by_name function */ - if(H5Oset_comment((hid_t)*loc_id, c_name, c_comment, H5P_DEFAULT) < 0) + if(H5Oset_comment_by_name((hid_t)*loc_id, c_name, c_comment, H5P_DEFAULT) < 0) goto DONE; ret_value = 0; @@ -604,7 +604,7 @@ DONE: /*---------------------------------------------------------------------------- * Name: h5gget_comment_c - * Purpose: Call H5Gget_comment to retrieve comments for the specified object + * Purpose: Call H5Oget_comment_by_name to retrieve comments for the specified object * Inputs: loc_id - identifier of file or group * name - name of object whose comment is to be set or reset * namelen - the name lenghth @@ -640,9 +640,9 @@ nh5gget_comment_c(hid_t_f *loc_id, _fcd name, int_f *namelen, size_t_f *bufsize, } /* end if */ /* - * Call H5Gget_comment function + * Call H5Oget_comment_by_name function */ - if(H5Oget_comment((hid_t)*loc_id, c_name, c_comment, c_bufsize, H5P_DEFAULT) < 0) + if(H5Oget_comment_by_name((hid_t)*loc_id, c_name, c_comment, c_bufsize, H5P_DEFAULT) < 0) goto DONE; /* |