tests/testthat/test-stop.R

test_that("winch_stop() works", {
  expect_error(winch_stop("foo"), "foo")

  skip_if_not(l10n_info()$"UTF-8")
  expect_error(winch_stop("\u2026"), enc2native(glob2rx("*\u2026*", trim.head = TRUE)))
})

Try the winch package in your browser

Any scripts or data that you put into this service are public.

winch documentation built on April 20, 2023, 9:14 a.m.