From 9ed27d3323842f5c1799547e1d25879ee84a58b9 Mon Sep 17 00:00:00 2001
From: Tomas Stupka <tomas.stupka@oracle.com>
Date: Mon, 14 Aug 2017 14:34:03 +0200
Subject: [PATCH] removed MR impls for cases returning a default value
---
.../r/engine/interop/ActiveBindingMR.java | 14 --------
.../truffle/r/engine/interop/ListMR.java | 34 -------------------
.../engine/interop/RArgsValuesAndNamesMR.java | 13 -------
.../r/engine/interop/RConnectionMR.java | 21 ------------
.../truffle/r/engine/interop/RContextMR.java | 21 ------------
.../truffle/r/engine/interop/RDoubleMR.java | 14 --------
.../truffle/r/engine/interop/REmptyMR.java | 21 ------------
.../r/engine/interop/REnvironmentMR.java | 21 ------------
.../r/engine/interop/RExternalPtrMR.java | 20 -----------
.../truffle/r/engine/interop/RFunctionMR.java | 21 ------------
.../truffle/r/engine/interop/RIntegerMR.java | 14 --------
.../r/engine/interop/RInteropScalarMR.java | 14 --------
.../truffle/r/engine/interop/RLanguageMR.java | 14 --------
.../truffle/r/engine/interop/RMissingMR.java | 21 ------------
.../truffle/r/engine/interop/RNullMR.java | 14 --------
.../truffle/r/engine/interop/RPromiseMR.java | 14 --------
.../truffle/r/engine/interop/RS4ObjectMR.java | 21 ------------
.../truffle/r/engine/interop/RSymbolMR.java | 21 ------------
.../r/engine/interop/RUnboundValueMR.java | 20 -----------
mx.fastr/suite.py | 2 +-
20 files changed, 1 insertion(+), 354 deletions(-)
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/ActiveBindingMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/ActiveBindingMR.java
index 5aa08ac4fa..94532825ba 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/ActiveBindingMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/ActiveBindingMR.java
@@ -38,20 +38,6 @@ public class ActiveBindingMR {
}
}
- @Resolve(message = "HAS_SIZE")
- public abstract static class ActiveBindingHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") ActiveBinding receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class ActiveBindingIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") ActiveBinding receiver) {
- return false;
- }
- }
-
@Resolve(message = "UNBOX")
public abstract static class ActiveBindingUnboxNode extends Node {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/ListMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/ListMR.java
index 7f302a4482..9227637126 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/ListMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/ListMR.java
@@ -62,12 +62,6 @@ public class ListMR {
@MessageResolution(receiverType = RList.class)
public static class RListMR extends ListMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RListIsBoxedNode extends Node {
- protected Object access(RList receiver) {
- return isBoxed(receiver);
- }
- }
@Resolve(message = "HAS_SIZE")
public abstract static class RListHasSizeNode extends Node {
@@ -85,13 +79,6 @@ public class ListMR {
}
}
- @Resolve(message = "IS_NULL")
- public abstract static class RListIsNullNode extends Node {
- protected Object access(RList receiver) {
- return isNull(receiver);
- }
- }
-
@Resolve(message = "READ")
public abstract static class RListReadNode extends Node {
@Child private ListReadImplNode read = ListReadImplNodeGen.create();
@@ -146,12 +133,6 @@ public class ListMR {
@MessageResolution(receiverType = RPairList.class)
public static class RPairListMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RPairListIsBoxedNode extends Node {
- protected Object access(RPairList receiver) {
- return isBoxed(receiver);
- }
- }
@Resolve(message = "HAS_SIZE")
public abstract static class RPairListHasSizeNode extends Node {
@@ -169,13 +150,6 @@ public class ListMR {
}
}
- @Resolve(message = "IS_NULL")
- public abstract static class RPairListIsNullNode extends Node {
- protected Object access(RPairList receiver) {
- return isNull(receiver);
- }
- }
-
@Resolve(message = "IS_EXECUTABLE")
public abstract static class RPairListIsExecutableNode extends Node {
protected Object access(@SuppressWarnings("unused") RPairList receiver) {
@@ -414,14 +388,6 @@ public class ListMR {
}
}
- private static boolean isBoxed(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
-
- private static boolean isNull(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
-
private static boolean hasSize(@SuppressWarnings("unused") TruffleObject receiver) {
return true;
}
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RArgsValuesAndNamesMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RArgsValuesAndNamesMR.java
index fd586b60d9..9e60cc21fd 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RArgsValuesAndNamesMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RArgsValuesAndNamesMR.java
@@ -44,12 +44,6 @@ import com.oracle.truffle.r.runtime.interop.R2ForeignNodeGen;
@MessageResolution(receiverType = RArgsValuesAndNames.class)
public class RArgsValuesAndNamesMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RArgsValuesAndNamesIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") RArgsValuesAndNames receiver) {
- return false;
- }
- }
@Resolve(message = "HAS_SIZE")
public abstract static class RArgsValuesAndNamesHasSizeNode extends Node {
@@ -65,13 +59,6 @@ public class RArgsValuesAndNamesMR {
}
}
- @Resolve(message = "IS_NULL")
- public abstract static class RArgsValuesAndNamesIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") RArgsValuesAndNames receiver) {
- return false;
- }
- }
-
@Resolve(message = "READ")
public abstract static class RArgsValuesAndNamesReadNode extends Node {
@Child RArgsValuesAndNamesReadImplNode readNode = RArgsValuesAndNamesReadImplNodeGen.create();
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RConnectionMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RConnectionMR.java
index 0d364d7041..273c19ac19 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RConnectionMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RConnectionMR.java
@@ -32,27 +32,6 @@ import com.oracle.truffle.r.runtime.conn.RConnection;
@MessageResolution(receiverType = RConnection.class)
public class RConnectionMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RConnectionIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class RConnectionHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RConnectionIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
@Resolve(message = "KEY_INFO")
public abstract static class RConnectionKeyInfoNode extends Node {
protected Object access(@SuppressWarnings("unused") TruffleObject receiver, @SuppressWarnings("unused") Object identifier) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RContextMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RContextMR.java
index 67d3201bba..e1d5c3497e 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RContextMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RContextMR.java
@@ -32,27 +32,6 @@ import com.oracle.truffle.r.runtime.context.RContext;
@MessageResolution(receiverType = RContext.class)
public class RContextMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RContextIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class RContextHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RContextIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
@Resolve(message = "KEY_INFO")
public abstract static class RContextKeyInfoNode extends Node {
protected Object access(@SuppressWarnings("unused") TruffleObject receiver, @SuppressWarnings("unused") Object identifier) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RDoubleMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RDoubleMR.java
index a31821ee84..06c424cc1f 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RDoubleMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RDoubleMR.java
@@ -38,20 +38,6 @@ public class RDoubleMR {
}
}
- @Resolve(message = "HAS_SIZE")
- public abstract static class RDoubleHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") RDouble receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RDoubleIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") RDouble receiver) {
- return false;
- }
- }
-
@Resolve(message = "UNBOX")
public abstract static class RDoubleUnboxNode extends Node {
protected double access(RDouble receiver) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/REmptyMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/REmptyMR.java
index 6537ae621c..462d98e4c6 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/REmptyMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/REmptyMR.java
@@ -32,27 +32,6 @@ import com.oracle.truffle.r.runtime.data.REmpty;
@MessageResolution(receiverType = REmpty.class)
public class REmptyMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class REmptyIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") REmpty receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class REmptyHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") REmpty receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class REmptyIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") REmpty receiver) {
- return false;
- }
- }
-
@Resolve(message = "KEY_INFO")
public abstract static class REmptyKeyInfoNode extends Node {
protected Object access(@SuppressWarnings("unused") TruffleObject receiver, @SuppressWarnings("unused") Object identifier) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/REnvironmentMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/REnvironmentMR.java
index d2dae219f4..b18d134b3b 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/REnvironmentMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/REnvironmentMR.java
@@ -55,13 +55,6 @@ import com.oracle.truffle.r.runtime.interop.R2ForeignNodeGen;
@MessageResolution(receiverType = REnvironment.class)
public class REnvironmentMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class REnvironmentIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") REnvironment receiver) {
- return false;
- }
- }
-
@Resolve(message = "TO_NATIVE")
public abstract static class REnvironmentToNativeNode extends Node {
protected Object access(REnvironment receiver) {
@@ -69,20 +62,6 @@ public class REnvironmentMR {
}
}
- @Resolve(message = "HAS_SIZE")
- public abstract static class REnvironmentHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") REnvironment receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class REnvironmentIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") REnvironment receiver) {
- return false;
- }
- }
-
@Resolve(message = "READ")
public abstract static class REnvironmentReadNode extends Node {
@Child private REnvironmentReadImplNode readNode = REnvironmentReadImplNodeGen.create();
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RExternalPtrMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RExternalPtrMR.java
index d180a32a90..bb333c5502 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RExternalPtrMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RExternalPtrMR.java
@@ -31,26 +31,6 @@ import com.oracle.truffle.r.runtime.data.RExternalPtr;
@MessageResolution(receiverType = RExternalPtr.class)
public class RExternalPtrMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RExternalPtrIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class RExternalPtrHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RExternalPtrIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
@Resolve(message = "KEY_INFO")
public abstract static class RExternalPtrKeyInfoNode extends Node {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RFunctionMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RFunctionMR.java
index 0d6afa91c2..19af21fca0 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RFunctionMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RFunctionMR.java
@@ -49,27 +49,6 @@ import com.oracle.truffle.r.runtime.interop.R2ForeignNodeGen;
@MessageResolution(receiverType = RFunction.class)
public class RFunctionMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RFunctionIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class RFunctionHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RFunctionIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
@Resolve(message = "KEY_INFO")
public abstract static class RFunctionKeyInfoNode extends Node {
protected Object access(@SuppressWarnings("unused") TruffleObject receiver, @SuppressWarnings("unused") Object identifier) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RIntegerMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RIntegerMR.java
index 498b95efac..923a8cd7b3 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RIntegerMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RIntegerMR.java
@@ -38,20 +38,6 @@ public class RIntegerMR {
}
}
- @Resolve(message = "HAS_SIZE")
- public abstract static class RIntegerHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") RInteger receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RIntegerIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") RInteger receiver) {
- return false;
- }
- }
-
@Resolve(message = "KEY_INFO")
public abstract static class RIntegerKeyInfoNode extends Node {
protected Object access(@SuppressWarnings("unused") TruffleObject receiver, @SuppressWarnings("unused") Object identifier) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RInteropScalarMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RInteropScalarMR.java
index 798ab8277c..2d4ff14a9e 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RInteropScalarMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RInteropScalarMR.java
@@ -62,20 +62,6 @@ public class RInteropScalarMR {
}
}
- @Resolve(message = "HAS_SIZE")
- public abstract static class RInteropScalarHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") RInteropScalar receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RInteropScalarIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") RInteropScalar receiver) {
- return false;
- }
- }
-
@Resolve(message = "KEY_INFO")
public abstract static class RInteropScalarKeyInfoNode extends Node {
protected Object access(@SuppressWarnings("unused") TruffleObject receiver, @SuppressWarnings("unused") Object identifier) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RLanguageMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RLanguageMR.java
index f92d14eab1..699bf25401 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RLanguageMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RLanguageMR.java
@@ -47,13 +47,6 @@ import com.oracle.truffle.r.runtime.interop.R2ForeignNodeGen;
@MessageResolution(receiverType = RLanguage.class)
public class RLanguageMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RLanguageIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") RLanguage receiver) {
- return false;
- }
- }
-
@Resolve(message = "HAS_SIZE")
public abstract static class RLanguageHasSizeNode extends Node {
protected Object access(@SuppressWarnings("unused") RLanguage receiver) {
@@ -68,13 +61,6 @@ public class RLanguageMR {
}
}
- @Resolve(message = "IS_NULL")
- public abstract static class RLanguageIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") RLanguage receiver) {
- return false;
- }
- }
-
@Resolve(message = "TO_NATIVE")
public abstract static class RLanguageToNativeNode extends Node {
protected Object access(RLanguage receiver) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RMissingMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RMissingMR.java
index 22ed943733..9c6abcf27b 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RMissingMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RMissingMR.java
@@ -32,27 +32,6 @@ import com.oracle.truffle.r.runtime.data.RMissing;
@MessageResolution(receiverType = RMissing.class)
public class RMissingMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RMissingIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") RMissing receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class RMissingHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") RMissing receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RMissingIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") RMissing receiver) {
- return false;
- }
- }
-
@Resolve(message = "KEY_INFO")
public abstract static class RMissingKeyInfoNode extends Node {
protected Object access(@SuppressWarnings("unused") TruffleObject receiver, @SuppressWarnings("unused") Object identifier) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RNullMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RNullMR.java
index 92aa246996..270f160dde 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RNullMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RNullMR.java
@@ -37,20 +37,6 @@ public class RNullMR {
*/
private static boolean isNull = true;
- @Resolve(message = "IS_BOXED")
- public abstract static class RNullIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") RNull receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class RNullHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") RNull receiver) {
- return false;
- }
- }
-
@Resolve(message = "IS_NULL")
public abstract static class RNullIsNullNode extends Node {
protected Object access(@SuppressWarnings("unused") RNull receiver) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RPromiseMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RPromiseMR.java
index aaf35509de..f531beac95 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RPromiseMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RPromiseMR.java
@@ -50,20 +50,6 @@ public class RPromiseMR {
private static final String PROP_IS_EVALUATED = "isEvaluated";
private static final String PROP_EXPR = "expression";
- @Resolve(message = "IS_BOXED")
- public abstract static class RPromiseIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") RPromise receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RPromiseIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") RPromise receiver) {
- return false;
- }
- }
-
@Resolve(message = "READ")
public abstract static class RPromiseReadNode extends Node {
@Child RPromiseReadImplNode readNode = RPromiseReadImplNodeGen.create();
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RS4ObjectMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RS4ObjectMR.java
index c52fc25a1b..65a9cd84ba 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RS4ObjectMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RS4ObjectMR.java
@@ -57,27 +57,6 @@ import com.oracle.truffle.r.runtime.interop.R2ForeignNodeGen;
@MessageResolution(receiverType = RS4Object.class)
public class RS4ObjectMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RS4ObjectIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") RS4Object receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class RS4ObjectHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") RS4Object receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RS4ObjectIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") RS4Object receiver) {
- return false;
- }
- }
-
@Resolve(message = "READ")
public abstract static class RS4ObjectReadNode extends Node {
@Child private RS4ObjectReadImplNode readNode = RS4ObjectReadImplNodeGen.create();
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RSymbolMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RSymbolMR.java
index f175339f09..d506157e6f 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RSymbolMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RSymbolMR.java
@@ -33,27 +33,6 @@ import com.oracle.truffle.r.runtime.data.RSymbol;
@MessageResolution(receiverType = RSymbol.class)
public class RSymbolMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RSymbolIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class RSymbolHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RSymbolIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") TruffleObject receiver) {
- return false;
- }
- }
-
@Resolve(message = "KEY_INFO")
public abstract static class RSymbolKeyInfoNode extends Node {
protected Object access(@SuppressWarnings("unused") TruffleObject receiver, @SuppressWarnings("unused") Object identifier) {
diff --git a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RUnboundValueMR.java b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RUnboundValueMR.java
index c2d60fa3a6..6810239ab9 100644
--- a/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RUnboundValueMR.java
+++ b/com.oracle.truffle.r.engine/src/com/oracle/truffle/r/engine/interop/RUnboundValueMR.java
@@ -31,26 +31,6 @@ import com.oracle.truffle.r.runtime.data.RUnboundValue;
@MessageResolution(receiverType = RUnboundValue.class)
public class RUnboundValueMR {
- @Resolve(message = "IS_BOXED")
- public abstract static class RUnboundValueIsBoxedNode extends Node {
- protected Object access(@SuppressWarnings("unused") RUnboundValue receiver) {
- return false;
- }
- }
-
- @Resolve(message = "HAS_SIZE")
- public abstract static class RUnboundValueHasSizeNode extends Node {
- protected Object access(@SuppressWarnings("unused") RUnboundValue receiver) {
- return false;
- }
- }
-
- @Resolve(message = "IS_NULL")
- public abstract static class RUnboundValueIsNullNode extends Node {
- protected Object access(@SuppressWarnings("unused") RUnboundValue receiver) {
- return false;
- }
- }
@Resolve(message = "KEY_INFO")
public abstract static class RUnboundValueKeyInfoNode extends Node {
diff --git a/mx.fastr/suite.py b/mx.fastr/suite.py
index ce442915dc..154838f37e 100644
--- a/mx.fastr/suite.py
+++ b/mx.fastr/suite.py
@@ -29,7 +29,7 @@ suite = {
{
"name" : "truffle",
"subdir" : True,
- "version" : "554cf703833b2665da613da0fac4972abd293fbd",
+ "version" : "1a54617b9b05c825e6d4a9db1ef783a862fbaf01",
"urls" : [
{"url" : "https://github.com/graalvm/graal", "kind" : "git"},
{"url" : "https://curio.ssw.jku.at/nexus/content/repositories/snapshots", "kind" : "binary"},
--
GitLab