aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.target/powerpc/float128-call.c
blob: cf7ec0806d2e9e0efcf3d8d9230d0f93966bb596 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
/* { dg-do compile { target { powerpc*-*-linux* } } } */
/* { dg-require-effective-target powerpc_float128_sw_ok } */
/* { dg-options "-O2 -mdejagnu-cpu=power7 -mfloat128 -mno-regnames" } */

#ifndef __FLOAT128__
#error "-mfloat128 is not supported."
#endif

/* Pick a constant to load that cannot be generated by the power10 lxvkq
   instruction.  */
#ifdef __LONG_DOUBLE_IEEE128__
#define TYPE long double
#define TEN  10.0L

#else
#define TYPE __float128
#define TEN  10.0Q
#endif

/* Test to make sure vector registers are used for passing IEEE 128-bit
   floating point values and returning them. Also make sure the 'q' suffix is
   handled for __float128.  */
TYPE one (void) { return TEN; }
void store (TYPE a, TYPE *p) { *p = a; }

/* This regexp captures the different vector load/stores that can be generated:

	lxvd2x	-- big endian power7/power8, little endian power8
	lvx	-- Altivec
	lxv	-- D-form power9
	lxvx	-- X-form power9
	plxv	-- prefixed power10
	stxvd2x	-- big endian power7/power8, little endian power8
	stvx	-- Altivec
	stxvx	-- X-form vector store (power9/power10).
	stv	-- D-form vector store (power9 and above).
	pstv	-- prefixed vector store (power10 and above).  */

/* { dg-final { scan-assembler {\mlxvd2x 34\M|\mlvx 2\M|\mp?lxvx? 34\M} } } */
/* { dg-final { scan-assembler {\mstxvd2x 34\M|\mstvx 2\M|\mp?stxvx? 34\M} } } */