hans/racket-audio
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Finish the flac decoder before deleting it.

Browse Source
This commit is contained in:
Hans Dijkema
2026-06-24 14:07:11 +02:00
parent 6197fb60e5
commit 66b806f59e
1 changed files with 4 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
libflac-ffi.rkt
+4
View File
@@ -413,6 +413,9 @@
(define-libflac FLAC__stream_decoder_delete (define-libflac FLAC__stream_decoder_delete
(_fun _FLAC__StreamDecoder-pointer -> _void)) (_fun _FLAC__StreamDecoder-pointer -> _void))
(define-libflac FLAC_stream_decoder_finish
(_fun _FLAC__StreamDecoder-pointer -> _int))
(define-libflac FLAC__stream_decoder_get_state (define-libflac FLAC__stream_decoder_get_state
(_fun _FLAC__StreamDecoder-pointer -> _int)) (_fun _FLAC__StreamDecoder-pointer -> _int))
@@ -566,6 +569,7 @@
(if (eq? fl #f) (if (eq? fl #f)
(error "flac handler has already been deleted") (error "flac handler has already been deleted")
(begin (begin
(FLAC__stream_decoder_finish fl)
(FLAC__stream_decoder_delete fl) (FLAC__stream_decoder_delete fl)
(set! fl #f))) (set! fl #f)))
) )