Tryag File Manager
Home
-
Turbo Force
Current Path :
/
usr
/
lib
/
perl5
/
5.8.8
/
i386-linux-thread-multi
/
bits
/
Upload File :
New :
File
Dir
//usr/lib/perl5/5.8.8/i386-linux-thread-multi/bits/waitstatus.ph
require '_h2ph_pre.ph'; no warnings 'redefine'; if(!defined (defined(&_SYS_WAIT_H) ? &_SYS_WAIT_H : undef) && !defined (defined(&_STDLIB_H) ? &_STDLIB_H : undef)) { die("Never include <bits/waitstatus.h> directly; use <sys/wait.h> instead."); } unless(defined(&__WEXITSTATUS)) { sub __WEXITSTATUS { my($status) = @_; eval q(((($status) & 0xff00) >> 8)); } } unless(defined(&__WTERMSIG)) { sub __WTERMSIG { my($status) = @_; eval q((($status) & 0x7f)); } } unless(defined(&__WSTOPSIG)) { sub __WSTOPSIG { my($status) = @_; eval q( &__WEXITSTATUS($status)); } } unless(defined(&__WIFEXITED)) { sub __WIFEXITED { my($status) = @_; eval q(( &__WTERMSIG($status) == 0)); } } unless(defined(&__WIFSIGNALED)) { sub __WIFSIGNALED { my($status) = @_; eval q((( ((($status) & 0x7f) + 1) >> 1) > 0)); } } unless(defined(&__WIFSTOPPED)) { sub __WIFSTOPPED { my($status) = @_; eval q(((($status) & 0xff) == 0x7f)); } } if(defined(&WCONTINUED)) { eval 'sub __WIFCONTINUED { my($status) = @_; eval q((($status) == &__W_CONTINUED)); }' unless defined(&__WIFCONTINUED); } unless(defined(&__WCOREDUMP)) { sub __WCOREDUMP { my($status) = @_; eval q((($status) & &__WCOREFLAG)); } } unless(defined(&__W_EXITCODE)) { sub __W_EXITCODE { my($ret, $sig) = @_; eval q((($ret) << 8| ($sig))); } } unless(defined(&__W_STOPCODE)) { sub __W_STOPCODE { my($sig) = @_; eval q((($sig) << 8| 0x7f)); } } unless(defined(&__W_CONTINUED)) { sub __W_CONTINUED () { 0xffff;} } unless(defined(&__WCOREFLAG)) { sub __WCOREFLAG () { 0x80;} } if(defined(&__USE_BSD)) { require 'endian.ph'; if((defined(&__BYTE_ORDER) ? &__BYTE_ORDER : undef) == (defined(&__LITTLE_ENDIAN) ? &__LITTLE_ENDIAN : undef)) { } if((defined(&__BYTE_ORDER) ? &__BYTE_ORDER : undef) == (defined(&__BIG_ENDIAN) ? &__BIG_ENDIAN : undef)) { } if((defined(&__BYTE_ORDER) ? &__BYTE_ORDER : undef) == (defined(&__LITTLE_ENDIAN) ? &__LITTLE_ENDIAN : undef)) { } if((defined(&__BYTE_ORDER) ? &__BYTE_ORDER : undef) == (defined(&__BIG_ENDIAN) ? &__BIG_ENDIAN : undef)) { } eval 'sub w_termsig () { ($__wait_terminated->{__w_termsig});}' unless defined(&w_termsig); eval 'sub w_coredump () { ($__wait_terminated->{__w_coredump});}' unless defined(&w_coredump); eval 'sub w_retcode () { ($__wait_terminated->{__w_retcode});}' unless defined(&w_retcode); eval 'sub w_stopsig () { ($__wait_stopped->{__w_stopsig});}' unless defined(&w_stopsig); eval 'sub w_stopval () { ($__wait_stopped->{__w_stopval});}' unless defined(&w_stopval); } 1;