brintos

brintos / llvm-project-archived public Read only

0
0
Text · 480 B · 4ff9b3d Raw
16 lines · plain
1!RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=602 3subroutine f00(x)4  integer :: x(*)5  !ERROR: Whole assumed-size array 'x' may not appear here without subscripts6  !ERROR: Must have LOGICAL type, but is INTEGER(4)7  !$omp taskgraph graph_reset(x)8  !$omp end taskgraph9end10 11subroutine f0112  !ERROR: At most one GRAPH_RESET clause can appear on the TASKGRAPH directive13  !$omp taskgraph graph_reset(.true.) graph_reset(.false.)14  !$omp end taskgraph15end16