File: hpux.pl

package info (click to toggle)
libthreads-perl 1.71-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 444 kB
  • ctags: 684
  • sloc: perl: 740; makefile: 48; ansic: 12
file content (10 lines) | stat: -rw-r--r-- 271 bytes parent folder | download | duplicates (15) 
1
2
3
4
5
6
7
8
9
10
 
# HP-UX 10.20 has different form for pthread_attr_getstacksize
my $ver = `uname -r`;
$ver =~ s/^\D*//;
if ($ver =~ /^10.20/) {
    if (exists($self->{'DEFINE'})) {
        $self->{'DEFINE'} .= " -DHPUX1020";
    } else {
        $self->{'DEFINE'} = "-DHPUX1020";
    }
}