[uim-commit] r2909 - branches/r5rs/sigscheme/src

[yamaken at freedesktop.org]

Author: yamaken
Date: 2006-01-14 05:03:27 -0800 (Sat, 14 Jan 2006)
New Revision: 2909

Modified:
   branches/r5rs/sigscheme/src/syntax.c
Log:
* sigscheme/src/syntax.c
  - (scm_s_cond_internal): Fix an assertion


Modified: branches/r5rs/sigscheme/src/syntax.c
===================================================================
--- branches/r5rs/sigscheme/src/syntax.c	2006-01-14 12:59:56 UTC (rev 2908)
+++ branches/r5rs/sigscheme/src/syntax.c	2006-01-14 13:03:27 UTC (rev 2909)
@@ -549,7 +549,7 @@
             return scm_s_begin(exps, eval_state);
         }
     }
-    NO_MORE_ARG(args);
+    ASSERT_NO_MORE_ARG(args);
 
     /*
      * To distinguish unmatched status from SCM_UNDEF from a clause, pure