Unused variable.

p4raw-id: //depot/perl@19787

diff --git a/universal.c b/universal.c
index 0fe94d2..da41eb9 100644 (file)
--- a/universal.c
+++ b/universal.c
@@ -536,7 +536,6 @@ XS(XS_utf8_is_utf8)
     {
        SV *    sv = ST(0);
  {
-  STRLEN len;
   if (SvUTF8(sv))
    XSRETURN_YES;
   else