Update of /project/movitz/cvsroot/movitz/losp/muerte In directory common-lisp.net:/tmp/cvs-serv27760 Modified Files: eval.lisp Log Message: Added a trivial proclaim. Date: Thu Nov 18 18:57:14 2004 Author: ffjeld Index: movitz/losp/muerte/eval.lisp diff -u movitz/losp/muerte/eval.lisp:1.14 movitz/losp/muerte/eval.lisp:1.15 --- movitz/losp/muerte/eval.lisp:1.14 Fri Oct 22 14:33:27 2004 +++ movitz/losp/muerte/eval.lisp Thu Nov 18 18:57:14 2004 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld <frodef@acm.org> ;;;; Created at: Fri Oct 19 21:15:12 2001 ;;;; -;;;; $Id: eval.lisp,v 1.14 2004/10/22 12:33:27 ffjeld Exp $ +;;;; $Id: eval.lisp,v 1.15 2004/11/18 17:57:14 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------ @@ -439,3 +439,8 @@ (setf (symbol-function name) function)) t nil))) + +(defun proclaim (declaration) + ;; What do do? + (warn "Unknown declaration: ~S" declaration) + (values))