| # fr30 testcase for stres $@Ri+,$u4 | |
| # mach(): fr30 | |
| .include "testutils.inc" | |
| START | |
| .text | |
| .global stres | |
| stres: | |
| ; Test stres $@Ri+,$u4 | |
| ; The current implementation simply increments Ri | |
| mvi_h_gr 0x1000,r7 | |
| set_cc 0x0f ; Condition codes are irrelevent | |
| stres 0,@r7+ | |
| test_cc 1 1 1 1 | |
| test_h_gr 0x1004,r7 | |
| mvi_h_gr 0x1000,r7 | |
| set_cc 0x0f ; Condition codes are irrelevent | |
| stres 0xf,@r7+ | |
| test_cc 1 1 1 1 | |
| test_h_gr 0x1004,r7 | |
| pass |