mirror/kissfft
1
0
Fork 0
mirror of https://github.com/mborgerding/kissfft.git synced 2025-06-04 01:28:23 -04:00
Code Issues Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
Mark Borgerding 2003-08-12 23:37:09 +00:00
parent b095bec02d
commit f906b47946
2 changed files with 8 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
Makefile
View File

@ -1,28 +1,10 @@
SPEEDTESTFILE=/dev/shm/kissfft_speedtest message:
SPEEDTESTNSAMPS=1000 @echo "Nothing to make here. Move on down to sample_code for ... you guessed it! Sample Code!"
all: kiss_fft_s kiss_fft_f kiss_fft_d
kiss_fft_s: kiss_fft.h kiss_fft.c
gcc -Wall -O3 -o kiss_fft_s -DFIXED_POINT -DFFT_UTIL kiss_fft.c -lm
kiss_fft_f: kiss_fft.h kiss_fft.c
gcc -Wall -O3 -o kiss_fft_f -Dkiss_fft_scalar=float -DFFT_UTIL kiss_fft.c -lm
kiss_fft_d: kiss_fft.h kiss_fft.c
gcc -Wall -O3 -o kiss_fft_d -Dkiss_fft_scalar=double -DFFT_UTIL kiss_fft.c -lm
clean:
rm -f kiss_fft_s kiss_fft_f kiss_fft_d *~ fftin.dat fftout.dat $(SPEEDTESTFILE)
test: all
./test.oct
speedf: kiss_fft_f $(SPEEDTESTFILE)
time ./kiss_fft_f < $(SPEEDTESTFILE) > /dev/null
$(SPEEDTESTFILE):
dd if=/dev/zero bs=8192 count=$(SPEEDTESTNSAMPS) of=$(SPEEDTESTFILE)
tarball: clean tarball: clean
tar -czf kiss_fft.tar.gz . tar -czf kiss_fft.tar.gz .
clean:
cd sample_code && make clean
rm -f kiss_fft.tar.gz *~

2
kiss_fft.c
View File

@ -180,7 +180,7 @@ void * kiss_fft_alloc(int nfft,int inverse_fft)
{ {
kiss_fft_state * st=NULL; kiss_fft_state * st=NULL;
// allocate one large buffer to hold the state, twiddle buffers, and bit-rev indices // allocate one large buffer to hold the state, twiddle buffers, and bit-rev indices
int size = sizeof(kiss_fft_state) + (nfft>>1)*sizeof(kiss_fft_cpx) + (nfft>>1)*sizeof(int); int size = sizeof(kiss_fft_state) + (nfft>>1)*sizeof(kiss_fft_cpx) + nfft*sizeof(int);
st = ( kiss_fft_state *)malloc(size); st = ( kiss_fft_state *)malloc(size);
if (st) { if (st) {