There is a test case that reproduces the error we have.
Certainly I'm using the prop API the wrong way...

---- tlinks.c file
/*
  cc -I/usr/local/hdf5-1.8.8/include -c tlinks.c
  cc -o tlinks tlinks.o -L/usr/local/hdf5-1.8.8/lib -lhdf5
  ./tlinks
*/

#include "hdf5.h"

int main(int argc, char **argv)
{

  hid_t fcpl,fapl,lapl,tfid,sfid;

  fcpl=H5Pcreate(H5P_FILE_CREATE);
  H5Pset_link_creation_order(fcpl,H5P_CRT_ORDER_TRACKED|H5P_CRT_ORDER_INDEXED);

  fapl=H5Pcreate(H5P_FILE_ACCESS);
  H5Pset_fclose_degree(fapl, H5F_CLOSE_STRONG);

  lapl=H5Pcreate(H5P_LINK_ACCESS);
  H5Pset_nlinks(lapl, 7);
  tfid=H5Fcreate("TOP.hdf", H5F_ACC_TRUNC, fcpl, fapl);
  H5Fclose(tfid);

  sfid=H5Fcreate("SUB.hdf", H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
  H5Gcreate(sfid, "ROOT SUB", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
  H5Fclose(sfid);

  tfid=H5Fopen("TOP.hdf", H5F_ACC_RDWR, fapl);
  H5Gcreate(tfid, "ROOT TOP", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
  H5Lcreate_external("SUB.hdf","ROOT SUB",tfid,"SUB",H5P_DEFAULT,lapl);
  H5Fclose(tfid);

  tfid=H5Fopen("TOP.hdf", H5F_ACC_RDONLY, fapl);
  H5Fclose(tfid);

  sfid=H5Fopen("SUB.hdf", H5F_ACC_RDONLY, fapl);
  H5Fclose(sfid);
}
----



-MP-
-----------------------------------------------------------------------
 Marc POINOT [ONERA/DSNA] Tel:+33.1.46.73.42.84  Fax:+33.1.46.73.41.66
 Avertissement/disclaimer http://www.onera.fr/onera-en/emails-terms


_______________________________________________
Hdf-forum is for HDF software users discussion.
[email protected]
http://mail.hdfgroup.org/mailman/listinfo/hdf-forum_hdfgroup.org

Reply via email to