Commit d235e756 authored by Robert Goldman's avatar Robert Goldman
Browse files

Fix erroneous type declaration.

parent e1cc2f3f
Pipeline #3032 passed with stages
in 34 minutes and 9 seconds
......@@ -276,7 +276,7 @@ system names contained using COERCE-NAME. Return the result."
;;; what is the set of possible values for elements of this list.
(declaim (ftype (function (parent-component list (or t nil)) t)
compute-component-children)
(ftype (function (parent-component list &key (:previous-serial-components list)))
(ftype (function ((or parent-component null) list &key (:previous-serial-components list)))
parse-component-form))
(defun* compute-component-children (component components serial-p)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment