# fr30 testcase for # mach(): fr30 # sth $Ri,@$Rj .include "testutils.inc" START .text .global sth sth: mvr_h_gr sp,r9 ; Save stack pointer ; Test sth $Ri,@Rj mvi_h_mem 0xdeadbeef,sp mvi_h_gr 0xaaaabeef,r8 set_cc 0x0f ; Condition codes should not change sth r8,@sp test_cc 1 1 1 1 test_h_mem 0xbeefbeef,sp test_h_gr 0xaaaabeef,r8 ; Test sth $Ri,@(R13,Rj) mvi_h_mem 0xbeefdead,sp mvi_h_gr 0xaaaadead,r8 mvr_h_gr sp,r1 inci_h_gr -8,sp mvr_h_gr sp,r2 mvi_h_mem 0xbeefdead,sp inci_h_gr 4,sp mvi_h_mem 0xbeefdead,sp mvi_h_gr 4,r13 set_cc 0x0e ; Condition codes should not change sth r8,@(r13,sp) test_cc 1 1 1 0 test_h_mem 0xdeaddead,r1 test_h_gr 0xaaaadead,r8 mvi_h_gr 0,r13 set_cc 0x0d ; Condition codes should not change sth r8,@(r13,sp) test_cc 1 1 0 1 test_h_mem 0xdeaddead,sp test_h_gr 0xaaaadead,r8 mvi_h_gr -4,r13 set_cc 0x0c ; Condition codes should not change sth r8,@(r13,sp) test_cc 1 1 0 0 test_h_mem 0xdeaddead,r2 test_h_gr 0xaaaadead,r8 ; Test sth $Ri,@(R14,$disp9) mvr_h_gr r9,sp ; Restore stack pointer mvi_h_gr 0xaaaaabcd,r8 mvi_h_mem 0xdeadbeef,sp mvr_h_gr sp,r14 inci_h_gr -256,r14 ; must be aligned mvr_h_gr r14,r2 mvi_h_mem 0xdeadbeef,r14 inci_h_gr -256,r14 mvr_h_gr r14,r3 mvi_h_mem 0xdeadbeef,r14 inci_h_gr 258,r14 set_cc 0x0b ; Condition codes should not change sth r8,@(r14,254) test_cc 1 0 1 1 test_h_mem 0xabcdbeef,r1 test_h_gr 0xaaaaabcd,r8 set_cc 0x0a ; Condition codes should not change sth r8,@(r14,0) test_cc 1 0 1 0 test_h_mem 0xdeadabcd,r2 test_h_gr 0xaaaaabcd,r8 set_cc 0x09 ; Condition codes should not change sth r8,@(r14,-256) test_cc 1 0 0 1 test_h_mem 0xdeadabcd,r3 test_h_gr 0xaaaaabcd,r8 pass