On 12-09-03 1:43 AM, Spencer Graves wrote:
Hello, All:The fda package has tests that run too long for CRAN's current rules. I'd like to wrap some examples in a construct like the following: if(!CRAN()){ ... } I tried the following: CRAN <- function(x='_R_CHECK_CRAN_INCOMING_'){ x. <- Sys.getenv(x) xl <- as.logical(x.) notCRAN <- is.na(xl) || xl # return(!notCRAN) } The companion help page included the following example: if(CRAN()){ stop('CRAN') } else { stop('NOT CRAN') } This reported "NOT CRAN" even with "R CMD check --as-cran".
There's no user-visible setting for --as-cran, because it just sets a number of other options. You could query one of those. The settings that are visible are
_R_CHECK_TIMINGS_ (which seems most relevant to you) _R_CHECK_INSTALL_DEPENDS_ _R_CHECK_NO_RECOMMENDED_ _R_SHLIB_BUILD_OBJECTS_SYMBOL_TABLES_ So I'd check the value in _R_CHECK_TIMINGS_, or maybe just its existence. Duncan Murdoch ______________________________________________ R-devel@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel
