From 1a1610b903f6fbd8a5f5d4117e637366f2f67997 Mon Sep 17 00:00:00 2001
From: Julien Lopez <julien.lopez@lri.fr>
Date: Wed, 14 Dec 2016 13:00:44 +0100
Subject: [PATCH] Add support for ParNode in SyntaxNodeVisitor
---
.../src/com/oracle/truffle/r/nodes/RSyntaxNodeVisitor.java | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/RSyntaxNodeVisitor.java b/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/RSyntaxNodeVisitor.java
index ba3fb48f7d..8c8468a0f5 100644
--- a/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/RSyntaxNodeVisitor.java
+++ b/com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/RSyntaxNodeVisitor.java
@@ -26,6 +26,10 @@ public interface RSyntaxNodeVisitor<T> extends IRSyntaxNodeVisitor<T> {
public abstract T visit(final ReadVariableNode var);
+ public default T visit(final ParNode par) {
+ return par.getSyntaxArguments()[0].accept(this);
+ }
+
public abstract T visit(final WriteLocalFrameVariableNode var);
public abstract T visit(final FunctionExpressionNode fun);
@@ -70,6 +74,8 @@ public interface RSyntaxNodeVisitor<T> extends IRSyntaxNodeVisitor<T> {
return visit((BlockNode) node);
if (node instanceof ReadVariableNode)
return visit((ReadVariableNode) node);
+ if (node instanceof ParNode)
+ return visit((ParNode) node);
if (node instanceof WriteLocalFrameVariableNode)
return visit((WriteLocalFrameVariableNode) node);
if (node instanceof FunctionExpressionNode)
--
GitLab