X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=Magic.xs;h=a0953322118835ea81b6b55eafd3fa20cf36431f;hb=e7d06d42b01cc371aabcd4cee7ef786059ed7a1b;hp=3c4cd3347faa74ceab8869d267110c38e91823d5;hpb=8991ed7c69639359044bebf70ffaf8585b885252;p=perl%2Fmodules%2FVariable-Magic.git diff --git a/Magic.xs b/Magic.xs index 3c4cd33..a095332 100644 --- a/Magic.xs +++ b/Magic.xs @@ -406,11 +406,6 @@ typedef struct { START_MY_CXT -/* --- Signatures ---------------------------------------------------------- */ - -#define SIG_WZO ((U16) (0x3891)) -#define SIG_WIZ ((U16) (0x3892)) - /* --- structure ---------------------------------------------- */ #if VMG_THREADSAFE @@ -644,7 +639,7 @@ STATIC SV *vmg_wizard_sv_new(pTHX_ const vmg_wizard *w) { if (w) { MAGIC *mg = sv_magicext(wiz, NULL, PERL_MAGIC_ext, &vmg_wizard_sv_vtbl, (const char *) w, 0); - mg->mg_private = SIG_WZO; + mg->mg_private = 0; #if VMG_THREADSAFE mg->mg_flags |= MGf_DUP; #endif @@ -789,7 +784,7 @@ STATIC UV vmg_cast(pTHX_ SV *sv, const vmg_wizard *w, const SV *wiz, SV **args, mg = sv_magicext(sv, data, PERL_MAGIC_ext, vmg_vtable_vtbl(w->vtable), (const char *) wiz, HEf_SVKEY); SvREFCNT_dec(data); - mg->mg_private = SIG_WIZ; + mg->mg_private = 0; if (w->cb_copy) mg->mg_flags |= MGf_COPY; #if 0