require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&LMC_TYPES_H)) {
    eval 'sub LMC_TYPES_H () {1;}' unless defined(&LMC_TYPES_H);
    if(defined( &_KERNEL)) {
	eval 'sub LMC_CTL_FLGS {
	    my($x) = @_;
    	    eval q(((($x)>>22)&0x3ff));
	}' unless defined(&LMC_CTL_FLGS);
	eval 'sub LMC_CTL_LEN2 {
	    my($x) = @_;
    	    eval q(((($x)>>11)&0x7ff));
	}' unless defined(&LMC_CTL_LEN2);
	eval 'sub LMC_CTL_LEN1 {
	    my($x) = @_;
    	    eval q((($x)&0x7ff));
	}' unless defined(&LMC_CTL_LEN1);
	eval 'sub LMC_CTL {
	    my($f,$l1,$l2) = @_;
    	    eval q((((($f)&0x3ff)<<22)|((($l2)&0x7ff)<<11)|(($l1)&0x7ff)));
	}' unless defined(&LMC_CTL);
	eval 'sub lmc_intrfunc_t () {\'int\';}' unless defined(&lmc_intrfunc_t);
    }
}
1;
