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

path->string

Browse Source
This commit is contained in:
Hans Dijkema
2026-02-24 10:09:03 +01:00
parent 973f3f2a07
commit 89ef12815f
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
libflac/flac-decoder.rkt
View File

@@ -20,7 +20,7 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define (flac-open flac-file* cb-stream-info cb-audio) (define (flac-open flac-file* cb-stream-info cb-audio)
(let ((flac-file (if (path? flac-file*) (path->string flac-file* flac-file*)))) (let ((flac-file (if (path? flac-file*) (path->string flac-file*) flac-file*)))
(if (file-exists? flac-file) (if (file-exists? flac-file)
(let ((handler (flac-ffi-decoder-handler))) (let ((handler (flac-ffi-decoder-handler)))
(handler 'new) (handler 'new)