1! RUN: %python %S/test_modfile.py %s %flang_fc1 2module m 3 logical b 4 bind(C) :: /cb2/ 5 common //t 6 common /cb/ x(2:10) /cb2/a,b,c 7 common /cb/ y,z 8 common w 9 common u,v 10 complex w 11 dimension b(4,4) 12 bind(C, name="CB") /cb/ 13 common /b/ cb 14end 15 16!Expect: m.mod 17!module m 18! logical(4)::b(1_8:4_8,1_8:4_8) 19! real(4)::t 20! real(4)::x(2_8:10_8) 21! real(4)::a 22! real(4)::c 23! real(4)::y 24! real(4)::z 25! real(4)::u 26! real(4)::v 27! complex(4)::w 28! real(4)::cb 29! common/cb/x,y,z 30! bind(c, name="CB")::/cb/ 31! common/cb2/a,b,c 32! bind(c)::/cb2/ 33! common/b/cb 34! common//t,w,u,v 35!end 36