FSF GCC merge 02/23/03
[official-gcc.git] / gcc / testsuite / g77.dg / fugly-assumed.f
bloba45e9c8e2b712ffd3ee7ff2bf4c0d43fcfaaba97
1 C Test compiler flags: -fugly-assumed
2 C Origin: David Billinghurst <David.Billinghurst@riotinto.com>
4 C { dg-do compile }
5 C { dg-options "-fugly-assumed" }
6 function f(i)
7 integer i(1)
8 f = i(1)+i(2)
9 end