Merge branch 'master' of ssh://git.sv.gnu.org/srv/git/mit-scheme

diff --cc src/runtime/mit-macros.scm
index 76efa17e275bab488d672631826d1228f360e75b,9bc9c5f5c1825066615113cec6f45a3f2aa2f56b..5c29dd57e9b90d0495d683cc26d2c48fa5a16eb9
--- 1/src/runtime/mit-macros.scm
--- 2/src/runtime/mit-macros.scm
+++ b/src/runtime/mit-macros.scm
@@@ -600,10 -600,4 +600,10 @@@ USA
      ((BEGIN0 form0 form1+ ...)
       (LET ((RESULT form0))
         form1+ ...
 -       RESULT))))
 +       RESULT))))
 +
 +(define-syntax :assert
 +  (syntax-rules ()
 +    ((ASSERT condition)
 +     (IF (NOT condition)
-          (ERROR "Assertion failed:" 'condition)))))
++         (ERROR "Assertion failed:" 'condition)))))