Mercurial > octave-nkf

comparison src/ls-hdf5.cc @ 5060:34a904ac130d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-11-02 03:08:10 by jwe]
author jwe
date Tue, 02 Nov 2004 03:08:10 +0000
parents 7124436476cb
children 4c8a2e4e0717
comparison
equal deleted inserted replaced
5059:38dd53c8935e 5060:34a904ac130d
544 544
545 herr_t H5Giterate_retval = -1; 545 herr_t H5Giterate_retval = -1;
546 546
547 #ifdef HAVE_H5GGET_NUM_OBJS 547 #ifdef HAVE_H5GGET_NUM_OBJS
548 hsize_t num_obj = 0; 548 hsize_t num_obj = 0;
549 H5Gget_num_objs (hs.file_id, &num_obj); 549 hid_t group_id = H5Gopen (hs.file_id, "/");
550 H5Gget_num_objs (group_id, &num_obj);
551 H5Gclose (group_id);
550 if (hs.current_item < static_cast<int> (num_obj)) 552 if (hs.current_item < static_cast<int> (num_obj))
551 #endif 553 #endif
552 H5Giterate_retval = H5Giterate (hs.file_id, "/", &hs.current_item, 554 H5Giterate_retval = H5Giterate (hs.file_id, "/", &hs.current_item,
553 hdf5_read_next_data, &d); 555 hdf5_read_next_data, &d);
554 556