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

Tobias Burnus <burnus at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
      Known to work|                            |4.3.4
           Keywords|                            |ice-on-valid-code
   Last reconfirmed|                            |2010.12.06 13:05:28
                 CC|                            |burnus at gcc dot gnu.org
     Ever Confirmed|0                           |1
            Summary|ICE on pointer assignment   |[4.6 Regression] ICE on
                   |                            |pointer assignment
   Target Milestone|---                         |4.6.0
      Known to fail|                            |4.6.0
           Severity|blocker                     |normal

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> 2010-12-06 
13:05:28 UTC ---
Confirm. Works with GCC 4.3.4, fails with GCC 4.6.0.

TODO: Check whether it fails also on 4.4 or 4.5 (and update summary/target
milestone accordingly).


Reduced test case:

! ============== system_defs.f90 =============
module system_defs_m
  type sysvector_t
    integer :: probnr = 0
    real, allocatable, dimension(:) :: u
  end type sysvector_t
end module system_defs_m

! ========== t.f90 ===========================
module convecreac_m
  use system_defs_m
  type(sysvector_t), pointer :: solution
end module convecreac_m

program t
  use convecreac_m
  implicit none
  type(sysvector_t), target :: sol
  solution => sol
end program t

Reply via email to