?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
2009-10-05 Paul Thomas <pault@gcc.gnu.org>
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr33074.f90
blob3538d6588c465d97dc557a7d0a22e6c64dfe9dff
1 ! PR middle-end/33074
2 ! { dg-do compile }
3 ! { dg-options "-O" }
4
5 subroutine pr33074(a, w)
6 real a(1), w(1)
7 a(1) = 2.0**int(w(1))
8 end
Mirror of the offical gcc git repository hosted at gcc.gnu.org