R/zzz.R

Defines functions .onUnload .onLoad

.onLoad <- function(libname = find.package("ASGS"), pkgname = "ASGS") {
  if (is.null(getOption("ASGS.env"))) {
    options("ASGS.env" = new.env(parent = emptyenv()))
  }
}

.onUnload <- function(libpath) {
  options("ASGS.env" = NULL)
}
HughParsonage/ASGS documentation built on Jan. 17, 2024, 12:16 p.m.