enable tryCatch disabled during dev

jangorecki · jangorecki · commit c7d2629f37ef · 2025-09-14T19:29:00.000+02:00
diff --git a/R/frollapply.R b/R/frollapply.R
@@ -432,12 +432,11 @@ frollapply = function(X, N, FUN, ..., by.column=TRUE, fill=NA, align=c("right","
           warning = function(w) warningf(warn.simplify, w[["message"]])
         )
       } else if (isTRUE(simplify)) {
-        ans[[thisansi]] = simplifylist(ans[[thisansi]], fill, ansmask)
-        #ans[[thisansi]] = tryCatch(
-        #  simplifylist(ans[[thisansi]], fill, ansmask),
-        #  error = function(e) stopf(err.simplify, e[["message"]]),
-        #  warning = function(w) warningf(warn.simplify, w[["message"]])
-        #)
+        ans[[thisansi]] = tryCatch(
+          simplifylist(ans[[thisansi]], fill, ansmask),
+          error = function(e) stopf(err.simplify, e[["message"]]),
+          warning = function(w) warningf(warn.simplify, w[["message"]])
+        )
       }
     }
   }

Original file line number	Diff line number	Diff line change
`@@ -432,12 +432,11 @@ frollapply = function(X, N, FUN, ..., by.column=TRUE, fill=NA, align=c("right","`
`432`	`432`	`warning = function(w) warningf(warn.simplify, w[["message"]])`
`433`	`433`	`)`
`434`	`434`	`} else if (isTRUE(simplify)) {`
`435`		`- ans[[thisansi]] = simplifylist(ans[[thisansi]], fill, ansmask)`
`436`		`- #ans[[thisansi]] = tryCatch(`
`437`		`- # simplifylist(ans[[thisansi]], fill, ansmask),`
`438`		`- # error = function(e) stopf(err.simplify, e[["message"]]),`
`439`		`- # warning = function(w) warningf(warn.simplify, w[["message"]])`
`440`		`- #)`
	`435`	`+ ans[[thisansi]] = tryCatch(`
	`436`	`+ simplifylist(ans[[thisansi]], fill, ansmask),`
	`437`	`+ error = function(e) stopf(err.simplify, e[["message"]]),`
	`438`	`+ warning = function(w) warningf(warn.simplify, w[["message"]])`
	`439`	`+ )`
`441`	`440`	`}`
`442`	`441`	`}`
`443`	`442`	`}`