tests/testthat/test-unary.R

In r-lib/styler: Non-Invasive Pretty Printing of R Code

test_that("no spaces before unary operator", {
  expect_warning(test_collection("unary_spacing",
    "unary_simple",
    transformer = style_text
  ), NA)

  expect_warning(test_collection("unary_spacing",
    "unary_complex",
    transformer = style_text
  ), NA)

  expect_warning(test_collection("unary_spacing",
    "unary_indention",
    transformer = style_text
  ), NA)
})