[GR-10270] Add missing TO_NATIVE message implementations in Truffle NFI.

PullRequest: graal/1642
fengno · Jun 8, 2018 · 998bf86 · 998bf86
2 parents 1682b57 + 2c96cc9
commit 998bf86
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 0 deletions.
diff --git a/...m.oracle.truffle.nfi/src/com/oracle/truffle/nfi/impl/LibFFIFunctionMessageResolution.java b/...m.oracle.truffle.nfi/src/com/oracle/truffle/nfi/impl/LibFFIFunctionMessageResolution.java
@@ -208,6 +208,14 @@ public TruffleObject access(LibFFIFunction receiver, String identifier, Object[]
         }
     }
 
+    @Resolve(message = "TO_NATIVE")
+    abstract static class ToNativeNode extends Node {
+
+        public NativePointer access(LibFFIFunction receiver) {
+            return receiver.getPointer();
+        }
+    }
+
     @Resolve(message = "KEYS")
     abstract static class LibFFIFunctionKeysNode extends Node {
 

diff --git a/...om.oracle.truffle.nfi/src/com/oracle/truffle/nfi/impl/NativePointerMessageResolution.java b/...om.oracle.truffle.nfi/src/com/oracle/truffle/nfi/impl/NativePointerMessageResolution.java
@@ -72,6 +72,14 @@ public long access(NativePointer receiver) {
         }
     }
 
+    @Resolve(message = "TO_NATIVE")
+    abstract static class ToNativePointerNode extends Node {
+
+        public NativePointer access(NativePointer receiver) {
+            return receiver;
+        }
+    }
+
     @Resolve(message = "UNBOX")
     abstract static class UnboxNativePointerNode extends Node {