------- Additional Comments From erik dot edelmann at iki dot fi 2005-09-06
21:10 -------
With my patch, the reduced testcase by Tobi compiles, but this slightly longer
testcase doesn't:
$ cat bug7.f90
SUBROUTINE A(p,LEN)
CHARACTER(LEN=LEN), DIMENSION(:), POINTER :: p
IF ( .NOT. ASSOCIATED(p) ) THEN
allocate(p(1))
END IF
END SUBROUTINE A
$ gfortran bug7.f90
bug7.f90: In function 'a':
bug7.f90:1: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
I'm not yet sure if it is because my patch doesn't solve the bug after all, or
if this is yet another unrelated bug.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=15809
