[svn:parrot] r19112 - branches/awaiting-0.4.13/src/encodings

[petdance]

Author: petdance
Date: Mon Jun 18 22:20:57 2007
New Revision: 19112

Modified:
   branches/awaiting-0.4.13/src/encodings/utf8.c

Log:
Added a const so we're not casting it away

Modified: branches/awaiting-0.4.13/src/encodings/utf8.c
==============================================================================
--- branches/awaiting-0.4.13/src/encodings/utf8.c       (original)
+++ branches/awaiting-0.4.13/src/encodings/utf8.c       Mon Jun 18 22:20:57 2007
@@ -349,7 +349,7 @@
 static UINTVAL
 get_codepoint(Interp *interp, const STRING *src, UINTVAL offset)
 {
-    const utf8_t * const start = (utf8_t *)utf8_skip_forward(src->strstart, 
offset);
+    const utf8_t * const start = (const utf8_t 
*)utf8_skip_forward(src->strstart, offset);
     return utf8_decode(start);
 }