* using log directory ‘/Users/ripley/R/packages/tests-devel/geotargets.Rcheck’ * using R Under development (unstable) (2026-05-27 r90083) * using platform: aarch64-apple-darwin25.5.0 * R was compiled by Apple clang version 21.0.0 (clang-2100.1.1.101) GNU Fortran (GCC) 14.2.0 * running under: macOS Tahoe 26.5 * using session charset: UTF-8 * current time: 2026-05-30 10:12:46 UTC * using option ‘--no-stop-on-test-error’ * checking for file ‘geotargets/DESCRIPTION’ ... OK * this is package ‘geotargets’ version ‘0.3.1’ * package encoding: UTF-8 * checking package namespace information ... OK * checking package dependencies ... OK * checking if this is a source package ... OK * checking if there is a namespace ... OK * checking for executable files ... OK * checking for hidden files and directories ... OK * checking for portable file names ... OK * checking for sufficient/correct file permissions ... OK * checking whether package ‘geotargets’ can be installed ... OK * checking installed package size ... OK * checking package directory ... OK * checking ‘build’ directory ... OK * checking DESCRIPTION meta-information ... OK * checking top-level files ... OK * checking for left-over files ... OK * checking index information ... OK * checking package subdirectories ... OK * checking code files for non-ASCII characters ... OK * checking R files for syntax errors ... OK * checking whether the package can be loaded ... OK * checking whether the package can be loaded with stated dependencies ... OK * checking whether the package can be unloaded cleanly ... OK * checking whether the namespace can be loaded with stated dependencies ... OK * checking whether the namespace can be unloaded cleanly ... OK * checking loading without being on the library search path ... OK * checking use of S3 registration ... OK * checking dependencies in R code ... OK * checking S3 generic/method consistency ... OK * checking replacement functions ... OK * checking foreign function calls ... OK * checking R code for possible problems ... OK * checking Rd files ... OK * checking Rd metadata ... OK * checking Rd cross-references ... OK * checking for missing documentation entries ... OK * checking for code/documentation mismatches ... OK * checking Rd \usage sections ... OK * checking Rd contents ... OK * checking for unstated dependencies in examples ... OK * checking installed files from ‘inst/doc’ ... OK * checking files in ‘vignettes’ ... OK * checking examples ... OK * checking for unstated dependencies in ‘tests’ ... OK * checking tests ... Running ‘spelling.R’ Running ‘testthat.R’ [52s/50s] [52s/51s] ERROR Running the tests in ‘tests/testthat.R’ failed. Complete output: > # This file is part of the standard setup for testthat. > # It is recommended that you do not modify it. > # > # Where should you do additional test configuration? > # Learn more about the roles of various files in: > # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview > # * https://testthat.r-lib.org/articles/special-files.html > > library(testthat) > library(geotargets) > > test_check("geotargets") Warning messages: 1: GDAL Error 6: SetIndexingVariable() not implemented 2: GDAL Error 6: SetIndexingVariable() not implemented Warning messages: 1: GDAL Error 6: SetIndexingVariable() not implemented 2: GDAL Error 6: SetIndexingVariable() not implemented terra 1.9.27 *** caught segfault *** address 0x0, cause 'invalid permissions' Traceback: 1: .External(list(name = "CppMethod__invoke_notvoid", address = , dll = list(name = "Rcpp", path = "/Users/ripley/R/Library/Rcpp/libs/Rcpp.so", dynamicLookup = TRUE, handle = , info = , forceSymbols = FALSE), numParameters = -1L), , , .pointer, ...) 2: x@pntr$writeRaster(opt) 3: .local(x, filename, ...) 4: (new("standardGeneric", .Data = function (x, filename, ...) standardGeneric("writeRaster"), generic = "writeRaster", package = "terra", group = list(), valueClass = character(0), signature = c("x", "filename"), default = NULL, skeleton = (function (x, filename, ...) stop(gettextf("invalid call in method dispatch to '%s' (no default method)", "writeRaster"), domain = NA))(x, filename, ...)))(new("SpatRaster", pntr = new("Rcpp_SpatRaster", .xData = )), filename = "_targets/scratch/r", filetype = "COG", overwrite = TRUE, gdal = NULL) 5: (new("standardGeneric", .Data = function (x, filename, ...) standardGeneric("writeRaster"), generic = "writeRaster", package = "terra", group = list(), valueClass = character(0), signature = c("x", "filename"), default = NULL, skeleton = (function (x, filename, ...) stop(gettextf("invalid call in method dispatch to '%s' (no default method)", "writeRaster"), domain = NA))(x, filename, ...)))(new("SpatRaster", pntr = new("Rcpp_SpatRaster", .xData = )), filename = "_targets/scratch/r", filetype = "COG", overwrite = TRUE, gdal = NULL) 6: do.call(terra::writeRaster, c(list(object, filename = path, filetype = "COG", overwrite = TRUE, gdal = NULL), list())) 7: (function (object, path) { do.call(terra::writeRaster, c(list(object, filename = path, filetype = "COG", overwrite = TRUE, gdal = NULL), list()))})(object = new("SpatRaster", pntr = new("Rcpp_SpatRaster", .xData = )), path = "_targets/scratch/r") 8: do.call(what = what, args = args, envir = envir) 9: store_format_custom_call_method(store = store, text = store$methods_format$write, args = list(object = object, path = path)) 10: store_write_path.tar_store_format_custom(store, store_convert_object(store, object), stage) 11: store_write_path(store, store_convert_object(store, object), stage) 12: store_write_object.default(target$store, target$file, target$value$object) 13: store_write_object(target$store, target$file, target$value$object) 14: withCallingHandlers(store_write_object(target$store, target$file, target$value$object), warning = function(condition) { if (length(target$metrics$warnings) < 51L) { target$metrics$warnings <- paste(c(target$metrics$warnings, build_message(condition)), collapse = ". ") } warning(as_immediate_condition(condition)) invokeRestart("muffleWarning")}) 15: builder_update_object(target, on_worker) 16: doTryCatch(return(expr), name, parentenv, handler) 17: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 18: tryCatchList(expr, classes, parentenv, handlers) 19: tryCatch(builder_update_object(target, on_worker), error = function(error) { builder_error_internal(target, error, "Error storing output:")}) 20: builder_ensure_object(target, "worker", on_worker) 21: target_run.tar_builder(target = target, envir = self$envir, path_store = self$meta$store) 22: target_run(target = target, envir = self$envir, path_store = self$meta$store) 23: .subset2(self, "run_target")(target) 24: self$process_target(self$scheduler$queue$dequeue()) 25: self$process_next() 26: local_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = queue, reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"))$run() 27: (function (pipeline, path_store, names_quosure, shortcut, reporter, seconds_meta_append, seconds_meta_upload, use_crew, terminate_controller) { names <- tar_tidyselect_eval(names_quosure, pipeline_get_names(pipeline)) controller <- tar_option_get("controller") if (is.null(controller) || (!use_crew)) { pipeline_reset_deployments(pipeline) queue <- if_any(pipeline_uses_priorities(pipeline), "parallel", "sequential") local_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = queue, reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"))$run() } else { tar_assert_package("crew (>= 0.9.0)") crew_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = "parallel", reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"), controller = controller, terminate_controller = terminate_controller)$run() } invisible()})(path_store = "_targets", names_quosure = ~NULL, shortcut = FALSE, reporter = "silent", seconds_meta_append = 0, seconds_meta_upload = 15, use_crew = TRUE, terminate_controller = TRUE, pipeline = ) 28: do.call(targets_function, targets_arguments) 29: withCallingHandlers(expr, packageStartupMessage = function(c) tryInvokeRestart("muffleMessage")) 30: suppressPackageStartupMessages(do.call(targets_function, targets_arguments)) 31: targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent) 32: withCallingHandlers(targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent), error = function(condition) { trace <- .traceback(x = 3L) result$condition <- targets::tar_condition_traced(condition = condition, trace = trace)}) 33: doTryCatch(return(expr), name, parentenv, handler) 34: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 35: tryCatchList(expr, classes, parentenv, handlers) 36: tryCatch(out <- withCallingHandlers(targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent), error = function(condition) { trace <- .traceback(x = 3L) result$condition <- targets::tar_condition_traced(condition = condition, trace = trace)}), error = function(condition) {}) 37: (function (targets_function, targets_arguments, options, envir = NULL, script, store, fun, pid_parent) { force(envir) parent <- parent.frame() result <- new.env(parent = emptyenv()) tryCatch(out <- withCallingHandlers(targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent), error = function(condition) { trace <- .traceback(x = 3L) result$condition <- targets::tar_condition_traced(condition = condition, trace = trace) }), error = function(condition) { }) if (is.null(result$condition)) { out } else { result$condition }})(targets_function = base::quote(function (pipeline, path_store, names_quosure, shortcut, reporter, seconds_meta_append, seconds_meta_upload, use_crew, terminate_controller) { names <- tar_tidyselect_eval(names_quosure, pipeline_get_names(pipeline)) controller <- tar_option_get("controller") if (is.null(controller) || (!use_crew)) { pipeline_reset_deployments(pipeline) queue <- if_any(pipeline_uses_priorities(pipeline), "parallel", "sequential") local_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = queue, reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"))$run() } else { tar_assert_package("crew (>= 0.9.0)") crew_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = "parallel", reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"), controller = controller, terminate_controller = terminate_controller)$run() } invisible()}), targets_arguments = base::quote(list(path_store = "_targets", names_quosure = ~NULL, shortcut = FALSE, reporter = "silent", seconds_meta_append = 0, seconds_meta_upload = 15, use_crew = TRUE, terminate_controller = TRUE)), options = base::quote(list( cli.dynamic = FALSE, cli.num_colors = 1L)), script = base::quote("_targets.R"), store = base::quote("_targets"), fun = base::quote("tar_make"), pid_parent = base::quote(21392L)) 38: (function (what, args, quote = FALSE, envir = parent.frame()) { if (!is.list(args)) stop("second argument must be a list") if (quote) args <- lapply(args, enquote) .Internal(do.call(what, args, envir))})(base::quote(function (targets_function, targets_arguments, options, envir = NULL, script, store, fun, pid_parent) { force(envir) parent <- parent.frame() result <- new.env(parent = emptyenv()) tryCatch(out <- withCallingHandlers(targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent), error = function(condition) { trace <- .traceback(x = 3L) result$condition <- targets::tar_condition_traced(condition = condition, trace = trace) }), error = function(condition) { }) if (is.null(result$condition)) { out } else { result$condition }}), base::quote(list(targets_function = function (pipeline, path_store, names_quosure, shortcut, reporter, seconds_meta_append, seconds_meta_upload, use_crew, terminate_controller) { names <- tar_tidyselect_eval(names_quosure, pipeline_get_names(pipeline)) controller <- tar_option_get("controller") if (is.null(controller) || (!use_crew)) { pipeline_reset_deployments(pipeline) queue <- if_any(pipeline_uses_priorities(pipeline), "parallel", "sequential") local_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = queue, reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"))$run() } else { tar_assert_package("crew (>= 0.9.0)") crew_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = "parallel", reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"), controller = controller, terminate_controller = terminate_controller)$run() } invisible()}, targets_arguments = list(path_store = "_targets", names_quosure = ~NULL, shortcut = FALSE, reporter = "silent", seconds_meta_append = 0, seconds_meta_upload = 15, use_crew = TRUE, terminate_controller = TRUE), options = list(cli.dynamic = FALSE, cli.num_colors = 1L), script = "_targets.R", store = "_targets", fun = "tar_make", pid_parent = 21392L)), envir = base::quote(), quote = base::quote(TRUE)) 39: base::do.call(base::do.call, base::c(base::readRDS("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-fun-53906076ccff"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE) 40: base::saveRDS(base::do.call(base::do.call, base::c(base::readRDS("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-fun-53906076ccff"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE), file = "/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-5390178caad3", compress = FALSE) 41: base::withCallingHandlers({ NULL base::saveRDS(base::do.call(base::do.call, base::c(base::readRDS("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-fun-53906076ccff"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE), file = "/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-5390178caad3", compress = FALSE) base::flush(base::stdout()) base::flush(base::stderr()) NULL base::invisible()}, error = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } base::saveRDS(base::list("error", e2, e), file = base::paste0("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-5390178caad3", ".error")) }}, interrupt = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } base::saveRDS(base::list("error", e2, e), file = base::paste0("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-5390178caad3", ".error")) }}, callr_message = function(e) { base::try(base::signalCondition(e))}) 42: doTryCatch(return(expr), name, parentenv, handler) 43: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 44: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 45: doTryCatch(return(expr), name, parentenv, handler) 46: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 47: tryCatchList(expr, classes, parentenv, handlers) 48: base::tryCatch(base::withCallingHandlers({ NULL base::saveRDS(base::do.call(base::do.call, base::c(base::readRDS("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-fun-53906076ccff"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE), file = "/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-5390178caad3", compress = FALSE) base::flush(base::stdout()) base::flush(base::stderr()) NULL base::invisible()}, error = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } base::saveRDS(base::list("error", e2, e), file = base::paste0("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-5390178caad3", ".error")) }}, interrupt = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } base::saveRDS(base::list("error", e2, e), file = base::paste0("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-5390178caad3", ".error")) }}, callr_message = function(e) { base::try(base::signalCondition(e))}), error = function(e) { NULL if (TRUE) { base::try(base::stop(e)) } else { base::invisible() }}, interrupt = function(e) { NULL if (TRUE) { e } else { base::invisible() }}) An irrecoverable exception occurred. R is aborting now ... terra 1.9.27 terra 1.9.27 *** caught segfault *** address 0x0, cause 'invalid permissions' Traceback: 1: .External(list(name = "CppMethod__invoke_notvoid", address = , dll = list(name = "Rcpp", path = "/Users/ripley/R/Library/Rcpp/libs/Rcpp.so", dynamicLookup = TRUE, handle = , info = , forceSymbols = FALSE), numParameters = -1L), , , .pointer, ...) 2: x@pntr$writeRaster(opt) 3: .local(x, filename, ...) 4: (new("standardGeneric", .Data = function (x, filename, ...) standardGeneric("writeRaster"), generic = "writeRaster", package = "terra", group = list(), valueClass = character(0), signature = c("x", "filename"), default = NULL, skeleton = (function (x, filename, ...) stop(gettextf("invalid call in method dispatch to '%s' (no default method)", "writeRaster"), domain = NA))(x, filename, ...)))(new("SpatRaster", pntr = new("Rcpp_SpatRaster", .xData = )), filename = "_targets/scratch/r2", filetype = "COG", overwrite = TRUE, gdal = NULL) 5: (new("standardGeneric", .Data = function (x, filename, ...) standardGeneric("writeRaster"), generic = "writeRaster", package = "terra", group = list(), valueClass = character(0), signature = c("x", "filename"), default = NULL, skeleton = (function (x, filename, ...) stop(gettextf("invalid call in method dispatch to '%s' (no default method)", "writeRaster"), domain = NA))(x, filename, ...)))(new("SpatRaster", pntr = new("Rcpp_SpatRaster", .xData = )), filename = "_targets/scratch/r2", filetype = "COG", overwrite = TRUE, gdal = NULL) 6: do.call(terra::writeRaster, c(list(object, filename = path, filetype = "COG", overwrite = TRUE, gdal = NULL), list())) 7: (function (object, path) { do.call(terra::writeRaster, c(list(object, filename = path, filetype = "COG", overwrite = TRUE, gdal = NULL), list()))})(object = new("SpatRaster", pntr = new("Rcpp_SpatRaster", .xData = )), path = "_targets/scratch/r2") 8: do.call(what = what, args = args, envir = envir) 9: store_format_custom_call_method(store = store, text = store$methods_format$write, args = list(object = object, path = path)) 10: store_write_path.tar_store_format_custom(store, store_convert_object(store, object), stage) 11: store_write_path(store, store_convert_object(store, object), stage) 12: store_write_object.default(target$store, target$file, target$value$object) 13: store_write_object(target$store, target$file, target$value$object) 14: withCallingHandlers(store_write_object(target$store, target$file, target$value$object), warning = function(condition) { if (length(target$metrics$warnings) < 51L) { target$metrics$warnings <- paste(c(target$metrics$warnings, build_message(condition)), collapse = ". ") } warning(as_immediate_condition(condition)) invokeRestart("muffleWarning")}) 15: builder_update_object(target, on_worker) 16: doTryCatch(return(expr), name, parentenv, handler) 17: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 18: tryCatchList(expr, classes, parentenv, handlers) 19: tryCatch(builder_update_object(target, on_worker), error = function(error) { builder_error_internal(target, error, "Error storing output:")}) 20: builder_ensure_object(target, "worker", on_worker) 21: target_run.tar_builder(target = target, envir = self$envir, path_store = self$meta$store) 22: target_run(target = target, envir = self$envir, path_store = self$meta$store) 23: .subset2(self, "run_target")(target) 24: self$process_target(self$scheduler$queue$dequeue()) 25: self$process_next() 26: local_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = queue, reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"))$run() 27: (function (pipeline, path_store, names_quosure, shortcut, reporter, seconds_meta_append, seconds_meta_upload, use_crew, terminate_controller) { names <- tar_tidyselect_eval(names_quosure, pipeline_get_names(pipeline)) controller <- tar_option_get("controller") if (is.null(controller) || (!use_crew)) { pipeline_reset_deployments(pipeline) queue <- if_any(pipeline_uses_priorities(pipeline), "parallel", "sequential") local_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = queue, reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"))$run() } else { tar_assert_package("crew (>= 0.9.0)") crew_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = "parallel", reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"), controller = controller, terminate_controller = terminate_controller)$run() } invisible()})(path_store = "_targets", names_quosure = ~NULL, shortcut = FALSE, reporter = "silent", seconds_meta_append = 0, seconds_meta_upload = 15, use_crew = TRUE, terminate_controller = TRUE, pipeline = ) 28: do.call(targets_function, targets_arguments) 29: withCallingHandlers(expr, packageStartupMessage = function(c) tryInvokeRestart("muffleMessage")) 30: suppressPackageStartupMessages(do.call(targets_function, targets_arguments)) 31: targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent) 32: withCallingHandlers(targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent), error = function(condition) { trace <- .traceback(x = 3L) result$condition <- targets::tar_condition_traced(condition = condition, trace = trace)}) 33: doTryCatch(return(expr), name, parentenv, handler) 34: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 35: tryCatchList(expr, classes, parentenv, handlers) 36: tryCatch(out <- withCallingHandlers(targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent), error = function(condition) { trace <- .traceback(x = 3L) result$condition <- targets::tar_condition_traced(condition = condition, trace = trace)}), error = function(condition) {}) 37: (function (targets_function, targets_arguments, options, envir = NULL, script, store, fun, pid_parent) { force(envir) parent <- parent.frame() result <- new.env(parent = emptyenv()) tryCatch(out <- withCallingHandlers(targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent), error = function(condition) { trace <- .traceback(x = 3L) result$condition <- targets::tar_condition_traced(condition = condition, trace = trace) }), error = function(condition) { }) if (is.null(result$condition)) { out } else { result$condition }})(targets_function = base::quote(function (pipeline, path_store, names_quosure, shortcut, reporter, seconds_meta_append, seconds_meta_upload, use_crew, terminate_controller) { names <- tar_tidyselect_eval(names_quosure, pipeline_get_names(pipeline)) controller <- tar_option_get("controller") if (is.null(controller) || (!use_crew)) { pipeline_reset_deployments(pipeline) queue <- if_any(pipeline_uses_priorities(pipeline), "parallel", "sequential") local_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = queue, reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"))$run() } else { tar_assert_package("crew (>= 0.9.0)") crew_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = "parallel", reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"), controller = controller, terminate_controller = terminate_controller)$run() } invisible()}), targets_arguments = base::quote(list(path_store = "_targets", names_quosure = ~NULL, shortcut = FALSE, reporter = "silent", seconds_meta_append = 0, seconds_meta_upload = 15, use_crew = TRUE, terminate_controller = TRUE)), options = base::quote(list( cli.dynamic = FALSE, cli.num_colors = 1L)), script = base::quote("_targets.R"), store = base::quote("_targets"), fun = base::quote("tar_make"), pid_parent = base::quote(21392L)) 38: (function (what, args, quote = FALSE, envir = parent.frame()) { if (!is.list(args)) stop("second argument must be a list") if (quote) args <- lapply(args, enquote) .Internal(do.call(what, args, envir))})(base::quote(function (targets_function, targets_arguments, options, envir = NULL, script, store, fun, pid_parent) { force(envir) parent <- parent.frame() result <- new.env(parent = emptyenv()) tryCatch(out <- withCallingHandlers(targets::tar_callr_inner_try(targets_function = targets_function, targets_arguments = targets_arguments, options = options, envir = envir, parent = parent, script = script, store = store, fun = fun, pid_parent = pid_parent), error = function(condition) { trace <- .traceback(x = 3L) result$condition <- targets::tar_condition_traced(condition = condition, trace = trace) }), error = function(condition) { }) if (is.null(result$condition)) { out } else { result$condition }}), base::quote(list(targets_function = function (pipeline, path_store, names_quosure, shortcut, reporter, seconds_meta_append, seconds_meta_upload, use_crew, terminate_controller) { names <- tar_tidyselect_eval(names_quosure, pipeline_get_names(pipeline)) controller <- tar_option_get("controller") if (is.null(controller) || (!use_crew)) { pipeline_reset_deployments(pipeline) queue <- if_any(pipeline_uses_priorities(pipeline), "parallel", "sequential") local_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = queue, reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"))$run() } else { tar_assert_package("crew (>= 0.9.0)") crew_init(pipeline = pipeline, meta = meta_init(path_store = path_store), names = names, shortcut = shortcut, queue = "parallel", reporter = reporter, seconds_meta_append = seconds_meta_append, seconds_meta_upload = seconds_meta_upload, envir = tar_option_get("envir"), controller = controller, terminate_controller = terminate_controller)$run() } invisible()}, targets_arguments = list(path_store = "_targets", names_quosure = ~NULL, shortcut = FALSE, reporter = "silent", seconds_meta_append = 0, seconds_meta_upload = 15, use_crew = TRUE, terminate_controller = TRUE), options = list(cli.dynamic = FALSE, cli.num_colors = 1L), script = "_targets.R", store = "_targets", fun = "tar_make", pid_parent = 21392L)), envir = base::quote(), quote = base::quote(TRUE)) 39: base::do.call(base::do.call, base::c(base::readRDS("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-fun-5390408a63d"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE) 40: base::saveRDS(base::do.call(base::do.call, base::c(base::readRDS("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-fun-5390408a63d"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE), file = "/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-539053d9f0dc", compress = FALSE) 41: base::withCallingHandlers({ NULL base::saveRDS(base::do.call(base::do.call, base::c(base::readRDS("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-fun-5390408a63d"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE), file = "/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-539053d9f0dc", compress = FALSE) base::flush(base::stdout()) base::flush(base::stderr()) NULL base::invisible()}, error = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } base::saveRDS(base::list("error", e2, e), file = base::paste0("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-539053d9f0dc", ".error")) }}, interrupt = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } base::saveRDS(base::list("error", e2, e), file = base::paste0("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-539053d9f0dc", ".error")) }}, callr_message = function(e) { base::try(base::signalCondition(e))}) 42: doTryCatch(return(expr), name, parentenv, handler) 43: tryCatchOne(expr, names, parentenv, handlers[[1L]]) 44: tryCatchList(expr, names[-nh], parentenv, handlers[-nh]) 45: doTryCatch(return(expr), name, parentenv, handler) 46: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh], parentenv, handlers[[nh]]) 47: tryCatchList(expr, classes, parentenv, handlers) 48: base::tryCatch(base::withCallingHandlers({ NULL base::saveRDS(base::do.call(base::do.call, base::c(base::readRDS("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-fun-5390408a63d"), base::list(envir = .GlobalEnv, quote = TRUE)), envir = .GlobalEnv, quote = TRUE), file = "/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-539053d9f0dc", compress = FALSE) base::flush(base::stdout()) base::flush(base::stderr()) NULL base::invisible()}, error = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } base::saveRDS(base::list("error", e2, e), file = base::paste0("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-539053d9f0dc", ".error")) }}, interrupt = function(e) { { callr_data <- base::as.environment("tools:callr")$`__callr_data__` err <- callr_data$err if (FALSE) { base::assign(".Traceback", base::.traceback(4), envir = callr_data) utils::dump.frames("__callr_dump__") base::assign(".Last.dump", .GlobalEnv$`__callr_dump__`, envir = callr_data) base::rm("__callr_dump__", envir = .GlobalEnv) } e <- err$process_call(e) e2 <- err$new_error("error in callr subprocess") class <- base::class class(e2) <- base::c("callr_remote_error", class(e2)) e2 <- err$add_trace_back(e2) cut <- base::which(e2$trace$scope == "global")[1] if (!base::is.na(cut)) { e2$trace <- e2$trace[-(1:cut), ] } base::saveRDS(base::list("error", e2, e), file = base::paste0("/var/folders/pk/n4bndnt1287ctrd_ftthnnnr0000gp/T//RtmpvdvJNc/working_dir/RtmpMowu7P/callr-res-539053d9f0dc", ".error")) }}, callr_message = function(e) { base::try(base::signalCondition(e))}), error = function(e) { NULL if (TRUE) { base::try(base::stop(e)) } else { base::invisible() }}, interrupt = function(e) { NULL if (TRUE) { e } else { base::invisible() }}) An irrecoverable exception occurred. R is aborting now ... terra 1.9.27 terra 1.9.27 terra 1.9.27 creating 2 * 3 = 6 tile extents terra 1.9.27 creating 2 * 3 = 6 tile extents creating 1 * 1 = 1 tile extents creating 1 * 2 = 2 tile extents creating 1 * 3 = 3 tile extents creating 2 * 2 = 4 tile extents creating 2 * 3 = 6 tile extents [ FAIL 2 | WARN 0 | SKIP 14 | PASS 57 ] ══ Skipped tests (14) ══════════════════════════════════════════════════════════ • On CRAN (14): 'test-check-gdal-shz.R:1:1', 'test-check-gdal-sozip.R:1:1', 'test-check-pkg-installed.R:1:1', 'test-check-user-resources.R:1:1', 'test-tar-stars.R:5:1', 'test-tar-stars.R:25:1', 'test-tar-stars.R:46:1', 'test-tar-stars.R:72:1', 'test-tar-terra-rast.R:3:1', 'test-tar-terra-sprc.R:2:1', 'test-tar-terra-sprc.R:48:1', 'test-tar-terra-vect.R:2:1', 'test-tile-funs.R:1:1', 'test-tile-funs.R:39:1' ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-tar-terra-rast.R:126:3'): That changing filetype invalidates a target ── Error in `"get_result(output = out, options)"`: ! callr subprocess failed: could not start R, exited with non-zero status, has crashed or was killed Backtrace: ▆ 1. └─targets::tar_make(reporter = "silent") at test-tar-terra-rast.R:126:3 2. └─targets:::callr_outer(...) 3. └─targets:::callr_dispatch(...) 4. ├─targets:::if_any(...) 5. ├─base::do.call(...) 6. └─callr (local) ``(...) 7. └─callr:::get_result(output = out, options) 8. └─throw(new_callr_crash_error(output, killmsg)) ── Error ('test-tar-terra-rast.R:195:3'): metadata is maintained for COG ─────── Error in `"get_result(output = out, options)"`: ! callr subprocess failed: could not start R, exited with non-zero status, has crashed or was killed Backtrace: ▆ 1. └─targets::tar_make(reporter = "silent") at test-tar-terra-rast.R:195:3 2. └─targets:::callr_outer(...) 3. └─targets:::callr_dispatch(...) 4. ├─targets:::if_any(...) 5. ├─base::do.call(...) 6. └─callr (local) ``(...) 7. └─callr:::get_result(output = out, options) 8. └─throw(new_callr_crash_error(output, killmsg)) [ FAIL 2 | WARN 0 | SKIP 14 | PASS 57 ] Error: ! Test failures. Execution halted * checking for unstated dependencies in vignettes ... OK * checking package vignettes ... OK * checking re-building of vignette outputs ... [10s/11s] ERROR Error(s) in re-building vignettes: --- re-building ‘geotargets.Rmd’ using rmarkdown Quitting from geotargets.Rmd:88-95 [make-rast] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Error: ! ! callr subprocess failed: could not start R, exited with non-zero status, has crashed or was killed --- Backtrace: ▆ 1. └─targets::tar_make() 2. └─targets:::callr_outer(...) 3. └─targets:::callr_dispatch(...) 4. ├─targets:::if_any(...) 5. ├─base::do.call(...) 6. └─callr (local) ``(...) 7. └─callr:::get_result(output = out, options) 8. └─throw(new_callr_crash_error(output, killmsg)) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Error: processing vignette 'geotargets.Rmd' failed with diagnostics: ! callr subprocess failed: could not start R, exited with non-zero status, has crashed or was killed --- failed re-building ‘geotargets.Rmd’ --- re-building ‘tar_terra_tiles.Rmd’ using rmarkdown Quitting from tar_terra_tiles.Rmd:238-245 [tar-make] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Error: ! ! callr subprocess failed: could not start R, exited with non-zero status, has crashed or was killed --- Backtrace: ▆ 1. └─targets::tar_make() 2. └─targets:::callr_outer(...) 3. └─targets:::callr_dispatch(...) 4. ├─targets:::if_any(...) 5. ├─base::do.call(...) 6. └─callr (local) ``(...) 7. └─callr:::get_result(output = out, options) 8. └─throw(new_callr_crash_error(output, killmsg)) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Error: processing vignette 'tar_terra_tiles.Rmd' failed with diagnostics: ! callr subprocess failed: could not start R, exited with non-zero status, has crashed or was killed --- failed re-building ‘tar_terra_tiles.Rmd’ SUMMARY: processing the following files failed: ‘geotargets.Rmd’ ‘tar_terra_tiles.Rmd’ Error: Vignette re-building failed. Execution halted * checking PDF version of manual ... OK * checking HTML version of manual ... OK * checking for detritus in the temp directory ... OK * DONE Status: 2 ERRORs See ‘/Users/ripley/R/packages/tests-devel/geotargets.Rcheck/00check.log’ for details. 88.23 real 74.06 user 11.84 sys