test/package.lisp @ 7fbb6f4abee8

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 4c59ba2362d8
children (none)
(defpackage :jarl/test
  (:use :cl :1am)
  (:export :run-tests))