Skip to content

Commit

Permalink
test(DiseasyModel): Skip if RSQLite not installed
Browse files Browse the repository at this point in the history
  • Loading branch information
RasmusSkytte committed Jun 4, 2024
1 parent c23f071 commit 7961ac4
Showing 1 changed file with 4 additions and 0 deletions.
4 changes: 4 additions & 0 deletions tests/testthat/test-DiseasyModel.R
Original file line number Diff line number Diff line change
@@ -1,4 +1,5 @@
test_that("initialize works", {
skip_if_not_installed("RSQLite")

# Creating an empty model module
m <- DiseasyModel$new()
Expand Down Expand Up @@ -39,6 +40,7 @@ test_that("initialize works", {


test_that("$load_module() works", {
skip_if_not_installed("RSQLite")

# Check that observable is loaded into objects that can take it
# We first create and load a module that uses "DiseasyObservables" internally but we do not provide it to the module
Expand Down Expand Up @@ -83,6 +85,7 @@ test_that("$load_module() works", {


test_that("$hash works", {
skip_if_not_installed("RSQLite")

# Test hash generation works as expected

Expand Down Expand Up @@ -159,6 +162,7 @@ test_that("$hash works", {


test_that("cloning works", {
skip_if_not_installed("RSQLite")

# Creating modules for the model module
act <- DiseasyActivity$new()
Expand Down

0 comments on commit 7961ac4

Please sign in to comment.