Update of /project/movitz/cvsroot/movitz In directory clnet:/tmp/cvs-serv751
Modified Files: environment.lisp Log Message: Working on improving &key parsing.
--- /project/movitz/cvsroot/movitz/environment.lisp 2006/05/07 18:34:30 1.17 +++ /project/movitz/cvsroot/movitz/environment.lisp 2007/02/15 22:01:02 1.18 @@ -9,7 +9,7 @@ ;;;; Created at: Fri Nov 3 11:40:15 2000 ;;;; Distribution: See the accompanying file COPYING. ;;;; -;;;; $Id: environment.lisp,v 1.17 2006/05/07 18:34:30 ffjeld Exp $ +;;;; $Id: environment.lisp,v 1.18 2007/02/15 22:01:02 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------
@@ -191,6 +191,9 @@ :accessor oddeven-args) (allow-other-keys-p :accessor allow-other-keys-p) + (allow-other-keys-var + :initform nil + :accessor allow-other-keys-var) (edx-var :initform nil :accessor edx-var) @@ -206,6 +209,11 @@ (key-vars :initform nil :accessor key-vars) + (key-decode-map + :initform nil + :accessor key-decode-map) + (key-decode-shift + :accessor key-decode-shift) (need-normalized-ecx-p :initarg :need-normalized-ecx-p :accessor need-normalized-ecx-p)