diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-11 12:45:22 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-11 12:45:22 +0100 |
| commit | 1a9da365fc52aa15300e03bb14aa4af5b9f47c6a (patch) | |
| tree | 02159eb6132ba25e6b202a4d1613cebacfba6cf5 | |
| parent | e4c958fe1e5bad829e08dbce31f1a23e458ebd6b (diff) | |
| download | geiser-guile-1a9da365fc52aa15300e03bb14aa4af5b9f47c6a.tar.gz geiser-guile-1a9da365fc52aa15300e03bb14aa4af5b9f47c6a.tar.bz2 | |
README stuff.
| -rw-r--r-- | .gitignore | 1 | ||||
| -rw-r--r-- | README | 11 | ||||
| -rw-r--r-- | elisp/geiser-compile.el | 2 | ||||
| -rw-r--r-- | scheme/guile/geiser/emacs.scm | 1 | ||||
| -rw-r--r-- | scheme/guile/geiser/introspection.scm | 1 |
5 files changed, 14 insertions, 2 deletions
@@ -1,2 +1,3 @@ /scheme/guile/geiser/emacs.go /scheme/guile/geiser/eval.go +/scheme/guile/geiser/introspection.go @@ -0,0 +1,11 @@ + +* Install + + - In your .emacs: + + (load-file "<path-to-geiser>/elisp/geiser.el") + (geiser-setup) + + - Check the geiser customization group for some options. In + particular, geiser-repl-guile-binary, which should point to a + guile-vm executable. diff --git a/elisp/geiser-compile.el b/elisp/geiser-compile.el index a7a7daf..5bac3c0 100644 --- a/elisp/geiser-compile.el +++ b/elisp/geiser-compile.el @@ -79,7 +79,7 @@ msg (geiser-eval--send/wait `(:gs ((:ge ,op) ,path)))))) -;;; User commands:: +;;; User commands: (defun geiser-compile-file (path) "Compile and load Scheme file." 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) |