[ Index ]

PHP Cross Reference of Unnamed Project

title

Body

[close]

/se3-unattended/var/se3/unattended/install/linuxaux/opt/perl/lib/5.10.0/i586-linux-thread-multi/auto/POSIX/SigRt/ -> _getsig.al (source)

   1  # NOTE: Derived from ../../lib/POSIX.pm.
   2  # Changes made here will be lost when autosplit is run again.
   3  # See AutoSplit.pm.
   4  package POSIX::SigRt;
   5  
   6  #line 1010 "../../lib/POSIX.pm (autosplit into ../../lib/auto/POSIX/SigRt/_getsig.al)"
   7  sub _getsig {
   8      &_croak;
   9      my $rtsig = $_[0];
  10      # Allow (SIGRT)?MIN( + n)?, a common idiom when doing these things in C.
  11      $rtsig = $_SIGRTMIN + ($1 || 0)
  12      if $rtsig =~ /^(?:(?:SIG)?RT)?MIN(\s*\+\s*(\d+))?$/;
  13      return $rtsig;
  14  }
  15  
  16  # end of POSIX::SigRt::_getsig
  17  1;


Generated: Tue Mar 17 22:47:18 2015 Cross-referenced by PHPXref 0.7.1