tests/testthat/test-sasr_contents.R

test_that("proc contents", {
  code_sas <- "proc contents data=iris; run;"
  expect_equal(sasr_contents(code_sas), "str(iris)")
})
AurelieFrechet/saservira documentation built on Nov. 20, 2022, 1:30 a.m.