[Patch, fortran] PR29051 - ICE on error in "old-style" initializer

[Paul Thomas]

:ADDPATCH fortran:

Bud,

Quite by chance, I had noticed the cause of this a couple of days ago; 
if you
look at the Doxygen documentation for gfc_data, you will see that the only
reference to the locus field 'where' is in resolve.c(resolve_data), 
where the
error is emitted. I was mulling over where the locus was being set and 
why the
documentation might miss it, when I saw your PR and realised that it 
isn't set
at all!

An Occam's Razor moment.....

The patch is utterly trivial and your (Bud's) test has been dejagnuified.

Regtests on FC5/Athlon - OK for trunk and 4.1?

PS My 4.2.0 tree is being used for TR15581 testing right now, so the 
diff is relative to 4.1

Paul

2006-09-13  Paul Thomas  <pault@gcc.gnu.org>

    PR fortran/29051
    * decl.c (match_old_style_init): Set the 'where' field of the
    gfc_data structure 'newdata'.

2006-09-13  Paul Thomas  <pault@gcc.gnu.org>

    PR fortran/29051
    * gfortran.dg/oldstyle_3.f90: New test.



-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr29051.diff
Type: text/x-patch
Size: 1197 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20060913/8abb421d/attachment.bin>