What are these file paths?

jhudsl · Dec 13, 2024 · 70659d2 · 70659d2
1 parent 7f215dd
commit 70659d2
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/.github/workflows/check_testthat.R b/.github/workflows/check_testthat.R
@@ -8,9 +8,13 @@ library(magrittr)
 # Find .git root directory
 root_dir <- rprojroot::find_root(rprojroot::has_dir(".github"))
 
+message(root_dir)
+
 out_file <- list.files(pattern = ".Rout$|Rout.fail$", file.path(root_dir, "check"),
  recursive = TRUE, full.names = TRUE)
 
+ message(out_file)
+
 check_content <- readLines(out_file)
 test_result <- grep("\\[ FAIL", check_content, value = TRUE)[1]
 test_result <- unlist(strsplit(test_result, "\\||\\[|\\]"))