Current File : //usr/local/apps/perl/lib/site_perl/5.30.0/x86_64-linux/setjmp.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_SETJMP_H)) {
    eval 'sub _SETJMP_H () {1;}' unless defined(&_SETJMP_H);
    require 'features.ph';
    require 'bits/setjmp.ph';
    require 'bits/sigset.ph';
    unless(defined(&__FAVOR_BSD)) {
	eval 'sub setjmp {
	    my($env) = @_;
    	    eval q( &_setjmp ($env));
	}' unless defined(&setjmp);
    } else {
	eval 'sub setjmp {
	    my($env) = @_;
    	    eval q( &setjmp ($env));
	}' unless defined(&setjmp);
    }
    if(defined (&__USE_BSD) || defined (&__USE_XOPEN)) {
    }
    if(defined(&__USE_POSIX)) {
	eval 'sub sigsetjmp {
	    my($env, $savemask) = @_;
    	    eval q( &__sigsetjmp ($env, $savemask));
	}' unless defined(&sigsetjmp);
    }
    if((defined(&__USE_FORTIFY_LEVEL) ? &__USE_FORTIFY_LEVEL : undef) > 0) {
	require 'bits/setjmp2.ph';
    }
}
1;