Rename UTF8LEN() to be UNISKIP(), too confusing to have

UTF8LEN() and UTF8SKIP().

p4raw-id: //depot/perl@7437

1 files changed, 1 insertions, 1 deletions

diff --git a/pp.c b/pp.c
index 03f35eb43c..73b6a121f9 100644
--- a/pp.c
+++ b/pp.c
@@ -1486,7 +1486,7 @@ PP(pp_complement)
 	  while (tmps < send) {
 	    UV c = utf8_to_uv(tmps, &l);
 	    tmps += UTF8SKIP(tmps);
-	    targlen += UTF8LEN(~c);
+	    targlen += UNISKIP(~c);
 	  }
 
 	  /* Now rewind strings and write them. */