------- Comment #14 from pinskia at gcc dot gnu dot org  2008-09-06 23:06 
-------
Reduced testcase:
      real*8 in_mjd(5000000), in_xyz_std(6,5000000)
      real*8 ref_xyz(3), ref_llu(3), ref_neu(3)
      common / ts_r8 /sec_rel, in_mjd, in_xyz_std, ref_llu, ref_neu
      real*8 locref(3)
        locref(1) = ref_llu(1)
        call loc_to_geod(locref, neuref)
        write(*,*) in_mjd(i)
       end
--- CUT ---
Works on the trunk.


-- 

pinskia at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
           Keywords|                            |ice-on-valid-code
      Known to fail|                            |4.2.0
      Known to work|                            |4.4.0
   Last reconfirmed|0000-00-00 00:00:00         |2008-09-06 23:06:52
               date|                            |
            Summary|gfortran errors in          |[4.3 Regression] gfortran
                   |compilation and the making  |errors in compilation and
                   |for upgraded compilers      |the making for upgraded
                   |                            |compilers
   Target Milestone|---                         |4.3.3


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

Reply via email to