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

[official-gcc.git] / gcc / testsuite / gcc.dg / lto / 20081112_0.c

extern void exit (int);
extern void abort (void);

extern void f ();
extern int g ();

int
main ()
{
  f ();
  if (g () != 42)
    abort ();
  exit (0);
}