[Bug fortran/32236] internal compiler error: in gfc_assign_data_value, at fortran/data.c:288

["r dot f dot arduini at larc dot nasa dot gov" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #4 from r dot f dot arduini at larc dot nasa dot gov  2007-06-08 14:15 -------
Subject: Re:  internal compiler error: in gfc_assign_data_value, at
fortran/data.c:288

Can you please tell me why the compiler flags "tauaero.f:1517" while  
the problem seems to be associated with the data statement at line  
1601?  I have tried your suggestion (commenting out the data  
statement), but the code does not appear to work correctly with this  
modification.

thanks.
Bob


On Jun 6, 2007, at 4:22 PM, burnus at gcc dot gnu dot org wrote:

>
>
> ------- Comment #2 from burnus at gcc dot gnu dot org  2007-06-06  
> 20:22 -------
> Your example file misses the "param" module; however, I found it  
> via google:
> http://www.crseo.ucsb.edu/esrg/pauls_dir/sbdart_browser/html_code/ 
> sbdart/params.f.html
>
> The complete package is at:
> ftp://ftp.icess.ucsb.edu/pub/esrg/sbdart/sbdart_2.4.tar.gz
>
> Note: This is a fixed-format Fortran 90 file, not a Fortran 77 file.
>
>  * * *
>
> Using NAG f95 I get the error:
> Error: tauaero.f, line 1601: WLBAER has already been completely  
> initialised
>
> Using g95:
> In file tauaero.f:1601
>       data wlbaer/0.,0./
>            1
> Error: Variable 'wlbaer' at (1) already has an initialization
>
> (ifort simply accepts the code.)
>
>
> If one comments out that line 1601, the program actually compiles with
> gfortran.
>
>
> -- 
>
> burnus at gcc dot gnu dot org changed:
>
>            What    |Removed                     |Added
> ---------------------------------------------------------------------- 
> ------
>              Status|UNCONFIRMED                 |NEW
>      Ever Confirmed|0                           |1
>            Keywords|                            |ice-on-invalid-code
>       Known to fail|                            |4.2.0 4.1.3 4.3.0
>    Last reconfirmed|0000-00-00 00:00:00         |2007-06-06 20:22:37
>                date|                            |
>    Target Milestone|---                         |4.3.0
>
>
> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32236
>
> ------- You are receiving this mail because: -------
> You reported the bug, or are watching the reporter.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32236