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

	.include "testutils.inc"

	start

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

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