1 # fr30 testcase for div1 $Ri
4 .include "testutils.inc"
12 ; example from the manual -- all status bits 0
13 mvi_h_gr 0x00ffffff,r2
14 mvi_h_dr 0x00ffffff,mdh
15 mvi_h_dr 0x00000000,mdl
21 test_h_gr 0x00ffffff,r2
22 test_h_dr 0x00ffffff,mdh ; misprinted in manual?
23 test_h_dr 0x00000001,mdl
31 test_h_gr 0x00ffffff,r2
32 test_h_dr 0x01fffffe,mdh
33 test_h_dr 0x00000002,mdl
41 test_h_gr 0x00ffffff,r2
42 test_h_dr 0x03fffffc,mdh
43 test_h_dr 0x00000004,mdl
51 test_h_gr 0x00ffffff,r2
52 test_h_dr 0x08fffff7,mdh
53 test_h_dr 0x00000009,mdl
56 mvi_h_gr 0x11ffffef,r2
62 test_h_gr 0x11ffffef,r2
63 test_h_dr 0x11ffffee,mdh
64 test_h_dr 0x00000012,mdl
67 mvi_h_gr 0x23ffffdd,r2
73 test_h_gr 0x23ffffdd,r2
74 test_h_dr 0xffffffff,mdh
75 test_h_dr 0x00000025,mdl
78 mvi_h_gr 0x00000003,r2
84 test_h_gr 0x00000003,r2
85 test_h_dr 0x00000001,mdh
86 test_h_dr 0x0000004b,mdl
88 ; D0 == 1, D1 == 1, C == 1
89 mvi_h_gr 0xfffffffe,r2
95 test_h_gr 0xfffffffe,r2
96 test_h_dr 0x00000002,mdh
97 test_h_dr 0x00000096,mdl
100 mvi_h_gr 0x00000004,r2
106 test_h_gr 0x00000004,r2
107 test_h_dr 0x00000000,mdh
108 test_h_dr 0x0000012d,mdl