Skip to content

Commit

Permalink
remove wrapper - use stop() directly II
Browse files Browse the repository at this point in the history
Jan Abel committed Oct 15, 2024
1 parent bd38796 commit 18dee34
Showing 1 changed file with 2 additions and 5 deletions.
7 changes: 2 additions & 5 deletions r-base/check-lib/errors.R
Original file line number Diff line number Diff line change
@@ -4,11 +4,10 @@ check <- function(res) {
if (length(res$errors) > 0) {
errorLogs <- findLogs(res)
printLogEntries(errorLogs)
throwException("Check produced errors.")
stop("Check produced errors.")
}
if (res$status != 0) {
message <- paste("Check failed with status:", res$status)
throwException(message)
stop(sprintf("Check failed with status: %s", res$status))
}
}

@@ -29,5 +28,3 @@ printLogEntries <- function(logFiles) {
}
}
}

stop(message)

0 comments on commit 18dee34

Please sign in to comment.