Function: hangul390-input-method-internal

hangul390-input-method-internal is a byte-compiled function defined in hangul.el.gz.

Signature

(hangul390-input-method-internal KEY)

Source Code

;; Defined in /usr/src/emacs/lisp/leim/quail/hangul.el.gz
;; Support function for `hangul390-input-method'.  Actually, this
;; function handles the Hangul 3-Bulsik 390.  KEY is an entered key
;; code used for looking up `hangul390-keymap'."
(defun hangul390-input-method-internal (key)
  (let ((char (aref hangul390-keymap (- key 33))))
    (cond ((or (and (> char 86) (< char 91))
               (and (> char 96) (< char 123)))
           (hangul3-input-method-cho (- char (if (< char 97) 86 92))))
          ((and (> char 64) (< char 86))
           (hangul3-input-method-jung (- char 34)))
          ((< char 31)
           (hangul3-input-method-jong char))
          (t
           (setq hangul-queue (make-vector 6 0))
           (insert char)
           (move-overlay quail-overlay (point) (point))))))