1  /* { dg-options "-O2" } */
       2  
       3  typedef struct test input ;
       4  struct test 
       5  {
       6    int type ;
       7    int symflag ;
       8  };
       9  int
      10  Chv_copyEntriesToVector ( input *chv,double *dvec) 
      11  {
      12    double *entries ;
      13    int mm, nent;
      14    int first, i, k , stride ;
      15    if ( ((chv)->type == 1) ) 
      16      {
      17        for ( i = 0 ; i < 10 ; i++)
      18          {
      19  	  dvec[2*mm] = entries[2*k] ;
      20  	  k += stride ;
      21  	  stride -= 2 ;
      22          }
      23      }
      24    return(mm) ; 
      25  }