1/* Test generation of conversion custom instructions.  */
2
3/* { dg-do compile } */
4/* { dg-options "-O1 -ffinite-math-only -funsafe-math-optimizations -fno-math-errno" } */
5
6/* -O1 in the options is significant.  Without it FP operations may not be
7   optimized to custom instructions.  Also, -fno-math-errno is required
8   to inline lroundf. */
9
10#include <stdio.h>
11#include <math.h>
12
13#pragma GCC target ("custom-frdxhi=40")
14#pragma GCC target ("custom-frdxlo=41")
15#pragma GCC target ("custom-frdy=42")
16#pragma GCC target ("custom-fwrx=43")
17#pragma GCC target ("custom-fwry=44")
18
19#pragma GCC target ("custom-fextsd=100")
20#pragma GCC target ("custom-fixdi=101")
21#pragma GCC target ("custom-fixdu=102")
22#pragma GCC target ("custom-fixsi=103")
23#pragma GCC target ("custom-fixsu=104")
24#pragma GCC target ("custom-floatid=105")
25#pragma GCC target ("custom-floatis=106")
26#pragma GCC target ("custom-floatud=107")
27#pragma GCC target ("custom-floatus=108")
28#pragma GCC target ("custom-ftruncds=109")
29#pragma GCC target ("custom-round=110")
30
31
32typedef struct data {
33  double fextsd;
34  int fixdi;
35  unsigned fixdu;
36  int fixsi;
37  unsigned fixsu;
38  double floatid;
39  float floatis;
40  double floatud;
41  float floatus;
42  float ftruncds;
43  int round;
44} data_t;
45
46void
47custom_fp (int i, unsigned u, float f, double d, data_t *out)
48{
49  out->fextsd = (double) f;
50  out->fixdi = (int) d;
51  out->fixdu = (unsigned) d;
52  out->fixsi = (int) f;
53  out->fixsu = (unsigned) f;
54  out->floatid = (double) i;
55  out->floatis = (float) i;
56  out->floatud = (double) u;
57  out->floatus = (float) u;
58  out->ftruncds = (float) d;
59  out->round = lroundf (f);
60}
61
62/* { dg-final { scan-assembler "custom\\t100, .* # fextsd .*" } } */
63/* { dg-final { scan-assembler "custom\\t101, .* # fixdi .*" } } */
64/* { dg-final { scan-assembler "custom\\t102, .* # fixdu .*" } } */
65/* { dg-final { scan-assembler "custom\\t103, .* # fixsi .*" } } */
66/* { dg-final { scan-assembler "custom\\t104, .* # fixsu .*" } } */
67/* { dg-final { scan-assembler "custom\\t105, .* # floatid .*" } } */
68/* { dg-final { scan-assembler "custom\\t106, .* # floatis .*" } } */
69/* { dg-final { scan-assembler "custom\\t107, .* # floatud .*" } } */
70/* { dg-final { scan-assembler "custom\\t108, .* # floatus .*" } } */
71/* { dg-final { scan-assembler "custom\\t109, .* # ftruncds .*" } } */
72/* { dg-final { scan-assembler "custom\\t110, .* # round .*" } } */
73