[movitz-cvs] CVS movitz

[ffjeld]

Update of /project/movitz/cvsroot/movitz
In directory clnet:/tmp/cvs-serv16191

Modified Files:
	environment.lisp 
Log Message:
For &key args parsing, check that we have an even number of
keyword/value args.


--- /project/movitz/cvsroot/movitz/environment.lisp	2005/10/31 20:30:32	1.15
+++ /project/movitz/cvsroot/movitz/environment.lisp	2006/05/05 18:37:34	1.16
@@ -9,7 +9,7 @@
 ;;;; Created at:    Fri Nov  3 11:40:15 2000
 ;;;; Distribution:  See the accompanying file COPYING.
 ;;;;                
-;;;; $Id: environment.lisp,v 1.15 2005/10/31 20:30:32 ffjeld Exp $
+;;;; $Id: environment.lisp,v 1.16 2006/05/05 18:37:34 ffjeld Exp $
 ;;;;                
 ;;;;------------------------------------------------------------------
 
@@ -186,6 +186,9 @@
    (max-args
     :initform nil
     :accessor max-args)
+   (oddeven-args
+    :initform nil
+    :accessor oddeven-args)
    (allow-other-keys-p
     :accessor allow-other-keys-p)
    (edx-var