tests/testthat/test-travisCI.R

In goxygen: In-Code Documentation for 'GAMS'

library(testthat)
skip_if_not(identical(Sys.getenv("TRAVIS"), "true"))
context("Travis CI integration")

test_that("Validation Key is correct (for Travis CI)", {
  folder <- ifelse(file.exists("DESCRIPTION"),".","../../")
  expect_true(lucode2:::validkey(folder)$valid)
})