[cells-devel] Added an eval-now! to defmodel to suppress SBCL warnings

[Peter Hildebrandt]

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