wrap_up {ptspotter}

Wrap up file execution.

Description

Used to interrupt sequential script execution while testing or debugging. Outputs an auditory signal and breaks sequential script execution, identifying the script at which execution was interrupted. Is a Sys.time() object is passed to start_time, messages the elapsed time.

Usage

wrap_up(start_time = NULL)

Arguments

start_time

Optional POSIXct object, created by assigning Sys.time() to an object prior to executing wrap_up().

Value

Interrupts sequential script execution with an auditory signal. Logs the elapsed time if start_time is used, outputs the script location.

Examples

# halt execution with no timing
try(wrap_up())

# create timing checkpoint
s_time <- Sys.time()
# halt execution with timing
try(wrap_up(s_time))