summaryrefslogtreecommitdiff
path: root/scheme/guile/geiser/introspection.scm
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/guile/geiser/introspection.scm
parente4c958fe1e5bad829e08dbce31f1a23e458ebd6b (diff)
downloadgeiser-guile-1a9da365fc52aa15300e03bb14aa4af5b9f47c6a.tar.gz
geiser-guile-1a9da365fc52aa15300e03bb14aa4af5b9f47c6a.tar.bz2
README stuff.
Diffstat (limited to 'scheme/guile/geiser/introspection.scm')
-rw-r--r--scheme/guile/geiser/introspection.scm1
1 files changed, 1 insertions, 0 deletions
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)