summaryrefslogtreecommitdiff
path: root/sv.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2011-05-09 16:53:28 +0100
committerNicholas Clark <nick@ccl4.org>2011-06-11 09:40:02 +0200
commitcffe132d3937f3dc01397f5375d368ad39d53ab7 (patch)
tree91a9c930bb9f5e8f96125265c021f70b645cc99d /sv.h
parent6976cee33e524456a81f646a3fa65f279c6c190d (diff)
downloadperl-cffe132d3937f3dc01397f5375d368ad39d53ab7.tar.gz
Use SvTAIL() instead of BmFLAGS(). The core no longer uses BmFLAGS().
Diffstat (limited to 'sv.h')
-rw-r--r--sv.h4
1 files changed, 3 insertions, 1 deletions
diff --git a/sv.h b/sv.h
index e4e1f7a529..04a45c24fa 100644
--- a/sv.h
+++ b/sv.h
@@ -1295,7 +1295,9 @@ the scalar's value cannot change unless written to.
perl -T -e '/$^X/'
*/
-#define BmFLAGS(sv) (SvTAIL(sv) ? FBMcf_TAIL : 0)
+#ifndef PERL_CORE
+# define BmFLAGS(sv) (SvTAIL(sv) ? FBMcf_TAIL : 0)
+#endif
#if defined (DEBUGGING) && defined(__GNUC__) && !defined(PERL_GCC_BRACE_GROUPS_FORBIDDEN)
# define BmRARE(sv) \