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/omp-allocate07.f90

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

36 lines
1.0 KiB
Fortran
Raw Normal View History

[Flang] Ported test_errors.sh to Python 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
2021-09-06 16:19:20 +08:00
! RUN: %python %S/test_errors.py %s %flang_fc1 -fopenmp
[Flang][Openmp] Fortran specific semantic checks for Allocate directive This patch adds the following Fortran specific semantic checks for the OpenMP Allocate directive. 1) A type parameter inquiry cannot appear in an ALLOCATE directive. 2) List items specified in the ALLOCATE directive must not have the ALLOCATABLE attribute unless the directive is associated with an ALLOCATE statement. Co-authored-by: Irina Dobrescu <irina.dobrescu@arm.com> Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D102061
2021-05-27 15:56:16 +08:00
! OpenMP Version 5.0
! 2.11.3 allocate Directive
! A type parameter inquiry cannot appear in an allocate directive.
subroutine allocate()
use omp_lib
type my_type(kind_param, len_param)
INTEGER, KIND :: kind_param
INTEGER, LEN :: len_param
INTEGER :: array(10)
end type
type(my_type(2, 4)) :: my_var
INTEGER(KIND=4) :: x
CHARACTER(LEN=32) :: w
INTEGER, DIMENSION(:), ALLOCATABLE :: y
[flang][OpenMP] Add semantic check for threadprivate directive This patch implements the following check for THREADPRIVATE construct: ``` A variable that is part of another variable (as an array, structure element or type parameter inquiry) cannot appear in a threadprivate directive. ``` Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D109685
2021-09-15 00:22:03 +08:00
!ERROR: A type parameter inquiry cannot appear on the ALLOCATE directive
[Flang][Openmp] Fortran specific semantic checks for Allocate directive This patch adds the following Fortran specific semantic checks for the OpenMP Allocate directive. 1) A type parameter inquiry cannot appear in an ALLOCATE directive. 2) List items specified in the ALLOCATE directive must not have the ALLOCATABLE attribute unless the directive is associated with an ALLOCATE statement. Co-authored-by: Irina Dobrescu <irina.dobrescu@arm.com> Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D102061
2021-05-27 15:56:16 +08:00
!$omp allocate(x%KIND)
[flang][OpenMP] Add semantic check for threadprivate directive This patch implements the following check for THREADPRIVATE construct: ``` A variable that is part of another variable (as an array, structure element or type parameter inquiry) cannot appear in a threadprivate directive. ``` Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D109685
2021-09-15 00:22:03 +08:00
!ERROR: A type parameter inquiry cannot appear on the ALLOCATE directive
[Flang][Openmp] Fortran specific semantic checks for Allocate directive This patch adds the following Fortran specific semantic checks for the OpenMP Allocate directive. 1) A type parameter inquiry cannot appear in an ALLOCATE directive. 2) List items specified in the ALLOCATE directive must not have the ALLOCATABLE attribute unless the directive is associated with an ALLOCATE statement. Co-authored-by: Irina Dobrescu <irina.dobrescu@arm.com> Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D102061
2021-05-27 15:56:16 +08:00
!$omp allocate(w%LEN)
[flang][OpenMP] Add semantic check for threadprivate directive This patch implements the following check for THREADPRIVATE construct: ``` A variable that is part of another variable (as an array, structure element or type parameter inquiry) cannot appear in a threadprivate directive. ``` Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D109685
2021-09-15 00:22:03 +08:00
!ERROR: A type parameter inquiry cannot appear on the ALLOCATE directive
[Flang][Openmp] Fortran specific semantic checks for Allocate directive This patch adds the following Fortran specific semantic checks for the OpenMP Allocate directive. 1) A type parameter inquiry cannot appear in an ALLOCATE directive. 2) List items specified in the ALLOCATE directive must not have the ALLOCATABLE attribute unless the directive is associated with an ALLOCATE statement. Co-authored-by: Irina Dobrescu <irina.dobrescu@arm.com> Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D102061
2021-05-27 15:56:16 +08:00
!$omp allocate(y%KIND)
[flang][OpenMP] Add semantic check for threadprivate directive This patch implements the following check for THREADPRIVATE construct: ``` A variable that is part of another variable (as an array, structure element or type parameter inquiry) cannot appear in a threadprivate directive. ``` Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D109685
2021-09-15 00:22:03 +08:00
!ERROR: A type parameter inquiry cannot appear on the ALLOCATE directive
[Flang][Openmp] Fortran specific semantic checks for Allocate directive This patch adds the following Fortran specific semantic checks for the OpenMP Allocate directive. 1) A type parameter inquiry cannot appear in an ALLOCATE directive. 2) List items specified in the ALLOCATE directive must not have the ALLOCATABLE attribute unless the directive is associated with an ALLOCATE statement. Co-authored-by: Irina Dobrescu <irina.dobrescu@arm.com> Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D102061
2021-05-27 15:56:16 +08:00
!$omp allocate(my_var%kind_param)
[flang][OpenMP] Add semantic check for threadprivate directive This patch implements the following check for THREADPRIVATE construct: ``` A variable that is part of another variable (as an array, structure element or type parameter inquiry) cannot appear in a threadprivate directive. ``` Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D109685
2021-09-15 00:22:03 +08:00
!ERROR: A type parameter inquiry cannot appear on the ALLOCATE directive
[Flang][Openmp] Fortran specific semantic checks for Allocate directive This patch adds the following Fortran specific semantic checks for the OpenMP Allocate directive. 1) A type parameter inquiry cannot appear in an ALLOCATE directive. 2) List items specified in the ALLOCATE directive must not have the ALLOCATABLE attribute unless the directive is associated with an ALLOCATE statement. Co-authored-by: Irina Dobrescu <irina.dobrescu@arm.com> Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D102061
2021-05-27 15:56:16 +08:00
!$omp allocate(my_var%len_param)
end subroutine allocate