From 9e0f91ff7c94ee317e4cd569d5d222a34f59db95 Mon Sep 17 00:00:00 2001 From: Pavel Korolev Date: Wed, 12 Feb 2020 22:55:22 +0300 Subject: [PATCH] Fix audio-system debug information fetch --- audio/system.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/audio/system.lisp b/audio/system.lisp index 69727f6..4322998 100644 --- a/audio/system.lisp +++ b/audio/system.lisp @@ -17,7 +17,8 @@ (defun device-enumerable-p (device) - (%alc:is-extension-present device "ALC_ENUMERATE_ALL_EXT")) + (cffi:with-foreign-string (string "ALC_ENUMERATE_ALL_EXT") + (%alc:is-extension-present device string))) (defun device-name (device)