--- Comment #7 from janus at gcc dot gnu dot org 2009-06-12 20:39 ---
Subject: Bug 40176
Author: janus
Date: Fri Jun 12 20:39:39 2009
New Revision: 148440
URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=148440
Log:
2009-06-12 Janus Weil ja...@gcc.gnu.org
PR
--- Comment #8 from janus at gcc dot gnu dot org 2009-06-12 20:45 ---
The remaining issue from comment #5 has been fixed with the commit in comment
#7. So this can be closed.
--
janus at gcc dot gnu dot org changed:
What|Removed |Added
--- Comment #6 from dominiq at lps dot ens dot fr 2009-05-27 14:08 ---
The infinite loop in comment #5 can be seen without the -fwhole-file flag (see
comment #22 in pr40011).
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40176
--- Comment #4 from janus at gcc dot gnu dot org 2009-05-25 14:48 ---
Subject: Bug 40176
Author: janus
Date: Mon May 25 14:48:24 2009
New Revision: 147850
URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=147850
Log:
2009-05-25 Janus Weil ja...@gcc.gnu.org
PR
--- Comment #5 from dominiq at lps dot ens dot fr 2009-05-25 20:05 ---
The following invalid code (reduced from the original code):
! { dg-do compile }
! This tests various error messages for PROCEDURE declarations.
! Contributed by Janus Weil jaydu...@gmail.com
program prog
contains
--- Comment #2 from janus at gcc dot gnu dot org 2009-05-18 12:28 ---
This test case with 'dynamic' array size produces a gimplification error:
PROGRAM test_prog
ABSTRACT INTERFACE
FUNCTION fn_template(n,x) RESULT(y)
INTEGER, INTENT(in) :: n
REAL, INTENT(in) :: x(n)
REAL ::
--- Comment #3 from janus at gcc dot gnu dot org 2009-05-18 16:59 ---
Comment #0 is fixed by the following one-liner patch:
Index: gcc/fortran/resolve.c
===
--- gcc/fortran/resolve.c (revision 147663)
+++
--- Comment #1 from janus at gcc dot gnu dot org 2009-05-17 14:13 ---
-fdump-parse-tree yields:
triple (struct array1_real(kind=4) __result, real(kind=4) a, real(kind=4)
b)
{
...
}
real(kind=4) (*T3e0) (real(kind=4) , real(kind=4) ) f;
f = (real(kind=4) (*T3e0) (real(kind=4) ,