maxjhandsome
/
llvm-project
forked from OSchip/llvm-project
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity
llvm-project/flang/test/Semantics/symbol10.f90

Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.

41 lines
959 B
Fortran
Raw Normal View History

[flang][NFC] Simplify semantics test scripts There were several different ways of handling the option to f18 to find predefined modules: - test_errors.sh was created by cmake substituting FLANG_INTRINSIC_MODULES_DIR into test_errors.sh.in - some tests used the flang script which has the option built it - some tests used %f18_with_includes which was replaced by the path to f18 plus the -I option - some included -I../../include/flang in their run command To make this more consistent, change %f18 to include the -intrinsic-module-directory option and use it everywhere, including to replace %flang and %f18_with_includes. This requires changing all of the invocations of the test scripts to put %f18 at the end so that it can expand to more than one argument. This eliminates the need to generate test_errors.sh which means we don't need flang/test/Semantics/CMakeLists.txt or the %B substitution. That makes the test_errors.sh command like the others, replacing %B/test/Semantics/test_errors.sh with %S/test_errors.sh. Also remove the OPTIONS: functionality as custom options can be included in the RUN: command. And remove -I/../../include/flang as that is now always included. Differential Revision: https://reviews.llvm.org/D79634
2020-05-12 02:38:53 +08:00
! RUN: %S/test_symbols.sh %s %t %f18
[flang] Resolve names in ProcedureStmt and GenericStmt We need to save the names of specific procedures that appear in a ProcedureStmt or GenericStmt to resolve at the end of the specification section. They may be forward references to interface bodies. We were saving them in the GenericDetails but that was not the right place: we need to save the parser::Name so that we can eventually resolve it to a Symbol, but the symbol table should not contains references to Name because they go away with the parse tree. The fix is to save the mapping in a new multimap, specificProcs_ in InterfaceVisitor. We can reference parser::Names there and resolve them during ResolveSpecificsInGenerics(). We no longer need to clutter GenericDetails with data structures for unresolved names. Also handle the case where a specific procedure is use-associated from another module. Original-commit: flang-compiler/f18@c7f7b1e72da58a125fcc9ca6ea9cb23a8d4a1c6c Reviewed-on: https://github.com/flang-compiler/f18/pull/249 Tree-same-pre-rewrite: false
2018-12-18 23:59:40 +08:00
!DEF: /m1 Module
module m1
contains
[flang] Improve flag dumping for -funparse-with-symbols Original-commit: flang-compiler/f18@768fb1b36925c1e1ed563562ef01146c2bba4b2b
2019-09-13 14:03:06 +08:00
!DEF: /m1/foo_complex PUBLIC (Subroutine) Subprogram
[flang] Resolve names in ProcedureStmt and GenericStmt We need to save the names of specific procedures that appear in a ProcedureStmt or GenericStmt to resolve at the end of the specification section. They may be forward references to interface bodies. We were saving them in the GenericDetails but that was not the right place: we need to save the parser::Name so that we can eventually resolve it to a Symbol, but the symbol table should not contains references to Name because they go away with the parse tree. The fix is to save the mapping in a new multimap, specificProcs_ in InterfaceVisitor. We can reference parser::Names there and resolve them during ResolveSpecificsInGenerics(). We no longer need to clutter GenericDetails with data structures for unresolved names. Also handle the case where a specific procedure is use-associated from another module. Original-commit: flang-compiler/f18@c7f7b1e72da58a125fcc9ca6ea9cb23a8d4a1c6c Reviewed-on: https://github.com/flang-compiler/f18/pull/249 Tree-same-pre-rewrite: false
2018-12-18 23:59:40 +08:00
!DEF: /m1/foo_complex/z ObjectEntity COMPLEX(4)
subroutine foo_complex (z)
!REF: /m1/foo_complex/z
complex z
end subroutine
end module
!DEF: /m2 Module
module m2
!REF: /m1
use :: m1
[flang] Improve flag dumping for -funparse-with-symbols Original-commit: flang-compiler/f18@768fb1b36925c1e1ed563562ef01146c2bba4b2b
2019-09-13 14:03:06 +08:00
!DEF: /m2/foo PUBLIC (Subroutine) Generic
[flang] Resolve names in ProcedureStmt and GenericStmt We need to save the names of specific procedures that appear in a ProcedureStmt or GenericStmt to resolve at the end of the specification section. They may be forward references to interface bodies. We were saving them in the GenericDetails but that was not the right place: we need to save the parser::Name so that we can eventually resolve it to a Symbol, but the symbol table should not contains references to Name because they go away with the parse tree. The fix is to save the mapping in a new multimap, specificProcs_ in InterfaceVisitor. We can reference parser::Names there and resolve them during ResolveSpecificsInGenerics(). We no longer need to clutter GenericDetails with data structures for unresolved names. Also handle the case where a specific procedure is use-associated from another module. Original-commit: flang-compiler/f18@c7f7b1e72da58a125fcc9ca6ea9cb23a8d4a1c6c Reviewed-on: https://github.com/flang-compiler/f18/pull/249 Tree-same-pre-rewrite: false
2018-12-18 23:59:40 +08:00
interface foo
[flang] Improve flag dumping for -funparse-with-symbols Original-commit: flang-compiler/f18@768fb1b36925c1e1ed563562ef01146c2bba4b2b
2019-09-13 14:03:06 +08:00
!DEF: /m2/foo_int PUBLIC (Subroutine) Subprogram
[flang] Resolve names in ProcedureStmt and GenericStmt We need to save the names of specific procedures that appear in a ProcedureStmt or GenericStmt to resolve at the end of the specification section. They may be forward references to interface bodies. We were saving them in the GenericDetails but that was not the right place: we need to save the parser::Name so that we can eventually resolve it to a Symbol, but the symbol table should not contains references to Name because they go away with the parse tree. The fix is to save the mapping in a new multimap, specificProcs_ in InterfaceVisitor. We can reference parser::Names there and resolve them during ResolveSpecificsInGenerics(). We no longer need to clutter GenericDetails with data structures for unresolved names. Also handle the case where a specific procedure is use-associated from another module. Original-commit: flang-compiler/f18@c7f7b1e72da58a125fcc9ca6ea9cb23a8d4a1c6c Reviewed-on: https://github.com/flang-compiler/f18/pull/249 Tree-same-pre-rewrite: false
2018-12-18 23:59:40 +08:00
module procedure :: foo_int
[flang] Improve flag dumping for -funparse-with-symbols Original-commit: flang-compiler/f18@768fb1b36925c1e1ed563562ef01146c2bba4b2b
2019-09-13 14:03:06 +08:00
!DEF: /m2/foo_real EXTERNAL, PUBLIC (Subroutine) Subprogram
[flang] Resolve names in ProcedureStmt and GenericStmt We need to save the names of specific procedures that appear in a ProcedureStmt or GenericStmt to resolve at the end of the specification section. They may be forward references to interface bodies. We were saving them in the GenericDetails but that was not the right place: we need to save the parser::Name so that we can eventually resolve it to a Symbol, but the symbol table should not contains references to Name because they go away with the parse tree. The fix is to save the mapping in a new multimap, specificProcs_ in InterfaceVisitor. We can reference parser::Names there and resolve them during ResolveSpecificsInGenerics(). We no longer need to clutter GenericDetails with data structures for unresolved names. Also handle the case where a specific procedure is use-associated from another module. Original-commit: flang-compiler/f18@c7f7b1e72da58a125fcc9ca6ea9cb23a8d4a1c6c Reviewed-on: https://github.com/flang-compiler/f18/pull/249 Tree-same-pre-rewrite: false
2018-12-18 23:59:40 +08:00
procedure :: foo_real
[flang] Improve flag dumping for -funparse-with-symbols Original-commit: flang-compiler/f18@768fb1b36925c1e1ed563562ef01146c2bba4b2b
2019-09-13 14:03:06 +08:00
!DEF: /m2/foo_complex PUBLIC (Subroutine) Use
[flang] Resolve names in ProcedureStmt and GenericStmt We need to save the names of specific procedures that appear in a ProcedureStmt or GenericStmt to resolve at the end of the specification section. They may be forward references to interface bodies. We were saving them in the GenericDetails but that was not the right place: we need to save the parser::Name so that we can eventually resolve it to a Symbol, but the symbol table should not contains references to Name because they go away with the parse tree. The fix is to save the mapping in a new multimap, specificProcs_ in InterfaceVisitor. We can reference parser::Names there and resolve them during ResolveSpecificsInGenerics(). We no longer need to clutter GenericDetails with data structures for unresolved names. Also handle the case where a specific procedure is use-associated from another module. Original-commit: flang-compiler/f18@c7f7b1e72da58a125fcc9ca6ea9cb23a8d4a1c6c Reviewed-on: https://github.com/flang-compiler/f18/pull/249 Tree-same-pre-rewrite: false
2018-12-18 23:59:40 +08:00
procedure :: foo_complex
end interface
interface
!REF: /m2/foo_real
!DEF: /m2/foo_real/r ObjectEntity REAL(4)
subroutine foo_real (r)
!REF: /m2/foo_real/r
real r
end subroutine
end interface
contains
!REF: /m2/foo_int
!DEF: /m2/foo_int/i ObjectEntity INTEGER(4)
subroutine foo_int (i)
!REF: /m2/foo_int/i
integer i
end subroutine
end module