summaryrefslogtreecommitdiff
path: root/symbian
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2005-10-19 19:19:23 +0300
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-10-19 13:09:09 +0000
commit1215b447b68a44982cbab6532e02152be37089dd (patch)
tree2665654b97ea7cb12d14984f093c7ef0d6afcb52 /symbian
parent823a54a3e80592bb1d7f6b5fc487f84a3411e104 (diff)
downloadperl-1215b447b68a44982cbab6532e02152be37089dd.tar.gz
blead 25801: Symbian batch of today
Message-ID: <B356D8F434D20B40A8CEDAEC305A1F24E7A663@esebe105.NOE.Nokia.com> p4raw-id: //depot/perl@25804
Diffstat (limited to 'symbian')
-rw-r--r--symbian/config.sh1
-rw-r--r--symbian/symbianish.h10
-rw-r--r--symbian/xsbuild.pl18
3 files changed, 28 insertions, 1 deletions
diff --git a/symbian/config.sh b/symbian/config.sh
index 1337d890bd..313bc40715 100644
--- a/symbian/config.sh
+++ b/symbian/config.sh
@@ -71,6 +71,7 @@ d_chown='undef'
d_chroot='undef'
d_chsize='undef'
d_class='undef'
+d_clearenv='undef'
d_closedir='undef'
d_cmsghdr_s='undef'
d_const='define'
diff --git a/symbian/symbianish.h b/symbian/symbianish.h
index 1aebaf1007..4f06e0a217 100644
--- a/symbian/symbianish.h
+++ b/symbian/symbianish.h
@@ -207,3 +207,13 @@ pid_t wait(int *status);
#endif /* _MSC_VER */
+#ifdef __MWERKS__
+/* No good way of using the CodeWarrior #pragma unused(varname) with Perl
+ * source code (e.g. PERL_UNUSED_DECL doesn't work with the pragma syntax).
+ * Therefore we brutally turn off these particular warnings since there
+ * is a lot of this in Perl code (pTHX, for example). TOther compilers
+ * will have to detect these naughty bits. */
+#pragma warn_unusedarg off
+#pragma warn_unusedvar off
+#pragma warn_emptydecl off
+#endif
diff --git a/symbian/xsbuild.pl b/symbian/xsbuild.pl
index 0f6d66da26..eb7c63d5e8 100644
--- a/symbian/xsbuild.pl
+++ b/symbian/xsbuild.pl
@@ -160,7 +160,7 @@ sub run_PL {
print "(patching $BUILDROOT\\lib\\Config.pm)\n";
system_echo("perl -pi.bak -e \"s:\\Q$R_V_SV:$V:\" $BUILDROOT\\lib\\Config.pm");
}
- system_echo("perl -I$BUILDROOT\\lib -I$BUILDROOT\\xlib\\symbian $PL") == 0
+ system_echo("perl -I$BUILDROOT\\lib -I$BUILDROOT\\xlib\\symbian -I$BUILDROOT\\t\\lib $PL") == 0
or warn "$0: $PL failed.\n";
if ($CoreBuild) {
system_echo("copy $BUILDROOT\\lib\\Config.pm.bak $BUILDROOT\\lib\\Config.pm");
@@ -729,6 +729,11 @@ for my $ext (@ARGV) {
next if $Config;
}
+ if ($dir eq ".") {
+ warn "$0: No directory for $ext, skipping...\n";
+ next;
+ }
+
my $chdir = $ext eq "ext\\XSLoader" ? "ext\\DynaLoader" : $dir;
die "$0: no directory '$chdir'\n" unless -d $chdir;
update_dir($chdir) or die "$0: chdir '$chdir' failed: $!\n";
@@ -867,10 +872,21 @@ __EOF__
or die "$0: make distclean failed\n";
}
}
+ if ( $ext eq "ext\\Compress\\Zlib" ) {
+ my @bak;
+ find( sub { push @bak, $File::Find::name if /\.bak$/ }, "." );
+ unlink(@bak) if @bak;
+ my @src;
+ find( sub { push @src, $_ if -f $_ }, "zlib-src" );
+ unlink(@src) if @src;
+ unlink("constants.xs");
+ }
if ( $ext eq "ext\\Devel\\PPPort" ) {
unlink("ppport.h");
}
}
+ my @D = glob("../BMARM/*.def ../BWINS/*.def");
+ unlink(@D) if @D;
my @B = glob("ext/BWINS ext/BMARM ext/*/BWINS ext/*/BMARM Makefile");
rmdir(@B) if @B;
}