R/utils-ndr-null.R

In stephenbalogun/tidyndr: Analysis of the Nigeria National Data Repository (NDR)

#' Borrowed NULL
#'
#' @param x value set to a default value of null
#' @param y value to be used with x is null
#'
#' @name ndr-null-op
#' @export
#' @return No return value, called for side effects
#' @keywords internal
`%||%` <- function(x, y) {
  if (rlang::is_null(x)) {
    y
  } else {
    x
  }
}