35 lines · plain
1!RUN: rm -rf %t && mkdir -p %t2!RUN: %flang -c -fhermetic-module-files -DWHICH=1 -J%t %s && %flang -c -fhermetic-module-files -DWHICH=2 -J%t %s && %flang -c -fhermetic-module-files -J%t %s && cat %t/modfile78c.mod | FileCheck %s3 4#if WHICH == 15module modfile78a6 integer :: global_variable = 07end8#elif WHICH == 29module modfile78b10 use modfile78a11 contains12 subroutine test13 end14end15#else16module modfile78c17 use modfile78a18 use modfile78b19end20#endif21 22!CHECK: module modfile78c23!CHECK: use modfile78a,only:global_variable24!CHECK: use modfile78b,only:test25!CHECK: end26!CHECK: module modfile78a27!CHECK: integer(4)::global_variable28!CHECK: end29!CHECK: module modfile78b30!CHECK: use modfile78a,only:global_variable31!CHECK: contains32!CHECK: subroutine test()33!CHECK: end34!CHECK: end35