Merge branch 'feature/cleanup-rng' into develop [ci skip]

Author: HenrikBengtsson

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: future
-Version: 1.34.0
+Version: 1.34.0-9002
 Title: Unified Parallel and Distributed Processing in R for Everyone
 Imports:
     digest,

R/rng_utils.R

@@ -14,13 +14,6 @@
 #' returns the _old_ seed.  If `seed = NULL`, then the `.Random.seed` is
 #' removed.
 #'
-#' `next_random_seed()` updates `.Random.seed` by drawning an dummy random
-#' number internally, and invisibly returns the _new_ seed.
-#'
-#' `is_valid_random_seed(seed)` returns TRUE if `seed` is a valid random seed
-#' of any RNG kind, otherwise FALSE.
-#' This function does _not_ update `.Random.seed`.
-#'
 #' `is_lecyer_cmrg_seed(seed)` returns TRUE if `seed` is a valid random seed
 #' of kind `L'Ecuyer-CMRG`, otherwise FALSE.
 #' This function does _not_ update `.Random.seed`.
@@ -58,27 +51,6 @@ set_random_seed <- function(seed, kind = NULL) {
   invisible(old_seed)
 }
 
-#' @rdname random_seed_utils
-#' @noRd
-next_random_seed <- function(seed = get_random_seed()) {
-  sample.int(n = 1L, size = 1L, replace = FALSE)
-  seed_next <- get_random_seed()
-  stop_if_not(!any(seed_next != seed))
-  invisible(seed_next)
-}
-
-#' @rdname random_seed_utils
-#' @noRd
-is_valid_random_seed <- function(seed) {
-  oseed <- get_random_seed()
-  on.exit(set_random_seed(oseed))
-  env <- globalenv()
-  env$.Random.seed <- seed
-  res <- tryCatch({
-    sample.int(n = 1L, size = 1L, replace = FALSE)
-  }, simpleWarning = function(w) w)
-  !inherits(res, "simpleWarning")
-}
 
 ## For RNGkind("L'Ecuyer-CMRG") we should have (see help('RNGkind')):
 ##   .Random.seed <- c(rng.kind, n) where length(n) == 6L.

revdep/README.md

@@ -1,25 +1,19 @@
 ## revdepcheck results
 
-We checked 376 reverse dependencies (354 from CRAN + 22 from Bioconductor), comparing R CMD check results across CRAN and dev versions of this package.
+We checked 394 reverse dependencies (372 from CRAN + 22 from Bioconductor), comparing R CMD check results across CRAN and dev versions of this package.
 
- * We saw 4 new problems
+ * We saw 2 new problems
  * We failed to check 1 packages
 
 Issues with CRAN packages are summarised below.
 
 ### New problems
 (This reports the first line of each new failure)
 
-* googleComputeEngineR
+* bayesmove
   checking installed package size ... NOTE
 
-* modelsummary
-  checking installed package size ... NOTE
-
-* Rcurvep
-  checking installed package size ... NOTE
-
-* SPARSEMODr
+* greta
   checking installed package size ... NOTE
 
 ### Failed to check

revdep/cran.md

@@ -6,7 +6,7 @@
 * GitHub: https://github.com/alexander-pastukhov/tridim-regression
 * Source code: https://github.com/cran/TriDimRegression
 * Date/Publication: 2023-09-13 14:10:03 UTC
-* Number of recursive dependencies: 99
+* Number of recursive dependencies: 98
 
 Run `revdepcheck::revdep_details(, "TriDimRegression")` for more info