dwww Home | Show directory contents | Find package

# REQUIRE TEST toJSON ---------------------------------------------

test_that('REQUIRE TEST toJSON', {
        j <- createJSON(movefile=FALSE)
        expect_true(j)
        mypath <- file.path("zelig5models.json")
    expect_true(file.exists(mypath))
    expect_true(validate(readChar(mypath, file.info(mypath)$size)))
    file.remove(file.path(mypath))
})

Generated by dwww version 1.15 on Sat May 18 09:48:54 CEST 2024.