atAbort
Stop an assertionTest Run
Description
atAbort is like stop, but assertionTest will not catch it --
it will cause the assertionTest run to stop right away.
Usage
atAbort(...)
Arguments
... |
A message. The arguments will be pasted together as
they are in stop().
|
Value
None. This function does not return.
See Also
Examples
# This is mainly for use with assertionTest itself, but you
# could use it if you foresee that a certain problem
# might crop up.
## Not run:
assertionTest(textConnection('
{ if(is(xyz<-try(read.table("http://somesite/xyx.csv")),"try-error"))
atAbort("Cannot read http://somesite/xyz.csv: ",
as.character(xyz))
atOnExit(rm(xyz))
}
all(xyz>0)
')) ; gc() # to force closing of connection
## End(Not run)