1  /* { dg-do compile } */
       2  /* { dg-additional-options "-ftrapv" } */
       3  
       4  int
       5  mac (const short *a, const short *b, int sqr, int *sum)
       6  {
       7    int i;
       8    int dotp = *sum;
       9  
      10    for (i = 0; i < 150; i++)
      11      {
      12        dotp += b[i] * a[i];
      13        sqr += b[i] * b[i];
      14      }
      15  
      16    *sum = dotp;
      17    return sqr;
      18  }