add placeholder to namespace for mocking

MichaelChirico · web-flow · commit cc6d6da89843 · 2025-07-23T13:10:31.000-07:00
diff --git a/R/expect-self-test.R b/R/expect-self-test.R
@@ -134,6 +134,8 @@ local_rng_version <- function(version, .local_envir = parent.frame()) {
   suppressWarnings(RNGversion(version))
 }
 
+getRversion <- NULL # for mocking
+
 # Use specifically for testthat tests in order to override the
 # defaults found when starting the reporter
 local_output_override <- function(width = 80, crayon = TRUE, unicode = TRUE,

Original file line number	Diff line number	Diff line change
`@@ -134,6 +134,8 @@ local_rng_version <- function(version, .local_envir = parent.frame()) {`
`134`	`134`	`suppressWarnings(RNGversion(version))`
`135`	`135`	`}`
`136`	`136`
	`137`	`+getRversion <- NULL # for mocking`
	`138`	`+`
`137`	`139`	`# Use specifically for testthat tests in order to override the`
`138`	`140`	`# defaults found when starting the reporter`
`139`	`141`	`local_output_override <- function(width = 80, crayon = TRUE, unicode = TRUE,`