diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2019-03-04 10:12:43 +0100 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2019-03-04 10:12:43 +0100 |
commit | d0a358a8f4fd03c95536409523e492eb15726f44 (patch) | |
tree | fefa34562fb4557921d88f64c6827401a9c1ed99 /tests/testthat/test_mkinmod.R | |
parent | 4e85356bbe535aaf5bc7dc25238ed6a8d1f9913c (diff) |
Review tests and examples based on winbuilder results
Static documentation rebuilt by pkgdown
Diffstat (limited to 'tests/testthat/test_mkinmod.R')
-rw-r--r-- | tests/testthat/test_mkinmod.R | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/tests/testthat/test_mkinmod.R b/tests/testthat/test_mkinmod.R index 430fad61..1f8ec166 100644 --- a/tests/testthat/test_mkinmod.R +++ b/tests/testthat/test_mkinmod.R @@ -45,8 +45,10 @@ test_that("mkinmod stops to prevent and/or explain user errors", { }) test_that("Printing mkinmod models is reproducible", { - expect_known_output(print(mkinmod(parent = mkinsub("SFO", "m1"), - m1 = mkinsub("SFO"), - quiet = TRUE)), + m_test <- mkinmod(parent = mkinsub("SFO", "m1"), + m1 = mkinsub("SFO"), + quiet = TRUE) + m_test$cf <- NULL # Remove to make test robust against missing gcc + expect_known_output(print(m_test), file = "SFO_SFO_printed.txt") }) |