# cr16 testcase for jhs (regp)
# mach(): cr16

	.include "testutils.inc"

	start

	.global jhs
jhs:
	movd $ok, (r7,r6)
        lshd $-1, (r7,r6)

	mvi_h_condbit 0
	movw $1, r4
	movw $2, r5
	subw r4, r5
	jhs (r7,r6)
not_ok:
	fail
ok:
	pass