e <- new.env()
registry <- cnd_create_registry("EXAMPLE", env = e)
local(envir = e, {
  my_fun <- function() NULL
  condition(
    "my_condition",
    package = "example_package",
    exports = "my_fun",
    registry = registry
  )
  cnd_exports()
})
# conditions are now added to my_fun():
e$my_fun
conditions(e$my_fun)
Run the code above in your browser using DataLab