blob: 5a8218f0ffe900752d9d57c087b42dc32fff09c3 [file] [log] [blame]
! PR fortran/49540
! { dg-do compile }
block data
common /a/ b(100000,100)
data b /10000000 * 0.0/
end block data