tests/testthat/test-compress.R

context("compress")

test_that("compress worked", {

  dat <- compress(1024)

  expect_equal(dat, "1.02K")
  expect_is(dat, "character")

})
INWT/MariaDB_Monitor documentation built on March 6, 2020, 7:12 p.m.