1/* { dg-do compile } */ 2/* { dg-options "-O3 -ftree-vectorize" } */ 3 4/* Testcase by Martin Michlmayr <tbm@cyrius.com> */ 5 6extern int sscanf (__const char *__restrict __s, 7 __const char *__restrict __format, ...); 8unsigned char got_elevation_pattern; 9struct site 10{ 11 float antenna_pattern[361][1001]; 12} 13LR; 14void 15LoadPAT (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, &litude); 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" } } */ 33