[movitz-cvs] CVS movitz/losp/muerte

ffjeld ffjeld at common-lisp.net
Tue Mar 13 20:42:45 UTC 2007


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 at 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




More information about the Movitz-cvs mailing list