PR libfortran/64770 Segfault when trying to open existing file with status="new".
[official-gcc.git] / gcc / testsuite / gcc.dg / lto / const-uniq_1.c
blobee1505cc9a70d7d5ba8d8a22ade8a5ebfaebef92
1 extern int lookup1 (int i);
2 extern int lookup2 (int i);
3 extern void abort (void);
5 int lookup3 (int i)
7 int a[] = { 0, 1, 2, 3, 4, 5, 6, 7 };
8 return a[i+2];
11 int main (void)
13 if (lookup1(2) != 2)
14 abort ();
16 if (lookup2(2) != 3)
17 abort ();
19 if (lookup3(2) != 4)
20 abort ();
22 return 0;