https://bugs.llvm.org/show_bug.cgi?id=48308

            Bug ID: 48308
           Summary: Crash in OpenMP semantic check with do while in
                    parallel
           Product: flang
           Version: trunk
          Hardware: PC
                OS: All
            Status: NEW
          Severity: normal
          Priority: P
         Component: Frontend
          Assignee: [email protected]
          Reporter: [email protected]
                CC: [email protected], [email protected],
                    [email protected], [email protected],
                    [email protected]

The following code crashes with OpenMP semantics check.


subroutine s(x,i)
  real :: x(:)
  integer :: i
  !$omp parallel firstprivate(i)
    do while (i>0)
      x(i) = i 
      i = i - 1
    end do
  !$omp end parallel
end subroutine

-- 
You are receiving this mail because:
You are on the CC list for the bug.
_______________________________________________
llvm-bugs mailing list
[email protected]
https://lists.llvm.org/cgi-bin/mailman/listinfo/llvm-bugs

Reply via email to