inst/unitTests/test_utils.R

library(igvShiny)
library(RUnit)
#----------------------------------------------------------------------------------------------------
runTests <- function()
{
    test_get_tracks_dir()

} # runTests
#----------------------------------------------------------------------------------------------------
test_get_tracks_dir <- function()
{
    message(sprintf("--- test_get_tracks_dir"))
    checkTrue(checkmate::test_string(get_tracks_dir()))

} # test_get_tracks_dir
#----------------------------------------------------------------------------------------------------
paul-shannon/igvShiny documentation built on Aug. 31, 2024, 9:32 a.m.