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

--- Comment #2 from russelldub at gmail dot com ---
(In reply to kargl from comment #1)
> (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.
> 

I suppose, but I'm using cray pointers, so I would expect to include the flag,
and shouldn't assumed size arrays be allowed?  What's the correct syntax if so.
 (This works with ifort.)

> > 
> > 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.
> 

RHEL derivative on x86_64, tried 4.4.6, 4.6.1, 4.7.1, 4.8.2, and 4.9.0.  No ICE
on Fedora 20 x86_64 with gcc-4.8.3.  Can try my Ubuntu laptop later if
necessary.

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

No.  I suppose I should get that?

Reply via email to