require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_SYS_BOOT_FLAG_H_)) {
    eval 'sub _SYS_BOOT_FLAG_H_ () {1;}' unless defined(&_SYS_BOOT_FLAG_H_);
    require 'sys/reboot.ph';
    eval 'sub BOOT_FLAG {
        my($arg, $retval) = @_;
	    eval q( &do {  &switch ($arg) {  &case ord(\'a\':  				(retval) |= RB_ASKNAME;						break;							case \'b\':  				(retval) |= RB_HALT;						break;							case \'c\':  						(retval) |= RB_CONFIG;					break;							case \'d\':   		(retval) |= RB_KDB;						break;							case \'m\':  				(retval) |= RB_MINIROOT;					break;							case \'s\'): ($retval) |=  &RB_SINGLE;  &break;  &default:  &break; } }  &while ( 0));
    }' unless defined(&BOOT_FLAG);
}
1;
