tests/testthat/test-section.R

In dougmet/makeparse: Parse the GNU make database

context("Split into sections")

mkdbtxt <- readLines("mkdb.txt") # read test file

dbdf <- labelLines(mkdbtxt) # Label each line in data.frame

dbsec <- splitSections(dbdf) # split by section

test_that("Section Names", {

  expect_is(dbsec, "list")

  expect_equal(names(dbsec),
               c("GNU Make version 3.79.1, by Richard Stallman and Roland McGrath.",
                 "Variables", "Directories", "Implicit Rules", "Pattern-specific variable values",
                 "Files", "VPATH Search Paths"))

})