8 lines
232 B
R
8 lines
232 B
R
|
library( rjson )
|
||
|
|
library( RUnit )
|
||
|
|
|
||
|
|
|
||
|
|
path <- system.file( "unittests", package="rjson" )
|
||
|
|
test.suite <- defineTestSuite( "json unittests", dirs = path, testFileRegexp = "^test\\..*\\.[rR]$" )
|
||
|
|
runTestSuite( test.suite, verbose = 100 )
|