test for defaults

VForWaTer · Jun 21, 2024 · 452d8e6 · 452d8e6
1 parent 87c50a7
commit 452d8e6
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/tests/testthat/test-get_parameters.R b/tests/testthat/test-get_parameters.R
@@ -8,11 +8,12 @@ test_that("parse parameters works", {
   params <- get_parameters()
 
   # test parsed parameters
-  testthat::expect_length(params, 6)
+  testthat::expect_length(params, 7)
   testthat::expect_equal(params$foo_int, 42)
   testthat::expect_type(params$foo_int, "integer")
   testthat::expect_type(params$foo_string, "character")
   testthat::expect_type(params$foo_float, "double")
   testthat::expect_length(params$foo_array, 5)
   testthat::expect_type(params$foo_boolean, "logical")
+  testthat::expect_equal(params$foo_default_int, 3)
 })
diff --git a/tests/testthat/testdata/src/tool.yml b/tests/testthat/testdata/src/tool.yml
@@ -21,6 +21,10 @@ tools:
         array: true
       foo_boolean:
         type: boolean
+      foo_default_int:
+        type: integer
+        default: 3
+        optional: false
     data:
       foo_matrix:
         type: file