summaryrefslogtreecommitdiff
path: root/elisp/geiser-eval.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-02-24 02:18:28 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-02-24 02:18:28 +0100
commit641449ca6073648d5722d1a552d3a5245d523e48 (patch)
tree5cf7ba8f01858b6485648b74c263299e16fa0be0 /elisp/geiser-eval.el
parentabe0355b7eb7961c89ef2e37f68451b131dacb05 (diff)
downloadgeiser-chez-641449ca6073648d5722d1a552d3a5245d523e48.tar.gz
geiser-chez-641449ca6073648d5722d1a552d3a5245d523e48.tar.bz2
Partial support for stack trace display.
Diffstat (limited to 'elisp/geiser-eval.el')
-rw-r--r--elisp/geiser-eval.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/elisp/geiser-eval.el b/elisp/geiser-eval.el
index 785f441..09f12da 100644
--- a/elisp/geiser-eval.el
+++ b/elisp/geiser-eval.el
@@ -125,6 +125,7 @@
(defsubst geiser-eval--retort-result (ret) (cdr (assoc 'result ret)))
(defsubst geiser-eval--retort-output (ret) (cdr (assoc 'output ret)))
(defsubst geiser-eval--retort-error (ret) (cdr (assoc 'error ret)))
+(defsubst geiser-eval--retort-stack (ret) (cdr (assoc 'stack ret)))
(defsubst geiser-eval--error-key (err) (cdr (assoc 'key err)))
(defsubst geiser-eval--error-subr (err) (cdr (assoc 'subr err)))