;ELC ;;; compiled by jimb@geech.gnu.ai.mit.edu on Tue Jul 6 00:26:08 1993 ;;; from file /gd/gnu/emacs/19.0/lisp/term/tvi970.el ;;; emacs version 19.15.16. ;;; bytecomp version FSF 2.10 ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19"))) (error "This file was compiled for Emacs 19")) (byte-code "À Â\"„à ÂÄ #ˆÅÆÇ\"ˆÈ ÈÊWƒ9à ËÌ Í\\\"ÎÏËÐ \"!!#ˆ T‰ ‚)È ÈÑWƒvà ËÒ Ó\\\"ÎÏËÔ T\"!!#ˆÃ ËÒ Õ\\\"ÎÏËÖ T\"!!#ˆ T‰ ‚>)À‡" [lookup-key function-key-map "[" define-key make-keymap mapcar #[(key-binding) "À \n@\nA@#‡" [define-key function-key-map key-binding] 4] (("" [home]) ("" [backtab]) ("" [print]) ("[@" [insert]) ("" [insertline]) ("" [deleteline]) ("" [next]) ("Om" [kp-subtract]) ("Ol" [kp-separator]) ("On" [kp-decimal]) ("OM" [kp-enter]) ("" [key_eol]) ("" [key_eos]) ("" [key_clear]) ("" [key_dc]) ("" [S-tab]) ("" [clearentry]) ("" [S-clearentry]) ("" [10]) ("" [S-backtab]) ("[?1i" [key_sprint]) ("" [key_sic]) ("" [S-delete]) ("" [S-insertline]) ("" [key_sdl]) ("" [key_seol]) ("" [S-erasepage]) ("" [S-page]) ("S" [send]) ("5" [S-send])) 0 i 10 format "O%c" 112 vector intern "kp-%d" 16 "?%c" 97 "f%d" 65 "S-f%d"] 9) (defvar tvi970-keypad-numeric nil "\ The terminal should be in numeric keypad mode iff this variable is non-nil. Do not set this variable! Call the function ``tvi970-set-keypad-mode''.") (defalias 'tvi970-set-keypad-mode #[(&optional arg) "„ ?‚Â!ÃVÄ ƒÅ‚Æ!‡" [arg tvi970-keypad-numeric prefix-numeric-value 0 send-string-to-terminal "=" ">"] 2 "\ Set the current mode of the TVI 970 numeric keypad. In ``numeric keypad mode'', the number keys on the keypad act as ordinary digits. In ``alternate keypad mode'', the keys send distinct escape sequences, meaning that they can have their own bindings, independent of the normal number keys. With no argument, toggle between the two possible modes. With a positive argument, select alternate keypad mode. With a negative argument, select numeric keypad mode." "P"]) (tvi970-set-keypad-mode 1)