# cr16 testcase for jfc (repl)
# mach(): cr16

	.include "testutils.inc"

	start

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

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