In the following program, the pointer association is not allowed.
However, I can compile successfully, and get no output after the execution.

I think this is wrong behavior.

program ptrtest
  implicit none
  integer a(4)

  a(1:4) = 1

contains
  subroutine foo(m)
    integer, target :: m(*)
    integer, pointer :: p(:)

    p => m

    print *, p
  end subroutine
end program


-- 
           Summary: Assumed size array can be associated with array pointer
                    without upper bound of last dimension
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: iguchi at coral dot t dot u-tokyo dot ac dot jp


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=25029

  • [Bug fortran/25029] New: ... iguchi at coral dot t dot u-tokyo dot ac dot jp

Reply via email to