diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-06-14 22:05:23 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-06-14 22:05:23 +0200 |
| commit | c042571626977f12916d59966ea94ded44d8cf32 (patch) | |
| tree | 8f54059171502730af41d64e95217a510b65bc11 /scheme/guile/geiser/evaluation.scm | |
| parent | ee5412e57af6f22b623cbe772fec2f0af91038d7 (diff) | |
| download | geiser-guile-c042571626977f12916d59966ea94ded44d8cf32.tar.gz geiser-guile-c042571626977f12916d59966ea94ded44d8cf32.tar.bz2 | |
Guile: Bug fix in the latest evaluation code changes.
Diffstat (limited to 'scheme/guile/geiser/evaluation.scm')
| -rw-r--r-- | scheme/guile/geiser/evaluation.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/scheme/guile/geiser/evaluation.scm b/scheme/guile/geiser/evaluation.scm index de08d17..3e38843 100644 --- a/scheme/guile/geiser/evaluation.scm +++ b/scheme/guile/geiser/evaluation.scm @@ -78,10 +78,11 @@ (set-current-module module) (compile form)))) -(define ge:eval ge:compile) (define (ge:compile form module-name) (evaluate form module-name eval-compile)) +(define ge:eval ge:compile) + (define (ge:compile-file path) "Compile a file, given its full @var{path}." (ge:compile `(compile-and-load ,path) '(geiser evaluation))) |