File: svr5.pl

package info (click to toggle)
libproc-processtable-perl 0.45-1%2Bsqueeze1
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 488 kB
  • ctags: 587
  • sloc: ansic: 4,012; perl: 361; makefile: 19
file content (11 lines) | stat: -rw-r--r-- 365 bytes parent folder | download | duplicates (26) 
1
2
3
4
5
6
7
8
9
10
11
 
# Check this is UnixWare 7 or above.
`uname` =~ /UnixWare/ || die "Not a supported SVR5\n";

# If this OS version supports the new /proc filesystem, use it.
`uname -v` =~ /^([\d\.]+)$/;
unless( $1 >= 7 ){
    die "Unsupported OS Version: $1\n";
}

symlink "os/UnixWare.c", "OS.c" || die "Could not link os/UnixWare.c to os/OS.c\n";
$self->{DEFINE} = "-D_KMEMUSER";