R/test_utils.r

Defines functions is.negative is.positive expect_same_length

expect_same_length <- function(a, b)
    expect_equal(length(a), length(b))

is.positive <- function(x)
    x > 0

is.negative <- function(x)
    x < 0
ime-luebeck/semgsim documentation built on April 14, 2022, 11:02 p.m.