diff options
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/Devel/PPPort/PPPort.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/Devel/PPPort/PPPort.pm b/ext/Devel/PPPort/PPPort.pm index 102cb4ee75..d9e6ccce9d 100644 --- a/ext/Devel/PPPort/PPPort.pm +++ b/ext/Devel/PPPort/PPPort.pm @@ -802,7 +802,7 @@ SV *sv; # define PERL_SCAN_DISALLOW_PREFIX 0x02 #endif -#if (PERL_VERSION >= 6) +#if (PERL_VERSION > 6) || ((PERL_VERSION == 6) && (PERL_SUBVERSION >= 1)) #define I32_CAST #else #define I32_CAST (I32*) @@ -885,7 +885,7 @@ bool Perl_grok_numeric_radix(pTHX_ const char **sp, const char *send) { #ifdef USE_LOCALE_NUMERIC -#if (PERL_VERSION >= 6) +#if (PERL_VERSION > 6) || ((PERL_VERSION == 6) && (PERL_SUBVERSION >= 1)) if (PL_numeric_radix_sv && IN_LOCALE) { STRLEN len; char* radix = SvPV(PL_numeric_radix_sv, len); |