Closed guicho271828 closed 10 years ago
How can I get the warning?
not sure... sometimes do and sometimes not. if i put finslize-inheritance it stop complaining, so basically not a big issue. none of the parents is the forward-referenced class, so this is curious.
Do you mean by "i put finslize-inheritance it stop complaining" that putting finalize-inheritance
of class-pattern
at the end of file of optima package solves the issue?
I saw this problem in a situation like this (on SBCL):
(defclass foo () ())
(match nil ((foo :bar) :class))
macroexpand
ing leads to
SB-MOP:CLASS-SLOTS called on #<STANDARD-CLASS FOO>, which is not yet finalized.
Doing (sb-mop:finalize-inheritance (find-class 'foo))
prior to calling class-slots
fixes it.
on sbcl