PR libfortran/64770 Segfault when trying to open existing file with status="new".
[official-gcc.git] / gcc / testsuite / gcc.dg / 20101010-1.c
blobcd8fddf62d29f55b2397dee2792d5da69aee7a6c
1 /* { dg-do compile } */
2 /* { dg-options "-O2 -fno-crossjumping" } */
4 int bar1 ();
5 int bar2 ();
7 int foo (void)
9 int len;
10 if (bar1 (&len))
12 char devpath [len];
13 if (bar2 (devpath) == len)
14 return len;
16 return -1;