diff options
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/Data/Dumper/Dumper.xs | 4 | ||||
| -rw-r--r-- | ext/Errno/Errno_pm.PL | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/ext/Data/Dumper/Dumper.xs b/ext/Data/Dumper/Dumper.xs index d89bf96eed..4e26387997 100644 --- a/ext/Data/Dumper/Dumper.xs +++ b/ext/Data/Dumper/Dumper.xs @@ -510,7 +510,11 @@ DD_dump(pTHX_ SV *val, char *name, STRLEN namelen, SV *retval, HV *seenhv, } sortsv(AvARRAY(keys), av_len(keys)+1, +#ifdef USE_LOCALE_NUMERIC IN_LOCALE ? Perl_sv_cmp_locale : Perl_sv_cmp); +#else + Perl_sv_cmp); +#endif } else { dSP; ENTER; SAVETMPS; PUSHMARK(sp); diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL index 826f37fa38..d429146c20 100644 --- a/ext/Errno/Errno_pm.PL +++ b/ext/Errno/Errno_pm.PL @@ -97,7 +97,7 @@ sub get_files { $file{'../../vmesa/errno.h'} = 1; } elsif ($Config{archname} eq 'epoc') { # Watch out for cross compiling for EPOC (usually done on linux) - $file{'/usr/local/epoc/include/libc/sys/errno.h'} = 1; + $file{'/usr/local/epocemx/epocsdk/include/libc/sys/errno.h'} = 1; } elsif ($^O eq 'linux' && $Config{gccversion} ne '' # might be using, say, Intel's icc ) { |