branch: elpa/geiser-guile
commit 7b0d68b3f82f7595b6c753702d2e3858bbb3833d
Author: Jose Antonio Ortega Ruiz <[email protected]>
Commit: Jose Antonio Ortega Ruiz <[email protected]>

    Guile: better stack traces (using start-stack to delimit them).
---
 geiser/evaluation.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/geiser/evaluation.scm b/geiser/evaluation.scm
index cd8a6f7..22817ea 100644
--- a/geiser/evaluation.scm
+++ b/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))

Reply via email to