[nongnu] elpa/geiser-guile 6baa7d3 124/284: Guile: better stack trace limits during evaluation.

[Philip Kaludercic]

branch: elpa/geiser-guile
commit 6baa7d3e9534f70e77ee7091f54878d7fa76fa93
Author: Jose Antonio Ortega Ruiz <jao@gnu.org>
Commit: Jose Antonio Ortega Ruiz <jao@gnu.org>

    Guile: better stack trace limits during evaluation.
---
 geiser/evaluation.scm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/geiser/evaluation.scm b/geiser/evaluation.scm
index cd4d6a4..6090210 100644
--- a/geiser/evaluation.scm
+++ b/geiser/evaluation.scm
@@ -45,9 +45,8 @@
          (ev (lambda ()
                (set! result (call-with-values
                                 (lambda ()
-                                  (compile (start-stack
-                                            'geiser-evaluation-stack form)
-                                           #:env module))
+                                  (start-stack 'geiser-evaluation-stack
+                                               (compile form #:env module)))
                               (lambda vs (map object->string vs)))))))
     (let ((output (with-output-to-string ev)))
       (write `(,(cons 'result result) (output . ,output)))