Extension nits found by -Wall (several from threads

[p5sagit/p5-mst-13.2.git] / ext / Unicode / Normalize / Normalize.xs

diff --git a/ext/Unicode/Normalize/Normalize.xs b/ext/Unicode/Normalize/Normalize.xs
index 4d5b0b8..7adad7e 100644 (file)
--- a/ext/Unicode/Normalize/Normalize.xs
+++ b/ext/Unicode/Normalize/Normalize.xs
@@ -153,8 +153,8 @@ decompose(arg, compat)
   PREINIT:
     UV uv;
     SV *src, *dst;
-    STRLEN srclen, dstlen, retlen;
-    U8 *s, *e, *p, *d, *r;
+    STRLEN srclen, retlen;
+    U8 *s, *e, *p, *r;
     bool iscompat;
   CODE:
     if(SvUTF8(arg)) {
@@ -328,7 +328,7 @@ compose(arg)
            }
        }
        d = uvuni_to_utf8(d, uvS); /* starter (composed or not) */
-       if(tmplen = t - tmp_start) { /* uncomposed combining char */
+       if((tmplen = t - tmp_start)) { /* uncomposed combining char */
            t = (U8*)SvPVX(tmp);
            while(tmplen--) *d++ = *t++;
        }