37 lines · plain
1!RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=522 3! The DEVICE and TARGET_DEVICE trait sets4 5subroutine f006 !$omp metadirective &7!ERROR: DEVICE_NUM is not a valid trait for DEVICE trait set8 !$omp & when(device={device_num(10)}: nothing)9end10 11subroutine f0112 !$omp metadirective &13!This is ok: all traits are valid14 !$omp & when(device={arch("some-arch"), isa("some-isa"), kind("some-kind")}:&15 !$omp & nothing)16end17 18subroutine f0219 !$omp metadirective &20!This is ok: all traits are valid21 !$omp & when(target_device={arch("some-arch"), device_num(10), &22 !$omp & isa("some-isa"), kind("some-kind"), uid("some-uid")}: nothing)23end24 25subroutine f0326 !$omp metadirective &27!This is ok: extension traits are allowed28 !$omp & when(device={some_new_trait}: nothing)29end30 31subroutine f0432 !$omp metadirective &33!This is ok: extension traits are allowed34 !$omp & when(target_device={another_new_trait(12, 21)}: nothing)35end36 37