[Bug fortran/95467] New: ICE in parse_omp_structured_block: OpenMP Offload (target_parallel__simd)

[Bug fortran/95467] New: ICE in parse_omp_structured_block: OpenMP Offload (target_parallel__simd)

[tapplencourt at anl dot gov]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95467

            Bug ID: 95467
           Summary: ICE in parse_omp_structured_block: OpenMP Offload
                    (target_parallel__simd)
           Product: gcc
           Version: lto
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: tapplencourt at anl dot gov
  Target Milestone: ---

Created attachment 48656
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=48656&action=edit
compilation.log

Hi, 

The following F90 OpenMP code causea ICE (see log attached): 


PROGRAM target_parallel__simd
    USE OMP_LIB
    implicit none
    INTEGER :: i
    INTEGER :: counter
!$OMP TARGET PARALLEL MAP(TOFROM: counter)
!$OMP SIMD
    DO i = 1 , 262144
counter = 1
    END DO
!$OMP END PARALLEL
END PROGRAM target_parallel__simd

I was able to reproduce it on GCC9.2 and GCC10.0

Don't hesitation if you have any question,
Regards,
Thomas

[Bug fortran/95467] ICE in parse_omp_structured_block: OpenMP Offload (target_parallel__simd)

[marxin at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95467

Martin Liška <marxin at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
     Ever confirmed|0                           |1
             Status|UNCONFIRMED                 |WAITING
                 CC|                            |marxin at gcc dot gnu.org
   Last reconfirmed|                            |2020-06-02

--- Comment #1 from Martin Liška <marxin at gcc dot gnu.org> ---
I see something like:

gcc pr95467.F90 -c -fopenmp -O2
pr95467.F90:11:18:

   11 | !$OMP END PARALLEL
      |                  1
Error: Unexpected !$OMP END PARALLEL statement at (1)
pr95467.F90:12:4:

   12 | END PROGRAM target_parallel__simd
      |    1
Error: Unexpected END statement at (1)
f951: Error: Unexpected end of file in ‘pr95467.F90’

[Bug fortran/95467] ICE in parse_omp_structured_block: OpenMP Offload (target_parallel__simd)

[jakub at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95467

Jakub Jelinek <jakub at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |jakub at gcc dot gnu.org

--- Comment #2 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
Yeah, can't reproduce the ICE either.

[Bug fortran/95467] ICE in parse_omp_structured_block: OpenMP Offload (target_parallel__simd)

[tapplencourt at anl dot gov]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95467

--- Comment #3 from Thomas Applencorut <tapplencourt at anl dot gov> ---
Yes, it's indeed working. It's because I made a typo in the reproducer. I
Didn't copy the version who produce the ICE (should have been !$OMP END TARGET
PARALLEL and not !$OMP END PARALLEL). Sorry about that...

Please find below the correct version (the one who produce an ICE) bellow:


PROGRAM target_parallel__simd
    USE OMP_LIB
    implicit none
    INTEGER :: i
    INTEGER :: counter
!$OMP TARGET PARALLEL MAP(TOFROM: counter)
!$OMP SIMD
    DO i = 1 , 262144
counter = 1
    END DO
!$OMP END TARGET PARALLEL
END PROGRAM target_parallel__simd

And to compile, it's indeed:

gfortran -fopenmp target_parallel__simd.F90

Thanks a lot for looking at it,
Thomas

[Bug fortran/95467] ICE in parse_omp_structured_block: OpenMP Offload (target_parallel__simd)

[marxin at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95467

Martin Liška <marxin at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|WAITING                     |NEW
      Known to work|                            |10.1.0, 11.0

--- Comment #4 from Martin Liška <marxin at gcc dot gnu.org> ---
Fixed on master with r10-6136-g44a9d801a7080d39.