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 |
37efd8463e96 |
<i>Made with Lisp and love by [Steve Losh][].</i>
<p><a href="http://rochestermade.com" title="Rochester Made"><img src="https://rochestermade.com/media/images/rochester-made-dark-on-light.png" alt="Rochester Made" title="Rochester Made" /></a></p>
[Steve Losh]: http://stevelosh.com/
[roc]: https://rochestermade.com/