blob: ad962f47c53a8593fd501b150b54253a44ddb3bf [file] [log] [blame]
/* { dg-do compile } */
void slow_close(int n)
{
int i;
double *mm;
for (i=0;i<2*n;i++)
for (i=0;i<2*n;i++)
*(mm+i*2*n+i) = 0;
}
/* { dg-final { cleanup-tree-dump "vect" } } */