/[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.9 by ram, Fri May 22 18:42:38 1992 UTC revision 1.1.1.10 by ram, Mon Sep 7 16:50:35 1992 UTC
# Line 647  Line 647 
647             ,@body)))))             ,@body)))))
648    
649  (defmacro do-alpha-key-events ((var kind &optional result) &rest forms)  (defmacro do-alpha-key-events ((var kind &optional result) &rest forms)
650    "(DO-ALPHA-CHARS (var kind [result]) {form}*)    "(DO-ALPHA-KEY-EVENTS (var kind [result]) {form}*)
651     This macro evaluates each form with var bound to a key-event representing an     This macro evaluates each form with var bound to a key-event representing an
652     alphabetic character.  Kind is one of :lower, :upper, or :both, and this     alphabetic character.  Kind is one of :lower, :upper, or :both, and this
653     binds var to each key-event in order as specified in the X11 protocol     binds var to each key-event in order as specified in the X11 protocol

Legend:
Removed from v.1.1.1.9  
changed lines
  Added in v.1.1.1.10

  ViewVC Help
Powered by ViewVC 1.1.5