1  /* { dg-do compile } */
       2  /* { dg-options "-O -fno-tree-sra -fdump-tree-fre1-details" } */
       3  
       4  /* Should be optimized, propagating &a into (*p)[i].  */
       5  
       6  struct Foo
       7  {
       8    void *data;
       9    double size;
      10  };
      11  void bar(double *);
      12  void foo(double (*q)[4])
      13  {
      14    struct Foo tmp1;
      15    double a[4];
      16    int i;
      17    tmp1.data = &a;
      18    for (i=0; i<4; ++i)
      19      {
      20        double (*p)[4] = tmp1.data;
      21        (*p)[i] = (*q)[i];
      22        /* We want a PHI for the VOP for accessing tmp1.data, so place
      23   	 this store to tmp1 here.  */
      24        tmp1.size -= 1.0;
      25      }
      26    bar(a);
      27  }
      28  
      29  /* { dg-final { scan-tree-dump "Replaced" "fre1" } } */