@@ -619,7 +619,6 @@ function eval_code end
619
619
620
620
eval_code (frame:: Frame , command:: AbstractString ) = eval_code (frame, Base. parse_input_line (command))
621
621
function eval_code (frame:: Frame , expr)
622
- maybe_quote (x) = (isa (x, Expr) || isa (x, Symbol)) ? QuoteNode (x) : x
623
622
code = frame. framecode
624
623
data = frame. framedata
625
624
isexpr (expr, :toplevel ) && (expr = expr. args[end ])
@@ -633,9 +632,9 @@ function eval_code(frame::Frame, expr)
633
632
defined_locals = findall (x -> x isa Some, data. locals)
634
633
res = gensym ()
635
634
eval_expr = Expr (:let ,
636
- Expr (:block , map (x-> Expr (:(= ), x... ), [(v. name, maybe_quote (v. value isa Core. Box ? v. value. contents : v. value)) for v in vars])... ,
637
- map (x-> Expr (:(= ), x... ), [(Symbol (" %$i " ), maybe_quote (data. ssavalues[i])) for i in defined_ssa])... ,
638
- map (x-> Expr (:(= ), x... ), [(Symbol (" @_$i " ), maybe_quote (data. locals[i]. value)) for i in defined_locals])... ),
635
+ Expr (:block , map (x-> Expr (:(= ), x... ), [(v. name, QuoteNode (v. value isa Core. Box ? v. value. contents : v. value)) for v in vars])... ,
636
+ map (x-> Expr (:(= ), x... ), [(Symbol (" %$i " ), QuoteNode (data. ssavalues[i])) for i in defined_ssa])... ,
637
+ map (x-> Expr (:(= ), x... ), [(Symbol (" @_$i " ), QuoteNode (data. locals[i]. value)) for i in defined_locals])... ),
639
638
Expr (:block ,
640
639
Expr (:(= ), res, expr),
641
640
Expr (:tuple , res, Expr (:tuple , [v. name for v in vars]. .. ))
0 commit comments