Subversion Repositories openrisc

/* { dg-require-effective-target vect_float } */
 
#include <stdlib.h>
#include "tree-vect.h"
 
void interp_pitch(float *exc, float *interp, int pitch, int len)
{
   int i,k;
   int maxj;
 
   maxj=3;
   for (i=0;i<len;i++)
   {
      float tmp = 0;
      for (k=0;k<7;k++)
      {
         tmp += exc[i-pitch+k+maxj-6];
      }
      interp[i] = tmp;
   }
}
 
int main()
{
   float *exc = calloc(126,sizeof(float));
   float *interp = calloc(80,sizeof(float));
   int pitch = -35;
 
   check_vect ();
 
   interp_pitch(exc, interp, pitch, 80);
   free(exc);
   free(interp);
   return 0;
}
 
/* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" } } */
/* { dg-final { cleanup-tree-dump "vect" } } */