# m32r testcase for jl $sr
# mach(): m32r m32rx

	.include "testutils.inc"

	start

	.global jl
jl:
	seth r4, high (ok)
	or3  r4, r4, low (ok)
	jl   r4
not_ok:
	fail
ok:
	seth r4, high (not_ok)
	or3  r4, r4, low (not_ok)
	bne  r4, r14, not_ok

	pass