diff options
| author | Nicholas Clark <nick@ccl4.org> | 2005-01-19 21:22:30 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-01-19 21:22:30 +0000 |
| commit | 77c9267e79d87625158fdecaa27a5ce308c517ba (patch) | |
| tree | 49893fb8fd0d71274ae17291086c58321a95fd6c /xsutils.c | |
| parent | 014ead4bccac5462b3a10654493980250e84b1d4 (diff) | |
| download | perl-77c9267e79d87625158fdecaa27a5ce308c517ba.tar.gz | |
Make "assertion" attribute code and test conditional
p4raw-id: //depot/perl@23827
Diffstat (limited to 'xsutils.c')
| -rw-r--r-- | xsutils.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -71,6 +71,7 @@ modify_SV_attributes(pTHX_ SV *sv, SV **retlist, SV **attrlist, int numattrs) switch (SvTYPE(sv)) { case SVt_PVCV: switch ((int)len) { +#ifdef CVf_ASSERTION case 9: if (memEQ(name, "assertion", 9)) { if (negated) @@ -80,6 +81,7 @@ modify_SV_attributes(pTHX_ SV *sv, SV **retlist, SV **attrlist, int numattrs) continue; } break; +#endif case 6: switch (name[3]) { case 'l': |