tests/testthat/test-count_trailing_spaces.R

context("count_trailing_spaces")

test_that("use", {

  expect_equal(count_trailing_spaces("x"), 0)
  expect_equal(count_trailing_spaces(" y"), 1)
  expect_equal(count_trailing_spaces("  <"), 2)
  expect_equal(count_trailing_spaces(""), 0)
  expect_equal(count_trailing_spaces(" "), 1)
  expect_equal(count_trailing_spaces("  "), 2)

})
ropensci/beautier documentation built on Nov. 3, 2023, 10:41 a.m.