diff --git a/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/binary/BinaryBooleanScalarNode.java b/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/binary/BinaryBooleanScalarNode.java index 444696a3f70eddfded9e68f72af65a821195e2c9..00ca1de4b2fd47b3fb02d295656e62d46701a4d6 100644 --- a/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/binary/BinaryBooleanScalarNode.java +++ b/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/binary/BinaryBooleanScalarNode.java @@ -26,8 +26,12 @@ import com.oracle.truffle.api.CompilerAsserts; import com.oracle.truffle.api.CompilerDirectives.TruffleBoundary; import com.oracle.truffle.api.dsl.Cached; import com.oracle.truffle.api.dsl.Fallback; +import com.oracle.truffle.api.dsl.ImportStatic; import com.oracle.truffle.api.dsl.Specialization; import com.oracle.truffle.api.frame.VirtualFrame; +import com.oracle.truffle.api.interop.Message; +import com.oracle.truffle.api.interop.TruffleObject; +import com.oracle.truffle.api.nodes.Node; import com.oracle.truffle.api.profiles.BranchProfile; import com.oracle.truffle.api.profiles.ConditionProfile; import com.oracle.truffle.r.nodes.binary.BinaryBooleanScalarNodeGen.LogicalScalarCastNodeGen; @@ -39,6 +43,7 @@ import com.oracle.truffle.r.runtime.RRuntime; import com.oracle.truffle.r.runtime.RType; import com.oracle.truffle.r.runtime.data.RComplex; import com.oracle.truffle.r.runtime.data.model.RAbstractVector; +import com.oracle.truffle.r.runtime.interop.ForeignArray2R; import com.oracle.truffle.r.runtime.nodes.RBaseNode; import com.oracle.truffle.r.runtime.ops.BooleanOperation; import com.oracle.truffle.r.runtime.ops.BooleanOperationFactory; @@ -85,6 +90,7 @@ public abstract class BinaryBooleanScalarNode extends RBuiltinNode.Arg2 { return left; } + @ImportStatic({ForeignArray2R.class, Message.class}) protected abstract static class LogicalScalarCastNode extends RBaseNode { protected static final int CACHE_LIMIT = 3; @@ -147,6 +153,19 @@ public abstract class BinaryBooleanScalarNode extends RBuiltinNode.Arg2 { return null; } + @Specialization(guards = {"isForeignVector(operand, hasSize)"}) + protected byte doForeignVector(TruffleObject operand, + @Cached("HAS_SIZE.createNode()") Node hasSize, + @Cached("createForeignArray2R()") ForeignArray2R foreignArray2R, + @Cached("createRecursive()") LogicalScalarCastNode recursive) { + Object o = foreignArray2R.execute(operand, true); + return recursive.executeCast(o); + } + + protected LogicalScalarCastNode createRecursive() { + return LogicalScalarCastNodeGen.create(opName, argumentName, check); + } + @Fallback protected byte doFallback(@SuppressWarnings("unused") Object operand) { throw RError.error(this, RError.Message.INVALID_TYPE_IN, argumentName, opName); 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 6b712139c6b884e064e37d404d081ac413c82680..9bf9e9368f2f318dbd3078f5b7d4591361adb640 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 @@ -131591,7 +131591,7 @@ NULL [1] TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsList#Output.IgnoreErrorContext# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.list(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a list', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.list(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a list', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); l<-as.list(to); } Error in as.list(to) : no method for coercing this external object to a list @@ -132991,47 +132991,47 @@ NULL [1] TRUE FALSE TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.character(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.character(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.character(to); } Error in as.character(to) : no method for coercing this external object to a vector ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.complex(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.complex(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.complex(to); } Error in as.complex(to) : no method for coercing this external object to a vector ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.double(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.double(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.double(to); } Error in as.double(to) : no method for coercing this external object to a vector ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX#Output.IgnoreErrorContext# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.expression(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.expression(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.expression(to); } Error in as.expression(to) : no method for coercing this external object to a vector ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.integer(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.integer(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.integer(to); } Error in as.integer(to) : no method for coercing this external object to a vector ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.logical(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.logical(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.logical(to); } Error in as.logical(to) : no method for coercing this external object to a vector ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.raw(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.raw(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.raw(to); } Error in as.raw(to) : no method for coercing this external object to a vector ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.symbol(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.symbol(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.symbol(to); } Error in as.symbol(to) : no method for coercing this external object to a vector ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAsXXX# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.vector(to) : ', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to); } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.vector(to) :', '<<<NEWLINE>>>', ' no method for coercing this external object to a vector', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));as.vector(to); } Error in as.vector(to) : no method for coercing this external object to a vector @@ -133040,11 +133040,11 @@ Error in as.vector(to) : NULL ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAttributes# -#if (!any(R.version$engine == "FastR")) { cat('Error in attr(to, "a") <- "a" : external object cannot be attributed<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); attr(to, 'a')<-'a' } +#if (!any(R.version$engine == "FastR")) { cat('Error in attr(to, "a") <- "a" : external object cannot be attributed', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); attr(to, 'a')<-'a' } Error in attr(to, "a") <- "a" : external object cannot be attributed ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testAttributes# -#if (!any(R.version$engine == "FastR")) { cat('Error in attr(to, which = "a") : external object cannot be attributed<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); attr(to, which = 'a') } +#if (!any(R.version$engine == "FastR")) { cat('Error in attr(to, which = "a") : external object cannot be attributed', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); attr(to, which = 'a') } Error in attr(to, which = "a") : external object cannot be attributed ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testClassAsParameter#Ignored.ImplementationError# @@ -133412,12 +133412,12 @@ NULL [1] 1.1 2.1 3.1 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignUnaryArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in abs(to$fieldCharArray) : ', '<<<NEWLINE>>>', ' non-numeric argument to mathematical function', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));abs(to$fieldCharArray) } +#if (!any(R.version$engine == "FastR")) { cat('Error in abs(to$fieldCharArray) :', '<<<NEWLINE>>>', ' non-numeric argument to mathematical function', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));abs(to$fieldCharArray) } Error in abs(to$fieldCharArray) : non-numeric argument to mathematical function ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignUnaryArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in abs(to$fieldStringArray) : ', '<<<NEWLINE>>>', ' non-numeric argument to mathematical function', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));abs(to$fieldStringArray) } +#if (!any(R.version$engine == "FastR")) { cat('Error in abs(to$fieldStringArray) :', '<<<NEWLINE>>>', ' non-numeric argument to mathematical function', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));abs(to$fieldStringArray) } Error in abs(to$fieldStringArray) : non-numeric argument to mathematical function @@ -133426,12 +133426,12 @@ Error in abs(to$fieldStringArray) : Error in abs(to$listChar) : non-numeric argument to mathematical function ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignUnaryArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in abs(to$listString) : ', '<<<NEWLINE>>>', ' non-numeric argument to mathematical function', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));abs(to$listString) } +#if (!any(R.version$engine == "FastR")) { cat('Error in abs(to$listString) :', '<<<NEWLINE>>>', ' non-numeric argument to mathematical function', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));abs(to$listString) } Error in abs(to$listString) : non-numeric argument to mathematical function ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignUnaryArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in abs(to$listStringInt) : ', '<<<NEWLINE>>>', ' non-numeric argument to mathematical function', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));abs(to$listStringInt) } +#if (!any(R.version$engine == "FastR")) { cat('Error in abs(to$listStringInt) :', '<<<NEWLINE>>>', ' non-numeric argument to mathematical function', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));abs(to$listStringInt) } Error in abs(to$listStringInt) : non-numeric argument to mathematical function @@ -133516,7 +133516,7 @@ Error in abs(to) : non-numeric argument to mathematical function [1] 1.1 3.1 ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignUnaryArithmeticReduceOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in min(x, na.rm = na.rm) : ', '<<<NEWLINE>>>', ' invalid \'type\' (external object) of argument', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));range(to) } +#if (!any(R.version$engine == "FastR")) { cat('Error in min(x, na.rm = na.rm) :', '<<<NEWLINE>>>', ' invalid \'type\' (external object) of argument', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));range(to) } Error in min(x, na.rm = na.rm) : invalid 'type' (external object) of argument @@ -133885,7 +133885,7 @@ Error in 1 + to : non-numeric argument to binary operator Error in 1 + to$fieldCharArray : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in 1 + to$fieldStringArray : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));1 + to$fieldStringArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in 1 + to$fieldStringArray :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));1 + to$fieldStringArray } Error in 1 + to$fieldStringArray : non-numeric argument to binary operator @@ -133902,12 +133902,12 @@ Error in 1 + to$listString : non-numeric argument to binary operator Error in 1 + to$listStringInt : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in NULL + to$fieldCharArray : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL + to$fieldCharArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL + to$fieldCharArray :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL + to$fieldCharArray } Error in NULL + to$fieldCharArray : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in NULL + to$fieldStringArray : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL + to$fieldStringArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL + to$fieldStringArray :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL + to$fieldStringArray } Error in NULL + to$fieldStringArray : non-numeric argument to binary operator @@ -133920,32 +133920,32 @@ Error in NULL + to$listChar : non-numeric argument to binary operator Error in NULL + to$listString : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in NULL + to$listStringInt : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL + to$listStringInt } +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL + to$listStringInt :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL + to$listStringInt } Error in NULL + to$listStringInt : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$fieldCharArray : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$fieldCharArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$fieldCharArray :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$fieldCharArray } Error in c(1, 2, 3) + to$fieldCharArray : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$fieldStringArray : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$fieldStringArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$fieldStringArray :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$fieldStringArray } Error in c(1, 2, 3) + to$fieldStringArray : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$listChar : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$listChar } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$listChar :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$listChar } Error in c(1, 2, 3) + to$listChar : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$listString : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$listString } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$listString :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$listString } Error in c(1, 2, 3) + to$listString : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$listStringInt : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$listStringInt } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(1, 2, 3) + to$listStringInt :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(1, 2, 3) + to$listStringInt } Error in c(1, 2, 3) + to$listStringInt : non-numeric argument to binary operator @@ -133962,37 +133962,37 @@ Error in to + to : non-numeric argument to binary operator Error in to$fieldCharArray + 1 : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray + NULL : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray + NULL } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray + NULL :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray + NULL } Error in to$fieldCharArray + NULL : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray + c(1, 2, 3) : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray + c(1, 2, 3) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray + c(1, 2, 3) :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray + c(1, 2, 3) } Error in to$fieldCharArray + c(1, 2, 3) : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray + to$fieldCharArray : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray + to$fieldCharArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray + to$fieldCharArray :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray + to$fieldCharArray } Error in to$fieldCharArray + to$fieldCharArray : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray + 1 : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray + 1 } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray + 1 :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray + 1 } Error in to$fieldStringArray + 1 : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray + NULL : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray + NULL } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray + NULL :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray + NULL } Error in to$fieldStringArray + NULL : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray + c(1, 2, 3) : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray + c(1, 2, 3) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray + c(1, 2, 3) :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray + c(1, 2, 3) } Error in to$fieldStringArray + c(1, 2, 3) : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray + to$fieldStringArray : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray + to$fieldStringArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray + to$fieldStringArray :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray + to$fieldStringArray } Error in to$fieldStringArray + to$fieldStringArray : non-numeric argument to binary operator @@ -134005,12 +134005,12 @@ Error in to$listChar + 1 : non-numeric argument to binary operator Error in to$listChar + NULL : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar + c(1, 2, 3) : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar + c(1, 2, 3) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar + c(1, 2, 3) :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar + c(1, 2, 3) } Error in to$listChar + c(1, 2, 3) : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar + to$listChar : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar + to$listChar } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar + to$listChar :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar + to$listChar } Error in to$listChar + to$listChar : non-numeric argument to binary operator @@ -134023,12 +134023,12 @@ Error in to$listString + 1 : non-numeric argument to binary operator Error in to$listString + NULL : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString + c(1, 2, 3) : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString + c(1, 2, 3) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString + c(1, 2, 3) :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString + c(1, 2, 3) } Error in to$listString + c(1, 2, 3) : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString + to$listString : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString + to$listString } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString + to$listString :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString + to$listString } Error in to$listString + to$listString : non-numeric argument to binary operator @@ -134037,17 +134037,17 @@ Error in to$listString + to$listString : Error in to$listStringInt + 1 : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt + NULL : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt + NULL } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt + NULL :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt + NULL } Error in to$listStringInt + NULL : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt + c(1, 2, 3) : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt + c(1, 2, 3) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt + c(1, 2, 3) :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt + c(1, 2, 3) } Error in to$listStringInt + c(1, 2, 3) : non-numeric argument to binary operator ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorArithmeticOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt + to$listStringInt : ', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt + to$listStringInt } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt + to$listStringInt :', '<<<NEWLINE>>>', ' non-numeric argument to binary operator', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt + to$listStringInt } Error in to$listStringInt + to$listStringInt : non-numeric argument to binary operator @@ -134520,142 +134520,142 @@ Error in !(to$listString) : invalid argument type Error in !(to$listStringInt) : invalid argument type ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in T & to : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to } +#if (!any(R.version$engine == "FastR")) { cat('Error in T & to :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to } Error in T & to : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$fieldCharArray : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$fieldCharArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$fieldCharArray :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$fieldCharArray } Error in T & to$fieldCharArray : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$fieldStringArray : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$fieldStringArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$fieldStringArray :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$fieldStringArray } Error in T & to$fieldStringArray : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$listChar : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$listChar } +#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$listChar :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$listChar } Error in T & to$listChar : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$listString : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$listString } +#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$listString :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$listString } Error in T & to$listString : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$listStringInt : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$listStringInt } +#if (!any(R.version$engine == "FastR")) { cat('Error in T & to$listStringInt :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T & to$listStringInt } Error in T & to$listStringInt : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$fieldCharArray : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$fieldCharArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$fieldCharArray :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$fieldCharArray } Error in c(T, T, F) & to$fieldCharArray : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$fieldStringArray : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$fieldStringArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$fieldStringArray :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$fieldStringArray } Error in c(T, T, F) & to$fieldStringArray : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$listChar : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$listChar } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$listChar :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$listChar } Error in c(T, T, F) & to$listChar : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$listString : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$listString } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$listString :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$listString } Error in c(T, T, F) & to$listString : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$listStringInt : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$listStringInt } +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) & to$listStringInt :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) & to$listStringInt } Error in c(T, T, F) & to$listStringInt : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to & T : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to & T } +#if (!any(R.version$engine == "FastR")) { cat('Error in to & T :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to & T } Error in to & T : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to & to : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to & to } +#if (!any(R.version$engine == "FastR")) { cat('Error in to & to :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to & to } Error in to & to : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray & T : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray & T } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray & T :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray & T } Error in to$fieldCharArray & T : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray & c(T, T, F) : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray & c(T, T, F) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray & c(T, T, F) :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray & c(T, T, F) } Error in to$fieldCharArray & c(T, T, F) : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray & to$fieldCharArray : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray & to$fieldCharArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray & to$fieldCharArray :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray & to$fieldCharArray } Error in to$fieldCharArray & to$fieldCharArray : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray & T : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray & T } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray & T :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray & T } Error in to$fieldStringArray & T : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray & c(T, T, F) : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray & c(T, T, F) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray & c(T, T, F) :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray & c(T, T, F) } Error in to$fieldStringArray & c(T, T, F) : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray & to$fieldStringArray : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray & to$fieldStringArray } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray & to$fieldStringArray :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray & to$fieldStringArray } Error in to$fieldStringArray & to$fieldStringArray : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar & T : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar & T } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar & T :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar & T } Error in to$listChar & T : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar & c(T, T, F) : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar & c(T, T, F) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar & c(T, T, F) :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar & c(T, T, F) } Error in to$listChar & c(T, T, F) : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar & to$listChar : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar & to$listChar } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar & to$listChar :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar & to$listChar } Error in to$listChar & to$listChar : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString & T : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString & T } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString & T :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString & T } Error in to$listString & T : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString & c(T, T, F) : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString & c(T, T, F) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString & c(T, T, F) :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString & c(T, T, F) } Error in to$listString & c(T, T, F) : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString & to$listString : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString & to$listString } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString & to$listString :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString & to$listString } Error in to$listString & to$listString : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt & T : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt & T } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt & T :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt & T } Error in to$listStringInt & T : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt & c(T, T, F) : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt & c(T, T, F) } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt & c(T, T, F) :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt & c(T, T, F) } Error in to$listStringInt & c(T, T, F) : operations are possible only for numeric, logical or complex types ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorBooleanOp# -#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt & to$listStringInt : ', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt & to$listStringInt } +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt & to$listStringInt :', '<<<NEWLINE>>>', ' operations are possible only for numeric, logical or complex types', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt & to$listStringInt } Error in to$listStringInt & to$listStringInt : operations are possible only for numeric, logical or complex types @@ -134811,6 +134811,1100 @@ logical(0) #if (!any(R.version$engine == "FastR")) { logical(0) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt & NULL } logical(0) +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$fieldByteArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$fieldIntegerArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$fieldLongArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$fieldShortArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listByte } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listInteger } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listLong } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listShort } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$fieldDoubleArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$fieldFloatArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listDouble } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listFloat } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$fieldBooleanArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T && c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listBoolean } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c("1","2","3") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listStringInt } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c("a","b","c") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$fieldCharArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c("a","b","c") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$fieldStringArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c("a","b","c") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listChar } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c("a","b","c") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listString } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$fieldByteArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$fieldIntegerArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$fieldLongArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$fieldShortArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listByte } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listInteger } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listLong } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listShort } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$fieldDoubleArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$fieldFloatArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listDouble } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listFloat } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$fieldBooleanArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { T || c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to$listBoolean } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T || to } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldBooleanArray || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldByteArray || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldDoubleArray || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldFloatArray || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldIntegerArray || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldLongArray || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldShortArray || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listBoolean || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listByte || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listDouble || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listFloat || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listInteger || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listLong || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { TRUE } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listShort || NULL } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldByteArray && to$fieldByteArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldIntegerArray && to$fieldIntegerArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldLongArray && to$fieldLongArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldShortArray && to$fieldShortArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listByte && to$listByte } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listInteger && to$listInteger } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listLong && to$listLong } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listShort && to$listShort } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldByteArray || to$fieldByteArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldIntegerArray || to$fieldIntegerArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldLongArray || to$fieldLongArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldShortArray || to$fieldShortArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listByte || to$listByte } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listInteger || to$listInteger } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listLong || to$listLong } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listShort || to$listShort } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldByteArray && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldIntegerArray && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldLongArray && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldShortArray && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listByte && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listInteger && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listLong && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listShort && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldByteArray && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldIntegerArray && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldLongArray && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldShortArray && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listByte && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listInteger && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listLong && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listShort && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldByteArray || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldIntegerArray || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldLongArray || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldShortArray || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listByte || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listInteger || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listLong || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listShort || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldByteArray || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldIntegerArray || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldLongArray || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldShortArray || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listByte || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listInteger || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listLong || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1,2,3)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listShort || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1) && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldDoubleArray && to$fieldDoubleArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1) && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldFloatArray && to$fieldFloatArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1) && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listDouble && to$listDouble } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1) && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listFloat && to$listFloat } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1) || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldDoubleArray || to$fieldDoubleArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1) || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldFloatArray || to$fieldFloatArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1) || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listDouble || to$listDouble } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1) || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listFloat || to$listFloat } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldDoubleArray && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldFloatArray && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listDouble && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listFloat && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldDoubleArray && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldFloatArray && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listDouble && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listFloat && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldDoubleArray || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldFloatArray || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listDouble || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listFloat || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldDoubleArray || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldFloatArray || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listDouble || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(1.1,2.1,3.1)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listFloat || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$fieldByteArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$fieldIntegerArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$fieldLongArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$fieldShortArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listByte } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listInteger } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listLong } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listShort } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$fieldDoubleArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$fieldFloatArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listDouble } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listFloat } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$fieldBooleanArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) && c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listBoolean } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c("1","2","3") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listStringInt } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c("a","b","c") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$fieldCharArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c("a","b","c") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$fieldStringArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c("a","b","c") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listChar } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c("a","b","c") } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listString } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$fieldByteArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$fieldIntegerArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$fieldLongArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$fieldShortArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listByte } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listInteger } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listLong } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1,2,3) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listShort } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$fieldDoubleArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$fieldFloatArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listDouble } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(1.1,2.1,3.1) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listFloat } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$fieldBooleanArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(T, T, F) || c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) || to$listBoolean } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE) && c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldBooleanArray && to$fieldBooleanArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE) && c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listBoolean && to$listBoolean } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE) || c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldBooleanArray || to$fieldBooleanArray } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE) || c(TRUE,FALSE,TRUE) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listBoolean || to$listBoolean } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldBooleanArray && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE)&& T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listBoolean && T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldBooleanArray && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE)&& c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listBoolean && c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldBooleanArray || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE)|| T } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listBoolean || T } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldBooleanArray || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { c(TRUE,FALSE,TRUE)|| c(T, T, F) } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listBoolean || c(T, T, F) } +[1] TRUE + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$fieldBooleanArray : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$fieldBooleanArray } +Error in NULL && to$fieldBooleanArray : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$fieldByteArray : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$fieldByteArray } +Error in NULL && to$fieldByteArray : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$fieldCharArray : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$fieldCharArray } +Error in NULL && to$fieldCharArray : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$fieldDoubleArray : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$fieldDoubleArray } +Error in NULL && to$fieldDoubleArray : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$fieldFloatArray : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$fieldFloatArray } +Error in NULL && to$fieldFloatArray : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$fieldIntegerArray : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$fieldIntegerArray } +Error in NULL && to$fieldIntegerArray : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$fieldLongArray : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$fieldLongArray } +Error in NULL && to$fieldLongArray : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$fieldShortArray : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$fieldShortArray } +Error in NULL && to$fieldShortArray : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$fieldStringArray : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$fieldStringArray } +Error in NULL && to$fieldStringArray : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listBoolean : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listBoolean } +Error in NULL && to$listBoolean : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listByte : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listByte } +Error in NULL && to$listByte : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listChar : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listChar } +Error in NULL && to$listChar : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listDouble : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listDouble } +Error in NULL && to$listDouble : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listFloat : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listFloat } +Error in NULL && to$listFloat : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listInteger : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listInteger } +Error in NULL && to$listInteger : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listLong : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listLong } +Error in NULL && to$listLong : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listShort : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listShort } +Error in NULL && to$listShort : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listString : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listString } +Error in NULL && to$listString : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL && to$listStringInt : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL && to$listStringInt } +Error in NULL && to$listStringInt : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$fieldBooleanArray : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$fieldBooleanArray } +Error in NULL || to$fieldBooleanArray : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$fieldByteArray : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$fieldByteArray } +Error in NULL || to$fieldByteArray : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$fieldCharArray : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$fieldCharArray } +Error in NULL || to$fieldCharArray : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$fieldDoubleArray : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$fieldDoubleArray } +Error in NULL || to$fieldDoubleArray : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$fieldFloatArray : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$fieldFloatArray } +Error in NULL || to$fieldFloatArray : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$fieldIntegerArray : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$fieldIntegerArray } +Error in NULL || to$fieldIntegerArray : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$fieldLongArray : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$fieldLongArray } +Error in NULL || to$fieldLongArray : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$fieldShortArray : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$fieldShortArray } +Error in NULL || to$fieldShortArray : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$fieldStringArray : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$fieldStringArray } +Error in NULL || to$fieldStringArray : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listBoolean : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listBoolean } +Error in NULL || to$listBoolean : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listByte : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listByte } +Error in NULL || to$listByte : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listChar : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listChar } +Error in NULL || to$listChar : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listDouble : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listDouble } +Error in NULL || to$listDouble : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listFloat : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listFloat } +Error in NULL || to$listFloat : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listInteger : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listInteger } +Error in NULL || to$listInteger : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listLong : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listLong } +Error in NULL || to$listLong : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listShort : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listShort } +Error in NULL || to$listShort : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listString : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listString } +Error in NULL || to$listString : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in NULL || to$listStringInt : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));NULL || to$listStringInt } +Error in NULL || to$listStringInt : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in T && to : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to } +Error in T && to : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in T && to$fieldCharArray : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$fieldCharArray } +Error in T && to$fieldCharArray : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in T && to$fieldStringArray : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$fieldStringArray } +Error in T && to$fieldStringArray : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in T && to$listChar : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listChar } +Error in T && to$listChar : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in T && to$listString : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listString } +Error in T && to$listString : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in T && to$listStringInt : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));T && to$listStringInt } +Error in T && to$listStringInt : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) && to$fieldCharArray : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$fieldCharArray } +Error in c(T, T, F) && to$fieldCharArray : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) && to$fieldStringArray : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$fieldStringArray } +Error in c(T, T, F) && to$fieldStringArray : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) && to$listChar : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listChar } +Error in c(T, T, F) && to$listChar : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) && to$listString : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listString } +Error in c(T, T, F) && to$listString : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in c(T, T, F) && to$listStringInt : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); c(T, T, F) && to$listStringInt } +Error in c(T, T, F) && to$listStringInt : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to && T : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to && T } +Error in to && T : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to && to : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to && to } +Error in to && to : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to || T : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to || T } +Error in to || T : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to || to : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to || to } +Error in to || to : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldBooleanArray && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldBooleanArray && NULL } +Error in to$fieldBooleanArray && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldByteArray && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldByteArray && NULL } +Error in to$fieldByteArray && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray && NULL : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray && NULL } +Error in to$fieldCharArray && NULL : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray && T : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray && T } +Error in to$fieldCharArray && T : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray && c(T, T, F) : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray && c(T, T, F) } +Error in to$fieldCharArray && c(T, T, F) : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray && to$fieldCharArray :', '<<<NEWLINE>>>', ' invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray && to$fieldCharArray } +Error in to$fieldCharArray && to$fieldCharArray : + invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray || NULL : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray || NULL } +Error in to$fieldCharArray || NULL : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray || T : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray || T } +Error in to$fieldCharArray || T : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray || c(T, T, F) : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray || c(T, T, F) } +Error in to$fieldCharArray || c(T, T, F) : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldCharArray || to$fieldCharArray :', '<<<NEWLINE>>>', ' invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldCharArray || to$fieldCharArray } +Error in to$fieldCharArray || to$fieldCharArray : + invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldDoubleArray && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldDoubleArray && NULL } +Error in to$fieldDoubleArray && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldFloatArray && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldFloatArray && NULL } +Error in to$fieldFloatArray && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldIntegerArray && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldIntegerArray && NULL } +Error in to$fieldIntegerArray && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldLongArray && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldLongArray && NULL } +Error in to$fieldLongArray && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldShortArray && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldShortArray && NULL } +Error in to$fieldShortArray && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray && NULL : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray && NULL } +Error in to$fieldStringArray && NULL : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray && T : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray && T } +Error in to$fieldStringArray && T : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray && c(T, T, F) : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray && c(T, T, F) } +Error in to$fieldStringArray && c(T, T, F) : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray && to$fieldStringArray :', '<<<NEWLINE>>>', ' invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray && to$fieldStringArray } +Error in to$fieldStringArray && to$fieldStringArray : + invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray || NULL : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray || NULL } +Error in to$fieldStringArray || NULL : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray || T : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray || T } +Error in to$fieldStringArray || T : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray || c(T, T, F) : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray || c(T, T, F) } +Error in to$fieldStringArray || c(T, T, F) : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$fieldStringArray || to$fieldStringArray :', '<<<NEWLINE>>>', ' invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$fieldStringArray || to$fieldStringArray } +Error in to$fieldStringArray || to$fieldStringArray : + invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listBoolean && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listBoolean && NULL } +Error in to$listBoolean && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listByte && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listByte && NULL } +Error in to$listByte && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar && NULL : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar && NULL } +Error in to$listChar && NULL : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar && T : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar && T } +Error in to$listChar && T : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar && c(T, T, F) : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar && c(T, T, F) } +Error in to$listChar && c(T, T, F) : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar && to$listChar : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar && to$listChar } +Error in to$listChar && to$listChar : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar || NULL : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar || NULL } +Error in to$listChar || NULL : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar || T : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar || T } +Error in to$listChar || T : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar || c(T, T, F) : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar || c(T, T, F) } +Error in to$listChar || c(T, T, F) : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listChar || to$listChar : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listChar || to$listChar } +Error in to$listChar || to$listChar : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listDouble && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listDouble && NULL } +Error in to$listDouble && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listFloat && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listFloat && NULL } +Error in to$listFloat && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listInteger && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listInteger && NULL } +Error in to$listInteger && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listLong && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listLong && NULL } +Error in to$listLong && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listShort && NULL : invalid \'y\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listShort && NULL } +Error in to$listShort && NULL : invalid 'y' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString && NULL : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString && NULL } +Error in to$listString && NULL : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString && T : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString && T } +Error in to$listString && T : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString && c(T, T, F) : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString && c(T, T, F) } +Error in to$listString && c(T, T, F) : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString && to$listString : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString && to$listString } +Error in to$listString && to$listString : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString || NULL : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString || NULL } +Error in to$listString || NULL : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString || T : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString || T } +Error in to$listString || T : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString || c(T, T, F) : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString || c(T, T, F) } +Error in to$listString || c(T, T, F) : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listString || to$listString : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listString || to$listString } +Error in to$listString || to$listString : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt && NULL : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt && NULL } +Error in to$listStringInt && NULL : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt && T : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt && T } +Error in to$listStringInt && T : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt && c(T, T, F) : invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt && c(T, T, F) } +Error in to$listStringInt && c(T, T, F) : invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt && to$listStringInt :', '<<<NEWLINE>>>', ' invalid \'x\' type in \'x && y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt && to$listStringInt } +Error in to$listStringInt && to$listStringInt : + invalid 'x' type in 'x && y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt || NULL : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt || NULL } +Error in to$listStringInt || NULL : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt || T : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt || T } +Error in to$listStringInt || T : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt || c(T, T, F) : invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt || c(T, T, F) } +Error in to$listStringInt || c(T, T, F) : invalid 'x' type in 'x || y' + +##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testForeignVectorScalarBooleanOp# +#if (!any(R.version$engine == "FastR")) { cat('Error in to$listStringInt || to$listStringInt :', '<<<NEWLINE>>>', ' invalid \'x\' type in \'x || y\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));to$listStringInt || to$listStringInt } +Error in to$listStringInt || to$listStringInt : + invalid 'x' type in 'x || y' + ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testFromArray# #if (!any(R.version$engine == "FastR")) { "character" } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); v <- as.vector(to$fieldStaticCharArray); typeof(v) } [1] "character" @@ -134970,9 +136064,8 @@ Error in java.class(to$methodReturnsNull()) : unsupported type [1] TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf#Output.IgnoreErrorContext# -#if (!any(R.version$engine == "FastR")) { cat('Error in if (T) print(\'OK\') : ', '<<<NEWLINE>>>', ' argument is not interpretable as logical', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));if(to) print('OK') } -Error in if (T) print('OK') : - argument is not interpretable as logical +#if (!any(R.version$engine == "FastR")) { cat('Error in if (T) print(\'OK\') : argument is not interpretable as logical', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));if(to) print('OK') } +Error in if (T) print('OK') : argument is not interpretable as logical ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIf# #if (!any(R.version$engine == "FastR")) { if(1) print('OK') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));if(to$fieldInteger) print('OK') } @@ -135273,17 +136366,17 @@ In if (c(T, F)) print("OK") : [1] FALSE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIsXXXForForeignObject# -#if (!any(R.version$engine == "FastR")) { cat('Error in is.finite(to) : ', '<<<NEWLINE>>>', ' default method not implemented for type \'external object\'<<<NEWLINE>>>', sep='') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); is.finite(to) } +#if (!any(R.version$engine == "FastR")) { cat('Error in is.finite(to) :', '<<<NEWLINE>>>', ' default method not implemented for type \'external object\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); is.finite(to) } Error in is.finite(to) : default method not implemented for type 'external object' ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIsXXXForForeignObject# -#if (!any(R.version$engine == "FastR")) { cat('Error in is.infinite(to) : ', '<<<NEWLINE>>>', ' default method not implemented for type \'external object\'<<<NEWLINE>>>', sep='') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); is.infinite(to) } +#if (!any(R.version$engine == "FastR")) { cat('Error in is.infinite(to) :', '<<<NEWLINE>>>', ' default method not implemented for type \'external object\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); is.infinite(to) } Error in is.infinite(to) : default method not implemented for type 'external object' ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testIsXXXForForeignObject# -#if (!any(R.version$engine == "FastR")) { cat('Error in is.nan(to) : ', '<<<NEWLINE>>>', ' default method not implemented for type \'external object\'<<<NEWLINE>>>', sep='') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); is.nan(to) } +#if (!any(R.version$engine == "FastR")) { cat('Error in is.nan(to) :', '<<<NEWLINE>>>', ' default method not implemented for type \'external object\'', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass')); is.nan(to) } Error in is.nan(to) : default method not implemented for type 'external object' @@ -136072,12 +137165,12 @@ NULL [1] TRUE ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testNewWithJavaClass# -#if (!any(R.version$engine == "FastR")) { cat('Error in getClass(Class, where = topenv(parent.frame())) : ', '<<<NEWLINE>>>', ' “__bogus_class_name__†is not a defined class<<<NEWLINE>>>', sep='') } else { to <- new('__bogus_class_name__'); } +#if (!any(R.version$engine == "FastR")) { cat('Error in getClass(Class, where = topenv(parent.frame())) :', '<<<NEWLINE>>>', ' “__bogus_class_name__†is not a defined class', '<<<NEWLINE>>>') } else { to <- new('__bogus_class_name__'); } Error in getClass(Class, where = topenv(parent.frame())) : “__bogus_class_name__†is not a defined class ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testNewWithJavaClass# -#if (!any(R.version$engine == "FastR")) { cat('Error in new.external(Class, ...) : ', '<<<NEWLINE>>>', ' error during Java object instantiation<<<NEWLINE>>>', sep='') } else { to <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'); new(to) } +#if (!any(R.version$engine == "FastR")) { cat('Error in new.external(Class, ...) :', '<<<NEWLINE>>>', ' error during Java object instantiation', '<<<NEWLINE>>>') } else { to <- new('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'); new(to) } Error in new.external(Class, ...) : error during Java object instantiation @@ -136512,12 +137605,12 @@ Error: unexpected '[' in "if (!any(R.version$engine == "FastR")) { [" [1] "interopt.char" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testToChar# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.external.char(97.1, 1) : ', '<<<NEWLINE>>>', ' pos argument not allowed with a numeric value', '<<<NEWLINE>>>') } else { v <- as.external.char(97.1, 1); v; } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.external.char(97.1, 1) :', '<<<NEWLINE>>>', ' pos argument not allowed with a numeric value', '<<<NEWLINE>>>') } else { v <- as.external.char(97.1, 1); v; } Error in as.external.char(97.1, 1) : pos argument not allowed with a numeric value ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testToChar# -#if (!any(R.version$engine == "FastR")) { cat('Error in as.external.char(97L, 1) : ','<<<NEWLINE>>>',' pos argument not allowed with a numeric value', '<<<NEWLINE>>>') } else { v <- as.external.char(97L, 1); v; } +#if (!any(R.version$engine == "FastR")) { cat('Error in as.external.char(97L, 1) :', '<<<NEWLINE>>>', ' pos argument not allowed with a numeric value', '<<<NEWLINE>>>') } else { v <- as.external.char(97L, 1); v; } Error in as.external.char(97L, 1) : pos argument not allowed with a numeric value @@ -140411,9 +141504,8 @@ Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(TRUE, FA Error: unexpected ')' in "if (!any(R.version$engine == "FastR")) { list(TRUE, FALSE, TRUE, TRUE, FALSE, TRUE))" ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile#Output.IgnoreErrorContext# -#if (!any(R.version$engine == "FastR")) { cat('Error in if (T) print(\'OK\') : ', '<<<NEWLINE>>>', ' argument is not interpretable as logical', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));while(to) print('OK') } -Error in if (T) print('OK') : - argument is not interpretable as logical +#if (!any(R.version$engine == "FastR")) { cat('Error in if (T) print(\'OK\') : argument is not interpretable as logical', '<<<NEWLINE>>>') } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));while(to) print('OK') } +Error in if (T) print('OK') : argument is not interpretable as logical ##com.oracle.truffle.r.test.library.fastr.TestJavaInterop.testWhile# #if (!any(R.version$engine == "FastR")) { while(1) {print('OK'); break;} } else { to <- new.external(new.java.class('com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'));while(to$fieldInteger) {print('OK'); break;} } 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 0937c523d565d2f6b4ef685470977b6bbb0f5379..d1c186b4355b8a5f17aa7f23969538dac3a7dbcd 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 @@ -118,8 +118,8 @@ public class TestJavaInterop extends TestBase { public void testToChar() { assertEvalFastR("v <- as.external.char(97L); v;", "'a'"); assertEvalFastR("v <- as.external.char(97.1); v;", "'a'"); - assertEvalFastR("v <- as.external.char(97.1, 1); v;", "cat('Error in as.external.char(97.1, 1) : ', '\n', ' pos argument not allowed with a numeric value', '\n')"); - assertEvalFastR("v <- as.external.char(97L, 1); v;", "cat('Error in as.external.char(97L, 1) : ','\n',' pos argument not allowed with a numeric value', '\n')"); + assertEvalFastR("v <- as.external.char(97.1, 1); v;", errorIn("as.external.char(97.1, 1)", "pos argument not allowed with a numeric value")); + assertEvalFastR("v <- as.external.char(97L, 1); v;", errorIn("as.external.char(97L, 1)", "pos argument not allowed with a numeric value")); assertEvalFastR("v <- as.external.char('abc', 1); v;", "'b'"); assertEvalFastR("v <- as.external.char('abc', 1.1); v;", "'b'"); assertEvalFastR("v <- as.external.char(97.1); class(v);", "'" + RType.RInteropChar.getName() + "'"); @@ -246,9 +246,9 @@ public class TestJavaInterop extends TestBase { public void testGetClass() { assertEvalFastR(CREATE_TRUFFLE_OBJECT + "java.class(to)", "'com.oracle.truffle.r.test.library.fastr.TestJavaInterop$TestClass'"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "java.class(to$methodReturnsNull())", "cat('Error in java.class(to$methodReturnsNull()) : unsupported type', '\n')"); - assertEvalFastR("java.class(NULL)", "cat('Error in java.class(NULL) : unsupported type', '\n')"); - assertEvalFastR("java.class(1)", "cat('Error in java.class(1) : unsupported type', '\n')"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "java.class(to$methodReturnsNull())", errorIn("java.class(to$methodReturnsNull())", "unsupported type")); + assertEvalFastR("java.class(NULL)", errorIn("java.class(NULL)", "unsupported type")); + assertEvalFastR("java.class(1)", errorIn("java.class(1)", "unsupported type")); } @Test @@ -328,9 +328,9 @@ public class TestJavaInterop extends TestBase { assertEvalFastR("to <- new('java/lang/Boolean', TRUE); to", "TRUE"); assertEvalFastR("to <- new('" + TEST_CLASS + "'); to$fieldStaticInteger", getRValue(Integer.MAX_VALUE)); - assertEvalFastR("to <- new('" + TEST_CLASS + "'); new(to)", "cat('Error in new.external(Class, ...) : ', '\n', ' error during Java object instantiation\n', sep='')"); + assertEvalFastR("to <- new('" + TEST_CLASS + "'); new(to)", errorIn("new.external(Class, ...)", "error during Java object instantiation")); - assertEvalFastR("to <- new('__bogus_class_name__');", "cat('Error in getClass(Class, where = topenv(parent.frame())) : ', '\n', ' “__bogus_class_name__†is not a defined class\n', sep='')"); + assertEvalFastR("to <- new('__bogus_class_name__');", errorIn("getClass(Class, where = topenv(parent.frame()))", "“__bogus_class_name__†is not a defined class")); } @Test @@ -587,9 +587,9 @@ public class TestJavaInterop extends TestBase { assertPassingForeighObjectToFunction("is.unsorted", "FALSE"); assertPassingForeighObjectToFunction("is.vector", "FALSE"); - assertPassingForeighObjectToFunction("is.nan", "cat('Error in is.nan(to) : ', '\n', ' default method not implemented for type \\'external object\\'\n', sep='')"); - assertPassingForeighObjectToFunction("is.finite", "cat('Error in is.finite(to) : ', '\n', ' default method not implemented for type \\'external object\\'\n', sep='')"); - assertPassingForeighObjectToFunction("is.infinite", "cat('Error in is.infinite(to) : ', '\n', ' default method not implemented for type \\'external object\\'\n', sep='')"); + assertPassingForeighObjectToFunction("is.nan", errorIn("is.nan(to)", "default method not implemented for type 'external object'")); + assertPassingForeighObjectToFunction("is.finite", errorIn("is.finite(to)", "default method not implemented for type 'external object'")); + assertPassingForeighObjectToFunction("is.infinite", errorIn("is.infinite(to)", "default method not implemented for type 'external object'")); } @@ -608,8 +608,8 @@ public class TestJavaInterop extends TestBase { @Test public void testAttributes() { assertEvalFastR(CREATE_TRUFFLE_OBJECT + " attributes(to)", "NULL"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + " attr(to, 'a')<-'a'", "cat('Error in attr(to, \"a\") <- \"a\" : external object cannot be attributed\n')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + " attr(to, which = 'a')", "cat('Error in attr(to, which = \"a\") : external object cannot be attributed\n')"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " attr(to, 'a')<-'a'", errorIn("attr(to, \"a\") <- \"a\"", "external object cannot be attributed")); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " attr(to, which = 'a')", errorIn("attr(to, which = \"a\")", "external object cannot be attributed")); } @Test @@ -646,7 +646,7 @@ public class TestJavaInterop extends TestBase { 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);", "cat('Error in as.list(to) : ', '\n', ' no method for coercing this external object to a list', '\n')"); + assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + " l<-as.list(to);", errorIn("as.list(to)", "no method for coercing this external object to a list")); } private static final String CREATE_TEST_ARRAYS = "ta <- new('" + TestArraysClass.class.getName() + "');"; @@ -938,10 +938,9 @@ public class TestJavaInterop extends TestBase { } if (asXXX.equals("as.expression")) { - assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + asXXX + "(to);", - "cat('Error in " + asXXX + "(to) : ', '\n', ' no method for coercing this external object to a vector', '\n')"); + assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + asXXX + "(to);", errorIn("" + asXXX + "(to)", "no method for coercing this external object to a vector")); } else { - assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to);", "cat('Error in " + asXXX + "(to) : ', '\n', ' no method for coercing this external object to a vector', '\n')"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + asXXX + "(to);", errorIn("" + asXXX + "(to)", "no method for coercing this external object to a vector")); } } @@ -959,14 +958,11 @@ public class TestJavaInterop extends TestBase { assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "if(to$fieldStringBooleanArray) print('OK')", "if(c('TRUE', 'TRUE', 'FALSE')) 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(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "if(to$listString) print('OK')", "if(c('A', 'B')) print('OK')"); - assertEvalFastR(Output.IgnoreWarningContext, CREATE_TRUFFLE_OBJECT + "if(to$listStringBoolean) print('OK')", - "if(" + toRVector(t.listStringBoolean, null) + ") 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')", - "cat('Error in if (T) print(\\'OK\\') : ', '\n', ' argument is not interpretable as logical', '\n')"); + assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "if(to) print('OK')", errorIn("if (T) print('OK')", " argument is not interpretable as logical")); } @Test @@ -989,8 +985,7 @@ public class TestJavaInterop extends TestBase { 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')", - "cat('Error in if (T) print(\\'OK\\') : ', '\n', ' argument is not interpretable as logical', '\n')"); + assertEvalFastR(Output.IgnoreErrorContext, CREATE_TRUFFLE_OBJECT + "while(to) print('OK')", errorIn("if (T) print('OK')", " argument is not interpretable as logical")); } @Test @@ -1018,9 +1013,9 @@ public class TestJavaInterop extends TestBase { TestJavaInterop.this.testForeignVectorArithmeticOp("listStringInt", true); TestJavaInterop.this.testForeignVectorArithmeticOp("listChar", true); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to + 1", "cat('Error in to + 1 : non-numeric argument to binary operator', '\n')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "1 + to", "cat('Error in 1 + to : non-numeric argument to binary operator', '\n')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to + to", "cat('Error in to + to : non-numeric argument to binary operator', '\n')"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to + 1", errorIn("to + 1", "non-numeric argument to binary operator")); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "1 + to", errorIn("1 + to", "non-numeric argument to binary operator")); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to + to", errorIn("to + to", "non-numeric argument to binary operator")); } private void testForeignVectorArithmeticOp(String vec, boolean fail) throws NoSuchFieldException, IllegalAccessException { @@ -1030,55 +1025,35 @@ public class TestJavaInterop extends TestBase { String expectedKO; expectedOK = toRVector(t, vec) + " + 1"; - if (vec.equals("fieldStringArray")) { - expectedKO = "cat('Error in to$" + vec + " + 1 : ', '\n', ' non-numeric argument to binary operator', '\n')"; - } else { - expectedKO = "cat('Error in to$" + vec + " + 1 : non-numeric argument to binary operator', '\n')"; - } + expectedKO = errorIn("to$" + vec + " + 1", "non-numeric argument to binary operator"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " + 1", fail ? expectedKO : expectedOK); expectedOK = toRVector(t, vec) + " + c(1, 2, 3)"; - if (vec.equals("fieldStringArray") || vec.equals("fieldCharArray") || vec.equals("listString") || vec.equals("listStringInt") || vec.equals("listChar")) { - expectedKO = "cat('Error in to$" + vec + " + c(1, 2, 3) : ', '\n', ' non-numeric argument to binary operator', '\n')"; - } else { - expectedKO = "cat('Error in to$" + vec + " + c(1, 2, 3) : non-numeric argument to binary operator', '\n')"; - } + expectedKO = errorIn("to$" + vec + " + c(1, 2, 3)", "non-numeric argument to binary operator"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " + c(1, 2, 3)", fail ? expectedKO : expectedOK); expectedOK = "1 + " + toRVector(t, vec); - if (vec.equals("fieldStringArray")) { - expectedKO = "cat('Error in 1 + to$" + vec + " : ', '\n', ' non-numeric argument to binary operator', '\n')"; - } else { - expectedKO = "cat('Error in 1 + to$" + vec + " : non-numeric argument to binary operator', '\n')"; - } + expectedKO = errorIn("1 + to$" + vec, "non-numeric argument to binary operator"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "1 + to$" + vec, fail ? expectedKO : expectedOK); expectedOK = "c(1, 2, 3) + " + toRVector(t, vec); - expectedKO = "cat('Error in c(1, 2, 3) + to$" + vec + " : ', '\n', ' non-numeric argument to binary operator', '\n')"; + expectedKO = errorIn("c(1, 2, 3) + to$" + vec + "", "non-numeric argument to binary operator"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + " c(1, 2, 3) + to$" + vec, fail ? expectedKO : expectedOK); expectedOK = toRVector(t, vec) + " + " + toRVector(t, vec); - expectedKO = "cat('Error in to$" + vec + " + to$" + vec + " : ', '\n', ' non-numeric argument to binary operator', '\n')"; + expectedKO = errorIn("to$" + vec + " + to$" + vec + "", "non-numeric argument to binary operator"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " + to$" + vec, fail ? expectedKO : expectedOK); expectedOK = "-" + toRVector(t, vec); - expectedKO = "cat('Error in -(to$" + vec + ") : invalid argument to unary operator', '\n')"; + expectedKO = errorIn("-(to$" + vec + ")", "invalid argument to unary operator"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "-(to$" + vec + ")", fail ? expectedKO : expectedOK); expectedOK = "numeric(0)"; - if (vec.equals("listString") || vec.equals("listChar")) { - expectedKO = "cat('Error in to$" + vec + " + NULL : non-numeric argument to binary operator', '\n')"; - } else { - expectedKO = "cat('Error in to$" + vec + " + NULL : ', '\n', ' non-numeric argument to binary operator', '\n')"; - } + expectedKO = errorIn("to$" + vec + " + NULL", "non-numeric argument to binary operator"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " + NULL", fail ? expectedKO : expectedOK); expectedOK = "numeric(0)"; - if (vec.equals("listString") || vec.equals("listChar")) { - expectedKO = "cat('Error in NULL + to$" + vec + " : non-numeric argument to binary operator', '\n')"; - } else { - expectedKO = "cat('Error in NULL + to$" + vec + " : ', '\n', ' non-numeric argument to binary operator', '\n')"; - } + expectedKO = errorIn("NULL + to$" + vec, "non-numeric argument to binary operator"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "NULL + to$" + vec, fail ? expectedKO : expectedOK); } @@ -1107,9 +1082,9 @@ public class TestJavaInterop extends TestBase { testForeignVectorBooleanOp("listStringInt", true); testForeignVectorBooleanOp("listChar", true); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to & T", "cat('Error in to & T : ', '\n', ' operations are possible only for numeric, logical or complex types', '\n')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "T & to", "cat('Error in T & to : ', '\n', ' operations are possible only for numeric, logical or complex types', '\n')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to & to", "cat('Error in to & to : ', '\n', ' operations are possible only for numeric, logical or complex types', '\n')"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to & T", errorIn("to & T", "operations are possible only for numeric, logical or complex types")); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "T & to", errorIn("T & to", "operations are possible only for numeric, logical or complex types")); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to & to", errorIn("to & to", "operations are possible only for numeric, logical or complex types")); } private void testForeignVectorBooleanOp(String vec, boolean fail) throws NoSuchFieldException, IllegalAccessException { @@ -1119,41 +1094,109 @@ public class TestJavaInterop extends TestBase { String expectedKO; expectedOK = toRVector(t, vec) + " & T"; - expectedKO = "cat('Error in to$" + vec + " & T : ', '\n', ' operations are possible only for numeric, logical or complex types', '\n')"; + expectedKO = errorIn("to$" + vec + " & T", "operations are possible only for numeric, logical or complex types"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " & T", fail ? expectedKO : expectedOK); expectedOK = toRVector(t, vec) + " & c(T, T, F)"; - if (vec.equals("fieldCharArray") || vec.equals("fieldStringArray") || vec.equals("listString") || vec.equals("listChar") || vec.equals("listStringInt")) { - expectedKO = "cat('Error in to$" + vec + " & c(T, T, F) : ', '\n', ' operations are possible only for numeric, logical or complex types', '\n')"; - } else { - expectedKO = "cat('Error in to$" + vec + " & c(T, T, F) : operations are possible only for numeric, logical or complex types', '\n')"; - } - + expectedKO = errorIn("to$" + vec + " & c(T, T, F)", "operations are possible only for numeric, logical or complex types"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " & c(T, T, F)", fail ? expectedKO : expectedOK); expectedOK = "T & " + toRVector(t, vec); - if (vec.equals("fieldCharArray") || vec.equals("fieldStringArray") || vec.equals("listString") || vec.equals("listChar") || vec.equals("listStringInt")) { - expectedKO = "cat('Error in T & to$" + vec + " : ', '\n', ' operations are possible only for numeric, logical or complex types', '\n')"; - } else { - expectedKO = "cat('Error in T & to$" + vec + " : operations are possible only for numeric, logical or complex types', '\n')"; - } + expectedKO = errorIn("T & to$" + vec, "operations are possible only for numeric, logical or complex types"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "T & to$" + vec, fail ? expectedKO : expectedOK); + expectedOK = "c(T, T, F) & " + toRVector(t, vec); - expectedKO = "cat('Error in c(T, T, F) & to$" + vec + " : ', '\n', ' operations are possible only for numeric, logical or complex types', '\n')"; + expectedKO = errorIn("c(T, T, F) & to$" + vec + "", "operations are possible only for numeric, logical or complex types"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + " c(T, T, F) & to$" + vec, fail ? expectedKO : expectedOK); expectedOK = toRVector(t, vec) + " & " + toRVector(t, vec); - expectedKO = "cat('Error in to$" + vec + " & to$" + vec + " : ', '\n', ' operations are possible only for numeric, logical or complex types', '\n')"; + expectedKO = errorIn("to$" + vec + " & to$" + vec + "", "operations are possible only for numeric, logical or complex types"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " & to$" + vec, fail ? expectedKO : expectedOK); expectedOK = "!" + toRVector(t, vec); - expectedKO = "cat('Error in !(to$" + vec + ") : invalid argument type', '\n')"; + expectedKO = errorIn("!(to$" + vec + ")", "invalid argument type"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "!(to$" + vec + ")", fail ? expectedKO : expectedOK); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " & NULL", "logical(0)"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "NULL & to$" + vec, "logical(0)"); } + @Test + public void testForeignVectorScalarBooleanOp() throws NoSuchFieldException, + IllegalAccessException { + testForeignVectorScalarBooleanOp("||"); + testForeignVectorScalarBooleanOp("&&"); + } + + private void testForeignVectorScalarBooleanOp(String operator) throws NoSuchFieldException, + IllegalAccessException { + testForeignVectorScalarBooleanOp(operator, "fieldBooleanArray", false); + testForeignVectorScalarBooleanOp(operator, "fieldByteArray", false); + testForeignVectorScalarBooleanOp(operator, "fieldDoubleArray", false); + testForeignVectorScalarBooleanOp(operator, "fieldFloatArray", false); + testForeignVectorScalarBooleanOp(operator, "fieldIntegerArray", false); + testForeignVectorScalarBooleanOp(operator, "fieldLongArray", false); + testForeignVectorScalarBooleanOp(operator, "fieldShortArray", false); + + testForeignVectorScalarBooleanOp(operator, "listBoolean", false); + testForeignVectorScalarBooleanOp(operator, "listByte", false); + testForeignVectorScalarBooleanOp(operator, "listDouble", false); + testForeignVectorScalarBooleanOp(operator, "listFloat", false); + testForeignVectorScalarBooleanOp(operator, "listInteger", false); + testForeignVectorScalarBooleanOp(operator, "listLong", false); + testForeignVectorScalarBooleanOp(operator, "listShort", false); + + testForeignVectorScalarBooleanOp(operator, "fieldCharArray", true); + testForeignVectorScalarBooleanOp(operator, "fieldStringArray", true); + testForeignVectorScalarBooleanOp(operator, "listString", true); + testForeignVectorScalarBooleanOp(operator, "listStringInt", true); + testForeignVectorScalarBooleanOp(operator, "listChar", true); + + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to " + operator + " T", errorIn("to " + operator + " T", "invalid 'x' type in 'x " + operator + " y'")); + String cmd = CREATE_TRUFFLE_OBJECT + "T " + operator + " to"; + if (operator.equals("||")) { + assertEvalFastR(cmd, "TRUE"); + } else { + assertEvalFastR(cmd, errorIn("T " + operator + " to", "invalid 'y' type in 'x " + operator + " y'")); + } + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to " + operator + " to", errorIn("to " + operator + " to", "invalid 'x' type in 'x " + operator + " y'")); + } + + private void testForeignVectorScalarBooleanOp(String operator, String vec, boolean fail) throws NoSuchFieldException, IllegalAccessException { + TestClass t = new TestClass(); + + String expectedOK; + String expectedKO; + + expectedOK = toRVector(t, vec) + operator + " T"; + expectedKO = errorIn("to$" + vec + " " + operator + " T", "invalid 'x' type in 'x " + operator + " y'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " " + operator + " T", fail ? expectedKO : expectedOK); + + expectedOK = toRVector(t, vec) + operator + " c(T, T, F)"; + expectedKO = errorIn("to$" + vec + " " + operator + " c(T, T, F)", "invalid 'x' type in 'x " + operator + " y'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " " + operator + " c(T, T, F)", fail ? expectedKO : expectedOK); + + expectedOK = "T " + operator + " " + toRVector(t, vec); + expectedKO = errorIn("T " + operator + " to$" + vec + "", "invalid 'y' type in 'x " + operator + " y'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "T " + operator + " to$" + vec, fail && !operator.equals("||") ? expectedKO : expectedOK); + + expectedOK = "c(T, T, F) " + operator + " " + toRVector(t, vec); + expectedKO = errorIn("c(T, T, F) " + operator + " to$" + vec + "", "invalid 'y' type in 'x " + operator + " y'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + " c(T, T, F) " + operator + " to$" + vec, fail && !operator.equals("||") ? expectedKO : expectedOK); + + expectedOK = toRVector(t, vec) + " " + operator + " " + toRVector(t, vec); + expectedKO = errorIn("to$" + vec + " " + operator + " to$" + vec, "invalid 'x' type in 'x " + operator + " y'"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "to$" + vec + " " + operator + " to$" + vec, fail ? expectedKO : expectedOK); + + String cmd = CREATE_TRUFFLE_OBJECT + "to$" + vec + " " + operator + " NULL"; + if (operator.equals("||") && !fail) { + assertEvalFastR(cmd, "TRUE"); + } else { + assertEvalFastR(cmd, errorIn("to$" + vec + " " + operator + " NULL", "invalid " + (fail ? "'x'" : "'y'") + " type in 'x " + operator + " y'")); + } + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "NULL " + operator + " to$" + vec, errorIn("NULL " + operator + " to$" + vec, "invalid 'x' type in 'x " + operator + " y'")); + } + @Test public void testForeignUnaryArithmeticOp() { @@ -1175,13 +1218,13 @@ public class TestJavaInterop extends TestBase { assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$listLong)", toRVector(t.listLong, null)); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$listShort)", toRVector(t.listShort, null)); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$fieldCharArray)", "cat('Error in abs(to$fieldCharArray) : ', '\n', ' non-numeric argument to mathematical function', '\n')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$fieldStringArray)", "cat('Error in abs(to$fieldStringArray) : ', '\n', ' non-numeric argument to mathematical function', '\n')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$listString)", "cat('Error in abs(to$listString) : ', '\n', ' non-numeric argument to mathematical function', '\n')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$listStringInt)", "cat('Error in abs(to$listStringInt) : ', '\n', ' non-numeric argument to mathematical function', '\n')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$listChar)", "cat('Error in abs(to$listChar) : non-numeric argument to mathematical function', '\n')"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$fieldCharArray)", errorIn("abs(to$fieldCharArray)", "non-numeric argument to mathematical function")); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$fieldStringArray)", errorIn("abs(to$fieldStringArray)", "non-numeric argument to mathematical function")); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$listString)", errorIn("abs(to$listString)", "non-numeric argument to mathematical function")); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$listStringInt)", errorIn("abs(to$listStringInt)", "non-numeric argument to mathematical function")); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to$listChar)", errorIn("abs(to$listChar)", "non-numeric argument to mathematical function")); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to)", "cat('Error in abs(to) : non-numeric argument to mathematical function', '\n')"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "abs(to)", errorIn("abs(to)", "non-numeric argument to mathematical function")); } @Test @@ -1208,7 +1251,7 @@ public class TestJavaInterop extends TestBase { assertEvalFastR(CREATE_TRUFFLE_OBJECT + "range(to$listStringInt)", "c('1', '3')"); assertEvalFastR(CREATE_TRUFFLE_OBJECT + "range(to$listChar)", "c('a', 'c')"); - assertEvalFastR(CREATE_TRUFFLE_OBJECT + "range(to)", "cat('Error in min(x, na.rm = na.rm) : ', '\n', ' invalid \\'type\\' (external object) of argument', '\n')"); + assertEvalFastR(CREATE_TRUFFLE_OBJECT + "range(to)", errorIn("min(x, na.rm = na.rm)", "invalid 'type' (external object) of argument")); } private String getRValue(Object value) { @@ -1382,6 +1425,24 @@ public class TestJavaInterop extends TestBase { return sb.toString(); } + private String errorIn(String left, String right) { + String errorIn = "Error in "; + String delim = " :"; + + StringBuilder sb = new StringBuilder(); + sb.append("cat('"); + sb.append(errorIn); + sb.append(left.replaceAll("\\'", "\\\\\\'")); + sb.append(delim); + if (errorIn.length() + left.length() + delim.length() + 1 + right.length() >= 74) { + sb.append("', '\n', '"); + } + sb.append(' '); + sb.append(right.replaceAll("\\'", "\\\\\\'")); + sb.append("', '\n')"); + return sb.toString(); + } + public static class TestNamesClass { public Object field; public static Object staticField;