[Bug fortran/43985] [4.5/4.6 Regression] ICE when assumed size cray-pointee passed as argument

[burnus at gcc dot gnu dot org]

------- Comment #2 from burnus at gcc dot gnu dot org  2010-05-04 21:39 -------
==2733== Invalid read of size 2
==2733==    at 0x70EEBE: omp_add_variable (gimplify.c:5448)
==2733==    by 0x70F3A0: omp_notice_variable (gimplify.c:5558)
==2733==    by 0x70F67B: gimplify_var_or_parm_decl (gimplify.c:1833)
==2733==    by 0x7119D4: gimplify_expr (gimplify.c:6950)

Dump (with additionally initializing the data via
         ipeted = malloc(5*8)
         sz = 3

bob ()
{
  integer(kind=8) ipeted;
  real(kind=8)[0:] * peted [value-expr: (real(kind=8)[0:] *) ipeted];
  integer(kind=4) sz;

  {
    static integer(kind=8) C.1539 = 40;

    ipeted = _gfortran_malloc (&C.1539);
  }
  sz = 3;
  #pragma omp parallel default(shared)
    {
      {
        pete (&(*peted)[(integer(kind=8)) sz + -1]);
      }
    }
  goto __return_bob;
  __return_bob:;
}


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code, openmp


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