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

[yamaken at freedesktop.org]

Author: yamaken
Date: 2006-03-05 06:45:31 -0800 (Sun, 05 Mar 2006)
New Revision: 3160

Modified:
   branches/r5rs/sigscheme/src/format.c
Log:
* sigscheme/src/format.c
  - (format_raw_c_directive): Optimize


Modified: branches/r5rs/sigscheme/src/format.c
===================================================================
--- branches/r5rs/sigscheme/src/format.c	2006-03-03 18:40:51 UTC (rev 3159)
+++ branches/r5rs/sigscheme/src/format.c	2006-03-05 14:45:31 UTC (rev 3160)
@@ -289,17 +289,17 @@
         return scm_true;
     }
 
-    /* size modifiers */
+    /* size modifiers (ordered by size) */
     modifiedp = scm_true;
     switch (c) {
+    case 'W': /* int32_t */
+        n = va_arg(*args, uint32_t);
+        break;
+
     case 'M': /* scm_int_t */
         n = va_arg(*args, scm_uint_t);
         break;
 
-    case 'W': /* int32_t */
-        n = va_arg(*args, uint32_t);
-        break;
-
     case 'L': /* long */
         n = va_arg(*args, unsigned long);
         break;