(bind-func fft_config:[FFT_Config*,i64]*
(lambda (len)
(let ((sz:i64 0)
(findSize (kiss_fft_alloc (i64toi32 len) 0 null (ref sz)))
(config:i8* (alloc sz))
(res:kiss_fft_cfg (kiss_fft_alloc (i64toi32 len) 0 config (ref sz))))
(if (null? res) (println "error constructing fft config!"))
(FFT_Config res))))