From 645e106053d187334088745aa117a087a43faf03 Mon Sep 17 00:00:00 2001
From: Adam Welc <adam.welc@oracle.com>
Date: Tue, 16 Aug 2016 20:14:32 -0700
Subject: [PATCH] Rewritten parameter casts for compilePKGS builtin.
---
.../oracle/truffle/r/nodes/builtin/base/CompilePKGS.java | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/CompilePKGS.java b/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/CompilePKGS.java
index 6850faf77c..b9c7803a55 100644
--- a/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/CompilePKGS.java
+++ b/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/CompilePKGS.java
@@ -26,6 +26,7 @@ import static com.oracle.truffle.r.runtime.builtins.RBehavior.COMPLEX;
import static com.oracle.truffle.r.runtime.builtins.RBuiltinKind.INTERNAL;
import com.oracle.truffle.api.dsl.Specialization;
+import com.oracle.truffle.r.nodes.builtin.CastBuilder;
import com.oracle.truffle.r.nodes.builtin.RBuiltinNode;
import com.oracle.truffle.r.runtime.builtins.RBuiltin;
@@ -35,6 +36,11 @@ import com.oracle.truffle.r.runtime.builtins.RBuiltin;
@RBuiltin(name = "compilePKGS", kind = INTERNAL, parameterNames = "enable", behavior = COMPLEX)
public abstract class CompilePKGS extends RBuiltinNode {
+ @Override
+ protected void createCasts(CastBuilder casts) {
+ casts.arg("enable").asIntegerVector().findFirst();
+ }
+
@Specialization
protected byte compilePKGS(@SuppressWarnings("unused") int enable) {
return 0;
--
GitLab