1 /* Testcase by Martin Michlmayr <tbm@cyrius.com> */
2 
3 /* { dg-do compile } */
4 /* { dg-require-effective-target ilp32 } */
5 /* { dg-options "-O2" } */
6 
7 double pow (double, double);
8 
calc_score_dist(int mxdlen,long double d,long double ** dist)9 void calc_score_dist (int mxdlen, long double d, long double **dist)
10 {
11   unsigned long i, scr2;
12   for (i = 1; i <= mxdlen; i++)
13     {
14       for (scr2 = mxdlen; scr2 <= mxdlen + 10; scr2++)
15 	{
16 	}
17       dist[i][scr2] *= pow (1.0 / d, i);
18     }
19 }
20