OSDN Git Service

2008-03-20 Johannes Singler <singler@ira.uka.de>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / g++.dg / vect / pr33834_2.cc
1 /* { dg-do compile } */
2 /* { dg-options "-O3 -ftree-vectorize" } */
3
4 /* Testcase by Martin Michlmayr <tbm@cyrius.com> */
5
6 extern int sscanf (__const char *__restrict __s,
7                   __const char *__restrict __format, ...);
8 unsigned char got_elevation_pattern;
9 struct site
10 {
11   float antenna_pattern[361][1001];
12 }
13 LR;
14 void
15 LoadPAT (char *filename)
16 {
17   int x, y;
18   char string[255];
19   float elevation, amplitude, elevation_pattern[361][1001];
20   for (x = 0; filename[x] != '.' ; x++)
21     sscanf (string, "%f %f", &elevation, &amplitude);
22   for (y = 0; y <= 1000; y++)
23   {
24     if (got_elevation_pattern)
25       elevation = elevation_pattern[x][y];
26     else
27       elevation = 1.0;
28     LR.antenna_pattern[x][y] = elevation;
29   }
30 }
31
32 /* { dg-final { cleanup-tree-dump "vect" } } */