diff options
author | Father Chrysostomos <sprout@cpan.org> | 2012-08-05 00:48:00 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2012-08-05 13:18:58 -0700 |
commit | bb02a38febc60a289c616282d720015be97842a4 (patch) | |
tree | c4815a82ac0e870532c5d44f70f4a6fb04c9c0bd /sv.h | |
parent | dea823b3f7c22fea989211dbe1bed7a34d49e39a (diff) | |
download | perl-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.h | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -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; |