35 lines
533 B
C
35 lines
533 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;
|
|
}
|