From 71a38ab9076d244a5b7bbefbb57a062e2533598b Mon Sep 17 00:00:00 2001 From: Tomas Stupka <tomas.stupka@oracle.com> Date: Mon, 10 Jul 2017 14:04:40 +0200 Subject: [PATCH] unignored some tests --- .../truffle/r/test/ExpectedTestOutput.test | 308 +++++++++++------- .../r/test/library/fastr/TestJavaInterop.java | 297 +++++++++++------ 2 files changed, 380 insertions(+), 225 deletions(-) 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 ea5d9c8c97..4b8048f1bc 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 @@ -131239,11 +131239,11 @@ NULL #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#Ignored.ImplementationError# +##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#Ignored.ImplementationError# +##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" @@ -131255,11 +131255,11 @@ NULL #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#Ignored.ImplementationError# +##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#Ignored.ImplementationError# +##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" @@ -131267,7 +131267,7 @@ 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$fieldStringArray); length(l) } [1] 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList# #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 @@ -131275,7 +131275,7 @@ NULL #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#Ignored.ImplementationError# +##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 @@ -131283,7 +131283,7 @@ NULL #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#Ignored.ImplementationError# +##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 @@ -131295,11 +131295,11 @@ NULL #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#Ignored.ImplementationError# +##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#Ignored.ImplementationError# +##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 @@ -131474,7 +131474,7 @@ character(0) #if (!any(R.version$engine == "FastR")) { as.character(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$fieldStringIntArray); } [1] "1" "2" "3" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listStringInt); } [1] "1" "2" "3" @@ -131482,7 +131482,7 @@ character(0) #if (!any(R.version$engine == "FastR")) { as.character(c("1.1","2.1","3.1")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$fieldDoubleArray); } [1] "1.1" "2.1" "3.1" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c("1.1","2.1","3.1")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listDouble); } [1] "1.1" "2.1" "3.1" @@ -131490,7 +131490,7 @@ character(0) #if (!any(R.version$engine == "FastR")) { as.character(c("1.10000002384186","2.09999990463257","3.09999990463257")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$fieldFloatArray); } [1] "1.10000002384186" "2.09999990463257" "3.09999990463257" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c("1.10000002384186","2.09999990463257","3.09999990463257")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listFloat); } [1] "1.10000002384186" "2.09999990463257" "3.09999990463257" @@ -131498,7 +131498,7 @@ character(0) #if (!any(R.version$engine == "FastR")) { as.character(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$fieldStringBooleanArray); } [1] "TRUE" "TRUE" "FALSE" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listStringBoolean); } [1] "TRUE" "TRUE" "FALSE" @@ -131510,11 +131510,11 @@ character(0) #if (!any(R.version$engine == "FastR")) { as.character(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$fieldStringArray); } [1] "a" "b" "c" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listChar); } [1] "a" "b" "c" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listString); } [1] "a" "b" "c" @@ -131534,19 +131534,19 @@ character(0) #if (!any(R.version$engine == "FastR")) { as.character(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$fieldShortArray); } [1] "1" "2" "3" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listByte); } [1] "1" "2" "3" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listInteger); } [1] "1" "2" "3" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listLong); } [1] "1" "2" "3" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listShort); } [1] "1" "2" "3" @@ -131554,7 +131554,7 @@ character(0) #if (!any(R.version$engine == "FastR")) { as.character(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$fieldBooleanArray); } [1] "TRUE" "FALSE" "TRUE" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.character(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to$listBoolean); } [1] "TRUE" "FALSE" "TRUE" @@ -131610,7 +131610,7 @@ complex(0) #if (!any(R.version$engine == "FastR")) { as.complex(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$fieldStringIntArray); } [1] 1+0i 2+0i 3+0i -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.complex(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listStringInt); } [1] 1+0i 2+0i 3+0i @@ -131620,7 +131620,7 @@ complex(0) Warning message: NAs introduced by coercion -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { as.complex(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listStringBoolean); } [1] NA NA NA Warning message: @@ -131638,13 +131638,13 @@ NAs introduced by coercion Warning message: NAs introduced by coercion -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningMessage# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningMessage# #if (!any(R.version$engine == "FastR")) { as.complex(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listChar); } [1] NA NA NA Warning message: NAs introduced by coercion -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { as.complex(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listString); } [1] NA NA NA Warning message: @@ -131666,19 +131666,19 @@ NAs introduced by coercion #if (!any(R.version$engine == "FastR")) { as.complex(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$fieldShortArray); } [1] 1+0i 2+0i 3+0i -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.complex(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listByte); } [1] 1+0i 2+0i 3+0i -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.complex(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listInteger); } [1] 1+0i 2+0i 3+0i -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.complex(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listLong); } [1] 1+0i 2+0i 3+0i -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.complex(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listShort); } [1] 1+0i 2+0i 3+0i @@ -131690,11 +131690,11 @@ NAs introduced by coercion #if (!any(R.version$engine == "FastR")) { as.complex(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$fieldFloatArray); } [1] 1.1+0i 2.1+0i 3.1+0i -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.complex(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listDouble); } [1] 1.1+0i 2.1+0i 3.1+0i -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.complex(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listFloat); } [1] 1.1+0i 2.1+0i 3.1+0i @@ -131702,7 +131702,7 @@ NAs introduced by coercion #if (!any(R.version$engine == "FastR")) { as.complex(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$fieldBooleanArray); } [1] 1+0i 0+0i 1+0i -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.complex(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to$listBoolean); } [1] 1+0i 0+0i 1+0i @@ -131758,7 +131758,7 @@ numeric(0) #if (!any(R.version$engine == "FastR")) { as.double(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$fieldStringIntArray); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.double(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listStringInt); } [1] 1 2 3 @@ -131768,7 +131768,7 @@ numeric(0) Warning message: NAs introduced by coercion -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { as.double(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listStringBoolean); } [1] NA NA NA Warning message: @@ -131786,13 +131786,13 @@ NAs introduced by coercion Warning message: NAs introduced by coercion -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningMessage# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningMessage# #if (!any(R.version$engine == "FastR")) { as.double(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listChar); } [1] NA NA NA Warning message: NAs introduced by coercion -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { as.double(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listString); } [1] NA NA NA Warning message: @@ -131814,19 +131814,19 @@ NAs introduced by coercion #if (!any(R.version$engine == "FastR")) { as.double(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$fieldShortArray); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.double(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listByte); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.double(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listInteger); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.double(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listLong); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.double(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listShort); } [1] 1 2 3 @@ -131838,11 +131838,11 @@ NAs introduced by coercion #if (!any(R.version$engine == "FastR")) { as.double(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$fieldFloatArray); } [1] 1.1 2.1 3.1 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.double(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listDouble); } [1] 1.1 2.1 3.1 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.double(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listFloat); } [1] 1.1 2.1 3.1 @@ -131850,7 +131850,7 @@ NAs introduced by coercion #if (!any(R.version$engine == "FastR")) { as.double(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$fieldBooleanArray); } [1] 1 0 1 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.double(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to$listBoolean); } [1] 1 0 1 @@ -131902,7 +131902,7 @@ expression(TRUE) #if (!any(R.version$engine == "FastR")) { as.expression(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$fieldStringIntArray); } expression("1", "2", "3") -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listStringInt); } expression("1", "2", "3") @@ -131910,7 +131910,7 @@ expression("1", "2", "3") #if (!any(R.version$engine == "FastR")) { as.expression(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$fieldStringBooleanArray); } expression("TRUE", "TRUE", "FALSE") -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listStringBoolean); } expression("TRUE", "TRUE", "FALSE") @@ -131922,11 +131922,11 @@ expression("a", "b", "c") #if (!any(R.version$engine == "FastR")) { as.expression(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$fieldStringArray); } expression("a", "b", "c") -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listChar); } expression("a", "b", "c") -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listString); } expression("a", "b", "c") @@ -131946,19 +131946,19 @@ expression(1, 2, 3) #if (!any(R.version$engine == "FastR")) { as.expression(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$fieldShortArray); } expression(1, 2, 3) -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listByte); } expression(1, 2, 3) -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listInteger); } expression(1, 2, 3) -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listLong); } expression(1, 2, 3) -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listShort); } expression(1, 2, 3) @@ -131970,11 +131970,11 @@ expression(1.1, 2.1, 3.1) #if (!any(R.version$engine == "FastR")) { as.expression(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$fieldFloatArray); } expression(1.1, 2.1, 3.1) -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listDouble); } expression(1.1, 2.1, 3.1) -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listFloat); } expression(1.1, 2.1, 3.1) @@ -131982,7 +131982,7 @@ expression(1.1, 2.1, 3.1) #if (!any(R.version$engine == "FastR")) { as.expression(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$fieldBooleanArray); } expression(TRUE, FALSE, TRUE) -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.expression(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to$listBoolean); } expression(TRUE, FALSE, TRUE) @@ -132042,7 +132042,7 @@ integer(0) #if (!any(R.version$engine == "FastR")) { as.integer(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$fieldStringIntArray); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.integer(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listStringInt); } [1] 1 2 3 @@ -132052,7 +132052,7 @@ integer(0) Warning message: NAs introduced by coercion -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { as.integer(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listStringBoolean); } [1] NA NA NA Warning message: @@ -132070,13 +132070,13 @@ NAs introduced by coercion Warning message: NAs introduced by coercion -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningMessage# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningMessage# #if (!any(R.version$engine == "FastR")) { as.integer(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listChar); } [1] NA NA NA Warning message: NAs introduced by coercion -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { as.integer(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listString); } [1] NA NA NA Warning message: @@ -132098,19 +132098,19 @@ NAs introduced by coercion #if (!any(R.version$engine == "FastR")) { as.integer(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$fieldShortArray); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.integer(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listByte); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.integer(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listInteger); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.integer(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listLong); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.integer(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listShort); } [1] 1 2 3 @@ -132122,11 +132122,11 @@ NAs introduced by coercion #if (!any(R.version$engine == "FastR")) { as.integer(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$fieldFloatArray); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.integer(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listDouble); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.integer(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listFloat); } [1] 1 2 3 @@ -132134,7 +132134,7 @@ NAs introduced by coercion #if (!any(R.version$engine == "FastR")) { as.integer(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$fieldBooleanArray); } [1] 1 0 1 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.integer(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to$listBoolean); } [1] 1 0 1 @@ -132186,7 +132186,7 @@ logical(0) #if (!any(R.version$engine == "FastR")) { as.logical(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$fieldStringIntArray); } [1] NA NA NA -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listStringInt); } [1] NA NA NA @@ -132194,7 +132194,7 @@ logical(0) #if (!any(R.version$engine == "FastR")) { as.logical(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$fieldStringBooleanArray); } [1] TRUE TRUE FALSE -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listStringBoolean); } [1] TRUE TRUE FALSE @@ -132206,11 +132206,11 @@ logical(0) #if (!any(R.version$engine == "FastR")) { as.logical(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$fieldStringArray); } [1] NA NA NA -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listChar); } [1] NA NA NA -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listString); } [1] NA NA NA @@ -132230,19 +132230,19 @@ logical(0) #if (!any(R.version$engine == "FastR")) { as.logical(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$fieldShortArray); } [1] TRUE TRUE TRUE -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listByte); } [1] TRUE TRUE TRUE -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listInteger); } [1] TRUE TRUE TRUE -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listLong); } [1] TRUE TRUE TRUE -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listShort); } [1] TRUE TRUE TRUE @@ -132254,11 +132254,11 @@ logical(0) #if (!any(R.version$engine == "FastR")) { as.logical(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$fieldFloatArray); } [1] TRUE TRUE TRUE -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listDouble); } [1] TRUE TRUE TRUE -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listFloat); } [1] TRUE TRUE TRUE @@ -132266,7 +132266,7 @@ logical(0) #if (!any(R.version$engine == "FastR")) { as.logical(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$fieldBooleanArray); } [1] TRUE FALSE TRUE -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.logical(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to$listBoolean); } [1] TRUE FALSE TRUE @@ -132336,7 +132336,7 @@ out-of-range values treated as 0 in coercion to raw #if (!any(R.version$engine == "FastR")) { as.raw(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$fieldStringIntArray); } [1] 01 02 03 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.raw(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listStringInt); } [1] 01 02 03 @@ -132347,7 +132347,7 @@ Warning messages: 1: NAs introduced by coercion 2: out-of-range values treated as 0 in coercion to raw -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { as.raw(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listStringBoolean); } [1] 00 00 00 Warning messages: @@ -132368,14 +132368,14 @@ Warning messages: 1: NAs introduced by coercion 2: out-of-range values treated as 0 in coercion to raw -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningMessage# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningMessage# #if (!any(R.version$engine == "FastR")) { as.raw(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listChar); } [1] 00 00 00 Warning messages: 1: NAs introduced by coercion 2: out-of-range values treated as 0 in coercion to raw -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { as.raw(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listString); } [1] 00 00 00 Warning messages: @@ -132398,19 +132398,19 @@ Warning messages: #if (!any(R.version$engine == "FastR")) { as.raw(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$fieldShortArray); } [1] 01 02 03 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.raw(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listByte); } [1] 01 02 03 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.raw(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listInteger); } [1] 01 02 03 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.raw(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listLong); } [1] 01 02 03 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.raw(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listShort); } [1] 01 02 03 @@ -132422,11 +132422,11 @@ Warning messages: #if (!any(R.version$engine == "FastR")) { as.raw(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$fieldFloatArray); } [1] 01 02 03 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.raw(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listDouble); } [1] 01 02 03 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.raw(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listFloat); } [1] 01 02 03 @@ -132434,7 +132434,7 @@ Warning messages: #if (!any(R.version$engine == "FastR")) { as.raw(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$fieldBooleanArray); } [1] 01 00 01 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.raw(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to$listBoolean); } [1] 01 00 01 @@ -132487,7 +132487,7 @@ Error in as.symbol(NULL) : #if (!any(R.version$engine == "FastR")) { as.symbol(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$fieldStringIntArray); } `1` -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listStringInt); } `1` @@ -132495,7 +132495,7 @@ Error in as.symbol(NULL) : #if (!any(R.version$engine == "FastR")) { as.symbol(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$fieldStringBooleanArray); } `TRUE` -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listStringBoolean); } `TRUE` @@ -132507,11 +132507,11 @@ a #if (!any(R.version$engine == "FastR")) { as.symbol(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$fieldStringArray); } a -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listChar); } a -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listString); } a @@ -132531,19 +132531,19 @@ a #if (!any(R.version$engine == "FastR")) { as.symbol(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$fieldShortArray); } `1` -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listByte); } `1` -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listInteger); } `1` -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listLong); } `1` -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listShort); } `1` @@ -132555,7 +132555,7 @@ a #if (!any(R.version$engine == "FastR")) { as.symbol(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$fieldFloatArray); } `1.1` -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listDouble); } `1.1` @@ -132567,7 +132567,7 @@ a #if (!any(R.version$engine == "FastR")) { as.symbol(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$fieldBooleanArray); } `TRUE` -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.symbol(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to$listBoolean); } `TRUE` @@ -132619,7 +132619,7 @@ NULL #if (!any(R.version$engine == "FastR")) { as.vector(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$fieldStringIntArray); } [1] "1" "2" "3" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c("1","2","3")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listStringInt); } [1] "1" "2" "3" @@ -132627,7 +132627,7 @@ NULL #if (!any(R.version$engine == "FastR")) { as.vector(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$fieldStringBooleanArray); } [1] "TRUE" "TRUE" "FALSE" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c("TRUE","TRUE","FALSE")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listStringBoolean); } [1] "TRUE" "TRUE" "FALSE" @@ -132639,11 +132639,11 @@ NULL #if (!any(R.version$engine == "FastR")) { as.vector(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$fieldStringArray); } [1] "a" "b" "c" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listChar); } [1] "a" "b" "c" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c("a","b","c")) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listString); } [1] "a" "b" "c" @@ -132663,19 +132663,19 @@ NULL #if (!any(R.version$engine == "FastR")) { as.vector(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$fieldShortArray); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listByte); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listInteger); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listLong); } [1] 1 2 3 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c(1,2,3)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listShort); } [1] 1 2 3 @@ -132687,11 +132687,11 @@ NULL #if (!any(R.version$engine == "FastR")) { as.vector(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$fieldFloatArray); } [1] 1.1 2.1 3.1 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listDouble); } [1] 1.1 2.1 3.1 -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c(1.1,2.1,3.1)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listFloat); } [1] 1.1 2.1 3.1 @@ -132699,7 +132699,7 @@ NULL #if (!any(R.version$engine == "FastR")) { as.vector(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$fieldBooleanArray); } [1] TRUE FALSE TRUE -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Ignored.ImplementationError# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# #if (!any(R.version$engine == "FastR")) { as.vector(c(TRUE,FALSE,TRUE)) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to$listBoolean); } [1] TRUE FALSE TRUE @@ -133113,14 +133113,14 @@ Error in if (T) print('OK') : #if (!any(R.version$engine == "FastR")) { if(T) print('OK') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));if(to$fieldBoolean) print('OK') } [1] "OK" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { if(c("TRUE","TRUE","FALSE")) print('OK') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));if(to$listStringBoolean) print('OK') } [1] "OK" Warning message: In if (c("TRUE", "TRUE", "FALSE")) print("OK") : the condition has length > 1 and only the first element will be used -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf#Ignored.ImplementationError#Output.IgnoreErrorContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf#Output.IgnoreErrorContext# #if (!any(R.version$engine == "FastR")) { if(c('A', 'B')) print('OK') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));if(to$listString) print('OK') } Error in if (c("A", "B")) print("OK") : argument is not interpretable as logical @@ -133157,14 +133157,14 @@ Warning message: In if (c(T, F)) print("OK") : the condition has length > 1 and only the first element will be used -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { if(c(T, F)) print('OK') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));if(to$listBoolean) print('OK') } [1] "OK" Warning message: In if (c(T, F)) print("OK") : the condition has length > 1 and only the first element will be used -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { if(c(T, F)) print('OK') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));if(to$listInteger) print('OK') } [1] "OK" Warning message: @@ -133179,7 +133179,7 @@ In if (c(T, F)) print("OK") : #if (!any(R.version$engine == "FastR")) { 'abc' } else { tc <- new.java.class('java.lang.String'); t <- new.external(tc, 'abc'); t } [1] "abc" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testInteroptNew#Ignored.Unknown# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testInteroptNew# #if (!any(R.version$engine == "FastR")) { 'truffle.object' } else { tc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestNullClass'); t <- new.external(tc, NULL); class(t) } [1] "truffle.object" @@ -134192,13 +134192,77 @@ Error: object 'java.lang.Long' not found #if (!any(R.version$engine == "FastR")) { java.lang.String } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); to$isNull('string') } Error: object 'java.lang.String' not found -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded#Ignored.Unimplemented# -#if (!any(R.version$engine == "FastR")) { boolean } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); to$isOverloaded(TRUE) } -Error: object 'boolean' not found +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { "java.lang.String" } else { new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload', 'string')$type } +[1] "java.lang.String" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded#Ignored.Unimplemented# -#if (!any(R.version$engine == "FastR")) { java.lang.String } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); to$isOverloaded('string') } -Error: object 'java.lang.String' not found +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { "java.lang.String" } else { toc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload'); toc$isOverloaded('string') } +[1] "java.lang.String" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'boolean' } else { new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload', TRUE)$type } +[1] "boolean" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'boolean' } else { toc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload'); toc$isOverloaded(TRUE) } +[1] "boolean" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'byte' } else { new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload', as.external.byte(1))$type } +[1] "byte" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'byte' } else { toc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload'); toc$isOverloaded(as.external.byte(1)) } +[1] "byte" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'char' } else { new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload', as.external.char('a'))$type } +[1] "char" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'char' } else { toc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload'); toc$isOverloaded(as.external.char('a')) } +[1] "char" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'double' } else { new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload', 1)$type } +[1] "double" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'double' } else { toc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload'); toc$isOverloaded(1) } +[1] "double" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'float' } else { new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload', as.external.float(1))$type } +[1] "float" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'float' } else { toc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload'); toc$isOverloaded(as.external.float(1)) } +[1] "float" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'int' } else { new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload', 1L)$type } +[1] "int" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'int' } else { toc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload'); toc$isOverloaded(1L) } +[1] "int" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'long' } else { new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload', as.external.long(1))$type } +[1] "long" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'long' } else { toc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload'); toc$isOverloaded(as.external.long(1)) } +[1] "long" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'short' } else { new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload', as.external.short(1))$type } +[1] "short" + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testOverloaded# +#if (!any(R.version$engine == "FastR")) { 'short' } else { toc <- new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestOverload'); toc$isOverloaded(as.external.short(1)) } +[1] "short" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testToArray# #if (!any(R.version$engine == "FastR")) { '[B' } else { a <- as.java.array(as.raw(1)); java.class(a); } @@ -134684,14 +134748,14 @@ Error in if (T) print('OK') : #if (!any(R.version$engine == "FastR")) { while(T) {print('OK'); break;} } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));while(to$fieldBoolean) {print('OK'); break;} } [1] "OK" -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { while(c("TRUE","TRUE","FALSE")) {print('OK'); break;} } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));while(to$listStringBoolean) {print('OK'); break;} } [1] "OK" Warning message: In while (c("TRUE", "TRUE", "FALSE")) { : the condition has length > 1 and only the first element will be used -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile#Ignored.ImplementationError#Output.IgnoreErrorContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile#Output.IgnoreErrorContext# #if (!any(R.version$engine == "FastR")) { while(c('A', 'B')) {print('OK'); break;} } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));while(to$listString) {print('OK'); break;} } Error in while (c("A", "B")) { : argument is not interpretable as logical In addition: Warning message: @@ -134726,14 +134790,14 @@ Warning message: In while (c(T, F)) { : the condition has length > 1 and only the first element will be used -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { while(c(T, F)) {print('OK'); break;} } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));while(to$listBoolean) {print('OK'); break;} } [1] "OK" Warning message: In while (c(T, F)) { : the condition has length > 1 and only the first element will be used -##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile#Ignored.ImplementationError#Output.IgnoreWarningContext# +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile#Output.IgnoreWarningContext# #if (!any(R.version$engine == "FastR")) { while(c(T, F)) {print('OK'); break;} } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));while(to$listInteger) {print('OK'); break;} } [1] "OK" Warning message: 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 ca9563a343..5a4af9b0cb 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 @@ -285,7 +285,7 @@ public class TestJavaInterop extends TestBase { assertEvalFastR("tc <- new.java.class('" + Long.class.getName() + "'); t <- new.external(tc, as.external.long(1)); t", "1"); assertEvalFastR("tc <- new.java.class('" + Short.class.getName() + "'); t <- new.external(tc, as.external.short(1)); t", "1"); assertEvalFastR("tc <- new.java.class('" + String.class.getName() + "'); t <- new.external(tc, 'abc'); t", "'abc'"); - assertEvalFastR(Ignored.Unknown, "tc <- new.java.class('" + TestNullClass.class.getName() + "'); t <- new.external(tc, NULL); class(t)", "'" + RType.TruffleObject.getName() + "'"); + assertEvalFastR("tc <- new.java.class('" + TestNullClass.class.getName() + "'); t <- new.external(tc, NULL); class(t)", "'" + RType.TruffleObject.getName() + "'"); } @Test @@ -392,9 +392,28 @@ public class TestJavaInterop extends TestBase { @Test public void testOverloaded() { - assertEvalFastR(Ignored.Unimplemented, CREATE_TRUFFLE_OBJECT + " to$isOverloaded(TRUE)", "boolean"); - assertEvalFastR(Ignored.Unimplemented, CREATE_TRUFFLE_OBJECT + " to$isOverloaded('string')", String.class.getName()); - // TODO add remaining isOverloaded(...) calls once this is fixed + String className = TestOverload.class.getName(); + String createClass = "toc <- new.java.class('" + className + "'); "; + + assertEvalFastR(createClass + " toc$isOverloaded(TRUE)", "'boolean'"); + assertEvalFastR(createClass + " toc$isOverloaded(as.external.byte(1))", "'byte'"); + assertEvalFastR(createClass + " toc$isOverloaded(as.external.char('a'))", "'char'"); + assertEvalFastR(createClass + " toc$isOverloaded(1)", "'double'"); + assertEvalFastR(createClass + " toc$isOverloaded(as.external.float(1))", "'float'"); + assertEvalFastR(createClass + " toc$isOverloaded(1L)", "'int'"); + assertEvalFastR(createClass + " toc$isOverloaded(as.external.long(1))", "'long'"); + assertEvalFastR(createClass + " toc$isOverloaded(as.external.short(1))", "'short'"); + assertEvalFastR(createClass + " toc$isOverloaded('string')", getRValue(String.class.getName())); + + assertEvalFastR("new('" + className + "', TRUE)$type", "'boolean'"); + assertEvalFastR("new('" + className + "', as.external.byte(1))$type", "'byte'"); + assertEvalFastR("new('" + className + "', as.external.char('a'))$type", "'char'"); + assertEvalFastR("new('" + className + "', 1)$type", "'double'"); + assertEvalFastR("new('" + className + "', as.external.float(1))$type", "'float'"); + assertEvalFastR("new('" + className + "', 1L)$type", "'int'"); + assertEvalFastR("new('" + className + "', as.external.long(1))$type", "'long'"); + assertEvalFastR("new('" + className + "', as.external.short(1))$type", "'short'"); + assertEvalFastR("new('" + className + "', 'string')$type", getRValue(String.class.getName())); } @Test @@ -545,16 +564,16 @@ public class TestJavaInterop extends TestBase { @Test public void testAsList() { - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); is.list(l)", "TRUE"); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); l[[1]]", "'a'"); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); l[[2]]", "'b'"); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); length(l)", "3"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); is.list(l)", "TRUE"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); l[[1]]", "'a'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); l[[2]]", "'b'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listString); length(l)", "3"); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); is.list(l)", "TRUE"); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); l[[1]]$data", "'a'"); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); l[[2]]$data", "'b'"); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + " l<-as.list(to$listObject); length(l)", "4"); - assertEvalFastR(Ignored.ImplementationError, 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'"); @@ -643,33 +662,33 @@ public class TestJavaInterop extends TestBase { } // tests lists - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listBoolean);", toRVector(t.listBoolean, asXXX)); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listByte);", toRVector(t.listByte, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listBoolean);", toRVector(t.listBoolean, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listByte);", toRVector(t.listByte, asXXX)); if (!(asXXX.equals("as.character") || asXXX.equals("as.expression") || asXXX.equals("as.logical") || asXXX.equals("as.symbol") || asXXX.equals("as.vector"))) { - assertEvalFastR(Ignored.ImplementationError, Output.IgnoreWarningMessage, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listChar);", toRVector(t.listChar, asXXX)); + assertEvalFastR(Output.IgnoreWarningMessage, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listChar);", toRVector(t.listChar, asXXX)); } else { - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listChar);", toRVector(t.listChar, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listChar);", toRVector(t.listChar, asXXX)); } - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listDouble);", toRVector(t.listDouble, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listDouble);", toRVector(t.listDouble, asXXX)); if (asXXX.equals("as.symbol")) { assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listFloat);", toRVector(t.listFloat, asXXX)); } else { - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listFloat);", toRVector(t.listFloat, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listFloat);", toRVector(t.listFloat, asXXX)); } - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listInteger);", toRVector(t.listInteger, asXXX)); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listLong);", toRVector(t.listLong, asXXX)); - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listShort);", toRVector(t.listShort, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listInteger);", toRVector(t.listInteger, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listLong);", toRVector(t.listLong, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listShort);", toRVector(t.listShort, asXXX)); if (!(asXXX.equals("as.character") || asXXX.equals("as.expression") || asXXX.equals("as.logical") || asXXX.equals("as.symbol") || asXXX.equals("as.vector"))) { - assertEvalFastR(Ignored.ImplementationError, Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listString);", toRVector(t.listString, asXXX)); + assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listString);", toRVector(t.listString, asXXX)); } else { - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listString);", toRVector(t.listString, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listString);", toRVector(t.listString, asXXX)); } - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listStringInt);", toRVector(t.listStringInt, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listStringInt);", toRVector(t.listStringInt, asXXX)); if (!(asXXX.equals("as.complex") || asXXX.equals("as.integer") || asXXX.equals("as.raw") || asXXX.equals("as.double"))) { - assertEvalFastR(Ignored.ImplementationError, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listStringBoolean);", toRVector(t.listStringBoolean, asXXX)); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to$listStringBoolean);", toRVector(t.listStringBoolean, asXXX)); } else { - assertEvalFastR(Ignored.ImplementationError, Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listStringBoolean);", toRVector(t.listStringBoolean, asXXX)); + assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + asXXX + "(to$listStringBoolean);", toRVector(t.listStringBoolean, asXXX)); } if (asXXX.equals("as.expression")) { @@ -692,12 +711,12 @@ public class TestJavaInterop extends TestBase { assertEvalFastR(Output.IgnoreWarningContext, Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "if(to$fieldStringArray) print('OK')", "if(c('a', 'b')) print('OK')"); assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "if(to$fieldStringBooleanArray) print('OK')", "if(c('TRUE', 'TRUE', 'FALSE')) print('OK')"); - assertEvalFastR(Ignored.ImplementationError, Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "if(to$listBoolean) print('OK')", "if(c(T, F)) print('OK')"); - assertEvalFastR(Ignored.ImplementationError, Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "if(to$listInteger) print('OK')", "if(c(T, F)) print('OK')"); - assertEvalFastR(Ignored.ImplementationError, /* Output.IgnoreWarningContext, */ Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "if(to$listString) print('OK')", + assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "if(to$listBoolean) print('OK')", "if(c(T, F)) print('OK')"); + assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "if(to$listInteger) print('OK')", "if(c(T, F)) print('OK')"); + assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "if(to$listString) print('OK')", "if(c('A', 'B')) print('OK')"); - assertEvalFastR(Ignored.ImplementationError, Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "if(to$listStringBoolean) print('OK')", + assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "if(to$listStringBoolean) print('OK')", "if(" + toRVector(t.listStringBoolean, null) + ") print('OK')"); assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "if(to) print('OK')", @@ -716,12 +735,12 @@ public class TestJavaInterop extends TestBase { assertEvalFastR(Output.IgnoreWarningContext, Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "if(to$fieldStringArray) {print('OK'); break;}", "while(c('a', 'b')) {print('OK'); break;}"); assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "while(to$fieldStringBooleanArray) {print('OK'); break;}", "while(c('TRUE', 'TRUE', 'FALSE')) {print('OK'); break;}"); - assertEvalFastR(Ignored.ImplementationError, Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "while(to$listBoolean) {print('OK'); break;}", "while(c(T, F)) {print('OK'); break;}"); - assertEvalFastR(Ignored.ImplementationError, Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "while(to$listInteger) {print('OK'); break;}", "while(c(T, F)) {print('OK'); break;}"); - assertEvalFastR(Ignored.ImplementationError, /* Output.IgnoreWarningContext, */ Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "while(to$listString) {print('OK'); break;}", + assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "while(to$listBoolean) {print('OK'); break;}", "while(c(T, F)) {print('OK'); break;}"); + assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "while(to$listInteger) {print('OK'); break;}", "while(c(T, F)) {print('OK'); break;}"); + assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "while(to$listString) {print('OK'); break;}", "while(c('A', 'B')) {print('OK'); break;}"); - assertEvalFastR(Ignored.ImplementationError, Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "while(to$listStringBoolean) {print('OK'); break;}", + assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "while(to$listStringBoolean) {print('OK'); break;}", "while(" + toRVector(t.listStringBoolean, null) + ") {print('OK'); break;}"); assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "while(to) print('OK')", @@ -922,6 +941,146 @@ public class TestJavaInterop extends TestBase { } } + public static class TestOverload { + public String type; + + public TestOverload(boolean o) { + type = boolean.class.getName(); + } + + public TestOverload(Boolean o) { + type = o.getClass().getName(); + } + + public TestOverload(byte o) { + type = byte.class.getName(); + } + + public TestOverload(Byte o) { + type = o.getClass().getName(); + } + + public TestOverload(char o) { + type = char.class.getName(); + } + + public TestOverload(Character o) { + type = o.getClass().getName(); + } + + public TestOverload(double o) { + type = double.class.getName(); + } + + public TestOverload(Double o) { + type = o.getClass().getName(); + } + + public TestOverload(int o) { + type = int.class.getName(); + } + + public TestOverload(Integer o) { + type = o.getClass().getName(); + } + + public TestOverload(float o) { + type = float.class.getName(); + } + + public TestOverload(Float o) { + type = o.getClass().getName(); + } + + public TestOverload(long o) { + type = long.class.getName(); + } + + public TestOverload(Long o) { + type = o.getClass().getName(); + } + + public TestOverload(short o) { + type = short.class.getName(); + } + + public TestOverload(Short o) { + type = o.getClass().getName(); + } + + public TestOverload(String o) { + type = o.getClass().getName(); + } + + public static String isOverloaded(boolean b) { + return "boolean"; + } + + public static String isOverloaded(Boolean b) { + return Boolean.class.getName(); + } + + public static String isOverloaded(byte b) { + return "byte"; + } + + public static String isOverloaded(Byte b) { + return Byte.class.getName(); + } + + public static String isOverloaded(char c) { + return "char"; + } + + public static String isOverloaded(Character c) { + return Character.class.getName(); + } + + public static String isOverloaded(double l) { + return "double"; + } + + public static String isOverloaded(Double l) { + return Double.class.getName(); + } + + public static String isOverloaded(Float f) { + return Float.class.getName(); + } + + public static String isOverloaded(float f) { + return "float"; + } + + public static String isOverloaded(int c) { + return "int"; + } + + public static String isOverloaded(Integer c) { + return Integer.class.getName(); + } + + public static String isOverloaded(long l) { + return "long"; + } + + public static String isOverloaded(Long l) { + return Long.class.getName(); + } + + public static String isOverloaded(short c) { + return "short"; + } + + public static String isOverloaded(Short c) { + return Short.class.getName(); + } + + public static String isOverloaded(String s) { + return String.class.getName(); + } + } + @SuppressWarnings("unused") public static class TestClass { @@ -1285,74 +1444,6 @@ public class TestJavaInterop extends TestBase { public boolean equals(TestClass tc) { return tc == this; } - - public String isOverloaded(boolean b) { - return "boolean"; - } - - public String isOverloaded(Boolean b) { - return Boolean.class.getName(); - } - - public String isOverloaded(byte b) { - return "byte"; - } - - public String isOverloaded(Byte b) { - return Byte.class.getName(); - } - - public String isOverloaded(char c) { - return "char"; - } - - public String isOverloaded(Character c) { - return Character.class.getName(); - } - - public String isOverloaded(double l) { - return "double"; - } - - public String isOverloaded(Double l) { - return Double.class.getName(); - } - - public String isOverloaded(Float f) { - return Float.class.getName(); - } - - public String isOverloaded(float f) { - return "float"; - } - - public String isOverloaded(int c) { - return "int"; - } - - public String isOverloaded(Integer c) { - return Integer.class.getName(); - } - - public String isOverloaded(long l) { - return "long"; - } - - public String isOverloaded(Long l) { - return Long.class.getName(); - } - - public String isOverloaded(short c) { - return "short"; - } - - public String isOverloaded(Short c) { - return Short.class.getName(); - } - - public String isOverloaded(String s) { - return String.class.getName(); - } } public static class TestArrayClass { -- GitLab