[svn:parrot] r45631 - trunk/src/string

[darbelo at svn.parrot.org]

Author: darbelo
Date: Tue Apr 13 14:36:14 2010
New Revision: 45631
URL: https://trac.parrot.org/parrot/changeset/45631

Log:
Quiet a warning.

Modified:
   trunk/src/string/api.c

Modified: trunk/src/string/api.c
==============================================================================
--- trunk/src/string/api.c	Tue Apr 13 11:54:35 2010	(r45630)
+++ trunk/src/string/api.c	Tue Apr 13 14:36:14 2010	(r45631)
@@ -1452,7 +1452,7 @@
         mem_sys_memcopy((char *)src->strstart + start_byte, rep->strstart,
                 rep->bufused);
         src->bufused += diff;
-        (void)Parrot_str_length(interp, src);
+        src->strlen = CHARSET_CODEPOINTS(interp, src);
     }
 
     /* src is modified, now return the original substring */