34 lines · plain
1!RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=452 3subroutine f00(x)4 integer :: x(10)5!ERROR: Reference to 'x' must be a contiguous object6 !$omp target update from(x(1:10:2))7end8 9subroutine f01(x)10 integer :: x(10)11!WARNING: 'iterator' modifier is not supported in OpenMP v4.5, try -fopenmp-version=5112 !$omp target update from(iterator(i = 1:5): x(i))13end14 15subroutine f02(x)16 integer :: x(10)17!WARNING: 'expectation' modifier is not supported in OpenMP v4.5, try -fopenmp-version=5118!WARNING: 'iterator' modifier is not supported in OpenMP v4.5, try -fopenmp-version=5119 !$omp target update from(present, iterator(i = 1:5): x(i))20end21 22subroutine f03(x)23 integer :: x(10)24!WARNING: 'expectation' modifier is not supported in OpenMP v4.5, try -fopenmp-version=5125!WARNING: 'expectation' modifier is not supported in OpenMP v4.5, try -fopenmp-version=5126!ERROR: 'expectation' modifier cannot occur multiple times27 !$omp target update from(present, present: x)28end29 30subroutine f0431!ERROR: 'f04' must be a variable32 !$omp target update from(f04)33end34