Update of /project/movitz/cvsroot/movitz In directory common-lisp.net:/tmp/cvs-serv27587

Modified Files: eval.lisp Log Message: Add rule for evaluation of keywords.

Date: Thu Dec 9 14:27:29 2004 Author: ffjeld

Index: movitz/eval.lisp diff -u movitz/eval.lisp:1.8 movitz/eval.lisp:1.9 --- movitz/eval.lisp:1.8 Mon Oct 11 15:46:56 2004 +++ movitz/eval.lisp Thu Dec 9 14:27:28 2004 @@ -9,7 +9,7 @@ ;;;; Created at: Thu Nov 2 17:45:05 2000 ;;;; Distribution: See the accompanying file COPYING. ;;;; -;;;; $Id: eval.lisp,v 1.8 2004/10/11 13:46:56 ffjeld Exp $ +;;;; $Id: eval.lisp,v 1.9 2004/12/09 13:27:28 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------

@@ -111,6 +111,8 @@ "3.1.2.1.1 Symbols as Forms" (declare (ignore top-level-p)) (cond + ((keywordp form) + (eval-self-evaluating form env top-level-p)) ((typep (movitz-binding form env) 'constant-object-binding) (translate-program (movitz-print (constant-object (movitz-binding form env))) :cl :muerte.cl))