require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&_RASOPS_H_)) {
    eval 'sub _RASOPS_H_ () {1;}' unless defined(&_RASOPS_H_);
    if(defined(&SMALL_KERNEL)) {
	eval 'sub RASOPS_SMALL () {1;}' unless defined(&RASOPS_SMALL);
    }
    require 'rasops_glue.ph';
    eval 'sub RI_FULLCLEAR () {0x1;}' unless defined(&RI_FULLCLEAR);
    eval 'sub RI_FORCEMONO () {0x2;}' unless defined(&RI_FORCEMONO);
    eval 'sub RI_BSWAP () {0x4;}' unless defined(&RI_BSWAP);
    eval 'sub RI_CURSOR () {0x8;}' unless defined(&RI_CURSOR);
    eval 'sub RI_CLEAR () {0x10;}' unless defined(&RI_CLEAR);
    eval 'sub RI_CLEARMARGINS () {0x20;}' unless defined(&RI_CLEARMARGINS);
    eval 'sub RI_CENTER () {0x40;}' unless defined(&RI_CENTER);
    eval 'sub RI_CURSORCLIP () {0x80;}' unless defined(&RI_CURSORCLIP);
    eval 'sub RI_ROTATE_CW () {0x100;}' unless defined(&RI_ROTATE_CW);
    eval 'sub RI_CFGDONE () {0x200;}' unless defined(&RI_CFGDONE);
    if((defined(&NRASOPS_ROTATION) ? &NRASOPS_ROTATION : 0) > 0) {
    }
    eval 'sub DELTA {
        my($p, $d, $cast) = @_;
	    eval q((($p) = ($cast)(($p) + ($d))));
    }' unless defined(&DELTA);
}
1;
