fast-math-vect-pow-2.c

   1 /* { dg-do compile } */
   2
   3 typedef double d_type;
   4 struct
   5 {
   6   d_type x;
   7   d_type y;
   8 } S[100];
   9
  10 #define N 16
  11 d_type foo (d_type t);
  12
  13 d_type
  14 main1 ()
  15 {
  16   int i;
  17   d_type t;
  18
  19   for (i = 0; i < N; i++)
  20     {
  21       t = (d_type) i / (d_type) 10;
  22       S[5].x = t * t;
  23     }
  24   return S[5].x;
  25 }
  26
  27 int
  28 main (void)
  29 {
  30   d_type tmp = main1 ();
  31 }
  32 /* { dg-final { cleanup-tree-dump "vect" } } */
  33