blob: 5bf0f9020d0a83f48cc5ec6564d78755654b86d1 [file] [log] [blame]
/* { dg-do compile } */
/* { dg-additional-options "-ftrapv" } */
int
mac (const short *a, const short *b, int sqr, int *sum)
{
int i;
int dotp = *sum;
for (i = 0; i < 150; i++)
{
dotp += b[i] * a[i];
sqr += b[i] * b[i];
}
*sum = dotp;
return sqr;
}