Finish the flac decoder before deleting it.

2026-06-24 14:07:11 +02:00
parent 6197fb60e5
commit 66b806f59e
1 changed files with 4 additions and 0 deletions
@@ -413,6 +413,9 @@
 (define-libflac FLAC__stream_decoder_delete
  (_fun _FLAC__StreamDecoder-pointer -> _void))

+(define-libflac FLAC_stream_decoder_finish
+  (_fun _FLAC__StreamDecoder-pointer -> _int))
+
 (define-libflac FLAC__stream_decoder_get_state
  (_fun _FLAC__StreamDecoder-pointer -> _int))

@@ -566,6 +569,7 @@
    (if (eq? fl #f)
        (error "flac handler has already been deleted")
        (begin
+          (FLAC__stream_decoder_finish fl)
          (FLAC__stream_decoder_delete fl)
          (set! fl #f)))
    )