config root man

require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&_SYS_RANDOM_H_)) {
    eval 'sub _SYS_RANDOM_H_ () {1;}' unless defined(&_SYS_RANDOM_H_);
    if(defined(&_KERNEL)) {
	eval("sub RANDOM_START () { 0; }") unless defined(&RANDOM_START);
	eval("sub RANDOM_WRITE () { 0; }") unless defined(&RANDOM_WRITE);
	eval("sub RANDOM_KEYBOARD () { 1; }") unless defined(&RANDOM_KEYBOARD);
	eval("sub RANDOM_MOUSE () { 2; }") unless defined(&RANDOM_MOUSE);
	eval("sub RANDOM_NET () { 3; }") unless defined(&RANDOM_NET);
	eval("sub RANDOM_INTERRUPT () { 4; }") unless defined(&RANDOM_INTERRUPT);
	eval("sub RANDOM_PURE () { 5; }") unless defined(&RANDOM_PURE);
	eval("sub ENTROPYSOURCE () { 6; }") unless defined(&ENTROPYSOURCE);
    }
}
1;