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

#include "test_sve_acle.h"

/*
** mls_lane_0_f32_tied1:
**	fmls	z0\.s, z1\.s, z2\.s\[0\]
**	ret
*/
TEST_UNIFORM_Z (mls_lane_0_f32_tied1, svfloat32_t,
		z0 = svmls_lane_f32 (z0, z1, z2, 0),
		z0 = svmls_lane (z0, z1, z2, 0))

/*
** mls_lane_0_f32_tied2:
**	mov	(z[0-9]+)\.d, z0\.d
**	movprfx	z0, z1
**	fmls	z0\.s, \1\.s, z2\.s\[0\]
**	ret
*/
TEST_UNIFORM_Z (mls_lane_0_f32_tied2, svfloat32_t,
		z0 = svmls_lane_f32 (z1, z0, z2, 0),
		z0 = svmls_lane (z1, z0, z2, 0))

/*
** mls_lane_0_f32_tied3:
**	mov	(z[0-9]+)\.d, z0\.d
**	movprfx	z0, z1
**	fmls	z0\.s, z2\.s, \1\.s\[0\]
**	ret
*/
TEST_UNIFORM_Z (mls_lane_0_f32_tied3, svfloat32_t,
		z0 = svmls_lane_f32 (z1, z2, z0, 0),
		z0 = svmls_lane (z1, z2, z0, 0))

/*
** mls_lane_0_f32_untied:
**	movprfx	z0, z1
**	fmls	z0\.s, z2\.s, z3\.s\[0\]
**	ret
*/
TEST_UNIFORM_Z (mls_lane_0_f32_untied, svfloat32_t,
		z0 = svmls_lane_f32 (z1, z2, z3, 0),
		z0 = svmls_lane (z1, z2, z3, 0))

/*
** mls_lane_1_f32:
**	fmls	z0\.s, z1\.s, z2\.s\[1\]
**	ret
*/
TEST_UNIFORM_Z (mls_lane_1_f32, svfloat32_t,
		z0 = svmls_lane_f32 (z0, z1, z2, 1),
		z0 = svmls_lane (z0, z1, z2, 1))

/*
** mls_lane_2_f32:
**	fmls	z0\.s, z1\.s, z2\.s\[2\]
**	ret
*/
TEST_UNIFORM_Z (mls_lane_2_f32, svfloat32_t,
		z0 = svmls_lane_f32 (z0, z1, z2, 2),
		z0 = svmls_lane (z0, z1, z2, 2))

/*
** mls_lane_3_f32:
**	fmls	z0\.s, z1\.s, z2\.s\[3\]
**	ret
*/
TEST_UNIFORM_Z (mls_lane_3_f32, svfloat32_t,
		z0 = svmls_lane_f32 (z0, z1, z2, 3),
		z0 = svmls_lane (z0, z1, z2, 3))

/*
** mls_lane_z7_f32:
**	fmls	z0\.s, z1\.s, z7\.s\[3\]
**	ret
*/
TEST_DUAL_Z (mls_lane_z7_f32, svfloat32_t, svfloat32_t,
	     z0 = svmls_lane_f32 (z0, z1, z7, 3),
	     z0 = svmls_lane (z0, z1, z7, 3))

/*
** mls_lane_z8_f32:
**	str	d8, \[sp, -16\]!
**	mov	(z[0-7])\.d, z8\.d
**	fmls	z0\.s, z1\.s, \1\.s\[3\]
**	ldr	d8, \[sp\], 16
**	ret
*/
TEST_DUAL_LANE_REG (mls_lane_z8_f32, svfloat32_t, svfloat32_t, z8,
		    z0 = svmls_lane_f32 (z0, z1, z8, 3),
		    z0 = svmls_lane (z0, z1, z8, 3))