Displaying 1 result from an estimated 1 matches for "do_hdf5cleanup".
2011 Mar 04
2
Fixing the HDF5 package: the on.exit mystery
...sys.call()
.External("do_hdf5load", call, sys.frame(sys.parent()), file, load,
as.integer (verbosity), as.logical(tidy),
PACKAGE="hdf5")
}
"hdf5cleanup" <- function (fid)
{
call <- sys.call()
print("In hdf5cleanup: calling do_hdf5cleanup")
invisible(.External("do_hdf5cleanup", call, sys.frame(sys.parent()), fid,
PACKAGE="hdf5"))
}
#----------------------------------------------------------------
/*---------------------------------------------------------------*/
SEXP do_hdf5load (SEXP args...