[OpenMP] [Flang] Program crashes at runtime with Segmentation fault when OMP PARALLEL DO IF(.false.) is encountered

[chandankds]

Testcase to reproduce the issue.

PROGRAM parallel_do_if
  USE OMP_LIB
  INTEGER :: I
  INTEGER :: N = 0
  INTEGER, PARAMETER :: NI = 10
!$OMP PARALLEL DO IF(.false.) 
  DO I = 1, NI
  END DO
!$OMP END PARALLEL DO
END PROGRAM

compile: flang-new -fopenmp ./test.f90 -o if.out
Run: ./if.out

Triage: Issue introduced after #65436 . Testcase works as expected after removal of this patch.

[chandankds]

Issue introduced after #65436 hence assigning it to @shiltian

[llvmbot]

@llvm/issue-subscribers-openmp

Author: chandan singh (chandankds)

Testcase to reproduce the issue.

PROGRAM parallel_do_if
  USE OMP_LIB
  INTEGER :: I
  INTEGER :: N = 0
  INTEGER, PARAMETER :: NI = 10
!$OMP PARALLEL DO IF(.false.) 
  DO I = 1, NI
  END DO
!$OMP END PARALLEL DO
END PROGRAM

compile: flang-new -fopenmp ./test.f90 -o if.out
Run: ./if.out

Triage: Issue introduced after #65436 . Testcase works as expected after removal of this patch.