From 71631571f1306c163e52fdc37efb9fc30b79fbf5 Mon Sep 17 00:00:00 2001
From: Jeroen Ooms <jeroenooms@gmail.com>
Date: Thu, 3 Mar 2016 11:48:13 +0100
Subject: [PATCH] Fix for length 0 vectors

---
 R/V8.R | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/R/V8.R b/R/V8.R
index 885f8cb..f39cbe5 100644
--- a/R/V8.R
+++ b/R/V8.R
@@ -114,10 +114,7 @@ v8 <- function(global = "global", console = TRUE, typed_arrays = TRUE) {
   # Public methods
   this <- local({
     eval <- function(src){
-      if(length(src) > 1){
-        src <- join(src)
-      }
-      get_str_output(context_eval(src, private$context));
+      get_str_output(context_eval(join(src), private$context));
     }
     validate <- function(src){
       context_validate(join(src), private$context)