SBCL kept bugging me with style-warnings when compiling
defmd/defmodels for the first time.  Wrapping the defclass part of
defmodel in an eval-now! fixes it nicely:

     ; -------  defclass ---------------  (^slot-value ,model ',',slotname)
     (eval-now! ;; suppress style warning in SBCL, ph
       (prog1
          (defclass ,class ,(or directsupers '(model-object)) ;; now we can
def the class


I committed that to CVS today.  Lemme know whether anything breaks.

Peter
_______________________________________________
cells-devel site list
[email protected]
http://common-lisp.net/mailman/listinfo/cells-devel

Reply via email to