tests/testthat/test-simplify.R

context("simplify parens")

test_that("remove needless parens from code", {
  goo <- quo((((3 + 4))))
  quo_simplified <- quo(3+4)
  res <- checkr2:::simplify_ex(goo)

  expect_equal(res, quo_simplified)
})
dtkaplan/checkr2 documentation built on May 17, 2019, 4:01 p.m.