move %||% into aaa.R

RConsortium · Sep 10, 2024 · 299ae86 · 299ae86
1 parent 65c55d7
commit 299ae86
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/R/aaa.R b/R/aaa.R
@@ -1,5 +1,7 @@
 
 
+`%||%` <- function(x, y) if (is.null(x)) y else x
+
 new_function <- function(args = NULL,
                          body = NULL,
                          env = asNamespace("S7")) {

diff --git a/R/utils.R b/R/utils.R
@@ -11,7 +11,6 @@ global_variables <- function(names) {
 
 vlapply <- function(X, FUN, ...) vapply(X = X, FUN = FUN, FUN.VALUE = logical(1), ...)
 vcapply <- function(X, FUN, ...) vapply(X = X, FUN = FUN, FUN.VALUE = character(1), ...)
-`%||%` <- function(x, y) if (is.null(x)) y else x
 
 method_signature <- function(generic, signature) {
   single <- length(generic@dispatch_args) == 1