PR libfortran/64770 Segfault when trying to open existing file with status="new".
[official-gcc.git] / gcc / testsuite / gcc.dg / lto / pr48622_0.c
blobc12f98c494d56a0ac0d368195555bacaf06310cd
1 /* { dg-lto-do link } */
2 /* { dg-lto-options {{-O -flto -finline-small-functions -fno-early-inlining}} } */
4 void abort(void);
5 void exit(int);
7 typedef unsigned int u8 __attribute__ ((mode (QI)));
8 u8 ashift_qi_1 (u8);
11 ashift_qi_0 (u8 n)
16 ashift_qi_2 (u8 n)
21 ashift_qi_3 (u8 n)
26 ashift_qi_4 (u8 n)
31 ashift_qi_5 (u8 n)
36 ashift_qi_6 (u8 n)
41 ashift_qi_7 (u8 n)
46 lshiftrt_qi_0 (u8 n)
51 lshiftrt_qi_4 (u8 n)
56 lshiftrt_qi_5 (u8 n)
61 lshiftrt_qi_7 (u8 n)
65 int
66 main ()
68 if (ashift_qi_0 (0xff) != (u8) ((u8) 0xff << 0))
69 abort ();
70 if (ashift_qi_1 (0xff) != (u8) ((u8) 0xff << 1))
71 abort ();
72 if (ashift_qi_2 (0xff) != (u8) ((u8) 0xff << 2))
73 abort ();
74 if (ashift_qi_3 (0xff) != (u8) ((u8) 0xff << 3))
75 abort ();
76 if (ashift_qi_4 (0xff) != (u8) ((u8) 0xff << 4))
77 abort ();
78 if (ashift_qi_5 (0xff) != (u8) ((u8) 0xff << 5))
79 abort ();
80 if (ashift_qi_6 (0xff) != (u8) ((u8) 0xff << 6))
81 abort ();
82 if (ashift_qi_7 (0xff) != (u8) ((u8) 0xff << 7))
83 abort ();
84 if (lshiftrt_qi_0 (0xff) != (u8) ((u8) 0xff >> 0))
85 abort ();
86 if (lshiftrt_qi_4 (0xff) != (u8) ((u8) 0xff >> 4))
87 abort ();
88 if (lshiftrt_qi_5 (0xff) != (u8) ((u8) 0xff >> 5))
89 abort ();
90 if (lshiftrt_qi_7 (0xff) != (u8) ((u8) 0xff >> 7))
91 abort ();
92 exit (0);