Remove two unused variables

diff --git a/Magic.xs b/Magic.xs
index 6c5b61672c7f74af71b52f5adcc44cdd766bcaea..e25d8d1566ed92cd1aa79a2a212206d5fbeb9445 100644 (file)
--- a/Magic.xs
+++ b/Magic.xs
@@ -874,7 +874,6 @@ CLONE(...)
 PROTOTYPE: DISABLE
 PREINIT:
  HV *hv;
- U16 count;
 CODE:
 #if VMG_THREADSAFE
  {
@@ -888,7 +887,6 @@ CODE:
    char *sig = HePV(key, len);
    SV *sv;
    MAGIC *mg;
-   MGWIZ *w;
    sv = MGWIZ2SV(vmg_wizard_clone(SV2MGWIZ(HeVAL(key))));
    mg = sv_magicext(sv, NULL, PERL_MAGIC_ext, &vmg_wizard_vtbl, NULL, 0);
    mg->mg_private = SIG_WIZ;