require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&__EXCEPTIONS)) {
    eval 'sub try () { &if ( &true);}' unless defined(&try);
    eval 'sub catch {
        my($X) = @_;
	    eval q( &if ( &false));
    }' unless defined(&catch);
    eval 'sub __throw_exception_again () {1;}' unless defined(&__throw_exception_again);
} else {
    eval 'sub __throw_exception_again () { &throw;}' unless defined(&__throw_exception_again);
}
1;
