mirror of
https://github.com/llvm/llvm-project.git
synced 2025-04-17 15:16:36 +00:00

To enable Flang testing on Windows, shell scripts have to be ported to Python. In this patch the "test_errors.sh" script is ported to python ("test_errors.py"). The RUN line of existing tests was changed to make use of the python script. Used python regex in place of awk/sed. Reviewed By: Meinersbur Differential Revision: https://reviews.llvm.org/D107575
27 lines
466 B
Fortran
27 lines
466 B
Fortran
! RUN: %python %S/test_errors.py %s %flang_fc1
|
|
|
|
module m1
|
|
implicit none
|
|
type t
|
|
integer :: n
|
|
end type
|
|
type t2
|
|
! t and t2 must be resolved to types in m1, not components in t2
|
|
type(t) :: t(10) = t(1)
|
|
type(t) :: x = t(1)
|
|
integer :: t2
|
|
type(t2), pointer :: p
|
|
end type
|
|
end
|
|
|
|
module m2
|
|
type :: t(t)
|
|
integer, kind :: t
|
|
integer(t) :: n
|
|
end type
|
|
type :: t2(t)
|
|
integer, kind :: t
|
|
type(t(t)) :: x = t(t)(t)
|
|
end type
|
|
end
|