* ice-9/boot-9.scm (defmacro): Indentation fix.
(begin-deprecated): Don't cons in the `begin' macro itself, only the
symbol `begin'.
(let ((transformer `(lambda ,parms ,@body)))
`(eval-case
((load-toplevel compile-toplevel)
- (define ,name (defmacro:transformer ,transformer)))
+ (define ,name (defmacro:transformer ,transformer)))
(else
(error "defmacro can only be used at the top level")))))))
(defmacro:transformer defmacro-transformer)))
(defmacro begin-deprecated forms
(if (include-deprecated-features)
- (cons begin forms)
- #f))
+ `(begin ,@forms)
+ (begin)))
\f