/[cmucl]/src/hemlock/key-event.lisp
ViewVC logotype

Diff of /src/hemlock/key-event.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1.1.6 by wlott, Sat Nov 9 03:05:42 1991 UTC revision 1.1.1.7 by wlott, Mon Mar 23 22:38:09 1992 UTC
# Line 277  Line 277 
277    
278  (defstruct (key-event (:print-function %print-key-event)  (defstruct (key-event (:print-function %print-key-event)
279                        (:constructor %make-key-event (keysym bits)))                        (:constructor %make-key-event (keysym bits)))
280    (bits :type fixnum)    (bits nil :type fixnum)
281    (keysym :type :fixnum))    (keysym nil :type :fixnum))
282    
283  (defun %print-key-event (object stream ignore)  (defun %print-key-event (object stream ignore)
284    (declare (ignore ignore))    (declare (ignore ignore))

Legend:
Removed from v.1.1.1.6  
changed lines
  Added in v.1.1.1.7

  ViewVC Help
Powered by ViewVC 1.1.5