From 53102419b6a4db937ec0a7e013f32cbec7ae2533 Mon Sep 17 00:00:00 2001
From: Florian Angerer <florian.angerer@oracle.com>
Date: Tue, 5 Sep 2017 14:54:15 +0200
Subject: [PATCH] Added missing specialization for RStringSequence.

---
 .../com/oracle/truffle/r/nodes/unary/PrecedenceNode.java    | 6 ++++++
 1 file changed, 6 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 4b8964a883..c0d2eab3b9 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
@@ -55,6 +55,7 @@ import com.oracle.truffle.r.runtime.data.RPairList;
 import com.oracle.truffle.r.runtime.data.RRaw;
 import com.oracle.truffle.r.runtime.data.RRawVector;
 import com.oracle.truffle.r.runtime.data.RS4Object;
+import com.oracle.truffle.r.runtime.data.RStringSequence;
 import com.oracle.truffle.r.runtime.data.RStringVector;
 import com.oracle.truffle.r.runtime.data.RSymbol;
 import com.oracle.truffle.r.runtime.env.REnvironment;
@@ -157,6 +158,11 @@ public abstract class PrecedenceNode extends RBaseNode {
         return STRING_PRECEDENCE;
     }
 
+    @Specialization
+    protected int doString(RStringSequence val, boolean recursive) {
+        return STRING_PRECEDENCE;
+    }
+
     @Specialization
     protected int doFunction(RFunction func, boolean recursive) {
         return LIST_PRECEDENCE;
-- 
GitLab