This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
PPC ICE
- From: Steve Kargl <sgk at troutmask dot apl dot washington dot edu>
- To: fortran at gcc dot gnu dot org
- Date: Tue, 18 Aug 2009 17:45:01 -0700
- Subject: PPC ICE
Janus,
Richard Maine posted the following code in c.l.f.
The good news is that it compiles with -std=f2003.
The bad news is that it leads to ICE with -std=f95.
troutmask:sgk[203] cat r.f90
module m
type :: foo
real, pointer :: array(:)
procedure (), pointer, nopass :: f
end type
contains
elemental subroutine fooAssgn (a1, a2)
type(foo), intent(out) :: a1
type(foo), intent(in) :: a2
allocate (a1%array(size(a2%array)))
a1%array = a2%array
a1%f => a2%f
end subroutine
end module m
troutmask:sgk[204] gfc4x -c r.f90
troutmask:sgk[205] gfc4x -c -std=f2003 r.f90
troutmask:sgk[206] gfc4x -c -std=f95 r.f90
r.f90:4.38:
procedure (), pointer, nopass :: f
1
Error: Fortran 2003: Procedure pointer at (1)
f951: internal compiler error: Segmentation fault: 11
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.
--
Steve