Changeset 646 for branches/1.3/processor/string.m4

Timestamp:

07/08/2009 06:40:03 AM (4 years ago)

Author:

moo

Message:

merged r645 from trunk

Location:

branches/1.3

Files:

• . (modified) (1 prop)
• processor/string.m4 (modified) (3 diffs)

branches/1.3/processor/string.m4

@@ -21 +21 @@
             STRTYPE, `zstr_char',  `ZSTR_S($1)',
             `',      `',           `$1'))
+    pushdef(`U', ifelse(
+            PTRTYPE, `char',  `',
+            PTRTYPE, `UChar', `u'))
     if (SRCPTR == NULL) {
         IFNOTMEMCPY(`IFCOPY(`
@@ -56 +59 @@
             ')
         ')
-        IFCALC(`xc_calc_string_n(processor, ISTYPE, SRCSTR, $3 IFASSERT(`, __LINE__'));')
-        IFSTORE(`DSTPTR = ifelse(PTRTYPE,`char',`ZSTR_S',`ZSTR_U')(xc_store_string_n(processor, ISTYPE, SRCSTR, $3 IFASSERT(`, __LINE__')));')
+        IFCALC(`xc_calc_string_n(processor, ISTYPE, ZSTR(SRCSTR), $3 IFASSERT(`, __LINE__'));')
+        IFSTORE(`DSTPTR = ifelse(PTRTYPE,`char',`ZSTR_S',`ZSTR_U')(xc_store_string_n(processor, ISTYPE, ZSTR(SRCSTR), $3 IFASSERT(`, __LINE__')));')
         IFRESTORE(`
-            ALLOC(DSTPTR, `STRTYPE', `($3)')
-            memcpy(DSTPTR, SRCPTR, sizeof(STRTYPE) * ($3));
+            DSTPTR = e`'U`'strndup(SRCPTR, ($3) - 1);
         ')
         FIXPOINTER_EX(`PTRTYPE', DSTPTR)
@@ -75 +77 @@
         ')
     }
+    popdef(`U')
     popdef(`DSTPTR')
     popdef(`SRCPTR')