tests/testthat/test-domains.R

test_that("Domain info check works", {

  skip_on_cran()
  skip_on_travis()
  skip_on_appveyor()

  x <- get_domain_info("0.0.0.0")

  expect_equal(class(x), "list")
  expect_equal(class(x$data), "character")

})

Try the ipbase package in your browser

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

ipbase documentation built on May 31, 2023, 9:21 p.m.