diff --git a/audio-errors.rkt b/audio-errors.rkt index 67c6bf3..3a0f1b5 100644 --- a/audio-errors.rkt +++ b/audio-errors.rkt @@ -58,7 +58,7 @@ (let ((src (syntax-source stx)) (line (syntax-line stx))) #`(displayln code) - #`(displayln message) + #`(displayln (list message ...)) #`(displayln '#,src) #`(displayln '#,line) #`(raise-audio-error* code '#,src '#,line message ...)))))