require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&WSEVENT_QSIZE)) {
    sub WSEVENT_QSIZE () {	256;}
}
unless(defined(&splwsevent)) {
    sub splwsevent () {
	eval q( &spltty());
    }
}
unless(defined(&WSEVENT_WAKEUP)) {
    sub WSEVENT_WAKEUP {
	my($ev) = @_;
	eval q({  &selwakeup(&-> &sel);  &if (-> &wanted) { -> &wanted = 0;  &wakeup(($ev)); }  &if (($ev)-> &async)  &pgsignal(($ev)-> ($io->{p_pgrp}),  &SIGIO, 0); });
    }
}
unless(defined(&PWSEVENT)) {
    sub PWSEVENT () {	23;}
}
1;
