[Bug fortran/93814] [9/10 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[Bug fortran/93814] [9/10 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[jakub at gcc dot gnu.org]

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

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

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|9.3                         |9.4

--- Comment #4 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
GCC 9.3.0 has been released, adjusting target milestone.

[Bug fortran/93814] [9/10/11 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[markeggleston at gcc dot gnu.org]

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

markeggleston at gcc dot gnu.org changed:

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

--- Comment #5 from markeggleston at gcc dot gnu.org ---
I tried out the patch provided by Steve Kargl in comment 3.  It appeared to me
to be OK so I added a test case sent a patch upstream with "OK to commit?".

The patch was not accepted see:
https://gcc.gnu.org/pipermail/fortran/2020-March/054157.html

[Bug fortran/93814] [9/10/11 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[gscfq@t-online.de]

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

--- Comment #6 from G. Steinmetz <gscfq@t-online.de> ---

Following (valid) cases should also be considered (no ICE) :


$ cat z2.f90
function f()
character :: f, g
entry g()
end


$ cat z3.f90
function f() bind(c)
integer :: f, g
entry g() bind(c)
end


$ cat z4.f90
function f() bind(c)
real :: f, g
entry g() bind(c)
end

[Bug fortran/93814] [9/10/11/12 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[rguenth at gcc dot gnu.org]

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

Richard Biener <rguenth at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|9.4                         |9.5

--- Comment #7 from Richard Biener <rguenth at gcc dot gnu.org> ---
GCC 9.4 is being released, retargeting bugs to GCC 9.5.

[Bug fortran/93814] [10/11/12/13 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[rguenth at gcc dot gnu.org]

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

Richard Biener <rguenth at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|9.5                         |10.4

--- Comment #8 from Richard Biener <rguenth at gcc dot gnu.org> ---
GCC 9 branch is being closed

[Bug fortran/93814] [10/11/12/13 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[jakub at gcc dot gnu.org]

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

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

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|10.4                        |10.5

--- Comment #9 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
GCC 10.4 is being released, retargeting bugs to GCC 10.5.

[Bug fortran/93814] [11/12/13/14 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[rguenth at gcc dot gnu.org]

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

Richard Biener <rguenth at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|10.5                        |11.5

--- Comment #10 from Richard Biener <rguenth at gcc dot gnu.org> ---
GCC 10 branch is being closed.

[Bug fortran/93814] [11/12/13/14 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[dcb314 at hotmail dot com]

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

David Binderman <dcb314 at hotmail dot com> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |dcb314 at hotmail dot com

--- Comment #11 from David Binderman <dcb314 at hotmail dot com> ---
From the flang testsuite file ./Lower/HLFIR/bindc-entry-stmt.f90, 
these two should work:

function foo() bind(c)
  character(1) :: foo, bar
entry bar()
  bar = "a"
end function

and

function foo2()
  character(1) :: foo2, bar2
entry bar2() bind(c)
  bar2 = "a"
end function

Instead, I get:

internal compiler error: Segmentation fault
0xf580a9 crash_signal(int)
    /home/dcb38/gcc/working/gcc/../../trunk.20210101/gcc/toplev.cc:317
0x866511 build_entry_thunks(gfc_namespace*, bool)
   
/home/dcb38/gcc/working/gcc/../../trunk.20210101/gcc/fortran/trans-decl.cc:0
0x866511 gfc_create_function_decl(gfc_namespace*, bool)

[Bug fortran/93814] [11/12/13/14/15 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[dcb314 at hotmail dot com]

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

--- Comment #12 from David Binderman <dcb314 at hotmail dot com> ---
Bit more detail:

./Lower/HLFIR/bindc-entry-stmt.f90:5:0:

    5 | function foo() bind(c)
Warning: Variable ‘foo’ at (1) may not be a C interoperable kind but it is
BIND(C) [-Wc-binding-type]
./Lower/HLFIR/bindc-entry-stmt.f90:39:28:

   39 |   character(1) :: foo2, bar2
      |                            1
Warning: Variable ‘bar2’ at (1) may not be a C interoperable kind but it is
BIND(C) [-Wc-binding-type]
==1442522== Invalid read of size 8
==1442522==    at 0x862E5E: quick_push (vec.h:1043)
==1442522==    by 0x862E5E: vec_safe_push<tree_node*, va_gc> (vec.h:835)
==1442522==    by 0x862E5E: build_entry_thunks (trans-decl.cc:3002)
==1442522==    by 0x862E5E: gfc_create_function_decl(gfc_namespace*, bool)
(trans-decl.cc:3157)