PR libfortran/64770 Segfault when trying to open existing file with status="new".

[official-gcc.git] / gcc / testsuite / gcc.dg / graphite / id-5.c

void matmul_i1 ()
{
  int *abase;
  int aystride;
  int x, n, count, xcount;
  int *dest_y;
  int *abase_n;
  for (n = 0; n < count; n++)
    {
      abase_n = abase + n * aystride;
      for (x = 0; x < xcount; x++)
        dest_y[x] += abase_n[x];
    }
}