From 7a425d5ad1152fd5bfab2e2dd304e0814cafde42 Mon Sep 17 00:00:00 2001
From: Christian Humer <christian.humer@oracle.com>
Date: Mon, 4 Jan 2016 19:50:41 +0100
Subject: [PATCH] Add PairList support for Precedence node.
---
.../src/com/oracle/truffle/r/nodes/unary/PrecedenceNode.java | 5 +++++
1 file changed, 5 insertions(+)
diff --git a/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/unary/PrecedenceNode.java b/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/unary/PrecedenceNode.java
index 9df69e25f6..29b2377c9d 100644
--- a/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/unary/PrecedenceNode.java
+++ b/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/unary/PrecedenceNode.java
@@ -156,6 +156,11 @@ public abstract class PrecedenceNode extends RBaseNode {
return LIST_PRECEDENCE;
}
+ @Specialization(guards = "recursive != LOGICAL_TRUE")
+ protected int doPairList(RPairList val, byte recursive) {
+ return LIST_PRECEDENCE;
+ }
+
@Specialization
protected int doDataFrame(RDataFrame val, byte recursive) {
return LIST_PRECEDENCE;
--
GitLab