do not use probabilistic comparisons with vctrs

Enchufa2 · Enchufa2 · commit df088358fe5a · 2026-04-30T18:08:53.000+02:00
diff --git a/R/tidyverse.R b/R/tidyverse.R
@@ -38,6 +38,8 @@ vec_restore.errors <- function(x, ...) {
 }
 
 vec_proxy_equal.errors <- function(x, ...) {
+  old <- options(errors.compare.probabilistic = FALSE)
+  on.exit(do.call(options, old), TRUE)
   x
 }
 # Currently necessary because of r-lib/vctrs/issues/1140

Original file line number	Diff line number	Diff line change
`@@ -38,6 +38,8 @@ vec_restore.errors <- function(x, ...) {`
`38`	`38`	`}`
`39`	`39`
`40`	`40`	`vec_proxy_equal.errors <- function(x, ...) {`
	`41`	`+ old <- options(errors.compare.probabilistic = FALSE)`
	`42`	`+ on.exit(do.call(options, old), TRUE)`
`41`	`43`	`x`
`42`	`44`	`}`
`43`	`45`	`# Currently necessary because of r-lib/vctrs/issues/1140`