summaryrefslogtreecommitdiff
path: root/scheme
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
commit1a9da365fc52aa15300e03bb14aa4af5b9f47c6a (patch)
tree02159eb6132ba25e6b202a4d1613cebacfba6cf5 /scheme
parente4c958fe1e5bad829e08dbce31f1a23e458ebd6b (diff)
downloadgeiser-chez-1a9da365fc52aa15300e03bb14aa4af5b9f47c6a.tar.gz
geiser-chez-1a9da365fc52aa15300e03bb14aa4af5b9f47c6a.tar.bz2
README stuff.
Diffstat (limited to 'scheme')
-rw-r--r--scheme/guile/geiser/emacs.scm1
-rw-r--r--scheme/guile/geiser/introspection.scm1
2 files changed, 1 insertions, 1 deletions
diff --git a/scheme/guile/geiser/emacs.scm b/scheme/guile/geiser/emacs.scm
index 38ddc7c..8f0fffd 100644
--- a/scheme/guile/geiser/emacs.scm
+++ b/scheme/guile/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/scheme/guile/geiser/introspection.scm b/scheme/guile/geiser/introspection.scm
index 4565464..eb5dc6c 100644
--- a/scheme/guile/geiser/introspection.scm
+++ b/scheme/guile/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)