# NOT RUN {
if (identical(Sys.getenv("TAR_LONG_EXAMPLES"), "true")) {
tar_dir({ # tar_dir() runs code from a temporary directory.
tmp <- sample(1)
tar_script({
tar_option_set(error = "workspace")
list(
tar_target(x, "loaded"),
tar_target(y, stop(x))
)
}, ask = FALSE)
try(tar_make())
tar_traceback(y, characters = 60)
})
}
# }
Run the code above in your browser using DataLab