;ELC ;;; Compiled by dan@wayne.mit.edu on Wed Apr 21 21:02:01 2004 ;;; from file /usr/pkgsrc-current/inputmethod/skk/work.bondage/ddskk-12.2.0/skk-auto.el ;;; in Emacs version 21.3.1 ;;; with bytecomp version 2.85.4.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`skk-auto.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defalias 'skk-okuri-search-1 #[nil "\206 \206 \n?\205H \205\306\307!\205\f?\205H G\310V\205H\311\f G \f\fG\\\204B\f\202G\312\313\f\")\207" [skk-abbrev-mode skk-process-okuri-early skk-henkan-okurigana skk-use-numeric-conversion skk-num-list skk-henkan-key require skk-num 1 nil mapcar #[(e) "\301!\207" [e skk-hiragana-to-katakana] 2] l skk-henkan-list skk-okuri-index-min skk-okuri-search-function skk-okuri-index-max skk-katakana] 3]) (defalias 'skk-okuri-search-subr-original #[nil "\211\306\307O G\310\nP\311\311\311\311\311\312 \311!\311\"\311#\311$\313 %\314\216r\315&!q\210'b\210\316\f(\312#\203\361`\"\n\317\"\316\320!\321Z\"P\211G\211 X\203< \306O\230\203<\312)\322 *\323\216\311\210`#*)\203\355\316\324#\312#\203\355`$\317$\316\325!S\" P\211G\211 X\203x \306O\230\203x  OP\311+,g\326=\204\346\317`\316\325(\312#S\",P+\327+!\"\204\273+B!B!\202\273\311)*\202x)\202<\330\331\332!\237\333\"\".\207" [skk-henkan-key henkan-key key len key1 key2 0 1 "\n" nil t match-data ((set-match-data save-match-data-internal)) skk-get-jisyo-buffer search-forward buffer-substring-no-properties " " 2 point-marker ((byte-code "b\210\204\n\301 \302\211\223\207" [skk-save-point make-marker nil] 3)) "/[" "/" 93 rassoc mapcar #[(x) "A\207" [x] 1] sort #[(x y) "@ @\231\207" [y x] 2] len2 key3 len3 okuri3 inhibit-quit key-cand-alist p q r save-match-data-internal skk-jisyo skk-okuri-ari-min skk-okuri-ari-max cont skk-save-point cand okuri] 7]) (defalias 'skk-adjust-search-prog-list-for-auto-okuri #[nil "\304\305\306!\235?\205@\305\306!\307\310\211 \2033 @\211A@\311>\203*\n\310\211\202 A\nT\202\205?\312\305\306!T\313#,\207" [mark dic n pl (skk-okuri-search) default-value skk-search-prog-list 0 nil (skk-jisyo skk-rdbms-private-jisyo-table) skk-splice-in ((skk-okuri-search))] 5]) (byte-code "\301\302!\210\303\300!\210\303\304!\210\305\306\307!\300\310\311!\312\313\"\210\314\306\307!\"\210\315!\313\232\203-\2028\316\311\317\313\320\317\211\211\321&)#\210\306\307!\207" [product run-hooks skk-auto-load-hook require skk-version put provide skk-auto product-find-by-name "Daredevil SKK" product-run-checkers (12 2 0) product-add-feature product-version vector nil "Sone" "12.2.0"] 12)