diff --git a/ffmpeg-definitions.rkt b/ffmpeg-definitions.rkt index 287ee23..f9fd7a7 100644 --- a/ffmpeg-definitions.rkt +++ b/ffmpeg-definitions.rkt @@ -268,7 +268,9 @@ (_fun _AVChannelLayout-pointer -> _void)) (define (ffmpeg-make-default-channel-layout channels) - (let ((p (malloc (ctype-sizeof _AVChannelLayout) 'atomic-interior))) + (let ((p (cast (malloc (ctype-sizeof _AVChannelLayout) 'atomic-interior) + _pointer + _AVChannelLayout-pointer))) (av_channel_layout_default p channels) p)) diff --git a/private/pcm-converter.rkt b/private/pcm-converter.rkt index cfd6137..37d1a5c 100644 --- a/private/pcm-converter.rkt +++ b/private/pcm-converter.rkt @@ -1,8 +1,8 @@ (module pcm-converter racket/base (require ffi/unsafe - "../ffmpeg-definitions.rkt" - "utils.rkt") + "utils.rkt" + "../ffmpeg-definitions.rkt") (provide pcm-conversion-needed? make-pcm-converter