From d3f51aafeb79efdc2b7442c482436caedaaa9397 Mon Sep 17 00:00:00 2001
From: Florian Angerer <florian.angerer@oracle.com>
Date: Fri, 11 Aug 2017 15:13:45 +0200
Subject: [PATCH] Added specialization for RExternalPtr.

---
 .../oracle/truffle/r/nodes/builtin/base/EnvFunctions.java   | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/EnvFunctions.java b/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/EnvFunctions.java
index a561a63c48..14cc631717 100644
--- a/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/EnvFunctions.java
+++ b/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/EnvFunctions.java
@@ -70,6 +70,7 @@ import com.oracle.truffle.r.runtime.builtins.RBuiltin;
 import com.oracle.truffle.r.runtime.data.RAttributable;
 import com.oracle.truffle.r.runtime.data.RAttributesLayout;
 import com.oracle.truffle.r.runtime.data.RDataFactory;
+import com.oracle.truffle.r.runtime.data.RExternalPtr;
 import com.oracle.truffle.r.runtime.data.RFunction;
 import com.oracle.truffle.r.runtime.data.RLanguage;
 import com.oracle.truffle.r.runtime.data.RList;
@@ -753,6 +754,11 @@ public class EnvFunctions {
             return s;
         }
 
+        @Specialization
+        RExternalPtr copy(RExternalPtr ptr) {
+            return ptr.copy();
+        }
+
         @Specialization
         RSymbol copy(@SuppressWarnings("unused") RMissing m) {
             return RDataFactory.createSymbol(" ");
-- 
GitLab