From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 15 Mar 2006 17:21:00 +0000 (+0000)
Subject: Expunge references to HV_AMAGIC, HV_AMAGICbad and HV_AMAGICmb which
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=41e2f52e2c98325f9d16f0944409e49306c8037b;p=p5sagit%2Fp5-mst-13.2.git

Expunge references to HV_AMAGIC, HV_AMAGICbad and HV_AMAGICmb which
have been unused since revision 1.

p4raw-id: //depot/perl@27507
---

diff --git a/hv.h b/hv.h
index 79035e2..efba2b9 100644
--- a/hv.h
+++ b/hv.h
@@ -283,19 +283,6 @@ C<SV*>.
 #define HvREHASH_on(hv)		(SvFLAGS(hv) |= SVphv_REHASH)
 #define HvREHASH_off(hv)	(SvFLAGS(hv) &= ~SVphv_REHASH)
 
-/* Maybe amagical: */
-/* #define HV_AMAGICmb(hv)      (SvFLAGS(hv) & (SVpgv_badAM | SVpgv_AM)) */
-
-#define HV_AMAGIC(hv)        (SvFLAGS(hv) &   SVpgv_AM)
-#define HV_AMAGIC_on(hv)     (SvFLAGS(hv) |=  SVpgv_AM)
-#define HV_AMAGIC_off(hv)    (SvFLAGS(hv) &= ~SVpgv_AM)
-
-/*
-#define HV_AMAGICbad(hv)     (SvFLAGS(hv) & SVpgv_badAM)
-#define HV_badAMAGIC_on(hv)  (SvFLAGS(hv) |= SVpgv_badAM)
-#define HV_badAMAGIC_off(hv) (SvFLAGS(hv) &= ~SVpgv_badAM)
-*/
-
 #define Nullhe Null(HE*)
 #define HeNEXT(he)		(he)->hent_next
 #define HeKEY_hek(he)		(he)->hent_hek
diff --git a/sv.h b/sv.h
index f2f2fea..73ed715 100644
--- a/sv.h
+++ b/sv.h
@@ -993,11 +993,6 @@ in gv.h: */
 
 #define SvGAMAGIC(sv)           (SvGMAGICAL(sv) || SvAMAGIC(sv))
 
-/*
-#define Gv_AMG(stash) \
-        (HV_AMAGICmb(stash) && \
-         ((!HV_AMAGICbad(stash) && HV_AMAGIC(stash)) || Gv_AMupdate(stash)))
-*/
 #define Gv_AMG(stash)           (PL_amagic_generation && Gv_AMupdate(stash))
 
 #define SvWEAKREF(sv)		((SvFLAGS(sv) & (SVf_ROK|SVprv_WEAKREF)) \