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 9638386128124c34d5310738811de205e4d850b3..777d2404b541c7eda1faec1edb19336030babd47 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 @@ -142042,18 +142042,142 @@ NULL [external object] [1] 1 2 3 +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testArraysWithNullConversion# +#if (!any(R.version$engine == "FastR")) { list('a', NULL, 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass');as.vector(ta$charObjectArrayWithNull) } +[[1]] +[1] "a" + +[[2]] +NULL + +[[3]] +[1] "c" + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testArraysWithNullConversion# +#if (!any(R.version$engine == "FastR")) { list('a', NULL, 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass');as.vector(ta$stringArrayWithNull) } +[[1]] +[1] "a" + +[[2]] +NULL + +[[3]] +[1] "c" + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testArraysWithNullConversion# +#if (!any(R.version$engine == "FastR")) { list(1, NULL, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass');as.vector(ta$byteObjectArrayWithNull) } +[[1]] +[1] 1 + +[[2]] +NULL + +[[3]] +[1] 3 + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testArraysWithNullConversion# +#if (!any(R.version$engine == "FastR")) { list(1, NULL, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass');as.vector(ta$longObjectArrayWithNull) } +[[1]] +[1] 1 + +[[2]] +NULL + +[[3]] +[1] 3 + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testArraysWithNullConversion# +#if (!any(R.version$engine == "FastR")) { list(1.1, NULL, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass');as.vector(ta$doubleObjectArrayWithNull) } +[[1]] +[1] 1.1 + +[[2]] +NULL + +[[3]] +[1] 1.3 + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testArraysWithNullConversion# +#if (!any(R.version$engine == "FastR")) { list(1.1, NULL, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass');as.vector(ta$floatObjectArrayWithNull) } +[[1]] +[1] 1.1 + +[[2]] +NULL + +[[3]] +[1] 1.3 + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testArraysWithNullConversion# +#if (!any(R.version$engine == "FastR")) { list(1L, NULL, 3L) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass');as.vector(ta$integerObjectArrayWithNull) } +[[1]] +[1] 1 + +[[2]] +NULL + +[[3]] +[1] 3 + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testArraysWithNullConversion# +#if (!any(R.version$engine == "FastR")) { list(1L, NULL, 3L) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass');as.vector(ta$shortObjectArrayWithNull) } +[[1]] +[1] 1 + +[[2]] +NULL + +[[3]] +[1] 3 + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testArraysWithNullConversion# +#if (!any(R.version$engine == "FastR")) { list(T, NULL, T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass');as.vector(ta$booleanObjectArrayWithNull) } +[[1]] +[1] TRUE + +[[2]] +NULL + +[[3]] +[1] TRUE + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { 'a' } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$arrayObject); l[[1]]$data } +[1] "a" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# #if (!any(R.version$engine == "FastR")) { 'a' } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$fieldStringArray); l[[1]] } [1] "a" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { 'a' } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$listObject); l[[1]]$data } +[1] "a" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# #if (!any(R.version$engine == "FastR")) { 'a' } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$listString); l[[1]] } [1] "a" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { 'b' } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$arrayObject); l[[2]]$data } +[1] "b" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# #if (!any(R.version$engine == "FastR")) { 'b' } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$fieldStringArray); l[[2]] } [1] "b" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { 'b' } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$listObject); l[[2]]$data } +[1] "b" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# #if (!any(R.version$engine == "FastR")) { 'b' } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$listString); l[[2]] } [1] "b" @@ -142066,10 +142190,34 @@ NULL #if (!any(R.version$engine == "FastR")) { 3 } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$listString); length(l) } [1] 3 +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { 4 } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$arrayObject); length(l) } +[1] 4 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { 4 } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$listObject); length(l) } +[1] 4 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { NULL } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$arrayObject); l[[4]]$data } +NULL + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { NULL } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$listObject); l[[4]]$data } +NULL + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$arrayObject); is.list(l) } +[1] TRUE + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# #if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$fieldStringArray); is.list(l) } [1] TRUE +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$listObject); is.list(l) } +[1] TRUE + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# #if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to$listString); is.list(l) } [1] TRUE @@ -143743,14 +143891,26 @@ character(0) #if (!any(R.version$engine == "FastR")) { c(1,1,1) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); ifelse(ta$integerArray, 1, 2) } [1] 1 1 1 +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testElseIf# +#if (!any(R.version$engine == "FastR")) { c(1,1,1) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); ifelse(ta$integerList, 1, 2) } +[1] 1 1 1 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testElseIf# #if (!any(R.version$engine == "FastR")) { c(1,2,1) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); ifelse(ta$booleanArray, 1, 2) } [1] 1 2 1 +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testElseIf# +#if (!any(R.version$engine == "FastR")) { c(1,2,1) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); ifelse(ta$booleanList, 1, 2) } +[1] 1 2 1 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testElseIf# #if (!any(R.version$engine == "FastR")) { c(NA, NA, NA) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); ifelse(ta$stringArray, 1, 2) } [1] NA NA NA +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testElseIf# +#if (!any(R.version$engine == "FastR")) { c(NA, NA, NA) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); ifelse(ta$stringList, 1, 2) } +[1] NA NA NA + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testElseIf# #if (!any(R.version$engine == "FastR")) { cat('Error in as.logical(test) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); ifelse(ta) } Error in as.logical(test) : @@ -150661,50 +150821,142 @@ 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(list(c('a', 'aa', 'aaa'), ta$booleanArray, ta$booleanList))) } [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(list(c('a', 'aa', 'aaa'), ta$booleanArray2, ta$booleanList2))) } +[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(list(c('a', 'aa', 'aaa'), ta$booleanArray3, ta$booleanList3))) } +[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(list(c('a', 'aa', 'aaa'), ta$byteArray, ta$byteList))) } [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(list(c('a', 'aa', 'aaa'), ta$byteArray2, ta$byteList2))) } +[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(list(c('a', 'aa', 'aaa'), ta$byteArray3, ta$byteList3))) } +[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(list(c('a', 'aa', 'aaa'), ta$doubleArray, ta$doubleList))) } [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(list(c('a', 'aa', 'aaa'), ta$doubleArray2, ta$doubleList2))) } +[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(list(c('a', 'aa', 'aaa'), ta$doubleArray3, ta$doubleList3))) } +[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(list(c('a', 'aa', 'aaa'), ta$floatArray, ta$floatList))) } [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(list(c('a', 'aa', 'aaa'), ta$floatArray2, ta$floatList2))) } +[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(list(c('a', 'aa', 'aaa'), ta$floatArray3, ta$floatList3))) } +[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(list(c('a', 'aa', 'aaa'), ta$integerArray, ta$integerList))) } [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(list(c('a', 'aa', 'aaa'), ta$integerArray2, ta$integerList2))) } +[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(list(c('a', 'aa', 'aaa'), ta$integerArray3, ta$integerList3))) } +[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(list(c('a', 'aa', 'aaa'), ta$longArray, ta$longList))) } [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(list(c('a', 'aa', 'aaa'), ta$longArray2, ta$longList2))) } +[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(list(c('a', 'aa', 'aaa'), ta$longArray3, ta$longList3))) } +[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(list(c('a', 'aa', 'aaa'), ta$shortArray, ta$shortList))) } [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(list(c('a', 'aa', 'aaa'), ta$shortArray2, ta$shortList2))) } +[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(list(c('a', 'aa', 'aaa'), ta$shortArray3, ta$shortList3))) } +[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(list(c('a', 'aa', 'aaa'), ta$stringArray, ta$stringList))) } [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(list(c('a', 'aa', 'aaa'), ta$stringArray2, 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(list(c('a', 'aa', 'aaa'), ta$stringArray3, ta$stringList3))) } +[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(list(c(1.1, 1.2, 1.3), ta$stringArray, ta$stringList))) } [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(list(c(1.1, 1.2, 1.3), ta$stringArray2, 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(list(c(1.1, 1.2, 1.3), ta$stringArray3, ta$stringList3))) } +[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(list(c(1L, 2L, 3L), ta$stringArray, ta$stringList))) } [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(list(c(1L, 2L, 3L), ta$stringArray2, 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(list(c(1L, 2L, 3L), ta$stringArray3, ta$stringList3))) } +[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(list(c(TRUE, FALSE, TRUE), ta$stringArray, ta$stringList))) } [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(list(c(TRUE, FALSE, TRUE), ta$stringArray2, 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(list(c(TRUE, FALSE, TRUE), ta$stringArray3, ta$stringList3))) } +[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$charArray)) } [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$charList)) } +[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" @@ -150717,110 +150969,218 @@ 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$stringArray)) } [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$stringList)) } +[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" ##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$byteArray, ta$byteList))) } +#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$booleanArray2, ta$booleanList2))) } [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(list(c(1L, 2L, 3L), ta$integerArray, ta$integerList))) } +#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$booleanArray3, ta$booleanList3))) } [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(list(c(1L, 2L, 3L), ta$shortArray, ta$shortList))) } +#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$byteArray, ta$byteList))) } [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(list(c(TRUE, FALSE, TRUE), ta$byteArray, ta$byteList))) } +#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$byteArray2, 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(list(c(TRUE, FALSE, TRUE), ta$integerArray, ta$integerList))) } +#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$byteArray3, 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(list(c(TRUE, FALSE, TRUE), ta$shortArray, ta$shortList))) } +#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$integerArray, ta$integerList))) } [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$byteArray)) } +#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$integerArray2, 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$byteObjectArray)) } +#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$integerArray3, 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$integerArray)) } +#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$shortArray, ta$shortList))) } [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)) } +#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$shortArray2, 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$onlyIntegerObjectArray)) } +#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$shortArray3, 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$shortArray)) } +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(TRUE, FALSE, TRUE), ta$byteArray, ta$byteList))) } [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)) } +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(TRUE, FALSE, TRUE), ta$byteArray2, ta$byteList2))) } [1] "integer" ##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(list(c(TRUE, FALSE, TRUE), ta$booleanArray, ta$booleanList))) } -[1] "logical" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(TRUE, FALSE, TRUE), ta$byteArray3, ta$byteList3))) } +[1] "integer" ##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$booleanArray)) } -[1] "logical" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(TRUE, FALSE, TRUE), ta$integerArray, ta$integerList))) } +[1] "integer" ##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" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(TRUE, FALSE, TRUE), ta$integerArray2, ta$integerList2))) } +[1] "integer" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanArray2)) } -[1] "matrix" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(TRUE, FALSE, TRUE), ta$integerArray3, ta$integerList3))) } +[1] "integer" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanObjectArray2)) } -[1] "matrix" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(TRUE, FALSE, TRUE), ta$shortArray, ta$shortList))) } +[1] "integer" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteArray2)) } -[1] "matrix" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(TRUE, FALSE, TRUE), ta$shortArray2, ta$shortList2))) } +[1] "integer" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteObjectArray2)) } -[1] "matrix" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(list(c(TRUE, FALSE, TRUE), ta$shortArray3, ta$shortList3))) } +[1] "integer" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charArray2)) } -[1] "matrix" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteArray)) } +[1] "integer" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charObjectArray2)) } -[1] "matrix" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteList)) } +[1] "integer" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleArray2)) } -[1] "matrix" +#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" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleObjectArray2)) } -[1] "matrix" +#if (!any(R.version$engine == "FastR")) { 'integer' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$integerArray)) } +[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$integerList)) } +[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" + +##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$mixedIntegerList)) } +[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$onlyIntegerObjectArray)) } +[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$shortArray)) } +[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$shortList)) } +[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" + +##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(list(c(TRUE, FALSE, TRUE), ta$booleanArray, ta$booleanList))) } +[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(list(c(TRUE, FALSE, TRUE), ta$booleanArray2, 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(list(c(TRUE, FALSE, TRUE), ta$booleanArray3, 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$booleanArray)) } +[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$booleanList)) } +[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" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanArray2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanList2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$booleanObjectArray2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteArray2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteList2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$byteObjectArray2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charArray2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charList2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$charObjectArray2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleArray2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleList2)) } +[1] "matrix" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$doubleObjectArray2)) } +[1] "matrix" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$floatArray2)) } [1] "matrix" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$floatList2)) } +[1] "matrix" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$floatObjectArray2)) } [1] "matrix" @@ -150829,6 +151189,10 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$integerArray2)) } [1] "matrix" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$integerList2)) } +[1] "matrix" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$integerObjectArray2)) } [1] "matrix" @@ -150837,6 +151201,10 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$longArray2)) } [1] "matrix" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$longList2)) } +[1] "matrix" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$longObjectArray2)) } [1] "matrix" @@ -150845,6 +151213,10 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$shortArray2)) } [1] "matrix" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$shortList2)) } +[1] "matrix" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$shortObjectArray2)) } [1] "matrix" @@ -150853,62 +151225,174 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$stringArray2)) } [1] "matrix" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { 'matrix' } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); class(unlist(ta$stringList2)) } +[1] "matrix" + ##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(list(c(1.1, 1.2, 1.3), ta$booleanArray, ta$booleanList))) } [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(list(c(1.1, 1.2, 1.3), ta$booleanArray2, ta$booleanList2))) } +[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(list(c(1.1, 1.2, 1.3), ta$booleanArray3, ta$booleanList3))) } +[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(list(c(1.1, 1.2, 1.3), ta$integerArray, ta$integerList))) } [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(list(c(1.1, 1.2, 1.3), ta$integerArray2, ta$integerList2))) } +[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(list(c(1.1, 1.2, 1.3), ta$integerArray3, ta$integerList3))) } +[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(list(c(1.1, 1.2, 1.3), ta$longArray, ta$longList))) } [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(list(c(1.1, 1.2, 1.3), ta$longArray2, 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(list(c(1.1, 1.2, 1.3), ta$longArray3, 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(list(c(1.1, 1.2, 1.3), ta$shortArray, ta$shortList))) } [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(list(c(1.1, 1.2, 1.3), ta$shortArray2, ta$shortList2))) } +[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(list(c(1.1, 1.2, 1.3), ta$shortArray3, ta$shortList3))) } +[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(list(c(1.1, 2.1, 3.1), ta$byteArray, ta$byteList))) } [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(list(c(1.1, 2.1, 3.1), ta$byteArray2, ta$byteList2))) } +[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(list(c(1.1, 2.1, 3.1), ta$byteArray3, ta$byteList3))) } +[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(list(c(1.1, 2.1, 3.1), ta$doubleArray, ta$doubleList))) } [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(list(c(1.1, 2.1, 3.1), ta$doubleArray2, 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(list(c(1.1, 2.1, 3.1), ta$doubleArray3, 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(list(c(1.1, 2.1, 3.1), ta$floatArray, ta$floatList))) } [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(list(c(1.1, 2.1, 3.1), ta$floatArray2, 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(list(c(1.1, 2.1, 3.1), ta$floatArray3, 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(list(c(1L, 2L, 3L), ta$doubleArray, ta$doubleList))) } [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(list(c(1L, 2L, 3L), ta$doubleArray2, 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(list(c(1L, 2L, 3L), ta$doubleArray3, 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(list(c(1L, 2L, 3L), ta$floatArray, ta$floatList))) } [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(list(c(1L, 2L, 3L), ta$floatArray2, 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(list(c(1L, 2L, 3L), ta$floatArray3, 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(list(c(1L, 2L, 3L), ta$longArray, ta$longList))) } [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(list(c(1L, 2L, 3L), ta$longArray2, 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(list(c(1L, 2L, 3L), ta$longArray3, 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(list(c(TRUE, FALSE, TRUE), ta$doubleArray, ta$doubleList))) } [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(list(c(TRUE, FALSE, TRUE), ta$doubleArray2, 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(list(c(TRUE, FALSE, TRUE), ta$doubleArray3, 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(list(c(TRUE, FALSE, TRUE), ta$floatArray, ta$floatList))) } [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(list(c(TRUE, FALSE, TRUE), ta$floatArray2, 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(list(c(TRUE, FALSE, TRUE), ta$floatArray3, 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(list(c(TRUE, FALSE, TRUE), ta$longArray, ta$longList))) } [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(list(c(TRUE, FALSE, TRUE), ta$longArray2, 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(list(c(TRUE, FALSE, TRUE), ta$longArray3, 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$doubleArray)) } [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$doubleList)) } +[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" @@ -150917,6 +151401,10 @@ 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$floatArray)) } [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$floatList)) } +[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" @@ -150925,6 +151413,10 @@ 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$longArray)) } [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$longList)) } +[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" @@ -150945,6 +151437,17 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c('1', 'a', '1') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$mixedObjectArray) } [1] "1" "a" "1" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 'a', 'a', 'a', 'a', 'b', 'b', 'b', 'b', 'c', 'c', 'c', 'c', 'a', 'a', 'a', 'a', 'b', 'b', 'b', 'b', 'c', 'c', 'c', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$stringArray3, ta$stringList3)) } + [1] "a" "aa" "aaa" "a" "a" "a" "a" "b" "b" "b" "b" "c" +[13] "c" "c" "c" "a" "a" "a" "a" "b" "b" "b" "b" "c" +[25] "c" "c" "c" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 'a', 'a', 'b', 'b', 'c', 'c', 'a', 'a', 'b', 'b', 'c', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$stringArray2, ta$stringList2)) } + [1] "a" "aa" "aaa" "a" "a" "b" "b" "c" "c" "a" "a" "b" +[13] "b" "c" "c" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 'a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$stringArray, ta$stringList)) } [1] "a" "aa" "aaa" "a" "b" "c" "a" "b" "c" @@ -150953,6 +151456,50 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 'a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$stringArray, ta$stringList), recursive=FALSE) } [1] "a" "aa" "aaa" "a" "b" "c" "a" "b" "c" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$byteArray3, ta$byteList3)) } + [1] "a" "aa" "aaa" "1" "1" "1" "1" "2" "2" "2" "2" "3" +[13] "3" "3" "3" "1" "1" "1" "1" "2" "2" "2" "2" "3" +[25] "3" "3" "3" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$integerArray3, ta$integerList3)) } + [1] "a" "aa" "aaa" "1" "1" "1" "1" "2" "2" "2" "2" "3" +[13] "3" "3" "3" "1" "1" "1" "1" "2" "2" "2" "2" "3" +[25] "3" "3" "3" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$longArray3, ta$longList3)) } + [1] "a" "aa" "aaa" "1" "1" "1" "1" "2" "2" "2" "2" "3" +[13] "3" "3" "3" "1" "1" "1" "1" "2" "2" "2" "2" "3" +[25] "3" "3" "3" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$shortArray3, ta$shortList3)) } + [1] "a" "aa" "aaa" "1" "1" "1" "1" "2" "2" "2" "2" "3" +[13] "3" "3" "3" "1" "1" "1" "1" "2" "2" "2" "2" "3" +[25] "3" "3" "3" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$byteArray2, ta$byteList2)) } + [1] "a" "aa" "aaa" "1" "1" "2" "2" "3" "3" "1" "1" "2" +[13] "2" "3" "3" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$integerArray2, ta$integerList2)) } + [1] "a" "aa" "aaa" "1" "1" "2" "2" "3" "3" "1" "1" "2" +[13] "2" "3" "3" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$longArray2, ta$longList2)) } + [1] "a" "aa" "aaa" "1" "1" "2" "2" "3" "3" "1" "1" "2" +[13] "2" "3" "3" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$shortArray2, ta$shortList2)) } + [1] "a" "aa" "aaa" "1" "1" "2" "2" "3" "3" "1" "1" "2" +[13] "2" "3" "3" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$byteArray, ta$byteList)) } [1] "a" "aa" "aaa" "1" "2" "3" "1" "2" "3" @@ -150985,6 +151532,17 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$shortArray, ta$shortList), recursive=FALSE) } [1] "a" "aa" "aaa" "1" "2" "3" "1" "2" "3" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1.1, 1.1, 1.1, 1.1, 1.2, 1.2, 1.2, 1.2, 1.3, 1.3, 1.3, 1.3, 1.1, 1.1, 1.1, 1.1, 1.2, 1.2, 1.2, 1.2, 1.3, 1.3, 1.3, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$doubleArray3, ta$doubleList3)) } + [1] "a" "aa" "aaa" "1.1" "1.1" "1.1" "1.1" "1.2" "1.2" "1.2" "1.2" "1.3" +[13] "1.3" "1.3" "1.3" "1.1" "1.1" "1.1" "1.1" "1.2" "1.2" "1.2" "1.2" "1.3" +[25] "1.3" "1.3" "1.3" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1.1, 1.1, 1.2, 1.2, 1.3, 1.3, 1.1, 1.1, 1.2, 1.2, 1.3, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$doubleArray2, ta$doubleList2)) } + [1] "a" "aa" "aaa" "1.1" "1.1" "1.2" "1.2" "1.3" "1.3" "1.1" "1.1" "1.2" +[13] "1.2" "1.3" "1.3" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 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(list(c('a', 'aa', 'aaa'), ta$doubleArray, ta$doubleList)) } [1] "a" "aa" "aaa" "1.1" "1.2" "1.3" "1.1" "1.2" "1.3" @@ -150993,6 +151551,23 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 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(list(c('a', 'aa', 'aaa'), ta$doubleArray, ta$doubleList), recursive=FALSE) } [1] "a" "aa" "aaa" "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('a', 'aa', 'aaa', 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$floatArray3, ta$floatList3)) } + [1] "a" "aa" "aaa" "1.10000002384186" + [5] "1.10000002384186" "1.10000002384186" "1.10000002384186" "1.20000004768372" + [9] "1.20000004768372" "1.20000004768372" "1.20000004768372" "1.29999995231628" +[13] "1.29999995231628" "1.29999995231628" "1.29999995231628" "1.10000002384186" +[17] "1.10000002384186" "1.10000002384186" "1.10000002384186" "1.20000004768372" +[21] "1.20000004768372" "1.20000004768372" "1.20000004768372" "1.29999995231628" +[25] "1.29999995231628" "1.29999995231628" "1.29999995231628" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$floatArray2, ta$floatList2)) } + [1] "a" "aa" "aaa" "1.10000002384186" + [5] "1.10000002384186" "1.20000004768372" "1.20000004768372" "1.29999995231628" + [9] "1.29999995231628" "1.10000002384186" "1.10000002384186" "1.20000004768372" +[13] "1.20000004768372" "1.29999995231628" "1.29999995231628" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', 1.100000023841858, 1.2000000476837158, 1.2999999523162842, 1.100000023841858, 1.2000000476837158, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$floatArray, ta$floatList)) } [1] "a" "aa" "aaa" "1.10000002384186" @@ -151013,6 +151588,17 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$booleanArray, ta$booleanList), recursive=FALSE) } [1] "a" "aa" "aaa" "TRUE" "FALSE" "TRUE" "TRUE" "FALSE" "TRUE" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', TRUE, TRUE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, TRUE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$booleanArray2, ta$booleanList2)) } + [1] "a" "aa" "aaa" "TRUE" "TRUE" "FALSE" "FALSE" "TRUE" "TRUE" +[10] "TRUE" "TRUE" "FALSE" "FALSE" "TRUE" "TRUE" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'aa', 'aaa', TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$booleanArray3, ta$booleanList3)) } + [1] "a" "aa" "aaa" "TRUE" "TRUE" "TRUE" "TRUE" "FALSE" "FALSE" +[10] "FALSE" "FALSE" "TRUE" "TRUE" "TRUE" "TRUE" "TRUE" "TRUE" "TRUE" +[19] "TRUE" "FALSE" "FALSE" "FALSE" "FALSE" "TRUE" "TRUE" "TRUE" "TRUE" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charArray) } [1] "a" "b" "c" @@ -151021,6 +151607,14 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charArray, recursive=FALSE) } [1] "a" "b" "c" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charList) } +[1] "a" "b" "c" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charList, recursive=FALSE) } +[1] "a" "b" "c" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charObjectArray) } [1] "a" "b" "c" @@ -151037,10 +151631,22 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringArray, recursive=FALSE) } [1] "a" "b" "c" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringList) } +[1] "a" "b" "c" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c('a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$stringList, recursive=FALSE) } +[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$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$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') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$charObjectArray2, recursive=FALSE) } [1] "a" "b" "c" "a" "b" "c" @@ -151049,6 +151655,10 @@ Error in as.external.char(97L, 1) : #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') } 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) } [1] 1 2 3 @@ -151057,6 +151667,14 @@ Error in as.external.char(97L, 1) : #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, recursive=FALSE) } [1] 1 2 3 +##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$byteList) } +[1] 1 2 3 + +##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$byteList, recursive=FALSE) } +[1] 1 2 3 + ##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$byteObjectArray) } [1] 1 2 3 @@ -151073,6 +151691,14 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerArray, recursive=FALSE) } [1] 1 2 3 +##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$integerList) } +[1] 1 2 3 + +##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$integerList, recursive=FALSE) } +[1] 1 2 3 + ##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$integerObjectArray) } [1] 1 2 3 @@ -151090,11 +151716,19 @@ Error in as.external.char(97L, 1) : [1] 1 2 3 ##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$longObjectArray) } +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longList) } [1] 1 2 3 ##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$longObjectArray, recursive=FALSE) } +#if (!any(R.version$engine == "FastR")) { c(1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longList, recursive=FALSE) } +[1] 1 2 3 + +##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$longObjectArray) } +[1] 1 2 3 + +##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$longObjectArray, recursive=FALSE) } [1] 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# @@ -151113,6 +151747,14 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortArray, recursive=FALSE) } [1] 1 2 3 +##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$shortList) } +[1] 1 2 3 + +##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$shortList, recursive=FALSE) } +[1] 1 2 3 + ##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$shortObjectArray) } [1] 1 2 3 @@ -151125,6 +151767,10 @@ Error in as.external.char(97L, 1) : #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$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$byteObjectArray2, recursive=FALSE) } [1] 1 2 3 1 2 3 @@ -151133,6 +151779,10 @@ Error in as.external.char(97L, 1) : #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) } 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) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerObjectArray2, recursive=FALSE) } [1] 1 2 3 1 2 3 @@ -151141,6 +151791,10 @@ Error in as.external.char(97L, 1) : #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) } 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) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longObjectArray2, recursive=FALSE) } [1] 1 2 3 1 2 3 @@ -151149,10 +151803,18 @@ Error in as.external.char(97L, 1) : #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) } 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) } 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) } + [1] 1 2 3 4 5 6 7 8 9 10 11 12 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleArray) } [1] 1.1 1.2 1.3 @@ -151161,6 +151823,14 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleArray, recursive=FALSE) } [1] 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) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleList) } +[1] 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) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleList, recursive=FALSE) } +[1] 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) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleObjectArray) } [1] 1.1 1.2 1.3 @@ -151177,6 +151847,14 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatArray, recursive=FALSE) } [1] 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) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatList) } +[1] 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) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatList, recursive=FALSE) } +[1] 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) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatObjectArray) } [1] 1.1 1.2 1.3 @@ -151185,6 +151863,17 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatObjectArray, recursive=FALSE) } [1] 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, 'a', 'a', 'a', 'a', 'b', 'b', 'b', 'b', 'c', 'c', 'c', 'c', 'a', 'a', 'a', 'a', 'b', 'b', 'b', 'b', 'c', 'c', 'c', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$stringArray3, ta$stringList3)) } + [1] "1.1" "1.2" "1.3" "a" "a" "a" "a" "b" "b" "b" "b" "c" +[13] "c" "c" "c" "a" "a" "a" "a" "b" "b" "b" "b" "c" +[25] "c" "c" "c" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 'a', 'a', 'b', 'b', 'c', 'c', 'a', 'a', 'b', 'b', 'c', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$stringArray2, ta$stringList2)) } + [1] "1.1" "1.2" "1.3" "a" "a" "b" "b" "c" "c" "a" "a" "b" +[13] "b" "c" "c" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 'a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$stringArray, ta$stringList)) } [1] "1.1" "1.2" "1.3" "a" "b" "c" "a" "b" "c" @@ -151193,6 +151882,33 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, 'a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$stringArray, ta$stringList), recursive=FALSE) } [1] "1.1" "1.2" "1.3" "a" "b" "c" "a" "b" "c" +##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, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$integerArray3, ta$integerList3)) } + [1] 1.1 1.2 1.3 1.0 1.0 1.0 1.0 2.0 2.0 2.0 2.0 3.0 3.0 3.0 3.0 1.0 1.0 1.0 1.0 +[20] 2.0 2.0 2.0 2.0 3.0 3.0 3.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, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$longArray3, ta$longList3)) } + [1] 1.1 1.2 1.3 1.0 1.0 1.0 1.0 2.0 2.0 2.0 2.0 3.0 3.0 3.0 3.0 1.0 1.0 1.0 1.0 +[20] 2.0 2.0 2.0 2.0 3.0 3.0 3.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, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$shortArray3, ta$shortList3)) } + [1] 1.1 1.2 1.3 1.0 1.0 1.0 1.0 2.0 2.0 2.0 2.0 3.0 3.0 3.0 3.0 1.0 1.0 1.0 1.0 +[20] 2.0 2.0 2.0 2.0 3.0 3.0 3.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, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$integerArray2, ta$integerList2)) } + [1] 1.1 1.2 1.3 1.0 1.0 2.0 2.0 3.0 3.0 1.0 1.0 2.0 2.0 3.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, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$longArray2, ta$longList2)) } + [1] 1.1 1.2 1.3 1.0 1.0 2.0 2.0 3.0 3.0 1.0 1.0 2.0 2.0 3.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, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$shortArray2, ta$shortList2)) } + [1] 1.1 1.2 1.3 1.0 1.0 2.0 2.0 3.0 3.0 1.0 1.0 2.0 2.0 3.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, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$integerArray, ta$integerList)) } [1] 1.1 1.2 1.3 1.0 2.0 3.0 1.0 2.0 3.0 @@ -151221,6 +151937,10 @@ Error in as.external.char(97L, 1) : #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$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) } 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 @@ -151229,6 +151949,10 @@ Error in as.external.char(97L, 1) : #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) } 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) } 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 @@ -151241,6 +151965,24 @@ Error in as.external.char(97L, 1) : #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), recursive=FALSE) } [1] 1.1 1.2 1.3 1.0 0.0 1.0 1.0 0.0 1.0 +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, TRUE, TRUE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, TRUE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$booleanArray2, ta$booleanList2)) } + [1] 1.1 1.2 1.3 1.0 1.0 0.0 0.0 1.0 1.0 1.0 1.0 0.0 0.0 1.0 1.0 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1.1, 1.2, 1.3, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$booleanArray3, ta$booleanList3)) } + [1] 1.1 1.2 1.3 1.0 1.0 1.0 1.0 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 1.0 +[20] 0.0 0.0 0.0 0.0 1.0 1.0 1.0 1.0 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$byteArray3, ta$byteList3)) } + [1] 1.1 2.1 3.1 1.0 1.0 1.0 1.0 2.0 2.0 2.0 2.0 3.0 3.0 3.0 3.0 1.0 1.0 1.0 1.0 +[20] 2.0 2.0 2.0 2.0 3.0 3.0 3.0 3.0 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$byteArray2, ta$byteList2)) } + [1] 1.1 2.1 3.1 1.0 1.0 2.0 2.0 3.0 3.0 1.0 1.0 2.0 2.0 3.0 3.0 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$byteArray, ta$byteList)) } [1] 1.1 2.1 3.1 1.0 2.0 3.0 1.0 2.0 3.0 @@ -151249,6 +151991,15 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$byteArray, ta$byteList), recursive=FALSE) } [1] 1.1 2.1 3.1 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, 2.1, 3.1, 1.1, 1.1, 1.1, 1.1, 1.2, 1.2, 1.2, 1.2, 1.3, 1.3, 1.3, 1.3, 1.1, 1.1, 1.1, 1.1, 1.2, 1.2, 1.2, 1.2, 1.3, 1.3, 1.3, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$doubleArray3, ta$doubleList3)) } + [1] 1.1 2.1 3.1 1.1 1.1 1.1 1.1 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 1.1 1.1 1.1 1.1 +[20] 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 1.1, 1.1, 1.2, 1.2, 1.3, 1.3, 1.1, 1.1, 1.2, 1.2, 1.3, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$doubleArray2, ta$doubleList2)) } + [1] 1.1 2.1 3.1 1.1 1.1 1.2 1.2 1.3 1.3 1.1 1.1 1.2 1.2 1.3 1.3 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 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(list(c(1.1, 2.1, 3.1), ta$doubleArray, ta$doubleList)) } [1] 1.1 2.1 3.1 1.1 1.2 1.3 1.1 1.2 1.3 @@ -151257,6 +152008,15 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 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(list(c(1.1, 2.1, 3.1), ta$doubleArray, ta$doubleList), recursive=FALSE) } [1] 1.1 2.1 3.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, 2.1, 3.1, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$floatArray3, ta$floatList3)) } + [1] 1.1 2.1 3.1 1.1 1.1 1.1 1.1 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 1.1 1.1 1.1 1.1 +[20] 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$floatArray2, ta$floatList2)) } + [1] 1.1 2.1 3.1 1.1 1.1 1.2 1.2 1.3 1.3 1.1 1.1 1.2 1.2 1.3 1.3 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 1.100000023841858, 1.2000000476837158, 1.2999999523162842, 1.100000023841858, 1.2000000476837158, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$floatArray, ta$floatList)) } [1] 1.1 2.1 3.1 1.1 1.2 1.3 1.1 1.2 1.3 @@ -151265,6 +152025,15 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1.1, 2.1, 3.1, 1.100000023841858, 1.2000000476837158, 1.2999999523162842, 1.100000023841858, 1.2000000476837158, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$floatArray, ta$floatList), recursive=FALSE) } [1] 1.1 2.1 3.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(1L, 2L, 3L, 'a', 'a', 'a', 'a', 'b', 'b', 'b', 'b', 'c', 'c', 'c', 'c', 'a', 'a', 'a', 'a', 'b', 'b', 'b', 'b', 'c', 'c', 'c', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$stringArray3, ta$stringList3)) } + [1] "1" "2" "3" "a" "a" "a" "a" "b" "b" "b" "b" "c" "c" "c" "c" "a" "a" "a" "a" +[20] "b" "b" "b" "b" "c" "c" "c" "c" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 'a', 'a', 'b', 'b', 'c', 'c', 'a', 'a', 'b', 'b', 'c', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$stringArray2, ta$stringList2)) } + [1] "1" "2" "3" "a" "a" "b" "b" "c" "c" "a" "a" "b" "b" "c" "c" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 'a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$stringArray, ta$stringList)) } [1] "1" "2" "3" "a" "b" "c" "a" "b" "c" @@ -151273,6 +152042,38 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 'a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$stringArray, ta$stringList), recursive=FALSE) } [1] "1" "2" "3" "a" "b" "c" "a" "b" "c" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$byteArray3, ta$byteList3)) } + [1] 1 2 3 1 1 1 1 2 2 2 2 3 3 3 3 1 1 1 1 2 2 2 2 3 3 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$integerArray3, ta$integerList3)) } + [1] 1 2 3 1 1 1 1 2 2 2 2 3 3 3 3 1 1 1 1 2 2 2 2 3 3 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$longArray3, ta$longList3)) } + [1] 1 2 3 1 1 1 1 2 2 2 2 3 3 3 3 1 1 1 1 2 2 2 2 3 3 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$shortArray3, ta$shortList3)) } + [1] 1 2 3 1 1 1 1 2 2 2 2 3 3 3 3 1 1 1 1 2 2 2 2 3 3 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$byteArray2, ta$byteList2)) } + [1] 1 2 3 1 1 2 2 3 3 1 1 2 2 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$integerArray2, ta$integerList2)) } + [1] 1 2 3 1 1 2 2 3 3 1 1 2 2 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$longArray2, ta$longList2)) } + [1] 1 2 3 1 1 2 2 3 3 1 1 2 2 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$shortArray2, ta$shortList2)) } + [1] 1 2 3 1 1 2 2 3 3 1 1 2 2 3 3 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$byteArray, ta$byteList)) } [1] 1 2 3 1 2 3 1 2 3 @@ -151305,6 +152106,15 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$shortArray, ta$shortList), recursive=FALSE) } [1] 1 2 3 1 2 3 1 2 3 +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1.1, 1.1, 1.1, 1.1, 1.2, 1.2, 1.2, 1.2, 1.3, 1.3, 1.3, 1.3, 1.1, 1.1, 1.1, 1.1, 1.2, 1.2, 1.2, 1.2, 1.3, 1.3, 1.3, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$doubleArray3, ta$doubleList3)) } + [1] 1.0 2.0 3.0 1.1 1.1 1.1 1.1 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 1.1 1.1 1.1 1.1 +[20] 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1.1, 1.1, 1.2, 1.2, 1.3, 1.3, 1.1, 1.1, 1.2, 1.2, 1.3, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$doubleArray2, ta$doubleList2)) } + [1] 1.0 2.0 3.0 1.1 1.1 1.2 1.2 1.3 1.3 1.1 1.1 1.2 1.2 1.3 1.3 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 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(list(c(1L, 2L, 3L), ta$doubleArray, ta$doubleList)) } [1] 1.0 2.0 3.0 1.1 1.2 1.3 1.1 1.2 1.3 @@ -151313,6 +152123,15 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 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(list(c(1L, 2L, 3L), ta$doubleArray, ta$doubleList), recursive=FALSE) } [1] 1.0 2.0 3.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(1L, 2L, 3L, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$floatArray3, ta$floatList3)) } + [1] 1.0 2.0 3.0 1.1 1.1 1.1 1.1 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 1.1 1.1 1.1 1.1 +[20] 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$floatArray2, ta$floatList2)) } + [1] 1.0 2.0 3.0 1.1 1.1 1.2 1.2 1.3 1.3 1.1 1.1 1.2 1.2 1.3 1.3 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, 1.100000023841858, 1.2000000476837158, 1.2999999523162842, 1.100000023841858, 1.2000000476837158, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$floatArray, ta$floatList)) } [1] 1.0 2.0 3.0 1.1 1.2 1.3 1.1 1.2 1.3 @@ -151329,6 +152148,14 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, TRUE, FALSE, TRUE, TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$booleanArray, ta$booleanList), recursive=FALSE) } [1] 1 2 3 1 0 1 1 0 1 +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, TRUE, TRUE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, TRUE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$booleanArray2, ta$booleanList2)) } + [1] 1 2 3 1 1 0 0 1 1 1 1 0 0 1 1 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(1L, 2L, 3L, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$booleanArray3, ta$booleanList3)) } + [1] 1 2 3 1 1 1 1 0 0 0 0 1 1 1 1 1 1 1 1 0 0 0 0 1 1 1 1 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanArray) } [1] TRUE FALSE TRUE @@ -151337,6 +152164,14 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanArray, recursive=FALSE) } [1] TRUE FALSE TRUE +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanList) } +[1] TRUE FALSE TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanList, recursive=FALSE) } +[1] TRUE FALSE TRUE + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanObjectArray) } [1] TRUE FALSE TRUE @@ -151345,6 +152180,17 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanObjectArray, recursive=FALSE) } [1] TRUE FALSE TRUE +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 'a', 'a', 'a', 'a', 'b', 'b', 'b', 'b', 'c', 'c', 'c', 'c', 'a', 'a', 'a', 'a', 'b', 'b', 'b', 'b', 'c', 'c', 'c', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$stringArray3, ta$stringList3)) } + [1] "TRUE" "FALSE" "TRUE" "a" "a" "a" "a" "b" "b" +[10] "b" "b" "c" "c" "c" "c" "a" "a" "a" +[19] "a" "b" "b" "b" "b" "c" "c" "c" "c" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 'a', 'a', 'b', 'b', 'c', 'c', 'a', 'a', 'b', 'b', 'c', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$stringArray2, ta$stringList2)) } + [1] "TRUE" "FALSE" "TRUE" "a" "a" "b" "b" "c" "c" +[10] "a" "a" "b" "b" "c" "c" + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 'a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$stringArray, ta$stringList)) } [1] "TRUE" "FALSE" "TRUE" "a" "b" "c" "a" "b" "c" @@ -151353,6 +152199,38 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 'a', 'b', 'c', 'a', 'b', 'c') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$stringArray, ta$stringList), recursive=FALSE) } [1] "TRUE" "FALSE" "TRUE" "a" "b" "c" "a" "b" "c" +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$byteArray3, ta$byteList3)) } + [1] 1 0 1 1 1 1 1 2 2 2 2 3 3 3 3 1 1 1 1 2 2 2 2 3 3 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$integerArray3, ta$integerList3)) } + [1] 1 0 1 1 1 1 1 2 2 2 2 3 3 3 3 1 1 1 1 2 2 2 2 3 3 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$longArray3, ta$longList3)) } + [1] 1 0 1 1 1 1 1 2 2 2 2 3 3 3 3 1 1 1 1 2 2 2 2 3 3 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$shortArray3, ta$shortList3)) } + [1] 1 0 1 1 1 1 1 2 2 2 2 3 3 3 3 1 1 1 1 2 2 2 2 3 3 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$byteArray2, ta$byteList2)) } + [1] 1 0 1 1 1 2 2 3 3 1 1 2 2 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$integerArray2, ta$integerList2)) } + [1] 1 0 1 1 1 2 2 3 3 1 1 2 2 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$longArray2, ta$longList2)) } + [1] 1 0 1 1 1 2 2 3 3 1 1 2 2 3 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$shortArray2, ta$shortList2)) } + [1] 1 0 1 1 1 2 2 3 3 1 1 2 2 3 3 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$byteArray, ta$byteList)) } [1] 1 0 1 1 2 3 1 2 3 @@ -151385,6 +152263,15 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1, 2, 3, 1, 2, 3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$shortArray, ta$shortList), recursive=FALSE) } [1] 1 0 1 1 2 3 1 2 3 +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1.1, 1.1, 1.1, 1.1, 1.2, 1.2, 1.2, 1.2, 1.3, 1.3, 1.3, 1.3, 1.1, 1.1, 1.1, 1.1, 1.2, 1.2, 1.2, 1.2, 1.3, 1.3, 1.3, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$doubleArray3, ta$doubleList3)) } + [1] 1.0 0.0 1.0 1.1 1.1 1.1 1.1 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 1.1 1.1 1.1 1.1 +[20] 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1.1, 1.1, 1.2, 1.2, 1.3, 1.3, 1.1, 1.1, 1.2, 1.2, 1.3, 1.3) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$doubleArray2, ta$doubleList2)) } + [1] 1.0 0.0 1.0 1.1 1.1 1.2 1.2 1.3 1.3 1.1 1.1 1.2 1.2 1.3 1.3 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 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(list(c(TRUE, FALSE, TRUE), ta$doubleArray, ta$doubleList)) } [1] 1.0 0.0 1.0 1.1 1.2 1.3 1.1 1.2 1.3 @@ -151393,6 +152280,15 @@ Error in as.external.char(97L, 1) : #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 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(list(c(TRUE, FALSE, TRUE), ta$doubleArray, ta$doubleList), recursive=FALSE) } [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, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$floatArray3, ta$floatList3)) } + [1] 1.0 0.0 1.0 1.1 1.1 1.1 1.1 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 1.1 1.1 1.1 1.1 +[20] 1.2 1.2 1.2 1.2 1.3 1.3 1.3 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842, 1.100000023841858, 1.100000023841858, 1.2000000476837158, 1.2000000476837158, 1.2999999523162842, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$floatArray2, ta$floatList2)) } + [1] 1.0 0.0 1.0 1.1 1.1 1.2 1.2 1.3 1.3 1.1 1.1 1.2 1.2 1.3 1.3 + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# #if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, 1.100000023841858, 1.2000000476837158, 1.2999999523162842, 1.100000023841858, 1.2000000476837158, 1.2999999523162842) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$floatArray, ta$floatList)) } [1] 1.0 0.0 1.0 1.1 1.2 1.3 1.1 1.2 1.3 @@ -151405,6 +152301,10 @@ Error in as.external.char(97L, 1) : #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) } 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) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanObjectArray2, recursive=FALSE) } [1] TRUE FALSE TRUE TRUE FALSE TRUE @@ -151418,97 +152318,1698 @@ Error in as.external.char(97L, 1) : [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")) { 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] -[1,] "a" "b" "c" -[2,] "a" "b" "c" +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, TRUE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, TRUE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$booleanArray2, ta$booleanList2)) } + [1] TRUE FALSE TRUE TRUE TRUE FALSE FALSE TRUE TRUE TRUE TRUE FALSE +[13] FALSE TRUE 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$charObjectArray2) } - [,1] [,2] [,3] -[1,] "a" "b" "c" -[2,] "a" "b" "c" +#if (!any(R.version$engine == "FastR")) { c(TRUE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$booleanArray3, ta$booleanList3)) } + [1] TRUE FALSE TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE FALSE TRUE +[13] TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE FALSE TRUE +[25] TRUE TRUE 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$stringArray2) } - [,1] [,2] [,3] -[1,] "a" "b" "c" -[2,] "a" "b" "c" +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$booleanArray2, ta$booleanList2), recursive=FALSE) } +[[1]] +[1] "a" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteArray2) } - [,1] [,2] [,3] -[1,] 1 2 3 -[2,] 1 2 3 +[[2]] +[1] "aa" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteObjectArray2) } - [,1] [,2] [,3] -[1,] 1 2 3 -[2,] 1 2 3 +[[3]] +[1] "aaa" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerArray2) } - [,1] [,2] [,3] -[1,] 1 2 3 -[2,] 1 2 3 +[[4]] +[external object] -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerObjectArray2) } - [,1] [,2] [,3] -[1,] 1 2 3 -[2,] 1 2 3 +[[5]] +[external object] -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longArray2) } - [,1] [,2] [,3] -[1,] 1 2 3 -[2,] 1 2 3 +[[6]] +[external object] -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longObjectArray2) } - [,1] [,2] [,3] -[1,] 1 2 3 -[2,] 1 2 3 +[[7]] +[external object] -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortArray2) } - [,1] [,2] [,3] -[1,] 1 2 3 -[2,] 1 2 3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortObjectArray2) } - [,1] [,2] [,3] -[1,] 1 2 3 -[2,] 1 2 3 +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$booleanArray3, ta$booleanList3), recursive=FALSE) } +[[1]] +[1] "a" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleArray2) } - [,1] [,2] [,3] -[1,] 1.1 1.2 1.3 -[2,] 1.1 1.2 1.3 +[[2]] +[1] "aa" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleObjectArray2) } - [,1] [,2] [,3] -[1,] 1.1 1.2 1.3 -[2,] 1.1 1.2 1.3 +[[3]] +[1] "aaa" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatArray2) } - [,1] [,2] [,3] -[1,] 1.1 1.2 1.3 -[2,] 1.1 1.2 1.3 +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatObjectArray2) } - [,1] [,2] [,3] -[1,] 1.1 1.2 1.3 -[2,] 1.1 1.2 1.3 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# -#if (!any(R.version$engine == "FastR")) { matrix(c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanArray2) } +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$byteArray2, ta$byteList2), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$byteArray3, ta$byteList3), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$doubleArray2, ta$doubleList2), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$doubleArray3, ta$doubleList3), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$floatArray2, ta$floatList2), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$floatArray3, ta$floatList3), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$integerArray2, ta$integerList2), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$integerArray3, ta$integerList3), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$longArray2, ta$longList2), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$longArray3, ta$longList3), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$shortArray2, ta$shortList2), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$shortArray3, ta$shortList3), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$stringArray2, ta$stringList2), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] "a"','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] "aa"','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] "aaa"','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c('a', 'aa', 'aaa'), ta$stringArray3, ta$stringList3), recursive=FALSE) } +[[1]] +[1] "a" + +[[2]] +[1] "aa" + +[[3]] +[1] "aaa" + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$booleanArray2, ta$booleanList2), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$booleanArray3, ta$booleanList3), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$byteArray2, ta$byteList2), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$byteArray3, ta$byteList3), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$doubleArray2, ta$doubleList2), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$doubleArray3, ta$doubleList3), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$floatArray2, ta$floatList2), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$floatArray3, ta$floatList3), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$integerArray2, ta$integerList2), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$integerArray3, ta$integerList3), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$longArray2, ta$longList2), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$longArray3, ta$longList3), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$shortArray2, ta$shortList2), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$shortArray3, ta$shortList3), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$stringArray2, ta$stringList2), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1L, 2L, 3L), ta$stringArray3, ta$stringList3), recursive=FALSE) } +[[1]] +[1] 1 + +[[2]] +[1] 2 + +[[3]] +[1] 3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$booleanArray2, ta$booleanList2), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$booleanArray3, ta$booleanList3), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$integerArray2, ta$integerList2), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$integerArray3, ta$integerList3), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$longArray2, ta$longList2), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$longArray3, ta$longList3), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$shortArray2, ta$shortList2), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$shortArray3, ta$shortList3), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$stringArray2, ta$stringList2), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 1.2','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 1.3','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 1.2, 1.3), ta$stringArray3, ta$stringList3), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 1.2 + +[[3]] +[1] 1.3 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2.1','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3.1','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$byteArray2, ta$byteList2), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 2.1 + +[[3]] +[1] 3.1 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2.1','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3.1','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$byteArray3, ta$byteList3), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 2.1 + +[[3]] +[1] 3.1 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2.1','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3.1','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$doubleArray2, ta$doubleList2), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 2.1 + +[[3]] +[1] 3.1 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2.1','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3.1','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$doubleArray3, ta$doubleList3), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 2.1 + +[[3]] +[1] 3.1 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2.1','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3.1','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$floatArray2, ta$floatList2), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 2.1 + +[[3]] +[1] 3.1 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] 1.1','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] 2.1','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] 3.1','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(1.1, 2.1, 3.1), ta$floatArray3, ta$floatList3), recursive=FALSE) } +[[1]] +[1] 1.1 + +[[2]] +[1] 2.1 + +[[3]] +[1] 3.1 + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$booleanArray2, ta$booleanList2), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$booleanArray3, ta$booleanList3), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$byteArray2, ta$byteList2), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$byteArray3, ta$byteList3), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$doubleArray2, ta$doubleList2), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$doubleArray3, ta$doubleList3), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$floatArray2, ta$floatList2), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$floatArray3, ta$floatList3), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$integerArray2, ta$integerList2), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$integerArray3, ta$integerList3), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$longArray2, ta$longList2), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$longArray3, ta$longList3), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$shortArray2, ta$shortList2), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$shortArray3, ta$shortList3), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$stringArray2, ta$stringList2), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { cat('[[1]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[2]]','<<<NEWLINE>>>','[1] FALSE','<<<NEWLINE>>><<<NEWLINE>>>','[[3]]','<<<NEWLINE>>>','[1] TRUE','<<<NEWLINE>>><<<NEWLINE>>>','[[4]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[5]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[6]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>','[[7]]','<<<NEWLINE>>>','[external object]','<<<NEWLINE>>><<<NEWLINE>>>', sep='') } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(list(c(TRUE, FALSE, TRUE), ta$stringArray3, ta$stringList3), recursive=FALSE) } +[[1]] +[1] TRUE + +[[2]] +[1] FALSE + +[[3]] +[1] TRUE + +[[4]] +[external object] + +[[5]] +[external object] + +[[6]] +[external object] + +[[7]] +[external object] + + +##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] +[1,] "a" "b" "c" +[2,] "a" "b" "c" + +##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$charList2) } + [,1] [,2] [,3] +[1,] "a" "b" "c" +[2,] "a" "b" "c" + +##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$charObjectArray2) } + [,1] [,2] [,3] +[1,] "a" "b" "c" +[2,] "a" "b" "c" + +##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$stringArray2) } + [,1] [,2] [,3] +[1,] "a" "b" "c" +[2,] "a" "b" "c" + +##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$stringList2) } + [,1] [,2] [,3] +[1,] "a" "b" "c" +[2,] "a" "b" "c" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteArray2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteList2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$byteObjectArray2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerArray2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerList2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$integerObjectArray2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longArray2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longList2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$longObjectArray2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortArray2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortList2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1, 2, 3, 1, 2, 3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$shortObjectArray2) } + [,1] [,2] [,3] +[1,] 1 2 3 +[2,] 1 2 3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleArray2) } + [,1] [,2] [,3] +[1,] 1.1 1.2 1.3 +[2,] 1.1 1.2 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleList2) } + [,1] [,2] [,3] +[1,] 1.1 1.2 1.3 +[2,] 1.1 1.2 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$doubleObjectArray2) } + [,1] [,2] [,3] +[1,] 1.1 1.2 1.3 +[2,] 1.1 1.2 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatArray2) } + [,1] [,2] [,3] +[1,] 1.1 1.2 1.3 +[2,] 1.1 1.2 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatList2) } + [,1] [,2] [,3] +[1,] 1.1 1.2 1.3 +[2,] 1.1 1.2 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(1.1, 1.2, 1.3, 1.1, 1.2, 1.3), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$floatObjectArray2) } + [,1] [,2] [,3] +[1,] 1.1 1.2 1.3 +[2,] 1.1 1.2 1.3 + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanArray2) } + [,1] [,2] [,3] +[1,] TRUE FALSE TRUE +[2,] TRUE FALSE TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testUnlist# +#if (!any(R.version$engine == "FastR")) { matrix(c(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE), nrow=2, ncol=3, byrow=T) } else { ta <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestArraysClass'); unlist(ta$booleanList2) } [,1] [,2] [,3] [1,] TRUE FALSE TRUE [2,] TRUE FALSE TRUE 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 748316d584bf2d14f21496fc05b8fe504527aa38..b193df39c62b14f5ae9334ad9b60e32b5e7b2087 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 @@ -666,32 +666,22 @@ public class TestJavaInterop extends TestBase { assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); l[[2]]", "'b'"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); length(l)", "3"); - // FIXME: problem in ForeignArray2R: reading non-primitive arrays is not supported? - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); is.list(l)", - // "TRUE"); - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); l[[1]]$data", - // "'a'"); - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); l[[2]]$data", - // "'b'"); - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); length(l)", "4"); - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); l[[4]]$data", - // "NULL"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); is.list(l)", "TRUE"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); l[[1]]$data", "'a'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); l[[2]]$data", "'b'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); length(l)", "4"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); l[[4]]$data", "NULL"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$fieldStringArray); is.list(l)", "TRUE"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$fieldStringArray); l[[1]]", "'a'"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$fieldStringArray); l[[2]]", "'b'"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$fieldStringArray); length(l)", "3"); - // FIXME: problem in ForeignArray2R: reading non-primitive arrays is not supported? - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); is.list(l)", - // "TRUE"); - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); l[[1]]$data", - // "'a'"); - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); l[[2]]$data", - // "'b'"); - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); length(l)", "4"); - // assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); l[[4]]$data", - // "NULL"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); is.list(l)", "TRUE"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); l[[1]]$data", "'a'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); l[[2]]$data", "'b'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); length(l)", "4"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$arrayObject); l[[4]]$data", "NULL"); assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + " l<-as.list(to);", errorIn("as.list(to)", "no method for coercing this external object to a list")); } @@ -723,10 +713,8 @@ public class TestJavaInterop extends TestBase { assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$mixedObjectArray)", "c('1', 'a', '1')"); assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(ta$mixedObjectArray))", "'character'"); - // FIXME: ArrayList isn't allowed Truffle interop type - // assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$mixedIntegerList)", "c(1, 2, 3, 4, 5, 6, - // 7, 8, 9, 10, 11, 12)"); - // assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(ta$mixedIntegerList))", "'integer'"); + assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$mixedIntegerList)", "c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12)"); + assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(ta$mixedIntegerList))", "'integer'"); testForeingObjectInListUnlist("byte", new String[]{"TRUE", "FALSE", "TRUE"}, "integer"); testForeingObjectInListUnlist("byte", new String[]{"1L", "2L", "3L"}, "integer"); @@ -774,8 +762,7 @@ public class TestJavaInterop extends TestBase { if (!fieldType.equals("string")) { testForeingObjectUnlist(fieldType + "ObjectArray", result, clazz); } - // FIXME: ArrayList isn't allowed Truffle interop type - // testForeingObjectUnlist(fieldType + "List", result, clazz); + testForeingObjectUnlist(fieldType + "List", result, clazz); } private void testForeingObjectUnlist(String fieldPrefix, String result, String clazz) { @@ -786,10 +773,15 @@ public class TestJavaInterop extends TestBase { field = fieldPrefix + "2"; String resultVector = "c(" + result + ", " + result + ")"; - String expected = fieldPrefix.contains("List") ? resultVector : "matrix(" + resultVector + ", nrow=2, ncol=3, byrow=T)"; + // TODO: missing tests for iterable which does not behave like truffle array; + // String expected = fieldPrefix.contains("Iterable") ? resultVector : "matrix(" + + // resultVector + ", nrow=2, ncol=3, byrow=T)"; + String expected = "matrix(" + resultVector + ", nrow=2, ncol=3, byrow=T)"; assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$" + field + ")", expected); - expected = fieldPrefix.contains("List") ? "'" + clazz + "'" : "'matrix'"; + // TODO: missing tests for iterable which does not behave like truffle array + // expected = fieldPrefix.contains("List") ? "'" + clazz + "'" : "'matrix'"; + expected = "'matrix'"; assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(ta$" + field + "))", expected); assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(ta$" + field + ", recursive=FALSE)", "c(" + result + ", " + result + ")"); } @@ -820,61 +812,47 @@ public class TestJavaInterop extends TestBase { String resultInVector = sbVector.toString(); String resultInList = sbList.toString(); String testFieldArrayResult = getTestFieldValuesAsResult(field + "Array"); - String testFieldListResult = getTestFieldValuesAsResult(field + "List"); + // TODO: missing tests for iterable which does not behave like truffle array; + // String testFieldListResult = getTestFieldValuesAsResult(field + "List"); assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + "Array, ta$" + field + "List))", - "c(" + resultInVector + ", " + testFieldArrayResult + ", " + testFieldListResult + ")"); + "c(" + resultInVector + ", " + testFieldArrayResult + ", " + testFieldArrayResult + ")"); assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(list(" + mixWithVector + ", ta$" + field + "Array, ta$" + field + "List)))", "'" + clazz + "'"); assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + "Array, ta$" + field + "List), recursive=FALSE)", - "c(" + resultInVector + ", " + testFieldArrayResult + ", " + testFieldListResult + ")"); - - // FIXME: ArrayList isn't allowed Truffle interop type - // String[] ra = testFieldArrayResult.split(","); - // StringBuilder sb = new StringBuilder(); - // for (i = 0; i < ra.length; i++) { - // String s = ra[i].trim(); - // sb.append(s).append(", ").append(s); - // if (i < ra.length - 1) { - // sb.append(", "); - // } - // } - // String testFieldMatrixResult = sb.toString(); - // assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + - // "Array2, ta$" + field + "List2))", - // "c(" + resultInVector + ", " + testFieldMatrixResult + ", " + testFieldListResult + ", " - // + testFieldListResult + ")"); - // assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(list(" + mixWithVector + ", ta$" + - // field + "Array2, ta$" + field + "List2)))", "'" + clazz + "'"); - // assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + - // "Array2, ta$" + field + "List2), recursive=FALSE)", - // "cat(" + resultInList + - // "'[[4]]','\n','[external object]','\n\n','[[5]]','\n','[external - // object]','\n\n','[[6]]','\n','[external object]','\n\n','[[7]]','\n','[external - // object]','\n\n', sep='')"); - // - // ra = testFieldArrayResult.split(","); - // sb = new StringBuilder(); - // for (i = 0; i < ra.length; i++) { - // String s = ra[i].trim(); - // sb.append(s).append(", ").append(s).append(", ").append(s).append(", ").append(s); - // if (i < ra.length - 1) { - // sb.append(", "); - // } - // } - // testFieldArrayResult = sb.toString(); - // assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + - // "Array3, ta$" + field + "List3))", - // "c(" + resultInVector + ", " + - // testFieldArrayResult + ", " + - // testFieldListResult + ", " + testFieldListResult + ", " + testFieldListResult + ", " + - // testFieldListResult + ")"); - // assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(list(" + mixWithVector + ", ta$" + - // field + "Array3, ta$" + field + "List3)))", "'" + clazz + "'"); - // assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + - // "Array3, ta$" + field + "List3), recursive=FALSE)", - // "cat(" + resultInList + - // "'[[4]]','\n','[external object]','\n\n','[[5]]','\n','[external - // object]','\n\n','[[6]]','\n','[external object]','\n\n','[[7]]','\n','[external - // object]','\n\n', sep='')"); + "c(" + resultInVector + ", " + testFieldArrayResult + ", " + testFieldArrayResult + ")"); + + String[] ra = testFieldArrayResult.split(","); + StringBuilder sb = new StringBuilder(); + for (i = 0; i < ra.length; i++) { + String s = ra[i].trim(); + sb.append(s).append(", ").append(s); + if (i < ra.length - 1) { + sb.append(", "); + } + } + String testFieldMatrixResult = sb.toString(); + assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + "Array2, ta$" + field + "List2))", + "c(" + resultInVector + ", " + testFieldMatrixResult + ", " + testFieldMatrixResult + ")"); + assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(list(" + mixWithVector + ", ta$" + field + "Array2, ta$" + field + "List2)))", "'" + clazz + "'"); + assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + "Array2, ta$" + field + "List2), recursive=FALSE)", + "cat(" + resultInList + + "'[[4]]','\n','[external object]','\n\n','[[5]]','\n','[external object]','\n\n','[[6]]','\n','[external object]','\n\n','[[7]]','\n','[external object]','\n\n', sep='')"); + + ra = testFieldArrayResult.split(","); + sb = new StringBuilder(); + for (i = 0; i < ra.length; i++) { + String s = ra[i].trim(); + sb.append(s).append(", ").append(s).append(", ").append(s).append(", ").append(s); + if (i < ra.length - 1) { + sb.append(", "); + } + } + testFieldArrayResult = sb.toString(); + assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + "Array3, ta$" + field + "List3))", + "c(" + resultInVector + ", " + testFieldArrayResult + ", " + testFieldArrayResult + ")"); + assertEvalFastR(CREATE_TEST_ARRAYS + " class(unlist(list(" + mixWithVector + ", ta$" + field + "Array3, ta$" + field + "List3)))", "'" + clazz + "'"); + assertEvalFastR(CREATE_TEST_ARRAYS + " unlist(list(" + mixWithVector + ", ta$" + field + "Array3, ta$" + field + "List3), recursive=FALSE)", + "cat(" + resultInList + + "'[[4]]','\n','[external object]','\n\n','[[5]]','\n','[external object]','\n\n','[[6]]','\n','[external object]','\n\n','[[7]]','\n','[external object]','\n\n', sep='')"); } private static String getTestFieldValuesAsResult(String name) throws NoSuchFieldException, IllegalArgumentException, IllegalAccessException { @@ -1150,14 +1128,12 @@ public class TestJavaInterop extends TestBase { assertEvalFastR(CREATE_TEST_ARRAYS + " ifelse(ta$booleanArray, 1, 2)", "c(1,2,1)"); assertEvalFastR(CREATE_TEST_ARRAYS + " ifelse(ta$integerArray, 1, 2)", "c(1,1,1)"); assertEvalFastR(CREATE_TEST_ARRAYS + " ifelse(ta$stringArray, 1, 2)", "c(NA, NA, NA)"); - // FIXME: ArrayList isn't allowed Truffle interop type - // assertEvalFastR(CREATE_TEST_ARRAYS + " ifelse(ta$booleanList, 1, 2)", "c(1,2,1)"); - // assertEvalFastR(CREATE_TEST_ARRAYS + " ifelse(ta$integerList, 1, 2)", "c(1,1,1)"); - // assertEvalFastR(CREATE_TEST_ARRAYS + " ifelse(ta$stringList, 1, 2)", "c(NA, NA, NA)"); + assertEvalFastR(CREATE_TEST_ARRAYS + " ifelse(ta$booleanList, 1, 2)", "c(1,2,1)"); + assertEvalFastR(CREATE_TEST_ARRAYS + " ifelse(ta$integerList, 1, 2)", "c(1,1,1)"); + assertEvalFastR(CREATE_TEST_ARRAYS + " ifelse(ta$stringList, 1, 2)", "c(NA, NA, NA)"); } @Test - @Ignore("FIXME: ArrayList isn't allowed Truffle interop type") public void testArraysWithNullConversion() throws IllegalArgumentException { assertEvalFastR(CREATE_TEST_ARRAYS + "as.vector(ta$booleanObjectArrayWithNull)", "list(T, NULL, T)"); assertEvalFastR(CREATE_TEST_ARRAYS + "as.vector(ta$byteObjectArrayWithNull)", "list(1, NULL, 3)");