[Bug fortran/96398] New: ASSOCIATE with pointer fails in older GCC versions

[Bug fortran/96398] New: ASSOCIATE with pointer fails in older GCC versions

[m.deij at marin dot nl]

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

            Bug ID: 96398
           Summary: ASSOCIATE with pointer fails in older GCC versions
           Product: gcc
           Version: 6.3.1
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: m.deij at marin dot nl
  Target Milestone: ---

When I compile the code below with 6.3.1, I get the following error. Versions
8.3.1 and 9.2.0 are OK (I have no other versions to test with).

=================================================
     print*,  b2Ptr%a
                   1
Error: Symbol 'b2ptr' at (1) has no IMPLICIT type
=================================================

MODULE bodies
  IMPLICIT NONE

  TYPE BodyClass
      INTEGER :: a
  END TYPE

  TYPE(BodyClass),POINTER :: aBody

  CONTAINS

  FUNCTION bodies_getBody() result(body)
    TYPE(BodyClass),POINTER :: body
    body = aBody
  END FUNCTION

END MODULE

MODULE aModule
USE bodies
  IMPLICIT NONE

CONTAINS

SUBROUTINE try

  TYPE(BodyClass), POINTER :: bPtr

  ! no problem assigning a pointer
  bPtr => bodies_getBody()
  print *, bPtr%a

  ! this is problematic
  ASSOCIATE(b2Ptr => bodies_getBody())
    print*,  b2Ptr%a
  END ASSOCIATE

END SUBROUTINE

END MODULE

[Bug fortran/96398] ASSOCIATE with pointer fails in older GCC versions

[rguenth at gcc dot gnu.org]

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

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

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |RESOLVED
         Resolution|---                         |FIXED

--- Comment #1 from Richard Biener <rguenth at gcc dot gnu.org> ---
Versions older than GCC 8 are no longer maintained.  Thus fixed - as you
noticed youself.

[Bug fortran/96398] ASSOCIATE with pointer fails in older GCC versions

[m.deij at marin dot nl]

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

--- Comment #2 from Menno Deij - van Rijswijk <m.deij at marin dot nl> ---
Ok, thanks for clearing that up. We'll stick to newer versions of the compiler
:)

[Bug fortran/96398] ASSOCIATE with pointer fails in older GCC versions

[marxin at gcc dot gnu.org]

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

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

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

--- Comment #3 from Martin Liška <marxin at gcc dot gnu.org> ---
Fixed with r8-3248-g62d3c075d52f1b92.