tests/testthat/test-parse_losses_from_project_file.R

In richelbilderbeek/gcaer: Interface to GCAE

test_that("use", {
  losses_from_project_filename <- get_gcaer_filename("losses_from_project.csv")
  expect_silent(
    parse_losses_from_project_file(losses_from_project_filename)
  )
})

test_that("abuse", {
  expect_error(
    parse_losses_from_project_file(losses_from_project_filename = "abs.ent"),
    "abs.ent"
  )
})