From c042571626977f12916d59966ea94ded44d8cf32 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sun, 14 Jun 2009 22:05:23 +0200 Subject: Guile: Bug fix in the latest evaluation code changes. --- scheme/guile/geiser/evaluation.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'scheme/guile/geiser') 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))) -- cgit v1.2.3