brintos

brintos / llvm-project-archived public Read only

0
0
Text · 639 B · 249255e Raw
54 lines · plain
1! RUN: %python %S/test_modfile.py %s %flang_fc1 -fhermetic-module-files2module m13  integer, parameter :: n = 1234end5 6module m27  use m18end9 10module m311  use m1, m => n12end13 14module m415  use m216  use m317end18 19!Expect: m1.mod20!module m121!integer(4),parameter::n=123_422!end23 24!Expect: m2.mod25!module m226!use m1,only:n27!end28!module m129!integer(4),parameter::n=123_430!end31 32!Expect: m3.mod33!module m334!use m1,only:m=>n35!end36!module m137!integer(4),parameter::n=123_438!end39 40!Expect: m4.mod41!module m442!use m2,only:n43!use m3,only:m44!end45!module m246!use m1,only:n47!end48!module m349!use m1,only:m=>n50!end51!module m152!integer(4),parameter::n=123_453!end54