sim/testsuite/cr16/ashub_i.cgs

# cr16 testcase for ashub $sr,$dr
# mach(): cr16

	.include "testutils.inc"

	start

	.global ashub
ashub:

	movw  $0x12f1, r4
	ashub $4, r4

	cmpw $0x1210, r4
	beq ok
not_ok:
	fail
ok:
	movw  $0x12f1, r4
	ashub $-4, r4

	test_h_gr r4, 0x12ff

	pass