2014-01-30 Alangi Derick <alangiderick@gmail.com>

[official-gcc.git] / gcc / testsuite / gfortran.dg / lto / pr41576_0.f90

! { dg-lto-do run }
! { dg-lto-options { { -O2 -flto -Werror } } }

subroutine foo
  common /bar/ a, b
  integer(4) :: a ,b
  a = 1
  b = 2
end