tests/testthat/test-Pass_0_0_into_function_call.R

In yanlesin/SEC13Flist: Functions to Work with Official List of SEC Section 13(f) Securities and Security Identifiers

test_that("0,0 and other into function call", {
  expect_error(SEC13Flist::SEC_13F_list(0,0))
  expect_error(SEC13Flist::SEC_13F_list(2003,1))
  expect_error(SEC13Flist::SEC_13F_list(2005,5))
  expect_error(SEC13Flist::SEC_13F_list(2004,0))
  expect_error(SEC13Flist::SEC_13F_list(0,1))
  expect_error(SEC13Flist::SEC_13F_list(2004,"a"))
  expect_error(SEC13Flist::SEC_13F_list("b","2"))
  expect_error(SEC13Flist::SEC_13F_list())
})