GIF89a; EcchiShell v1.0
//usr/lib64/lib64/lib64/lib64/perl5/= 2) { eval 'sub __sigemptyset { my($set) = @_; eval q(( &__extension__ ({ \'int\' &__cnt = &_SIGSET_NWORDS; &sigset_t * &__set = ($set); &while (-- &__cnt >= 0) ($__set->{__val[&__cnt]}) = 0; 0; }))); }' unless defined(&__sigemptyset); eval 'sub __sigfillset { my($set) = @_; eval q(( &__extension__ ({ \'int\' &__cnt = &_SIGSET_NWORDS; &sigset_t * &__set = ($set); &while (-- &__cnt >= 0) ($__set->{__val[&__cnt]}) = ~0; 0; }))); }' unless defined(&__sigfillset); if(defined(&__USE_GNU)) { eval 'sub __sigisemptyset { my($set) = @_; eval q(( &__extension__ ({ \'int\' &__cnt = &_SIGSET_NWORDS; &const &sigset_t * &__set = ($set); \'int\' &__ret = ($__set->{__val[&}--__cnt]); &while (! &__ret && -- &__cnt >= 0) &__ret = ($__set->{__val[&__cnt]}); &__ret == 0; }))); }' unless defined(&__sigisemptyset); eval 'sub __sigandset { my($dest, $left, $right) = @_; eval q(( &__extension__ ({ \'int\' &__cnt = &_SIGSET_NWORDS; &sigset_t * &__dest = ($dest); &const &sigset_t * &__left = ($left); &const &sigset_t * &__right = ($right); &while (-- &__cnt >= 0) ($__dest->{__val[&__cnt]}) = ( ($__left->{__val[&__cnt]}) & ($__right->{__val[&__cnt]})); 0; }))); }' unless defined(&__sigandset); eval 'sub __sigorset { my($dest, $left, $right) = @_; eval q(( &__extension__ ({ \'int\' &__cnt = &_SIGSET_NWORDS; &sigset_t * &__dest = ($dest); &const &sigset_t * &__left = ($left); &const &sigset_t * &__right = ($right); &while (-- &__cnt >= 0) ($__dest->{__val[&__cnt]}) = ( ($__left->{__val[&__cnt]}) | ($__right->{__val[&__cnt]})); 0; }))); }' unless defined(&__sigorset); } } if(defined(&__USE_EXTERN_INLINES)) { eval 'sub __SIGSETFN { my($NAME, $BODY, $CONST) = @_; eval q( &_EXTERN_INLINE \'int\' $NAME ($CONST &__sigset_t * &__set, \'int\' &__sig) { \'unsigned long int __mask\' = &__sigmask ( &__sig); \'unsigned long int __word\' = &__sigword ( &__sig); &return $BODY; }); }' unless defined(&__SIGSETFN); undef(&__SIGSETFN) if defined(&__SIGSETFN); } } 1;