diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-12 21:45:49 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-12 21:45:49 +0000 |
commit | 02a99678fa25e3993355f34f3aaf4bc0c9f2c745 (patch) | |
tree | bb88332851d78271f15dab5cbbf97c67dfe79289 /ext | |
parent | 2f3b333f8f33a996945618e3a6de2f8c72c3ba4e (diff) | |
download | perl-02a99678fa25e3993355f34f3aaf4bc0c9f2c745.tar.gz |
EPOC fixes from Olaf Flebbe.
p4raw-id: //depot/perl@13665
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 ) { |