--- Comment #7 from mikael at gcc dot gnu dot org 2010-07-29 10:26 ---
(In reply to comment #6)
Patch: http://gcc.gnu.org/ml/fortran/2010-07/msg00430.html
Regressing, see PR45125.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=45087
--- Comment #8 from burnus at gcc dot gnu dot org 2010-07-29 21:07 ---
Subject: Bug 45087
Author: burnus
Date: Thu Jul 29 21:07:34 2010
New Revision: 162696
URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=162696
Log:
2010-07-29 Tobias Burnus bur...@net-b.de
PR
--- Comment #9 from burnus at gcc dot gnu dot org 2010-07-29 21:08 ---
FIXED on the trunk (4.6).
--
burnus at gcc dot gnu dot org changed:
What|Removed |Added
--- Comment #2 from burnus at gcc dot gnu dot org 2010-07-28 09:32 ---
Patch. It fixes also test_fpu.f90 - however, for gas_dyn.f90 it causes a
segfault:
==24597== Invalid read of size 8
==24597==at 0x5A8DF3: ggc_set_mark (ggc-page.c:600)
==24597==by 0x73CD54:
--- Comment #3 from burnus at gcc dot gnu dot org 2010-07-28 12:35 ---
Minimal test case, compile with:
gfortran --param ggc-min-expand=0 --param ggc-min-heapsize=0
module INTS
interface
subroutine NEXT
end subroutine NEXT
subroutine VALUE()
end subroutine VALUE
--- Comment #4 from burnus at gcc dot gnu dot org 2010-07-28 13:14 ---
(In reply to comment #3)
Minimal test case, compile with:
gfortran --param ggc-min-expand=0 --param ggc-min-heapsize=0
The problems seems to be that one tries to free the NEXT twice - once for the
symbol in
--- Comment #5 from burnus at gcc dot gnu dot org 2010-07-28 13:51 ---
(In reply to comment #3)
Minimal test case, compile with:
There is something odd: If one has the order
subroutine VALUE()
subroutine NEXT
it actually works; one then goes
gfc_create_function_decl for
--- Comment #6 from burnus at gcc dot gnu dot org 2010-07-28 20:34 ---
Patch: http://gcc.gnu.org/ml/fortran/2010-07/msg00430.html
--
burnus at gcc dot gnu dot org changed:
What|Removed |Added
--- Comment #1 from burnus at gcc dot gnu dot org 2010-07-26 21:03 ---
Looking at the reduced test case for gas_dyn.f90, it looks like a duplicate of
PR 44945:
module ints
INTERFACE
SUBROUTINE NOZZLE()
END SUBROUTINE NOZZLE
END INTERFACE
end module ints
