Subversion Repositories scarts

# fr30 testcase for div4s
# mach(): fr30

        .include "testutils.inc"

        START

        .text
        .global div4s
div4s:
        ; Test div4s
        ; example from the manual
        mvi_h_gr        0x00ffffff,r2
        mvi_h_dr        0x00000000,mdh
        mvi_h_dr        0x0000000f,mdl
        set_dbits       0x3
        set_cc          0x0f
        div4s
        test_cc         1 1 1 1
        test_dbits      0x3
        test_h_gr       0x00ffffff,r2
        test_h_dr       0x00000000,mdh
        test_h_dr       0xfffffff1,mdl

        set_dbits       0x0
        set_cc          0x00
        div4s
        test_cc         0 0 0 0
        test_dbits      0x0
        test_h_gr       0x00ffffff,r2
        test_h_dr       0x00000000,mdh
        test_h_dr       0xfffffff1,mdl

        pass