diff options
-rw-r--r-- | ice-9/ChangeLog | 5 | ||||
-rw-r--r-- | ice-9/boot-9.scm | 6 |
2 files changed, 8 insertions, 3 deletions
diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog index dda96bfc8..b68f9bea0 100644 --- a/ice-9/ChangeLog +++ b/ice-9/ChangeLog @@ -1,6 +1,11 @@ 2002-11-16 Dirk Herrmann <D.Herrmann@tu-bs.de> * boot-9.scm (define-private, export-syntax, export-syntax): + Fixed my previous fix (blush). + +2002-11-16 Dirk Herrmann <D.Herrmann@tu-bs.de> + + * boot-9.scm (define-private, export-syntax, export-syntax): Changed definitions to form 'real' macro definitions. 2002-11-07 Marius Vollmer <marius.vollmer@uni-dortmund.de> diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm index 629617890..f470020cf 100644 --- a/ice-9/boot-9.scm +++ b/ice-9/boot-9.scm @@ -2592,7 +2592,7 @@ (error "use-syntax can only be used at the top level")))) (defmacro define-private args - `(define ,args)) + `(define ,@args)) (defmacro define-public args (define (syntax) @@ -2668,10 +2668,10 @@ (error "re-export can only be used at the top level")))) (defmacro export-syntax names - `(export ,names)) + `(export ,@names)) (defmacro export-syntax names - `(export ,names)) + `(export ,@names)) (define load load-module) |