Add compile time type checking
This commit is contained in:
parent
5f3441e9ad
commit
4ece9dd455
1 changed files with 1 additions and 0 deletions
|
@ -195,6 +195,7 @@ Returns:
|
||||||
;; Return the reversed result list
|
;; Return the reversed result list
|
||||||
(nreverse result)))
|
(nreverse result)))
|
||||||
|
|
||||||
|
(declaim (ftype (function (question) (values string string string)) extract-question-components))
|
||||||
(defun extract-question-components (question)
|
(defun extract-question-components (question)
|
||||||
"Extracts components of a question stored as a plist.
|
"Extracts components of a question stored as a plist.
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue