Changeset 2152 in kBuild

Timestamp:

Dec 28, 2008 1:43:22 PM (16 years ago)

Author:

bird

Message:

kmk: testcases and lastpos fixes.

Location:

trunk/src/kmk

Files:

• function.c (modified) (3 diffs)
• tests/scripts/functions/insert (added)
• tests/scripts/functions/lastpos (added)
• tests/scripts/functions/length (added)
• tests/scripts/functions/length-var (added)
• tests/scripts/functions/pos (added)
• tests/scripts/functions/printf (added)

trunk/src/kmk/function.c

@@ -2406 +2406 @@
         return math_int_to_variable_buffer (o, 0);
     }
+  else if (funcname[0] == 'l')
+    start = haystack_len - 1;
 
   /* do the searching */
@@ -2546 +2548 @@
 func_translate (char *o, char **argv, const char *funcname UNUSED)
 {
-  const unsigned char *str     = argv[0];
-  const unsigned char *new_set = argv[1];
-  const char          *old_set = argv[2];
+  const unsigned char *str     = (const unsigned char *)argv[0];
+  const unsigned char *new_set = (const unsigned char *)argv[1];
+  const char          *old_set = argv[2] != NULL ? argv[2] : "";
   char                 trans_tab[1 << CHAR_BIT];
   int                  i;
@@ -4887 +4889 @@
   { STRING_SIZE_TUPLE("length"),        1,  1,  1,  func_length},
   { STRING_SIZE_TUPLE("length-var"),    1,  1,  1,  func_length_var},
-  { STRING_SIZE_TUPLE("insert"),        3,  3,  1,  func_insert},
+  { STRING_SIZE_TUPLE("insert"),        2,  5,  1,  func_insert},
   { STRING_SIZE_TUPLE("pos"),           2,  3,  1,  func_pos},
   { STRING_SIZE_TUPLE("lastpos"),       2,  3,  1,  func_pos},