Fix return type

This commit is contained in:
Marcus Kammer 2023-09-20 13:31:16 +02:00
parent 7c8d434d96
commit b5c9fdf294

View file

@ -228,7 +228,7 @@ Returns:
;; Return the reversed result list
(nreverse result)))
(declaim (ftype (function (question) (values string string string))
(declaim (ftype (function (question) (values string string list))
extract-question-components))
(defun extract-question-components (question)
"Extracts components of a question stored as a plist.