require '_h2ph_pre.ph';

no warnings 'redefine';

eval("sub TWE_CCB_FREE () { 0; }") unless defined(&TWE_CCB_FREE);
eval("sub TWE_CCB_READY () { 1; }") unless defined(&TWE_CCB_READY);
eval("sub TWE_CCB_QUEUED () { 2; }") unless defined(&TWE_CCB_QUEUED);
eval("sub TWE_CCB_PREQUEUED () { 3; }") unless defined(&TWE_CCB_PREQUEUED);
eval("sub TWE_CCB_DONE () { 4; }") unless defined(&TWE_CCB_DONE);
unless(defined(&TWE_LOCK)) {
    sub TWE_LOCK {
	my($sc) = @_;
	eval q( &splbio());
    }
}
unless(defined(&TWE_UNLOCK)) {
    sub TWE_UNLOCK {
	my($sc, $lock) = @_;
	eval q( &splx($lock));
    }
}
1;
