tests/testthat/test_approveR6Class.r

library(nasdaqapprove)

test_that("check default fields approve class", {
  ap <- nasdaqapprove::approve$new()
  expect_equal(ap$result, NA)
  expect_equal(ap$message, NA)
  expect_equal(ap$conflict_fields, NA)
})
luckyevgeny/nasdaqapprove documentation built on May 29, 2019, 3:43 a.m.