1 /* { dg-do compile } */
3 /* Testcase by Martin Michlmayr <tbm@cyrius.com> */
5 extern double cos (double x
);
6 extern double sin (double x
);
12 void set_s_A (double s_A0
)
19 bend_class
*bend_array
;
21 void set_s_A (int index
, double s_A0
)
23 bend_array
[index
].set_s_A (s_A0
);
30 for (i
= 0; i
< 5; ++i
)
33 for (j
= 0; j
< 2; ++j
)
36 tmp
[j
] = cos (val
) / sin (val
);
43 void compute_s (void);
46 internals::compute_s (void)
50 /* { dg-final { cleanup-tree-dump "vect" } } */