tests/testthat/test-get_default_beast2_path.R

In richelbilderbeek/beastier: Call 'BEAST2'

test_that("must be either binary or jar file", {
  expect_equal(1 + 1, 2) # nolint to prevent 'Reason: empty test'
  if (!is_beast2_installed()) return()

  def_path <- get_default_beast2_path()
  bin_path <- get_default_beast2_bin_path()
  jar_path <- get_default_beast2_jar_path()
  expect_true(def_path == bin_path || def_path == jar_path)
})

test_that("must exist", {
  expect_equal(1 + 1, 2) # nolint to prevent 'Reason: empty test'
  if (!is_beast2_installed()) return()

  expect_true(
    file.exists(get_default_beast2_path())
  )
})