tests/testthat/test-classes.R

In flowCore: flowCore: Basic structures for flow cytometry data

#Make sure our special generics are actually defined as generic.
test_that("generics", {
	expect_true(isGeneric("transform"))
    expect_true(isGeneric("%in%"))
	#Actually resolve a method
    expect_true(hasMethod("%in%",c("flowFrame","rectangleGate")))
    expect_true(hasMethod("%in%",c("flowFrame","rectangleGate")))
    
})