diff options
| author | Nicholas Clark <nick@ccl4.org> | 2006-03-07 23:24:55 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2006-03-07 23:24:55 +0000 |
| commit | 598921a7d8d43baa942b750d26a55dadca2c13d5 (patch) | |
| tree | 504e1749f653a90dd2ac976c96b0689ef6336e85 /XSUB.h | |
| parent | a724edfe531a4a4cce2d4bbb94e1f583d86bc9a3 (diff) | |
| download | perl-598921a7d8d43baa942b750d26a55dadca2c13d5.tar.gz | |
Some of the MAD structures in headers, plus PL_madskills and PL_xmlfp,
and default definitions for the 2 variables. (Which will save a lot of
conditional complilation, by instead letting the C compiler optimiser
remove dead code.)
p4raw-id: //depot/perl@27408
Diffstat (limited to 'XSUB.h')
| -rw-r--r-- | XSUB.h | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -398,6 +398,12 @@ Rethrows a previously caught exception. See L<perlguts/"Exception Handling">. #endif #include "perlapi.h" +#ifndef PERL_MAD +# undef PL_madskills +# undef PL_xmlfp +# define PL_madskills 0 +# define PL_xmlfp 0 +#endif #if defined(PERL_IMPLICIT_CONTEXT) && !defined(PERL_NO_GET_CONTEXT) && !defined(PERL_CORE) # undef aTHX |