tests/testthat/helper_xml_utils.R

files <- dir("xml_testdata", full.names = TRUE)
xml_testdata <- lapply(files, xml2::read_xml)
names(xml_testdata) <- sub(".xml$", "", basename(files))
mrc-ide/specio documentation built on April 15, 2021, 8:37 a.m.