
Update of /project/movitz/cvsroot/movitz/losp/muerte In directory clnet:/tmp/cvs-serv22457 Modified Files: los-closette-compiler.lisp Log Message: Remove debug statement. --- /project/movitz/cvsroot/movitz/losp/muerte/los-closette-compiler.lisp 2007/03/11 22:43:10 1.20 +++ /project/movitz/cvsroot/movitz/losp/muerte/los-closette-compiler.lisp 2007/03/13 20:42:42 1.21 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld <frodef@acm.org> ;;;; Created at: Thu Aug 29 13:15:11 2002 ;;;; -;;;; $Id: los-closette-compiler.lisp,v 1.20 2007/03/11 22:43:10 ffjeld Exp $ +;;;; $Id: los-closette-compiler.lisp,v 1.21 2007/03/13 20:42:42 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------ @@ -693,10 +693,6 @@ (slot-initform (muerte::translate-program (slot-definition-initform slot) '#:muerte.cl '#:cl))) (when slot-initform - (warn "init slot: ~S: ~S => ~S" - slot-name - slot-initform - (movitz::eval-form slot-initform)) (setf (movitz-slot-value class slot-name) (movitz::eval-form slot-initform))))) (std-after-initialization-for-classes class :direct-slots direct-slots