From de4dcbb08d3da59f719d2b54c89555577d367b8f Mon Sep 17 00:00:00 2001
From: Mick Jordan <mick.jordan@oracle.com>
Date: Mon, 18 Aug 2014 11:53:36 -0700
Subject: [PATCH] .Internal arg match workaround
---
.../src/com/oracle/truffle/r/nodes/builtin/base/R/lazyLoad.R | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/R/lazyLoad.R b/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/R/lazyLoad.R
index 12988564d6..542650d647 100644
--- a/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/R/lazyLoad.R
+++ b/com.oracle.truffle.r.nodes.builtin/src/com/oracle/truffle/r/nodes/builtin/base/R/lazyLoad.R
@@ -30,7 +30,8 @@ lazyLoadDBexec <- function(filebase, fun, filter)
## - not that this version is actually used to load base
##
glue <- function (..., sep = " ", collapse = NULL)
- .Internal(paste(list(...), sep, collapse))
+ # argument hack as per standard pase
+ .Internal(paste(list(...), sep = sep, collapse = collapse))
readRDS <- function (file) {
halt <- function (message) .Internal(stop(TRUE, message))
gzfile <- function (description, open)
--
GitLab