diff options
Diffstat (limited to 'scheme/guile/geiser/evaluation.scm')
| -rw-r--r-- | scheme/guile/geiser/evaluation.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/scheme/guile/geiser/evaluation.scm b/scheme/guile/geiser/evaluation.scm index cd8a6f7..22817ea 100644 --- a/scheme/guile/geiser/evaluation.scm +++ b/scheme/guile/geiser/evaluation.scm @@ -43,6 +43,7 @@ (define (ge:compile form module-name) (let* ((module (or (find-module module-name) (current-module))) (result #f) + (form `(start-stack 'geiser-evaluation-stack ,form)) (ev (lambda () (set! result (call-with-values (lambda () (compile form #:env module)) |