--- Comment #9 from pault at gcc dot gnu dot org 2008-03-16 19:15 ---
Fixed on trunk
Thanks for the report
Paul
--
pault at gcc dot gnu dot org changed:
What|Removed |Added
-
--- Comment #8 from pault at gcc dot gnu dot org 2008-03-16 19:15 ---
Subject: Bug 35470
Author: pault
Date: Sun Mar 16 19:14:17 2008
New Revision: 133279
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=133279
Log:
2008-03-16 Paul Thomas <[EMAIL PROTECTED]>
PR fortran/
--- Comment #7 from pault at gcc dot gnu dot org 2008-03-16 07:15 ---
(In reply to comment #6)
> You r 'this' is better than my 'Think' Passed regression testing here on
> x86-64.
>
Jerry,
I did not see that you were working on it - sorry that I trampled on your toes.
I took a copy of
--- Comment #6 from jvdelisle at gcc dot gnu dot org 2008-03-16 05:00
---
You r 'this' is better than my 'Think' Passed regression testing here on
x86-64.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35470
--- Comment #5 from pault at gcc dot gnu dot org 2008-03-15 22:37 ---
(In reply to comment #1)
> Confirmed as rejecting valid code, reduced testcase is:
This fixes it and is regtesting as I write.
Paul(In reply to comment #4)
> (In reply to comment #1)
> > Confirmed as rejecting valid
--- Comment #4 from pault at gcc dot gnu dot org 2008-03-15 22:36 ---
(In reply to comment #1)
> Confirmed as rejecting valid code, reduced testcase is:
This fixes it and is regtesting as I write.
Paul
--
pault at gcc dot gnu dot org changed:
What|Removed
--- Comment #3 from jvdelisle at gcc dot gnu dot org 2008-03-15 18:10
---
Jumped too soon. Several failures with that pacth
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35470
--- Comment #2 from jvdelisle at gcc dot gnu dot org 2008-03-15 18:07
---
Think I have a fix. Regression testing.
Index: resolve.c
===
--- resolve.c (revision 133251)
+++ resolve.c (working copy)
@@ -967,7 +967,7 @@ c
--- Comment #1 from fxcoudert at gcc dot gnu dot org 2008-03-05 22:00
---
Confirmed as rejecting valid code, reduced testcase is:
subroutine sub(arr)
type real_pointer
real, pointer :: p(:)
end type real_pointer
type(real_pointer), dimension(*) :: arr
real, pointer :: p(:)