context("Rd: field")
test_that("@fields creates a new section and lists fields", {
out <- roc_proc_text(rd_roclet(), "
#' Important class.
#'
#' @field a field a
#'
#' @field b field b
#'
setRefClass('test')
")[[1]]
expect_equal(get_tag(out, "field")$values, c(a = "field a", b = "field b"))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.