diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test index 7713a1a6afb53580b2f4e16dc14cce9e37768cb6..385781ccdccd1a4173badf68d4628fad73b38392 100644 --- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test +++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test @@ -149431,74 +149431,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 32767 } else { v <- as.external.short(32767); v; } [1] 32767 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanObjectArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteObjectArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charObjectArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleObjectArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$floatArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$floatObjectArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$integerArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$integerObjectArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$longArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$longObjectArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$shortArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$shortObjectArray3)) } -[1] "array" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'array' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$stringArray3)) } -[1] "array" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'character' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c('a', 'aa', 'aaa'), ta$booleanArray, ta$booleanList))) } [1] "character" @@ -149643,10 +149575,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'character' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charList2)) } [1] "character" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'character' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charList3)) } -[1] "character" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'character' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charObjectArray)) } [1] "character" @@ -149667,10 +149595,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'character' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$stringList2)) } [1] "character" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'character' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$stringList3)) } -[1] "character" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(1L, 2L, 3L), ta$booleanArray, ta$booleanList))) } [1] "integer" @@ -149767,10 +149691,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteList2)) } [1] "integer" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteList3)) } -[1] "integer" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteObjectArray)) } [1] "integer" @@ -149787,10 +149707,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$integerList2)) } [1] "integer" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$integerList3)) } -[1] "integer" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$integerObjectArray)) } [1] "integer" @@ -149815,10 +149731,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$shortList2)) } [1] "integer" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$shortList3)) } -[1] "integer" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$shortObjectArray)) } [1] "integer" @@ -149847,10 +149759,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'logical' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanList2)) } [1] "logical" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'logical' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanList3)) } -[1] "logical" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'logical' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanObjectArray)) } [1] "logical" @@ -150091,10 +149999,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'numeric' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleList2)) } [1] "numeric" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'numeric' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleList3)) } -[1] "numeric" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'numeric' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleObjectArray)) } [1] "numeric" @@ -150111,10 +150015,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'numeric' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$floatList2)) } [1] "numeric" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'numeric' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$floatList3)) } -[1] "numeric" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'numeric' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$floatObjectArray)) } [1] "numeric" @@ -150131,10 +150031,6 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'numeric' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$longList2)) } [1] "numeric" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'numeric' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$longList3)) } -[1] "numeric" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'numeric' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$longObjectArray)) } [1] "numeric" @@ -150358,32 +150254,32 @@ Error in as.external.char(97L, 1) : [1] "a" "b" "c" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charList2) } +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charArray2, recursive=FALSE) } [1] "a" "b" "c" "a" "b" "c" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringList2) } +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charList2) } [1] "a" "b" "c" "a" "b" "c" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c'))" +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charList2, recursive=FALSE) } +[1] "a" "b" "c" "a" "b" "c" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charList3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c'))" +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charObjectArray2, recursive=FALSE) } +[1] "a" "b" "c" "a" "b" "c" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charObjectArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c'))" +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringArray2, recursive=FALSE) } +[1] "a" "b" "c" "a" "b" "c" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c'))" +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringList2) } +[1] "a" "b" "c" "a" "b" "c" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringList3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c', 'a', 'b', 'c'))" +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringList2, recursive=FALSE) } +[1] "a" "b" "c" "a" "b" "c" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteArray) } @@ -150490,68 +150386,68 @@ Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c('a', 'b', ' [1] 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteList2) } +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteArray2, recursive=FALSE) } [1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerList2) } +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteList2) } [1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longList2) } +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteList2, recursive=FALSE) } [1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortList2) } +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteObjectArray2, recursive=FALSE) } [1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerArray2, recursive=FALSE) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteList3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerList2) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteObjectArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerList2, recursive=FALSE) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerObjectArray2, recursive=FALSE) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerList3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longArray2, recursive=FALSE) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerObjectArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longList2) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longList2, recursive=FALSE) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longList3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longObjectArray2, recursive=FALSE) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longObjectArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortArray2, recursive=FALSE) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortList2) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortList3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortList2, recursive=FALSE) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortObjectArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3, 1, 2, 3, 1, 2, 3))" +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortObjectArray2, recursive=FALSE) } +[1] 1 2 3 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$mixedIntegerList) } @@ -150676,36 +150572,36 @@ Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1, 2, 3, 1, [1] 1.1 1.2 1.3 1.0 2.0 3.0 1.0 2.0 3.0 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleList2) } +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleArray2, recursive=FALSE) } [1] 1.1 1.2 1.3 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatList2) } +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleList2) } [1] 1.1 1.2 1.3 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleList2, recursive=FALSE) } +[1] 1.1 1.2 1.3 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleList3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleObjectArray2, recursive=FALSE) } +[1] 1.1 1.2 1.3 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleObjectArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatArray2, recursive=FALSE) } +[1] 1.1 1.2 1.3 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatList2) } +[1] 1.1 1.2 1.3 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatList3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatList2, recursive=FALSE) } +[1] 1.1 1.2 1.3 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatObjectArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatObjectArray2, recursive=FALSE) } +[1] 1.1 1.2 1.3 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$booleanArray, ta$booleanList)) } @@ -151048,28 +150944,28 @@ Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1 [1] 1.0 0.0 1.0 1.1 1.2 1.3 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanList2) } +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanArray2, recursive=FALSE) } [1] TRUE FALSE TRUE TRUE FALSE TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$booleanArray, ta$booleanList)) } -[1] TRUE FALSE TRUE TRUE FALSE TRUE TRUE FALSE TRUE +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanList2) } +[1] TRUE FALSE TRUE TRUE FALSE TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$booleanArray, ta$booleanList), recursive=FALSE) } -[1] TRUE FALSE TRUE TRUE FALSE TRUE TRUE FALSE TRUE +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanList2, recursive=FALSE) } +[1] TRUE FALSE TRUE TRUE FALSE TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE))" +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanObjectArray2, recursive=FALSE) } +[1] TRUE FALSE TRUE TRUE FALSE TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanList3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE))" +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$booleanArray, ta$booleanList)) } +[1] TRUE FALSE TRUE TRUE FALSE TRUE TRUE FALSE TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanObjectArray3) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE))" +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$booleanArray, ta$booleanList), recursive=FALSE) } +[1] TRUE FALSE TRUE TRUE FALSE TRUE TRUE FALSE TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, TRUE, FALSE, FALSE, TRUE, TRUE, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$booleanArray2, ta$booleanList2)) } @@ -152618,500 +152514,6 @@ Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE [external object] -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanList3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanObjectArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteList3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteObjectArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charList3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charObjectArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleList3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleObjectArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatList3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatObjectArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerList3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerObjectArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longList3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longObjectArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortList3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortObjectArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringArray3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringList3, recursive=FALSE) } -[[1]] -[external object] - -[[2]] -[external object] - -[[3]] -[external object] - -[[4]] -[external object] - - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c'))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charList2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c'))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charObjectArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c'))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c'))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c')) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringList2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list('a', 'b', 'c', 'a', 'b', 'c'))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteList2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteObjectArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerList2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerObjectArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longList2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longObjectArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortList2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortObjectArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1, 2, 3, 1, 2, 3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleList2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleObjectArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatList2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatObjectArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(1.1, 1.2, 1.3, 1.1, 1.2, 1.3))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanList2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE))" - -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { list(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE)) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanObjectArray2, recursive=FALSE) } -Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE))" - ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { matrix(c('a', 'b', 'c', 'a', 'b', 'c'), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charArray2) } [,1] [,2] [,3] diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/library/fastr/TestJavaInterop.java b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/library/fastr/TestJavaInterop.java index 58f375d43e239a8579c514272dc81fe6f2b8a0e8..23b4808a091a254bddc3bbeec0e9e575bf1a2d05 100644 --- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/library/fastr/TestJavaInterop.java +++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/library/fastr/TestJavaInterop.java @@ -754,15 +754,7 @@ public class TestJavaInterop extends TestBase { assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$" + field + ")", expected); expected = fieldPrefix.contains("List") ? "'" + clazz + "'" : "'matrix'"; assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(ta$" + field + "))", expected); - assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$" + field + ", recursive=FALSE)", "list(" + result + ", " + result + "))"); - - field = fieldPrefix + "3"; - assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$" + field + ")", "c(" + result + ", " + result + ", " + result + ", " + result + "))"); - expected = fieldPrefix.contains("List") ? "'" + clazz + "'" : "'array'"; - assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(ta$" + field + "))", expected); - assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$" + field + ", recursive=FALSE)", - "cat('[[1]]','\n','[external object]','\n\n','[[2]]','\n','[external object]','\n\n','[[3]]','\n','[external object]','\n\n','[[4]]','\n','[external object]','\n\n', sep='')"); - + assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$" + field + ", recursive=FALSE)", "c(" + result + ", " + result + ")"); } private void testForeingObjectInListUnlist(String field, String[] toMixWith, String clazz) throws NoSuchFieldException, IllegalArgumentException, IllegalAccessException {