diff --git a/R/h5read.R b/R/h5read.R index 63769bc..0efc742 100644 --- a/R/h5read.R +++ b/R/h5read.R @@ -263,6 +263,8 @@ h5read <- function(file, name, index=NULL, start=NULL, stride=NULL, block=NULL, return(FALSE) } + ## TODO: test attribute values + ## test datasets exist group_data <- h5ls(gid, recursive = FALSE) if(!all(c("values", "mask") %in% group_data$name)) {