andrius
/
mes
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

psyntax: Add missing (interaction-environment) to eval. 

* module/mes/psyntax.mes: Add (interaction-environment) to eval.
This commit is contained in:
Jan Nieuwenhuizen 2016-10-30 15:46:54 +01:00
parent 0a38c3bdf9
commit f6baa9ce98
1 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
module/mes/psyntax.mes
View File

@ -3973,8 +3973,16 @@
(g47 (lambda (g589 g588) (putprop g589 '*sc-expander* g588)))
(g46 (lambda (g584 g582 g583)
(error g584 '"~a ~s" g582 g583)))
(g45 (lambda (g587) (eval (list g38 g587))))
(g44 (lambda (g585) (eval (list g38 g585))))
(g45 (lambda (g587)
(display "EVAL! e=")
(display g38)
(newline)
(eval (list g38 g587) (interaction-environment))))
(g44 (lambda (g585)
(display "EVAL! e=")
(display g38)
(newline)
(eval (list g38 g585) (interaction-environment))))
(g43 (lambda (g586) '#f))
(g42 <)
(g41 =)