X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=sv.h;h=cf2f6562bb67ed692768ac29b828b30e7e1a8f5c;hb=a922f900a6916d70770b1348cbacd5ea3df02a9f;hp=73ed7154cb1c93daabbd19339838e2ef3cbfd0c3;hpb=41e2f52e2c98325f9d16f0944409e49306c8037b;p=p5sagit%2Fp5-mst-13.2.git diff --git a/sv.h b/sv.h index 73ed715..cf2f656 100644 --- a/sv.h +++ b/sv.h @@ -988,7 +988,8 @@ in gv.h: */ }) #else # define SvAMAGIC_on(sv) (SvFLAGS(SvRV(sv)) |= SVf_AMAGIC) -# define SvAMAGIC_off(sv) (SvROK(sv) && SvFLAGS(SvRV(sv)) &= ~SVf_AMAGIC) +# define SvAMAGIC_off(sv) \ + (SvROK(sv) && (SvFLAGS(SvRV(sv)) &= ~SVf_AMAGIC)) #endif #define SvGAMAGIC(sv) (SvGMAGICAL(sv) || SvAMAGIC(sv))