/* { dg-final { check-function-bodies "**" "" "-DCHECK_ASM" } } */

#include "test_sve_acle.h"

/*
** mul_lane_0_f16_tied1:
**	fmul	z0\.h, z0\.h, z1\.h\[0\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_0_f16_tied1, svfloat16_t,
		z0 = svmul_lane_f16 (z0, z1, 0),
		z0 = svmul_lane (z0, z1, 0))

/*
** mul_lane_0_f16_tied2:
**	fmul	z0\.h, z1\.h, z0\.h\[0\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_0_f16_tied2, svfloat16_t,
		z0 = svmul_lane_f16 (z1, z0, 0),
		z0 = svmul_lane (z1, z0, 0))

/*
** mul_lane_0_f16_untied:
**	fmul	z0\.h, z1\.h, z2\.h\[0\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_0_f16_untied, svfloat16_t,
		z0 = svmul_lane_f16 (z1, z2, 0),
		z0 = svmul_lane (z1, z2, 0))

/*
** mul_lane_1_f16:
**	fmul	z0\.h, z1\.h, z2\.h\[1\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_1_f16, svfloat16_t,
		z0 = svmul_lane_f16 (z1, z2, 1),
		z0 = svmul_lane (z1, z2, 1))

/*
** mul_lane_2_f16:
**	fmul	z0\.h, z1\.h, z2\.h\[2\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_2_f16, svfloat16_t,
		z0 = svmul_lane_f16 (z1, z2, 2),
		z0 = svmul_lane (z1, z2, 2))

/*
** mul_lane_3_f16:
**	fmul	z0\.h, z1\.h, z2\.h\[3\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_3_f16, svfloat16_t,
		z0 = svmul_lane_f16 (z1, z2, 3),
		z0 = svmul_lane (z1, z2, 3))

/*
** mul_lane_4_f16:
**	fmul	z0\.h, z1\.h, z2\.h\[4\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_4_f16, svfloat16_t,
		z0 = svmul_lane_f16 (z1, z2, 4),
		z0 = svmul_lane (z1, z2, 4))

/*
** mul_lane_5_f16:
**	fmul	z0\.h, z1\.h, z2\.h\[5\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_5_f16, svfloat16_t,
		z0 = svmul_lane_f16 (z1, z2, 5),
		z0 = svmul_lane (z1, z2, 5))

/*
** mul_lane_6_f16:
**	fmul	z0\.h, z1\.h, z2\.h\[6\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_6_f16, svfloat16_t,
		z0 = svmul_lane_f16 (z1, z2, 6),
		z0 = svmul_lane (z1, z2, 6))

/*
** mul_lane_7_f16:
**	fmul	z0\.h, z1\.h, z2\.h\[7\]
**	ret
*/
TEST_UNIFORM_Z (mul_lane_7_f16, svfloat16_t,
		z0 = svmul_lane_f16 (z1, z2, 7),
		z0 = svmul_lane (z1, z2, 7))

/*
** mul_lane_z7_f16:
**	fmul	z0\.h, z1\.h, z7\.h\[7\]
**	ret
*/
TEST_DUAL_Z (mul_lane_z7_f16, svfloat16_t, svfloat16_t,
	     z0 = svmul_lane_f16 (z1, z7, 7),
	     z0 = svmul_lane (z1, z7, 7))

/*
** mul_lane_z8_f16:
**	str	d8, \[sp, -16\]!
**	mov	(z[0-7])\.d, z8\.d
**	fmul	z0\.h, z1\.h, \1\.h\[7\]
**	ldr	d8, \[sp\], 16
**	ret
*/
TEST_DUAL_LANE_REG (mul_lane_z8_f16, svfloat16_t, svfloat16_t, z8,
		    z0 = svmul_lane_f16 (z1, z8, 7),
		    z0 = svmul_lane (z1, z8, 7))