Changeset 696

Timestamp:

Mar 22, 2004, 9:34:34 AM (21 years ago)

Author:

Gary Byers

Message:

Maintain key-events in doubly-linked lists.

File:

• trunk/ccl/hemlock/src/key-event.lisp (modified) (1 diff)

trunk/ccl/hemlock/src/key-event.lisp

@@ -279 +279 @@
 
 (defstruct (key-event (:print-function %print-key-event)
-                      (:constructor %make-key-event (keysym bits)))
+                      (:constructor %make-key-event (keysym bits))
+                      (:include ccl::dll-node))
   (bits nil :type fixnum)
   (keysym nil :type fixnum))