tests/testthat/test-combining.R

In trevorld/hexfont: 'GNU Unifont' Hex Fonts

test_that("unifont_combining()", {
    expect_equal(unifont_version(),
                 numeric_version("16.0.02"))

    expect_length(unifont_combining(), 231L)
    expect_length(unifont_combining(upper = FALSE), 216L)
    expect_length(unifont_combining(csur = FALSE), 0L)
    expect_length(unifont_combining(unicode = TRUE), 2454L)
})