gr-satnogs/lib/libfec/peakval_mmx.c

39 lines
564 B
C

/* Wrapper for the MMX version of peakval
* Copyright 2004 Phil Karn, KA9Q
*/
#include <stdlib.h>
int peakval_mmx_assist(signed short *, int);
int peakval_mmx(signed short *b, int cnt)
{
int peak = 0;
int a;
while (((int)b & 7) != 0 && cnt != 0) {
a = abs(*b);
if (a > peak) {
peak = a;
}
b++;
cnt--;
}
a = peakval_mmx_assist(b, cnt);
if (a > peak) {
peak = a;
}
b += cnt & ~3;
cnt &= 3;
while (cnt != 0) {
a = abs(*b);
if (a > peak) {
peak = a;
}
b++;
cnt--;
}
return peak;
}