1*3323a4bdSKiran Chandramohan! RUN: %python %S/../test_errors.py %s %flang -fopenmp 2*3323a4bdSKiran Chandramohan 3*3323a4bdSKiran Chandramohan! OpenMP Version 4.5 4*3323a4bdSKiran Chandramohan! 2.8.3 Loop simd Construct 5*3323a4bdSKiran Chandramohan! Semantic error for correct test case. 6*3323a4bdSKiran Chandramohan 7*3323a4bdSKiran Chandramohanprogram omp_loop_simd 8*3323a4bdSKiran Chandramohan integer i, j, k, l 9*3323a4bdSKiran Chandramohan k = 0; 10*3323a4bdSKiran Chandramohan l = 0 11*3323a4bdSKiran Chandramohan 12*3323a4bdSKiran Chandramohan !$omp parallel do simd linear(l) 13*3323a4bdSKiran Chandramohan do i = 1, 10 14*3323a4bdSKiran Chandramohan do j = 1, 10 15*3323a4bdSKiran Chandramohan print *, "omp loop simd" 16*3323a4bdSKiran Chandramohan k = k + 1 17*3323a4bdSKiran Chandramohan l = l + 1 18*3323a4bdSKiran Chandramohan end do 19*3323a4bdSKiran Chandramohan end do 20*3323a4bdSKiran Chandramohan 21*3323a4bdSKiran Chandramohan print *, k, l 22*3323a4bdSKiran Chandramohan 23*3323a4bdSKiran Chandramohanend program omp_loop_simd 24