Fortran: Fix problems with substring selectors in ASSOCIATE [PR115700]

[official-gcc.git] / gcc / testsuite / gcc.c-torture / compile / g.c

/* { dg-additional-options "-std=gnu89" } */

foo (a, b)
     long long a, b;

{
  if (a == b)
    return 0;
  else
    return 1;
}