summaryrefslogtreecommitdiff
path: root/sv.h
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-08-05 00:48:00 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-08-05 13:18:58 -0700
commitbb02a38febc60a289c616282d720015be97842a4 (patch)
treec4815a82ac0e870532c5d44f70f4a6fb04c9c0bd /sv.h
parentdea823b3f7c22fea989211dbe1bed7a34d49e39a (diff)
downloadperl-bb02a38febc60a289c616282d720015be97842a4.tar.gz
Add a depth field to formats
Instead of lengthening the struct, we can reuse SvCUR, which is cur- rently unused.
Diffstat (limited to 'sv.h')
-rw-r--r--sv.h7
1 files changed, 6 insertions, 1 deletions
diff --git a/sv.h b/sv.h
index b2385d0a6d..4c9bc55e92 100644
--- a/sv.h
+++ b/sv.h
@@ -415,9 +415,14 @@ perform the upgrade if necessary. See C<svtype>.
#define _XPV_HEAD \
HV* xmg_stash; /* class package */ \
union _xmgu xmg_u; \
- STRLEN xpv_cur; /* length of svu_pv as a C string */ \
+ union { \
+ STRLEN xpvcuru_cur; /* length of svu_pv as a C string */ \
+ I32 xpvcuru_fmdepth; \
+ } xpv_cur_u; \
STRLEN xpv_len /* allocated size */
+#define xpv_cur xpv_cur_u.xpvcuru_cur
+
union _xnvu {
NV xnv_nv; /* numeric value, if any */
HV * xgv_stash;