comparison src/if_perl.xs @ 1395:c845dcf7fafa v7.1.110

updated for version 7.1-110
author vimboss
date Sat, 15 Sep 2007 12:49:35 +0000
parents 35f3b20de2dd
children 01a0da54773e
comparison
equal deleted inserted replaced
1394:1002128c68db 1395:c845dcf7fafa
46 * contains many of the changes from the upcoming Perl 5.8.9 release. 46 * contains many of the changes from the upcoming Perl 5.8.9 release.
47 * 47 *
48 * The changes include addition of two symbols (Perl_sv_2iv_flags, 48 * The changes include addition of two symbols (Perl_sv_2iv_flags,
49 * Perl_newXS_flags) not present in earlier releases. 49 * Perl_newXS_flags) not present in earlier releases.
50 * 50 *
51 * Jan Dubois suggested the following guarding scheme: 51 * Jan Dubois suggested the following guarding scheme.
52 */ 52 *
53 #if (ACTIVEPERL_VERSION >= 822) 53 * Active State defined ACTIVEPERL_VERSION as a string in versions before
54 # define PERL589_OR_LATER 54 * 5.8.8; and so the comparison to 822 below needs to be guarded.
55 #endif 55 */
56 #if (PERL_REVISION == 5) && (PERL_VERSION == 8) && (PERL_SUBVERSION >= 9) 56 #if (PERL_REVISION == 5) && (PERL_VERSION == 8) && (PERL_SUBVERSION >= 8)
57 # define PERL589_OR_LATER 57 # if (ACTIVEPERL_VERSION >= 822) || (PERL_SUBVERSION >= 9)
58 # define PERL589_OR_LATER
59 # endif
58 #endif 60 #endif
59 #if (PERL_REVISION == 5) && (PERL_VERSION >= 9) 61 #if (PERL_REVISION == 5) && (PERL_VERSION >= 9)
60 # define PERL589_OR_LATER 62 # define PERL589_OR_LATER
61 #endif 63 #endif
62 64