summaryrefslogtreecommitdiff
path: root/sv.h
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2016-11-12 11:21:43 +0000
committerDavid Mitchell <davem@iabyn.com>2016-11-12 16:15:09 +0000
commite08d24ff56cda24d8146e29d00376eb23eedbd7e (patch)
tree21f1d566bdccb1130f744bdc1c4e4b2699c05a88 /sv.h
parente068d7ce00d1fee2864b3a347fc5eb1f6bfd6250 (diff)
downloadperl-e08d24ff56cda24d8146e29d00376eb23eedbd7e.tar.gz
Only test SvTAIL when SvVALID
Only use the SvTAIL() macro when we've already confirmed that the SV is SvVALID() - this is in preparation for removing the SVpbm_TAIL flag in the next commit
Diffstat (limited to 'sv.h')
-rw-r--r--sv.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/sv.h b/sv.h
index c33a9a4c11..e2cf10e373 100644
--- a/sv.h
+++ b/sv.h
@@ -1140,6 +1140,7 @@ object type. Exposed to perl code via Internals::SvREADONLY().
assert(SvTYPE(_svtail) != SVt_PVAV); \
assert(SvTYPE(_svtail) != SVt_PVHV); \
assert(!SvSCREAM(_svtail)); \
+ assert((SvFLAGS(sv) & SVpbm_VALID)); \
(SvFLAGS(sv) & (SVpbm_TAIL|SVpbm_VALID)) \
== (SVpbm_TAIL|SVpbm_VALID); \
})