nits picked on boot-9.scm
authorAndy Wingo <wingo@pobox.com>
Tue, 2 Sep 2008 06:40:10 +0000 (23:40 -0700)
committerAndy Wingo <wingo@pobox.com>
Tue, 2 Sep 2008 17:30:39 +0000 (10:30 -0700)
* ice-9/boot-9.scm (defmacro): Indentation fix.
  (begin-deprecated): Don't cons in the `begin' macro itself, only the
  symbol `begin'.

ice-9/boot-9.scm

index 138ea16..7f78390 100644 (file)
            (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