Test: util_os

Ivan Jacob Agaloos Pesigan

2021-01-15

library(testthat)
library(jeksterslabRutils)
context("Test util_os.")

Parameters

os <- util_os()

test_that("util_os works", {
  expect_true(
    (os %in% c("linux", "osx", "windows"))
  )
})
#> Test passed 😸