This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
Re: [Patch, fortran] PR30554 - [4.2 and 4.1 only] ICE in mio_pointer_ref at module.c:1945
- From: Steve Kargl <sgk at troutmask dot apl dot washington dot edu>
- To: Paul Thomas <paulthomas2 at wanadoo dot fr>
- Cc: Fortran List <fortran at gcc dot gnu dot org>, gcc-patches <gcc-patches at gcc dot gnu dot org>
- Date: Sun, 11 Feb 2007 10:45:44 -0800
- Subject: Re: [Patch, fortran] PR30554 - [4.2 and 4.1 only] ICE in mio_pointer_ref at module.c:1945
- References: <45CC65F6.2040102@wanadoo.fr>
On Fri, Feb 09, 2007 at 01:15:50PM +0100, Paul Thomas wrote:
> 2007-02-09 Paul Thomas <pault@gcc.gnu.org>
>
> PR fortran/30554
> * module.c (find_symtree_for_symbol): New function to return
> a symtree that is not a "unique symtree" given a symbol.
> (read_module): Do not automatically set pointer_info to
> referenced because this inhibits the generation of a unique
> symtree. Recycle the existing symtree if possible by calling
> find_symtree_for_symbol.
>
> 2007-02-09 Paul Thomas <pault@gcc.gnu.org>
>
> PR fortran/30554
> * gfortran.dg/used_dummy_types_6.f90: Add the "privatized"
> versions of the modules.
>
> PR fortran/30617
> * gfortran.dg/intrinsic_actual_2.f90: Make this legal fortran
> by getting rid of recursive I/O and providing functions with
> results.
OK after checking the whitespace. There should be no whitespace
between the * and symbol name in a function declaration, and my
email client suggests the whitespace in the if block is wrong.
+ if (st != NULL)
+ {
+ info->u.rsym.symtree = st;
+ info->u.rsym.referenced = 1;
+ }
Possibly, so tabs got munched.
--
Steve