(bind-func AudioBuffer_set_data_b64
(lambda (ab:AudioBuffer* b64:String*)
(let ((size:i64 0)
(out:i8* (base64_decode (cstring b64) (length b64) (ref size))))
(if (<= size (* (AudioBuffer_frames ab) (AudioBuffer_channels ab) 4))
(begin (memcpy (cast (AudioBuffer_data ab)) out size) void)
(begin (println "error: AudioBuffer must be at least " size " bytes." ) void)))))