ifftr_config   xtlang

;; ifftr config (real config) not the same as cpx config above!
(bind-func ifftr_config:[IFFTR_Config*,i64]*
  (lambda (len)
    (let ((sz:i64 0)
          (findSize (kiss_fftr_alloc (i64toi32 len) 1 null (ref sz)))
          (config:i8* (alloc sz))
          (res (kiss_fftr_alloc (i64toi32 len) 1 config (ref sz))))
      (if (null? res) (println "error constructing ifftr config!"))
      (IFFTR_Config res))))