require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_SYS_RESOURCEVAR_H_)) {
    eval 'sub _SYS_RESOURCEVAR_H_ () {1;}' unless defined(&_SYS_RESOURCEVAR_H_);
    require 'sys/timeout.ph';
    eval 'sub ADDUPROF {
        my($p) = @_;
	    eval q( &do {  &atomic_clearbits_int(($p)-> &p_flag,  &P_OWEUPC);  &addupc_task(($p), ($p)-> &p_prof_addr, ($p)-> &p_prof_ticks); ($p)-> &p_prof_ticks = 0; }  &while (0));
    }' unless defined(&ADDUPROF);
    if(defined(&_KERNEL)) {
    }
}
1;
