R/exit.R

Defines functions exit

####################################################################################################################################
################################## exit ############################################################################################
# >>
exit <- function() {
    opt <- options(show.error.messages = FALSE)
    on.exit(options(opt))
    stop()
}
# <<
################################## exit ############################################################################################
####################################################################################################################################


####################################################################################################################################
################################## exit (old) ######################################################################################
# >>
# exit <- function() {
#     .Internal(.invokeRestart(list(NULL, NULL), NULL))
# }
# <<
################################## exit (old) ######################################################################################
####################################################################################################################################
ShashankKumbhare/paramonteR documentation built on April 25, 2022, 12:08 a.m.