Displaying 1 result from an estimated 1 matches for "h5p_default".
2011 Mar 04
2
Fixing the HDF5 package: the on.exit mystery
...nt()), fid,
PACKAGE="hdf5"))
}
#----------------------------------------------------------------
/*---------------------------------------------------------------*/
SEXP do_hdf5load (SEXP args)
{
/* Code to process args snipped */
if ((fid = H5Fopen (path, H5F_ACC_RDONLY, H5P_DEFAULT)) < 0)
errorcall (call, "unable to open HDF file: %s", path);
setup_onexit (fid, env);
/* Messy code to walk tree structure of file snipped */
}
/* The following function shown in its entirety */
setup_onexit (hid_t fid, SEXP env)
{
eval (lang2 (install ("on.exit&q...