tests/testthat/test_Id.R

context("Id")

test_that("Id", {
  # constructor
  i <- new_id()
  # methods
  i
  print(i)
  as.character(i)
  expect_true(inherits(i, "Id"))
  expect_true(i == i)
  expect_false(i == new_id())
})
prioritizr/ppr documentation built on Sept. 10, 2022, 1:18 p.m.