(bind-func Complex_bufferize (lambda (re:double* im:double* com:Complexd* len:i64) (let ((i 0)) (dotimes (i len) (tset! (pref-ptr com i) 0 (pref re i)) (tset! (pref-ptr com i) 1 (pref im i)))) void))