Changeset 1805 for trunk/src/kmk/function.c

Timestamp:

Oct 9, 2008, 6:12:33 AM (17 years ago)

Author:

bird

Message:

kmk: Some minor optimizations.

File:

• trunk/src/kmk/function.c (modified) (5 diffs)

trunk/src/kmk/function.c

@@ -931 +931 @@
   char *list = expand_argument (argv[1], NULL);
   const char *body = argv[2];
+#ifdef KMK
+  long body_len = strlen (body);
+#endif /* KMK - optimization */
 
   int doneany = 0;
@@ -944 +947 @@
   while ((p = find_next_token (&list_iterator, &len)) != 0)
     {
+#ifndef KMK
       char *result = 0;
+#endif /* KMK - optimization */
 #ifdef CONFIG_WITH_VALUE_LENGTH
       if (len >= (unsigned int)var->value_alloc_len)
@@ -960 +965 @@
 #endif
 
+#ifndef KMK
       result = allocated_variable_expand (body);
 
@@ -966 +972 @@
       doneany = 1;
       free (result);
+#else  /* KMK - optimization */
+      variable_expand_string_2 (o, body, body_len, &o);
+      o = variable_buffer_output (o, " ", 1);
+      doneany = 1;
+#endif /* KMK - optimization */
     }
 
@@ -4303 +4314 @@
 
       v->exp_count = EXP_COUNT_MAX;
+#ifndef KMK
       o = variable_expand_string (o, body, flen+3);
       v->exp_count = 0;
 
       o += strlen (o);
+#else  /* KMK - optimization */
+      variable_expand_string_2 (o, body, flen+3, &o);
+      v->exp_count = 0;
+#endif /* KMK - optimization */
 #ifdef CONFIG_WITH_EVALPLUS
     }