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

kargl at gcc dot gnu.org changed:

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

--- Comment #1 from kargl at gcc dot gnu.org ---
(In reply to russelldub from comment #0)
> Consider the following "cray_ptr_issue1.f90":
> 
> MODULE PTR_MOD
>   IMPLICIT NONE
>   REAL :: ptee1(*)
>   POINTER (ptr1, ptee1)
> END MODULE PTR_MOD
> PROGRAM MAIN
>   USE PTR_MOD
>   IMPLICIT NONE
>   WRITE(*,*) "Hello, world!"
> END PROGRAM MAIN
> 
> > gfortran -fcray-pointer cray_ptr_issue1.f90
> cray_ptr_issue.f90:7.6:
> 
>   USE PTR_MOD
>       1
> Error: Assumed size array at (1) must be a dummy argument

Error makes more sense if compiled without -fcray-pointer.

> 
> Scratch head.  Change "REAL :: ptee1(*)" to REAL :: ptee1(10)".
> 
> > gfortran -fcray-pointer cray_ptr_issue2.f90
> f951: internal compiler error: backend decl for module variable ptr1 already
> exists

Which operating system?  It compiles and executes for me on
x86_64-*-freebsd with 5.0, 4.9.3, and 4.8.something.

PS: Do you have a copyright assignment with the FSF?

-- 
steve

Reply via email to