]>
Commit | Line | Data |
---|---|---|
e7daa976 DB |
1 | C Test case for PR fortran/3743 |
2 | C Origin: David Billinghurst <David.Billinghurst@riotinto.com> | |
3 | C | |
4 | C { dg-do link } | |
5 | C { dg-options "-fcase-preserve -fintrin-case-upper" } | |
6 | integer i | |
7 | i = BIT_SIZE(i) | |
8 | end |