re PR fortran/78741 (ICE in gfc_get_symbol_decl, at fortran/trans-decl.c:1534)
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr49540-1.f90
blob5a8218f0ffe900752d9d57c087b42dc32fff09c3
1 ! PR fortran/49540
2 ! { dg-do compile }
3 block data
4 common /a/ b(100000,100)
5 data b /10000000 * 0.0/
6 end block data