R/zzz-Finalize.R

#' @include setup.R
#' @include utils.R
#' @include Classes.R
#' @include Funs.R

# documentation.results <- document_env(environment())
if(FALSE){#@testing check all documentation
    env <- asNamespace('documentation')
    if (exists('documentation.results', env)){

        documented <- dplyr::filter(documentation.results, Documented & (Reason==''))

        for (name in documented$Name)
            expect_true(!is.null(documentation(get(name, envir = env))))

        dplyr::filter(documentation.results, !Documented) %>%
            dplyr::count(Message)
    } else
        message("Skipping global checking.")
}
if(FALSE){# cleanup and development
    withr::with_options(list(warn=2, error=recover),
        extract_documentation(document_package)
    )

}
RDocTaskForce/documentation documentation built on May 8, 2019, 5:50 a.m.