defined $PLATFORM || die "PLATFORM undefined, must be one of: @PLATFORM\n";
exists $PLATFORM{$PLATFORM} || die "PLATFORM must be one of: @PLATFORM\n";
-if ($PLATFORM eq 'win32' or $PLATFORM eq "aix") {
+if ($PLATFORM eq 'win32' or $PLATFORM eq 'wince' or $PLATFORM eq "aix") {
# Add the compile-time options that miniperl was built with to %define.
# On Win32 these are not the same options as perl itself will be built
# with since miniperl is built with a canned config (one of the win32/
# source files and header files and don't include any BUILDOPT's that
# the user might have chosen to disable because the canned configs are
# minimal configs that don't include any of those options.
- my $config = `$^X -Ilib -V`;
+ my $opts = ($PLATFORM eq 'wince' ? '-MCross' : '');
+ my $config = `$^X $opts -Ilib -V`;
my($options) = $config =~ /^ Compile-time options: (.*?)\n^ \S/ms;
$options =~ s/\s+/ /g;
print STDERR "Options: ($options)\n";
PL_linestart
PL_modcount
PL_pending_ident
- PL_sortcxix
PL_sublex_info
PL_timesbuf
main
PL_linestart
PL_modcount
PL_pending_ident
- PL_sortcxix
PL_sublex_info
PL_timesbuf
PL_collation_ix
PL_linestart
PL_modcount
PL_pending_ident
- PL_sortcxix
PL_sublex_info
PL_timesbuf
main
Perl_gv_SVadd
)];
}
+if ($define{'SPRINTF_RETURNS_STRLEN'}) {
+ skip_symbols [qw(
+ Perl_my_sprintf
+ )];
+}
+unless ($define{'PERL_USES_PL_PIDSTATUS'}) {
+ skip_symbols [qw(
+ Perl_pidgone
+ PL_pidstatus
+ )];
+}
unless ($define{'d_mmap'}) {
skip_symbols [qw(