handle empty input

JuliaInterop · May 2, 2024 · 61bb39b · 61bb39b
1 parent 1517803
commit 61bb39b
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/eval.jl b/src/eval.jl
@@ -111,7 +111,7 @@ Evaluate an R expression array iteratively. If `throw_error` is `false`,
 the error message and warning will be thrown to stderr.
 """
 function reval_p(expr::Ptr{ExprSxp}, env::Ptr{EnvSxp})
-    local val
+    val = nothing
     protect(expr)
     protect(env)
     try
@@ -122,7 +122,7 @@ function reval_p(expr::Ptr{ExprSxp}, env::Ptr{EnvSxp})
         unprotect(2)
     end
     # set .Last.value
-    if env == Const.GlobalEnv.p
+    if val !== nothing && env == Const.GlobalEnv.p
         set_last_value(val)
     end
     val