Fix `Undefined function (SETF CCL:SLOT-DEFINITION-INITARGS)` in CCL
The MOP calls this an "accessor" so I feel like I shouldn't need to do this, but
CCL only defines this function as a reader. Instead of `setf`ing it, we can
wrap `make-instance` and hack the initargs we pass to `call-next-method`.
| author |
Steve Losh <steve@stevelosh.com> |
| date |
Fri, 21 Aug 2020 00:34:26 -0400 |
| parents |
a2712b3d3b16 |
| children |
6d74e7ab0fc0 |
(ql:quickload "cl-d-api")
(defparameter *header*
"The following is a list of all user-facing parts of Jarl.
If there are backwards-incompatible changes to anything listed here, they will
be noted in the changelog and the author will feel bad.
Anything not listed here is subject to change at any time with no warning, so
don't touch it.
")
(d-api:generate-documentation
:jarl
#p"docs/02-reference.markdown"
(list "JARL")
*header*
:title "API Reference")