java tools used internally in rJava

java tools used internally in rJava

Examples

# \dontshow{
# running the java unit tests from the R examples
.jinit()
#> [1] 0
J("RJavaTools_Test")$runtests()
J("RJavaArrayTools_Test")$runtests()
J("ArrayWrapper_Test")$runtests()
J("RectangularArrayBuilder_Test")$runtests()


  p <- .jnew( "java/awt/Point" )
  classes <- .Call( rJava:::RgetSimpleClassNames, p@jobj, TRUE )
  stopifnot( all( c( "Point", "Point2D", "Object", "error", "condition" ) %in% classes ) )
  classes <- .Call( rJava:::RgetSimpleClassNames, p@jobj, FALSE )
  stopifnot( all( c( "Point", "Point2D", "Object" )  %in% classes ) )

# }