;ELC ;;; compiled by nk@redqueen.bytechase.cx on Fri Oct 31 18:20:43 2003 ;;; from file /usr/local/users/nk/pkg-build/test/mule-packages/egg-its/its-han-kata.el ;;; emacs version 21.4 (patch 14) "Reasonable Discussion" XEmacs Lucid. ;;; bytecomp version 2.27 XEmacs; 2000-09-12. ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 19. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "20"))) (error "`its-han-kata.el' was compiled for Emacs 20")) (or (boundp 'current-load-list) (setq current-load-list nil)) (require 'mule) ;;;###coding system: escape-quoted (byte-code "!#\n@ P #\nAo*#@ P #Ao*\"" [#1=#:--dolist-temp--79503 q1 #2=#:--dolist-temp--79502 aa require egg-jisx0201 its-define-mode "roma-han-kata" ")I" t ("k" "s" "t" "h" "y" "r" "w" "g" "z" "d" "b" "p" "c" "f" "j" "v") nil its-defrule "" "tch" "ch" ("b" "m" "p") "m" "" "N"] 5)-A (defvar enable-double-n-syntax nil "\ *Enable \"nn\" input for \")I\"")-A (byte-code "\"\"\"P\"P\"P\"P\"P\"P\"P\"P\"P\"P\")\"\"\"\"\"\"\"\"\"\"\"\"\"\"\"\"\"\"\"\"Ɓ@A\"ƁBC\"ƁDE\"ƁF\"ƁG\"ƁHA\"ƁIC\"ƁJE\"ƁKL\"ƁMN\"ځO\"ƁPQ\"ƁRS\"ƁTU\"ƁVW\"ƁXY\"ƁZ[\"Ɓ\\]\"܁O\"Ɓ^U\"Ɓ_N\"Ɓ`Y\"Ɓa[\"Ɓb]\"Ɓcd\"Ɓef\"Ɓgh\"Ɓij\"Ɓkl\"Ɓmn\"Ɓop\"Ɓqr\"Ɓst\"Ɓuv\"Ɓwx\"Ɓyz\"Ɓ{|\"Ɓ}~\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓz\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"ԁ\"Ɓ\"ց\"Ɓ\"؁\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ \n\"Ɓ  \"Ɓ \"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ\"Ɓ \"Ɓ!\"\"Ɓ#$\"Ɓ%&\"Ɓ'(\"Ɓ)*\"Ɓ+,\"Ɓ-.\"Ɓ/0\"Ɓ12\"Ɓ34\"Ɓ5\"Ɓ67\"Ɓ89\"Ɓ:;\"Ɓ<\"Ɓ=>\"Ɓ?@\"ƁAB\"ƁCD\"ƁEF\"ƁGH\"ƁI\"ƁJ\"ƁKW\"ƁL\"ƁMN\"ƁO\"ƁPQ\"ƁRS\"ƁTU\"ƁVW\"ƁXY\"ƁZ[\"Ɓ\\]\"Ɓ^_\"" [small its-defrule* "n" (cond ((not enable-double-n-syntax) ")I") (t nil)) "nn" (cond (enable-double-n-syntax "") (t nil)) its-defrule "n'" "" "x" "a" "" "i" "" "u" "" "e" "" "o" "" "ya" "" "yu" "" "yo" "" "tu" "" "tsu" "" "" "" "" "" "ka" "" "ki" "" "ku" "" "ke" "" "ko" "" "kya" "" "kyu" "" "kye" "" "kyo" "" "sa" "" "si" "" "su" "" "se" "" "so" "" "sya" "" "syu" "" "sye" "" "syo" "" "sha" "shi" "shu" "she" "sho" "ta" "" "ti" "" "" "te" "" "to" "" "tya" "" "tyi" "è" "tyu" "" "tye" "" "tyo" "" "cha" "chi" "chu" "che" "cho" "na" "" "ni" "" "nu" "" "ne" "" "no" "" "nya" "Ƭ" "nyu" "ƭ" "nye" "ƪ" "nyo" "Ʈ" "ha" "" "hi" "" "hu" "" "he" "" "ho" "" "hya" "ˬ" "hyu" "˭" "hye" "˪" "hyo" "ˮ" "fa" "̧" "fi" "̨" "fu" "fe" "̪" "fo" "̫" "ma" "" "mi" "" "mu" "" "me" "" "mo" "" "mya" "Ь" "myu" "Э" "mye" "Ъ" "myo" "Ю" "" "yi" "" "ye" "" "" "ra" "" "ri" "" "ru" "" "re" "" "ro" "" "la" "li" "lu" "le" "lo" "rya" "ج" "ryu" "ح" "rye" "ت" "ryo" "خ" "lya" "lyu" "lye" "lyo" "wa" "" "wu" "wo" "" "ga" "" "gi" "" "gu" "" "ge" "" "go" "" "gya" "ެ" "gyu" "ޭ" "gye" "ު" "gyo" "ޮ" "za" "" "zi" "" "zu" "" "ze" "" "zo" "" "zya" "ެ" "zyu" "ޭ" "zye" "ު" "zyo" "ޮ" "ja" "ji" "ju" "je" "jo" "da" "" "di" "" "du" "" "de" "" "do" "" "dya" "ެ" "dyi" "ި" "dyu" "ޭ" "dye" "ު" "dyo" "ޮ" "ba" "" "bi" "" "bu" "" "be" "" "bo" "" "va" "ާ" "vi" "ި" "vu" "" "ve" "ު" "vo" "ޫ" "bya" "ެ" "byu" "ޭ" "bye" "ު" "byo" "ޮ" "pa" "" "pi" "" "pu" "" "pe" "" "po" "" "pya" "߬" "pyu" "߭" "pye" "ߪ" "pyo" "߮" "kwi" "" "kwu" "kwe" "" "kwo" "" "gwi" "ި" "gwu" "gwe" "ު" "gwo" "ޫ" "tsa" "§" "tsi" "¨" "tse" "ª" "tso" "«" "xka" "xke" "xti" "xdi" "xdu" "ީ" "xde" "xdo" "ޫ" "xwi" "" "xwe" "" "xwo" "" "-" "" "[" "" "]" "" "z/" ""] 3)-A (defvar use-kuten-for-period t "\ *)Iص$(B$r6gE@$KJQ49$9$k(B")-A (defvar use-touten-for-comma t "\ *)I$(B$rFIE@$KJQ49$9$k(B")-A (byte-code "\"\"P\"P\"" [zenkaku-escape its-defrule* "." (cond (use-kuten-for-period ")I") (t ".")) "," (cond (use-touten-for-comma "") (t ",")) its-defrule "$(B!$(B" "$(B!%(B"] 3)-A (defalias 'its:select-hankaku-katakana #[nil "!" [its:select-mode "roma-han-kata"] 2 nil nil]) (byte-code " ##" [fence-mode-map mule-keymap define-key "x" its:select-hankaku-katakana ""] 4)