1
2
3
4
5
6
7
.onLoad <- function(libname, pkgname) {
    ## options(warn = 3, error = utils::recover)
}

.onUnload <- function (libpath) {
  library.dynam.unload("rstpm2", libpath)
}