# m32r testcase for srl $dr,$sr
# mach(): m32r m32rx
.include "testutils.inc"
start
.global srl
srl:
mvi_h_gr r4, 6
mvi_h_gr r5, 1
srl r4, r5
test_h_gr r4, 3
pass