how many does file_coverage return?

Appsilon · Oct 2, 2023 · d2140ee · d2140ee
1 parent 8e20607
commit d2140ee
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/tests/testthat/test-box.R b/tests/testthat/test-box.R
@@ -9,6 +9,9 @@ test_that("box module coverage is reported", {
         source_files = "app/app.R",
         test_files = list.files("tests/testthat", full.names = TRUE)))
 print(list.files("tests/testthat", full.names = TRUE))
+print(str(file_coverage(
+  source_files = "app/app.R",
+  test_files = list.files("tests/testthat", full.names = TRUE))))
     expect_equal(cov$value, c(5, 2, 3, 3, 1, 1))
     expect_equal(cov$first_line, c(5, 6, 8, 13, 5, 8))
     expect_equal(cov$last_line, c(5, 6, 8, 13, 5, 8))