Stop an R program without error

Question

Is there any way to stop an R program without error?

For example I have a big source, defining several functions and after it there are some calls to the functions.

Answer 1

There is a nice solution in a mailing list here that defines a stopQuietly function that basically hides the error shown from the stop function:

stopQuietly <- function(...) {
  blankMsg <- sprintf("\r%s\r", paste(rep(" ", getOption("width")-1L), collapse=" "));
  stop(simpleError(blankMsg));
} # stopQuietly()

> stopQuietly()