also maybe_quote ssavalues and locals (#400)

Author: KristofferC

src/utils.jl

@@ -516,8 +516,8 @@ function eval_code(frame::Frame, expr)
     res = gensym()
     eval_expr = Expr(:let,
                      Expr(:block, map(x->Expr(:(=), x...), [(v.name, maybe_quote(v.value isa Core.Box ? v.value.contents : v.value)) for v in vars])...,
-                     map(x->Expr(:(=), x...), [(Symbol("%$i"), data.ssavalues[i]) for i in defined_ssa])...,
-                     map(x->Expr(:(=), x...), [(Symbol("@_$i"), data.locals[i].value) for i in defined_locals])...),
+                     map(x->Expr(:(=), x...), [(Symbol("%$i"), maybe_quote(data.ssavalues[i])) for i in defined_ssa])...,
+                     map(x->Expr(:(=), x...), [(Symbol("@_$i"), maybe_quote(data.locals[i].value)) for i in defined_locals])...),
         Expr(:block,
             Expr(:(=), res, expr),
             Expr(:tuple, res, Expr(:tuple, [v.name for v in vars]...))

test/eval_code.jl

@@ -84,3 +84,16 @@ if VERSION >= v"1.4" # for var"" syntax
     @test eval_code(frame, "var\"%2\"") == Val(2)
     @test eval_code(frame, "var\"@_1\"") == f
 end
+
+function fun(;output=:sym)
+   x = 5
+   y = 3
+end
+fr = JuliaInterpreter.enter_call(fun)
+fr = JuliaInterpreter.maybe_step_through_wrapper!(fr)
+JuliaInterpreter.step_expr!(fr)
+@test eval_code(fr, "x") == 5
+@test eval_code(fr, "output") == :sym
+eval_code(fr, "output = :foo")
+@test eval_code(fr, "output") == :foo
+