34 lines · plain
1!RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=522 3! The CONSTRUCT trait set4 5subroutine f006 !$omp metadirective &7!ERROR: CONDITION is not a valid trait for CONSTRUCT trait set8 !$omp & when(construct={condition(.true.)}: nothing)9end10 11subroutine f0112 !$omp metadirective &13!ERROR: Directive-name traits cannot have properties14 !$omp & when(construct={parallel(nowait), simd}: nothing)15end16 17subroutine f0218 !$omp metadirective &19!ERROR: SIMD trait requires a clause that is allowed on the DECLARE SIMD directive20 !$omp & when(construct={simd(nowait)}: nothing)21end22 23subroutine f0324 !$omp metadirective &25!ERROR: Extension traits are not valid for CONSTRUCT trait set26 !$omp & when(construct={fred(1)}: nothing)27end28 29subroutine f0430 !$omp metadirective &31!This is ok32 !$omp & when(construct={parallel, simd(simdlen(32), notinbranch)}: nothing)33end34