# sh testcase for fcmpun.d $drg, $drh, $rd -*- Asm -*-
# mach: all
# as: -isa=shmedia
# ld: -m shelf64

	.include "media/testutils.inc"

	start
init:
	pta wrong, tr0

fcmpund:	
	movi 0, r0
	movi 1, r1
	fmov.qd r0, dr0
	float.qd dr0, dr0
	fmov.qd r1, dr2
	float.qd dr2, dr2
	fcmpun.d dr0, dr2, r7
	bnei r7, 0, tr0

okay:	
	pass

wrong:
	fail
