diff --git a/src/fortran/DoConcurrentStream.F90 b/src/fortran/DoConcurrentStream.F90 index 781210d3..437a8a70 100644 --- a/src/fortran/DoConcurrentStream.F90 +++ b/src/fortran/DoConcurrentStream.F90 @@ -130,7 +130,7 @@ function dot() result(s) #ifdef CRAY_THREAD_DOCONCURRENT do i=1,N #else - do concurrent (i=1:N) !shared(A,B) + do concurrent (i=1:N) reduce(+:s) !shared(A,B) #endif s = s + A(i) * B(i) end do diff --git a/src/fortran/make.inc.flang b/src/fortran/make.inc.flang index a9689ce8..2bd8e13a 100644 --- a/src/fortran/make.inc.flang +++ b/src/fortran/make.inc.flang @@ -1,9 +1,9 @@ -FC := flang-new +FC ?= flang-new FCFLAGS := -O3 DOCONCURRENT_FLAG = ARRAY_FLAG = -OPENMP_FLAG = -fopenmp +OPENMP_FLAG = -fopenmp --offload-arch=${GPUARCH} -DUSE_OMP_GET_WTIME OPENACC_FLAG = CUDA_FLAG = SEQUENTIAL_FLAG =