comment out error handling

ropensci · Jan 2, 2025 · 11b01bc · 11b01bc
1 parent e57ed57
commit 11b01bc
Showing 1 changed file with 15 additions and 14 deletions.
diff --git a/R/utils_callr.R b/R/utils_callr.R
@@ -154,9 +154,9 @@ callr_inner <- function(
 ) {
   force(envir)
   parent <- parent.frame()
-  result <- new.env(parent = emptyenv())
-  tryCatch(
-    out <- withCallingHandlers(
+  # result <- new.env(parent = emptyenv())
+  # tryCatch(
+  #   out <- withCallingHandlers(
       targets::tar_callr_inner_try(
         targets_function = targets_function,
         targets_arguments = targets_arguments,
@@ -167,17 +167,18 @@ callr_inner <- function(
         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) {
-    }
+      )
+      #,
+    #   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