diff options
Diffstat (limited to 'gnu/usr.bin/perl/ext/ExtUtils-Miniperl/lib')
| -rw-r--r-- | gnu/usr.bin/perl/ext/ExtUtils-Miniperl/lib/ExtUtils/Miniperl.pm | 14 |
1 files changed, 5 insertions, 9 deletions
diff --git a/gnu/usr.bin/perl/ext/ExtUtils-Miniperl/lib/ExtUtils/Miniperl.pm b/gnu/usr.bin/perl/ext/ExtUtils-Miniperl/lib/ExtUtils/Miniperl.pm index cede3180f8a..61c66df7ed1 100644 --- a/gnu/usr.bin/perl/ext/ExtUtils-Miniperl/lib/ExtUtils/Miniperl.pm +++ b/gnu/usr.bin/perl/ext/ExtUtils-Miniperl/lib/ExtUtils/Miniperl.pm @@ -8,7 +8,7 @@ use vars qw($VERSION @ISA @EXPORT); @ISA = qw(Exporter); @EXPORT = qw(writemain); -$VERSION = '1.01'; +$VERSION = '1.05'; # blead will run this with miniperl, hence we can't use autodie or File::Temp my $temp; @@ -136,6 +136,8 @@ main(int argc, char **argv, char **env) Perl_atfork_unlock); #endif + PERL_SYS_FPU_INIT; + if (!PL_do_undump) { my_perl = perl_alloc(); if (!my_perl) @@ -191,7 +193,6 @@ main(int argc, char **argv, char **env) #endif /* PERL_GLOBAL_STRUCT */ exit(exitstatus); - return exitstatus; } /* Register any extra external extensions */ @@ -233,8 +234,9 @@ C<writemain()> takes an argument list of directories containing archive libraries that relate to perl modules and should be linked into a new perl binary. It writes a corresponding F<perlmain.c> file that is a plain C file containing all the bootstrap code to make the +modules associated with the libraries available from within perl. If the first argument to C<writemain()> is a reference to a scalar it is -used as the filename to open for ouput. Any other reference is used as +used as the filename to open for output. Any other reference is used as the filehandle to write to. Otherwise output defaults to C<STDOUT>. The typical usage is from within a Makefile generated by @@ -247,10 +249,4 @@ L<ExtUtils::MakeMaker> =cut -# Local variables: -# c-indentation-style: bsd -# c-basic-offset: 4 -# indent-tabs-mode: nil -# End: -# # ex: set ts=8 sts=4 sw=4 et: |