remove more unused variable warnings
authorTony Cook <tony@develop-help.com>
Mon, 13 Aug 2012 00:37:32 +0000 (10:37 +1000)
committerTony Cook <tony@develop-help.com>
Tue, 14 Aug 2012 09:58:19 +0000 (19:58 +1000)
Imager.xs

index 8d680e9..13b5353 100644 (file)
--- a/Imager.xs
+++ b/Imager.xs
@@ -4062,6 +4062,7 @@ im_context_DESTROY(ctx)
 void
 im_context_CLONE(...)
     CODE:
+      (void)items;
       MY_CXT_CLONE;
       /* the following sv_setref_pv() will free this inc */
       im_context_refinc(MY_CXT.ctx, "CLONE");
@@ -4073,6 +4074,9 @@ im_context_CLONE(...)
 BOOT:
         PERL_SET_GLOBAL_CALLBACKS;
        PERL_PL_SET_GLOBAL_CALLBACKS;
-        MY_CXT_INIT;
+       {
+          MY_CXT_INIT;
+         (void)MY_CXT;
+       }
        start_context(aTHX);
        im_get_context = perl_get_context;