xref: /llvm-project/flang/test/Driver/unparse-with-modules.f90 (revision e00a3ccf43563209b71c5b68f56d83f4052dca63)
1! RUN: %flang_fc1 -I %S/Inputs/module-dir -fdebug-unparse-with-modules %s | FileCheck %s
2module m1
3  use iso_fortran_env
4  use BasicTestModuleTwo
5  implicit none
6  type(t2) y
7  real(real32) x
8end
9
10program test
11  use m1
12  use BasicTestModuleTwo
13  implicit none
14  x = 123.
15  y = t2()
16end
17
18!CHECK-NOT: module iso_fortran_env
19!CHECK: module basictestmoduletwo
20!CHECK: type::t2
21!CHECK: end type
22!CHECK: end
23!CHECK: module m1
24!CHECK:  use :: iso_fortran_env
25!CHECK:  implicit none
26!CHECK:  real(kind=real32) x
27!CHECK: end module
28!CHECK: program test
29!CHECK:  use :: m1
30!CHECK:  use :: basictestmoduletwo
31!CHECK:  implicit none
32!CHECK:  x = 123.
33!CHECK:  y = t2()
34!CHECK: end program
35