Mercurial > hg > octave-lyh

diff src/ov-struct.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 4e4062bb9807
children e35b034d3523
line wrap: on
line diff
--- a/src/ov-struct.cc
+++ b/src/ov-struct.cc
@@ -1172,7 +1172,9 @@
   int current_item = 0;
 #ifdef HAVE_H5GGET_NUM_OBJS
   hsize_t num_obj = 0;
-  H5Gget_num_objs (loc_id, &num_obj);
+  hid_t group_id = H5Gopen (loc_id, name); 
+  H5Gget_num_objs (group_id, &num_obj);
+  H5Gclose (group_id);
 
   while (current_item < static_cast<int> (num_obj)
 	 && (retval2 = H5Giterate (loc_id, name, &current_item,