EPOC port update (from Olaf Flebbe <O.Flebbe@science-computing.de>)

p4raw-id: //depot/perl@5193

2 files changed, 34 insertions, 19 deletions

diff --git a/epoc/config.sh b/epoc/config.sh
index 533bdccdc9..fda0bf04b8 100644
--- a/epoc/config.sh
+++ b/epoc/config.sh
@@ -34,8 +34,8 @@ apirevision=''
 apisubversion=''
 apiversion=''
 ar='arm-pe-ar'
-archlib='/perl/lib/5.5.640/epoc'
-archlibexp='/perl/lib/5.5.640/epoc'
+archlib='/perl/lib/5.5.650/epoc'
+archlibexp='/perl/lib/5.5.650/epoc'
 archname64=''
 archname='epoc'
 archobjs='epoc.o epocish.o epoc_stubs.o'
@@ -575,8 +575,8 @@ pmake=''
 pr=''
 prefix=''
 prefixexp=''
-privlib='/perl/lib/5.5.640'
-privlibexp='/perl/lib/5.5.640'
+privlib='/perl/lib/5.5.650'
+privlibexp='/perl/lib/5.5.650'
 prototype='define'
 ptrsize='4'
 randbits='31'
@@ -620,10 +620,10 @@ sig_name_init='"ZERO", 0'
 sig_num='0'
 sig_num_init='0, 0'
 signal_t='void'
-sitearch='/perl/lib/site_perl/5.5.640/epoc'
-sitearchexp='/perl/lib/site_perl/5.5.640/epoc'
-sitelib='/perl/lib/site_perl/5.5.640/'
-sitelibexp='/perl/lib/site_perl/5.5.640/'
+sitearch='/perl/lib/site_perl/5.5.650/epoc'
+sitearchexp='/perl/lib/site_perl/5.5.650/epoc'
+sitelib='/perl/lib/site_perl/5.5.650/'
+sitelibexp='/perl/lib/site_perl/5.5.650/'
 siteprefix=''
 siteprefixexp=''
 sizetype='size_t'
@@ -691,7 +691,7 @@ vendorlib=''
 vendorlibexp=''
 vendorprefix=''
 vendorprefixexp=''
-version='5.5.640'
+version='5.5.650'
 vi=''
 voidflags='15'
 xlibpth=''
@@ -714,10 +714,10 @@ config_arg10=''
 config_arg11=''
 PERL_REVISION=5
 PERL_VERSION=5
-PERL_SUBVERSION=640
+PERL_SUBVERSION=650
 PERL_API_REVISION=5
 PERL_API_VERSION=5
-PERL_API_SUBVERSION=640
+PERL_API_SUBVERSION=650
 CONFIGDOTSH=true
 # Variables propagated from previous config.sh file.
 pp_sys_cflags=''
@@ -761,4 +761,19 @@ i_ustat='undef'
 use64bits='define'
 uidsize='2'
 gidsize='2'
-
+ivdformat='"ld"'
+uvuformat='"lu"'
+uvoformat='"lo"'
+uvxformat='"lx"'
+uidformat='"hu"'
+gidformat='"hu"'
+d_strtold='undef'
+d_strtoll='undef'
+d_strtouq='undef'
+d_nv_preserves_uv='define'
+use5005threads='undef'
+useithreads='undef'
+d_iconv='undef'
+i_iconv='undef'
+inc_version_list=' '
+inc_version_list_init='0'
diff --git a/epoc/createpkg.pl b/epoc/createpkg.pl
index 7270504974..6977bd385f 100644
--- a/epoc/createpkg.pl
+++ b/epoc/createpkg.pl
@@ -3,17 +3,17 @@
 use File::Find;
 use Cwd;
 
-$VERSION="5.005";
-$PATCH=63;
-$EPOC_VERSION=16;
+$VERSION="5.5";
+$PATCH="650";
+$EPOC_VERSION=19;
 $CROSSCOMPILEPATH=cwd;
-$CROSSREPLACEPATH="H:\\devel\\perl5.005_63";
+$CROSSREPLACEPATH="H:\\devel\\perl5.5.650";
 
 
 sub filefound {
     my $f = $File::Find::name;
     
-    return if ( $f =~ /unicode|CPAN|ExtUtils|IPC|User|DB.pm|\.a$|\.ld$|\.exists$/i);
+    return if ( $f =~ /CVS|unicode|CPAN|ExtUtils|IPC|User|DB.pm|\.a$|\.ld$|\.exists$/i);
     my $back = $f;
 
     $back =~ s|$CROSSCOMPILEPATH||;
@@ -22,7 +22,7 @@ sub filefound {
 
     my $psiback = $back;
 
-    $psiback =~ s/\\lib\\/\\perl\\lib\\$VERSION$PATCH\\/i;
+    $psiback =~ s/\\lib\\/\\perl\\lib\\$VERSION.$PATCH\\/i;
 
     print OUT "\"$CROSSREPLACEPATH$back\"-\"!:$psiback\"\n"  if ( -f $f );
 ;
@@ -35,6 +35,6 @@ print OUT "#{\"perl$VERSION\"},(0x100051d8),$PATCH,$EPOC_VERSION,0\n";
 print OUT "\"$CROSSREPLACEPATH\\perlmain.exe\"-\"!:\\perl.exe\"\n";
 
 find(\&filefound, cwd.'/lib');
-print OUT "@\"G:\\lib\\stdlib.sis\",(0x010002c3)\n"
+print OUT "@\"G:\\lib\\stdlib.sis\",(0x0100002c3)\n"