summaryrefslogtreecommitdiff
path: root/geiser
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-02-11 12:45:22 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-02-11 12:45:22 +0100
commit475fab304e55e50b159b26ac4cf68a66cfceb5ff (patch)
tree96ac317c1c4dba7f49d9686d725c4c9fcecba47f /geiser
parent3fa6b3439221e14881d17fe6b1f3b280a7da2862 (diff)
downloadgeiser-guile-475fab304e55e50b159b26ac4cf68a66cfceb5ff.tar.gz
geiser-guile-475fab304e55e50b159b26ac4cf68a66cfceb5ff.tar.bz2
README stuff.
Diffstat (limited to 'geiser')
-rw-r--r--geiser/emacs.scm1
-rw-r--r--geiser/introspection.scm1
2 files changed, 1 insertions, 1 deletions
diff --git a/geiser/emacs.scm b/geiser/emacs.scm
index 38ddc7c..8f0fffd 100644
--- a/geiser/emacs.scm
+++ b/geiser/emacs.scm
@@ -35,5 +35,4 @@
:select ((comp-file . ge:compile-file)
(load-file . ge:load-file))))
-
;;; emacs.scm ends here
diff --git a/geiser/introspection.scm b/geiser/introspection.scm
index 4565464..eb5dc6c 100644
--- a/geiser/introspection.scm
+++ b/geiser/introspection.scm
@@ -61,6 +61,7 @@
(and (not (null? env)) env))))
(define (macro-args macro)
+ ;; check if return value is a procedure
(let ((prog (macro-transformer macro)))
(if prog
(program-args prog)