On 15 Aug 2005 21:05:22 -0700, Gisle Aas <[EMAIL PROTECTED]> wrote:
> I noticed that our Solaris builds ends up with a Time::HiRes module
> that does not support nanosleep. This happens because the Solaris
> hints file for Time::HiRes tries to use the POSIX module that is not
> available when the module is built as part of the core. This is what
> I see in our build logs:
Thanks, applied as change #25295
> Making Time::HiRes (realclean)
> Configuring Time::HiRes...
> Using hints hints/solaris.pl...
> Looking for gettimeofday()... found.
> Looking for setitimer()... found.
> Looking for getitimer()... found.
> You have interval timers (both setitimer and getitimer).
> Looking for ualarm()... found.
> Looking for usleep()... found.
> Looking for nanosleep()... Processing hints file hints/solaris.pl
> Can't locate POSIX.pm in @INC (@INC
> contains: . ../../../lib
> /tmp/perl-aekojpkufyzuasapckiyadszkxhdobbloqazueglxwkksqoohxylbukriemwutaerimizyjbxfnynbotpkfurxdgmkhwefhqxhyptjatvzulotpskbfuda/lib/5.8.7/sun4-solaris-thread-multi
>
> /tmp/perl-aekojpkufyzuasapckiyadszkxhdobbloqazueglxwkksqoohxylbukriemwutaerimizyjbxfnynbotpkfurxdgmkhwefhqxhyptjatvzulotpskbfuda/lib/5.8.7
>
> /tmp/perl-aekojpkufyzuasapckiyadszkxhdobbloqazueglxwkksqoohxylbukriemwutaerimizyjbxfnynbotpkfurxdgmkhwefhqxhyptjatvzulotpskbfuda/lib/site_perl/5.8.7/sun4-solaris-thread-multi
>
> /tmp/perl-aekojpkufyzuasapckiyadszkxhdobbloqazueglxwkksqoohxylbukriemwutaerimizyjbxfnynbotpkfurxdgmkhwefhqxhyptjatvzulotpskbfuda/lib/site_perl/5.8.7
>
> /tmp/perl-aekojpkufyzuasapckiyadszkxhdobbloqazueglxwkksqoohxylbukriemwutaerimizyjbxfnynbotpkfurxdgmkhwefhqxhyptjatvzulotpskbfuda/lib/site_perl
> .)
> at hints/solaris.pl line 1. BEGIN failed--compilation aborted at
> hints/solaris.pl line 1. NOT found. [...]
>
> The following patch fixes this problem:
>
> Index: ext/Time/HiRes/hints/solaris.pl
> --- ext/Time/HiRes/hints/solaris.pl.~1~ Mon Aug 15 21:02:15 2005
> +++ ext/Time/HiRes/hints/solaris.pl Mon Aug 15 21:02:15 2005
> @@ -1,6 +1,7 @@
> -use POSIX qw(uname);
> # 2.6 has nanosleep in -lposix4, after that it's in -lrt
> -if (substr((uname())[2], 2) <= 6) {
> +my $r = `/usr/bin/uname -r`;
> +chomp($r);
> +if (substr($r, 2) <= 6) {
> $self->{LIBS} = ['-lposix4'];
> } else {
> $self->{LIBS} = ['-lrt'];
> End of Patch.
>
> --Gisle
>
--
H.Merijn Brand Amsterdam Perl Mongers (http://amsterdam.pm.org/)
using Perl 5.6.2, 5.8.0, 5.8.5, & 5.9.2 on HP-UX 10.20, 11.00 & 11.11,
AIX 4.3 & 5.2, SuSE 9.2 & 9.3, and Cygwin. http://www.cmve.net/~merijn
Smoking perl: http://www.test-smoke.org, perl QA: http://qa.perl.org
reports to: [EMAIL PROTECTED], perl-qa@perl.org
