On 07/11/02 12:06 +0000, Nicholas Clark wrote:
> On Thu, Nov 07, 2002 at 12:01:22PM +0000, Nicholas Clark wrote:
> > So I run my script like this:
> >
> > /usr/local/bin/perl5.8.0 -MInline=FORCE,NOCLEAN,NOISY xsubpp.problem
> > Starting Build Prepocess Stage
> > Finished Build Prepocess Stage
> >
> > Starting Build Parse Stage
> > Finished Build Parse Stage
> >
> > Starting Build Glue 1 Stage
> > Finished Build Glue 1 Stage
> >
> > Starting Build Glue 2 Stage
> > Finished Build Glue 2 Stage
> >
> > Starting Build Glue 3 Stage
> > Finished Build Glue 3 Stage
> >
> > Starting Build Compile Stage
> > Starting "perl Makefile.PL" Stage
> > Writing Makefile for xsubpp_problem_b494
> > Finished "perl Makefile.PL" Stage
> >
> > Starting "make" Stage
> > /usr/local/bin/perl -I/usr/local/lib/perl5/5.00503/i686-linux
>-I/usr/local/lib/perl5/5.00503 /usr/local/lib/perl5/5.00503/ExtUtils/xsubpp -typemap
>/usr/local/lib/perl5/5.8.0/ExtUtils/typemap xsubpp_problem_b494.xs >xstmp.c && mv
>xstmp.c xsubpp_problem_b494.c
> >
> >
> >
> > Eh? Why is it now switching back to using /usr/local/bin/perl
>
> Oh. I see. It's this sinful line in C.pm:
>
> $o->call('makefile_pl', '"perl Makefile.PL"', 2);
>
>
> Inline's great.
>
> Except that line which is wrong.
C'mon, Nicholas. I'm not *that* much of an amateur. ;)
Look closer. The first argument to $o->call, is the name of the method to
really call. ie $o->makefile_pl. The second argument is just a debugging
string. So Inline can say:
Writing Makefile for xsubpp_problem_b494
Finished "perl Makefile.PL" Stage
The third argument says to indent the line 2 chars.
Now let's consider your real concern. It lies within makefile_pl():
sub makefile_pl {
my ($o) = @_;
my $perl;
-f ($perl = $Config::Config{perlpath})
or ($perl = $^X)
or croak "Can't locate your perl binary";
$o->system_call("$perl Makefile.PL", 'out.Makefile_PL');
$o->fix_make;
}
Obviously it's the value of $perl that you are concerned with. If you want to
write a patch to use $^X after 5.8.0, and you can verify that this is the
right thing to do, I'll gladly apply.
Cheers, Brian
