add third try() around blosc/zarr

Author: edzer

src/gdal_utils.cpp

@@ -457,7 +457,7 @@ Rcpp::CharacterVector CPL_gdalmdiminfo(Rcpp::CharacterVector obj, Rcpp::Characte
 	GDALDatasetH ds = GDALOpenEx((const char *) obj[0], GDAL_OF_MULTIDIM_RASTER | GDAL_OF_VERBOSE_ERROR , NULL, oo_char.data(), NULL);
 	if (ds == NULL) {
 		Rcpp::Rcout << "failed to open " << obj[0] << std::endl;
-		Rcpp::stop("Error opening data source");
+		Rcpp::stop("cannot open data source");
 	}
 	std::vector <char *> options_char = create_options(options, true);
 	GDALMultiDimInfoOptions* opt = GDALMultiDimInfoOptionsNew(options_char.data(), NULL);

tests/stars.R

@@ -79,8 +79,11 @@ gdal_metadata(tif)
 if (require(stars, quietly = TRUE)) {
 	p = normalizePath(system.file("nc/ones.zarr.zip", package = "sf"))
 	z = paste0('ZARR:/vsizip/"', p, '"/ones.zarr')
-	gdal_utils("mdiminfo", z)
-	cat("\n")
+	d = try(gdal_utils("mdiminfo", z))
+	if (!inherits(d, "try-error")) {
+		print(d)
+		cat("\n")
+	}
 	e = try(read_stars(z, normalize_path = FALSE), silent = TRUE)
 	f = try(read_mdim(z, normalize_path = FALSE), silent = TRUE)
 	if (inherits(e, "try-error") || inherits(f, "try-error")) {