Changeset 600

Timestamp:

09/02/09 19:08:48 (4 years ago)

Author:

rjuengling

Message:

handle format character 'c' in printf (tentative solution)

Files:

• lush2/src/io.c (modified) (3 diffs)

lush2/src/io.c

@@ -1053 +1053 @@
 
 /*
- * printf C'printf interface. format: %{-}{n}{.{m}}{d|s|f|e|g|l|p}  ( l for
+ * printf C'printf interface. format: %{-}{n}{.{m}}{c|d|s|f|e|g|l|p}  ( l for
  * list, p for pretty ) or   : %%
  */
@@ -1112 +1112 @@
             break;
          case 'd':
+         case 'c':
          case 's':
             if (ok >= 5)
@@ -1166 +1167 @@
          }
 
+      } else if (c == 'c') {
+         *buf++ = 0;
+         if (ok == 9) {
+            print_char((char)AINTEGER(i));
+         } else if (n > print_buffer + LINE_BUFFER - buf - 1) {
+            goto err_printf0;
+         } else {
+            sprintf(buf, print_buffer, (char)AINTEGER(i));
+            print_string(buf);
+         }
+
       } else if (c == 'd') {
          *buf++ = 0;