More debugging
This commit is contained in:
@@ -83,6 +83,7 @@
|
||||
)
|
||||
|
||||
(define (to-ret-value ret)
|
||||
(displayln ret)
|
||||
(if (list? ret)
|
||||
(if (null? ret)
|
||||
(raise-audio-error 'audio-error "audio-player: no return value, empty list returned")
|
||||
|
||||
Reference in New Issue
Block a user