tests/testthat/test-parameterize-template.R

context("parameterize template")

test_that("repeated occurrence of a template variable only leads to one function argument", {
    f <- parameterize_template("my name is ##name##. Once again, that is ##name##")
    expect_identical(parameters(f), "name")
})
tarakc02/getcdw documentation built on April 2, 2022, 4:13 p.m.