;ELC   
;;; compiled by nk@redqueen.bytechase.cx on Fri Oct 31 18:20:41 2003
;;; from file /usr/local/users/nk/pkg-build/test/mule-packages/egg-its/egg-sj3-client.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 "`egg-sj3-client.el' was compiled for Emacs 20"))

(or (boundp 'current-load-list) (setq current-load-list nil))

(require 'mule)
;;;###coding system: escape-quoted

(provide 'egg-sj3-client)
(defconst SJ3_OPEN 1 "\
$(BMxMQ<TEPO?(B")
(defconst SJ3_CLOSE 2 "\
$(BMxMQ<T:o=|(B")
(defconst SJ3_DICADD 11 "\
$(B<-=qDI2C(B")
(defconst SJ3_DICDEL 12 "\
$(B<-=q:o=|(B")
(defconst SJ3_OPENSTDY 21 "\
$(B3X=,%U%!%$%k%*!<%W%s(B")
(defconst SJ3_CLOSESTDY 22 "\
$(B3X=,%U%!%$%k%/%m!<%:(B")
(defconst SJ3_STDYSIZE 23 "\
")
(defconst SJ3_LOCK 31 "\
$(B<-=q%m%C%/(B")
(defconst SJ3_UNLOCK 32 "\
$(B<-=q%"%s%m%C%/(B")
(defconst SJ3_BEGIN 41 "\
$(BJQ493+;O(B")
(defconst SJ3_BEGIN_EUC 111 "\
$(BJQ493+;O(B")
(defconst SJ3_TANCONV 51 "\
$(B:FJQ49!JJ8@a?-=L!K(B")
(defconst SJ3_TANCONV_EUC 112 "\
$(B:FJQ49!JJ8@a?-=L!K(B")
(defconst SJ3_KOUHO 54 "\
$(B8uJd(B")
(defconst SJ3_KOUHO_EUC 115 "\
$(B8uJd(B")
(defconst SJ3_KOUHOSU 55 "\
$(B8uJd?t(B")
(defconst SJ3_KOUHOSU_EUC 116 "\
$(B8uJd?t(B")
(defconst SJ3_STDY 61 "\
$(BJ8@a3X=,(B")
(defconst SJ3_END 62 "\
$(BJ8@aD93X=,(B")
(defconst SJ3_END_EUC 117 "\
$(BJ8@aD93X=,(B")
(defconst SJ3_WREG 71 "\
$(BC18lEPO?(B")
(defconst SJ3_WREG_EUC 118 "\
$(BC18lEPO?(B")
(defconst SJ3_WDEL 72 "\
$(BC18l:o=|(B")
(defconst SJ3_WDEL_EUC 119 "\
$(BC18l:o=|(B")
(defconst SJ3_MKDIC 81 "\
")
(defconst SJ3_MKSTDY 82 "\
")
(defconst SJ3_MKDIR 83 "\
")
(defconst SJ3_ACCESS 84 "\
")
(defconst SJ3_WSCH 91 "\
$(BC18l8!:w(B")
(defconst SJ3_WSCH_EUC 120 "\
$(BC18l8!:w(B")
(defconst SJ3_WNSCH 92 "\
")
(defconst SJ3_WNSCH_EUC 121 "\
")
(defconst SJ3_VERSION 103 "\
")
(defconst SJ3_DifferentVersion 11 "\
")
(byte-code "ÁBÂÁ!¬…ÃÁÄ\"ˆÄ‡" [current-load-list *sj3-current-server-version* default-boundp set-default nil] 3)
(defvar sj3-server-buffer nil "\
Buffer associated with Sj3 server process.")
(defvar sj3-server-process nil "\
Sj3 Kana Kanji hankan process.")
(byte-code "ÁBÂÁ!¬…ÃÁÄ\"ˆÅBÂÅ!¬…ÃÅÄ\"ˆÆBÂÆ!¬…ÃÆÄ\"ˆÇBÂÇ!¬…ÃÇÄ\"ˆÈBÂÈ!¬…ÃÈÄ\"ˆÉBÂÉ!¬…ÃÉÄ\"ˆÊBÂÊ!¬…ÃÊÄ\"ˆËBÂË!¬…ÃËÄ\"ˆÌBÂÌ!¬…ÃÌÄ\"ˆÍBÂÍ!¬…ÃÍÄ\"ˆÎBÂÎ!¬…ÃÎÄ\"ˆÄ‡" [current-load-list sj3-command-tail-position default-boundp set-default nil sj3-command-buffer sj3-result-buffer sj3-henkan-string sj3-bunsetu-suu sj3-return-code sj3-error-code sj3-stdy-size sj3-user-dict-list sj3-sys-dict-list sj3-yomi-llist] 3)
(defalias 'sj3-put-4byte #[(integer) "ÁÂÃ\"Ä\"ÁÂÅ\"Ä\"ÁÂÆ\"Ä\"ÁÂÇ\"Ä\"±‡" [integer logand ash -24 255 -16 -8 0] 7])
(defalias 'sj3-put-string #[(str) "Á±‡" [str 0] 2])
(defalias 'sj3-put-string* #[(str) "	ÃU«†Ä\nÅ\"ª„Ä\nÆ\"‰Ç±)‡" [sstr *sj3-current-server-version* str 2 encode-coding-string euc-japan shift_jis 0] 4])
(defalias 'sj3-get-4byte #[nil "Â`d	Ã\\W«ˆÄ ˆTªq	bˆ*`‰fÂU«‡	TfÅW¬‘	fÆU«‡Å	TfX¬„ÇÈ!ˆÉÊ	fË\"Ê	TfÌ\"Ê	Í\\fÎ\"Ê	Ï\\fÂ\"$`Ã\\bˆ)‡" [c point 0 4 accept-process-output 128 255 error "sj3-get-4byte: integer range overflow." logior lsh 24 16 2 8 3] 8])
(defalias 'sj3-get-byte #[nil "Â`d	TW«ˆÃ ˆTªr	bˆÄ	fÂ\"Åuˆ*‡" [c point 0 accept-process-output lsh 1] 3])
(defalias 'sj3-get-string #[nil "`ÂÃwˆÄm«ŒÅ ˆ	TÂÃwˆªq)`{Æuˆ)‡" [point c "^ " nil 0 accept-process-output 1] 2])
(defalias 'sj3-get-string* #[nil "`Á ˆ`S{)‡" [point sj3-get-convert-string] 2])
(defalias 'sj3-get-convert-string #[nil "`ÄÅÆÇÅÈ#¬‹É ˆ\nbˆ	Tªn\n`S{\n`|ˆÊU«†ËÌ\"ª„ËÍ\"Ä±+‡" [*sj3-current-server-version* c point str 0 nil search-forward " " t accept-process-output 2 decode-coding-string euc-japan shift_jis] 4])
(defalias 'sj3-get-stdy #[nil "Ã`d\n\\W«ˆÄ ˆ	Tªq\n\\b*‡" [sj3-stdy-size c point 0 accept-process-output] 3])
(defalias 'sj3-command-start #[(command) "	qˆebˆd\nÃ\\U¬„ÄÅ!ˆe\n|ˆÆ!‡" [command sj3-command-buffer sj3-command-tail-position 1024 error "sj3 command start error" sj3-put-4byte] 3])
(defalias 'sj3-command-reset #[nil "ŠÅÆ!«†Æ	Ç‰#ˆqˆÈ!ˆÉ ˆeÊË\nW­‰ËcˆT‰ªs+‡" [sj3-command-tail-position sj3-server-process max sj3-command-buffer i fboundp set-process-coding-system binary buffer-disable-undo erase-buffer 1024 0] 5])
(defalias 'sj3-command-end #[nil "qˆÄ ˆ\nqˆ`Åe`T#‡" [sj3-server-process sj3-command-tail-position sj3-command-buffer sj3-server-buffer erase-buffer process-send-region] 4])
(defalias 'sj3-get-result #[nil "qˆÁÂÃˆeb‡" [sj3-server-buffer nil (byte-code "ÂÃ!ˆ)Â‡" [sj3-server-process focus-follows-mouse t accept-process-output] 2) ((error))] 3])
(defalias 'sj3-get-return-code #[nil "Â ‰ÃU?­ƒÄ	!‰?­	‡" [sj3-error-code sj3-return-code sj3-get-4byte 0 sj3-error-symbol] 3])
(byte-code "À	BÂÀ!¬…ÃÀÄ\"ˆÄÅ	BÂÅ!¬…ÃÅÆ\"ˆÇ	BÂÇ!¬…ÃÇÈ\"ˆÀ‡" [*sj3-server-version* current-load-list default-boundp set-default 2 *sj3-program-name* "sj3-egg-m" *sj3-service-name* "sj3"] 3)
(defalias 'sj3-server-open #[(server-host-name login-name) "Æ «‚Ç‡5«ŠÈk¬…Ék«„Ê ª\n«…\nÈk«„Ë ª\nÊ ÌÍÎÏÈ!ÐÑO!6#,71ÒÓÔ‰-…Õ-!ˆÖ×!.ØÙ!/ØÚ!0ŠÛÜ!«‡Ü-Ý‰#ˆ.qˆÞ.!ˆ0qˆÞ0!ˆ/qˆÞ/!ˆß ˆe8àá22W«‰ácˆT‰ªr*â ˆã3!ˆä1!ˆå!ˆå,!ˆå	!ˆæ ˆç ˆè ˆ9U«§ã3!ˆäÐ!ˆå!ˆå,!ˆå	!ˆæ ˆç ˆè ˆáU¬ƒé ˆáU¬…êV­ŽÐ4áU¬„[4ë )-‡" [host_name program_name login-name i server-host-name sj3-return-code sj3-server-active-p t "" "unix" system-name user-login-name format "%d.%s" string-to-int make-temp-name 1 6 var (open-network-stream "Sj3" " [Sj3 Output Buffer] " sj3serv_name *sj3-service-name*) ((error (byte-code "ÄÅ\nA@\"«†Æ	DªÄÇ\nA@\"«†ÈDª‚ÉÊ‡" [*sj3-service-name* sj3serv_name var sj3-error-code string-match "Unknown host" :SJ3_UNKNOWN_HOST "Unknown service" :SJ3_UNKNOWN_SERVICE :SJ3_SOCK_OPEN_FAIL nil] 3))) process-kill-without-query get-buffer " [Sj3 Output Buffer] " get-buffer-create " [Sj3 Command Buffer] " " [Sj3 Result Buffer] " fboundp set-process-coding-system binary buffer-disable-undo erase-buffer 1024 0 sj3-clear-dict-list sj3-command-start sj3-put-4byte sj3-put-string sj3-command-end sj3-get-result sj3-get-return-code sj3-connection-error -1 sj3-get-stdy-size user_name sj3-server-process sj3-server-buffer sj3-command-buffer sj3-result-buffer server_version max SJ3_OPEN *sj3-current-server-version* *sj3-server-version* *sj3-program-name* sj3serv_name sj3-command-tail-position SJ3_DifferentVersion] 11])
(defalias 'sj3-server-active-p #[nil "­…Á!Âa‡" [sj3-server-process process-status open] 2])
(defalias 'sj3-connection-error #[nil "ÂÃÄ‡" [sj3-return-code sj3-error-code :sj3-no-connection -1 nil] 1])
(defalias 'sj3-zero-arg-command #[(op) "Á «Â!ˆÃ ˆÄ ˆÅ ‡Æ ‡" [op sj3-server-active-p sj3-command-start sj3-command-end sj3-get-result sj3-get-return-code sj3-connection-error] 2])
(defalias 'sj3-server-close #[nil "ÆÇ «@‰«‰È!ˆAªmÇ «@‰«‰È!ˆAªmÉ ˆ)Ê ˆË!ˆÇ «…Ì!ˆ\n«„Í\n!ˆ	«„Í	!ˆ«„Í!ˆÆ‰Æ‰‰‡" [sj3-result-buffer sj3-command-buffer sj3-server-buffer sj3-user-dict-list sj3-sys-dict-list dict-no nil sj3-server-active-p sj3-server-close-dict sj3-clear-dict-list sj3-server-close-stdy sj3-zero-arg-command delete-process kill-buffer sj3-server-process SJ3_CLOSE] 3])
(defalias 'sj3-clear-dict-list #[nil "Â‰‰‡" [sj3-user-dict-list sj3-sys-dict-list nil] 3])
(byte-code "ÀÁ!¬…ÁÂKMˆÀ‡" [fboundp si:kill-emacs kill-emacs] 2)
(defalias 'kill-emacs #[(&optional arg) "Á «ƒÂ ˆÃ!‡" [arg sj3-server-active-p sj3-server-close si:kill-emacs] 2 nil "P"])
(defalias 'sj3-get-stdy-size #[nil "Ã\n!ˆ	ÄU­„Å ‰‡" [sj3-stdy-size sj3-return-code SJ3_STDYSIZE sj3-zero-arg-command 0 sj3-get-4byte] 2])
(defalias 'sj3-put-stdy-dmy #[nil "Â‰W­‰Âcˆ	T‰ªs)‡" [sj3-stdy-size i 0] 3])
(defalias 'sj3-skip-length #[nil "`À\\b‡" [4] 2])
(defalias 'sj3-skip-4byte #[nil "`À\\b‡" [4] 2])
(defalias 'sj3-skip-yomi #[nil "ÀÁwˆÂu‡" ["^ " nil 1] 2])
(defalias 'sj3-skip-stdy #[nil "`\\b‡" [sj3-stdy-size] 2])
(defalias 'sj3-server-henkan-begin #[(henkan-string) "Æ ¬ƒÇ ‡ÈÉ(Š%ÊU«ˆËÌ\"ª†ËÍ\" qˆÎ ˆÏ&É!ebˆÊU«‡Ð)!ˆª…Ð*!ˆÑ!ˆÒ ˆÓ ˆÔ ˆ\nÏU…ü ÏÉ‰‰Õ ˆ qˆ`d|ˆ`%Ï‰‰‰±ˆbˆ\"qˆÖ ‰ÏV«ð`‰\\OÉ#$'\\ÊU«‰×$Ì\"Gª‡×$Í\"GØ ˆÙ ˆ`# qˆ`uˆÚ!C\"!ÏcˆÛÜ!ˆÛÏ!ˆÝ\"'##ˆ`ZbˆÛ	!ˆ`	\\bˆ\nT\"qˆ+ª\n‰&,+‡" [yp offset sj3-return-code mb-str p0 yl sj3-server-active-p sj3-connection-error t nil 2 encode-coding-string euc-japan shift_jis erase-buffer 0 sj3-command-start sj3-put-string sj3-command-end sj3-get-result sj3-get-return-code sj3-get-4byte sj3-get-byte decode-coding-string sj3-get-stdy sj3-get-convert-string append sj3-put-4byte 1 insert-buffer-substring henkan-string *sj3-current-server-version* sj3-result-buffer sj3-yomi-llist sj3-server-buffer endp ystr sj3-henkan-string sj3-bunsetu-suu startp inhibit-quit SJ3_BEGIN_EUC SJ3_BEGIN] 5])
(defalias 'sj3-server-henkan-quit #[nil "À‡" [t] 1])
(defalias 'sj3-get-yomi-suu-org #[nil "A‰«ƒ@‡Á‡" [sj3-yomi-llist 0] 2])
(defalias 'sj3-server-henkan-end #[(bunsetu-no) "Æ ¬ƒÇ ‡È$ŠÉ‰‰‰‰‰‰qˆebˆ¨«‘ÊX«‹ X«„ª‚ ÊW«ËË `Ì `ZSË Ë ‰ÊV«”ÍZW«‹ÎV«…Ï!ˆ`FB\\bˆT‰ª0ŸÐÊ‰@%@WƒG@A	U«š\nU«”\\‰!!@Ñ )ªðA@Í8\"#@\\	W«‰	\n\\Ñ ªr\"ÍU¬ÉÍ8ÍU¬Â	Z@qˆÎ8bˆÒ#A@\"ˆU¬‰\nZU«—TA‰@U¬‡	\n\\Ñ **T)‚£ «@\nU¬‡Í8ÍU«„&ª‹Î8bˆÒA@Ó\".‡" [yp op ol i ylist ydata sj3-server-active-p sj3-connection-error t nil 0 sj3-get-4byte sj3-get-string 2 3 sj3-server-b-study 1 sj3-get-yomi-suu-org sj3-server-cl-study "" kouho-suu p0 kouho-no bunsetu-no yl yl1 sub len ystr length max sj3-result-buffer sj3-bunsetu-suu pp ent str inhibit-quit sj3-yomi-llist sj3-return-code] 8])
(defalias 'sj3-server-cl-study #[(str1 str2) "Æ ¬ƒÇ ‡Š\nÈU«†É	!ˆª„É!ˆÊ!ˆÊ!ˆË˜«…Ì ˆª•Íqˆ`qˆÎ‰\\#ˆ)Ï ˆÐ ˆÑ )‡" [SJ3_END SJ3_END_EUC *sj3-current-server-version* sj3-result-buffer str2 p0 sj3-server-active-p sj3-connection-error 2 sj3-command-start sj3-put-string* "" sj3-put-stdy-dmy nil insert-buffer-substring sj3-command-end sj3-get-result sj3-get-return-code str1 sj3-command-buffer sj3-stdy-size] 5])
(defalias 'sj3-server-b-study #[(no) "Æ ¬ƒÇ ‡ŠÈÉqˆ\nW«ŒÊ ˆË ˆT‰ªp`Ì	!ˆÍ‰\\#ˆÎ ˆÏ ˆÐ +‡" [sj3-stdy-size SJ3_STDY no sj3-result-buffer p0 i sj3-server-active-p sj3-connection-error 0 nil sj3-skip-stdy sj3-skip-yomi sj3-command-start insert-buffer-substring sj3-command-end sj3-get-result sj3-get-return-code] 6])
(defalias 'sj3-result-goto-bunsetu #[(bunsetu-no) "ebˆÃÄ\nW­ŽÅ `	\\bˆ\nT‰ªn*‡" [bunsetu-no length i nil 0 sj3-get-4byte] 3])
(defalias 'sj3-server-henkan-kakutei #[(bunsetu-no jikouho-no) "Æ ¬ƒÇ ‡ÈW®ƒ\nX?­ªÉŠqˆÊË!ˆÌ ˆÍ ˆÎ ÈW®ƒX?­‰ÏÐ!ˆÑ!ˆÉ+‡" [sj3-result-buffer inhibit-quit sj3-bunsetu-suu jikouho-no kouho-suu bunsetu-no sj3-server-active-p sj3-connection-error 0 t nil sj3-result-goto-bunsetu sj3-skip-length sj3-skip-yomi sj3-get-4byte delete-char 4 sj3-put-4byte] 2])
(defalias 'sj3-server-henkan-next #[(bunsetu-no) "Æ ¬ƒÇ ‡È%ŠÉ‰‰‰‰\"qˆÊ&!ˆË ˆ`Ì `Í ‰\"ÎV«„È‚æ Ï!ÐÉ ‰ÐW«…'‚å É!qˆÑ ˆÒ ˆÌ !ÎV«ÀÎ#qˆÍ ˆ`Ó ˆÔ $!$k«„`ª†TT)W«“Í ˆÕÖ!ˆÓ ˆ× ˆT‰ªi` )qˆ\nÐV«ˆØ#\n #ˆÙ!ˆÐ±ˆ`	ZbˆÕÚ!ˆÐX«†ÛÜ!ˆª†ÛÝ\\!ˆ	bˆÕÖ!ˆÛ!ˆ)È+.‡" [length p0 startp ystr i ksuu sj3-server-active-p sj3-connection-error t nil sj3-result-goto-bunsetu sj3-skip-length sj3-get-string sj3-get-4byte 1 sj3-server-henkan-kouho 0 sj3-skip-4byte sj3-skip-stdy sj3-get-stdy sj3-get-string* delete-char -4 sj3-get-convert-string insert-buffer-substring sj3-put-kata 4 sj3-put-4byte 3 2 p1 sj3-result-buffer endp kanji kouho-suu sj3-server-buffer kkanji inhibit-quit bunsetu-no sj3-return-code] 6])
(defalias 'sj3-server-henkan-kouho #[(str) "Æ ¬‚Ç‡\nÈU«†É	Ê\"ª„É	Ë\"Ì‰‰GÍ\"‰ÎX¬¡\nÈU«†Ï!ˆª…Ï!ˆÐ!ˆÑ!ˆÒ ˆÓ ˆÔ ˆ+‡" [SJ3_KOUHO_EUC str *sj3-current-server-version* mb-str kouho-suu len sj3-server-active-p -1 2 encode-coding-string euc-japan shift_jis nil sj3-server-henkan-kouho-suu 0 sj3-command-start sj3-put-4byte sj3-put-string sj3-command-end sj3-get-result sj3-get-return-code SJ3_KOUHO] 4])
(defalias 'sj3-put-kata #[(str) "Ä!ÅGÆ‰W«©	H	Ç\nU¬•ÈÉÊ\n!\"«ËÌÍ!ÎÏÐ\n!8#ª\nIˆ	T‰ªSÅ±+‡" [len i ch str copy-sequence 0 nil ?$(B!<(B string-match "\\cH" char-to-string make-char find-charset japanese-jisx0208 37 2 split-char] 9])
(defalias 'sj3-server-henkan-kouho-suu #[(yomi-length yomi) "Æ ¬‚Ç‡ŠÈU«†É!ˆª„É!ˆÊ\n!ˆË	!ˆÌ ˆÍ ˆÎ ˆÏU¬ƒÇª‚Ð )‡" [sj3-return-code yomi yomi-length SJ3_KOUHOSU SJ3_KOUHOSU_EUC *sj3-current-server-version* sj3-server-active-p -1 2 sj3-command-start sj3-put-4byte sj3-put-string sj3-command-end sj3-get-result sj3-get-return-code 0 sj3-get-4byte] 2])
(defalias 'sj3-server-bunsetu-henkou #[(bunsetu-no bunsetu-length) "Æ ¬ƒÇ ‡ÈW®ƒX?…8É%ŠÊ‰‰‰‰‰‰!\"#qˆË!`Ì&\"‰\"G!Ê‰W«¤\nÈV«ŸÍ `ÎÊwˆ\n`ZZ\\bˆT‰ªX*`|ˆZZÏ\"!ÈUƒ.\nÈU„.\n[\\Ê‰TV¬†!U«‰Ð\"ªîÊ‰‰$ #qˆ`Í ÎÊwˆ`Ñ\\Z\\ Ñ\\\\Ð \"'ÒU«†Ó	Ô\"ª„Ó	Õ\"ÖG\"$#qˆ$ÈU«‰Ð\"ªŒ|ˆS bˆ+Ï	!ˆ,(×U?­.\n‡" [bunsetu-no ystr len2 bno p0 sj3-bunsetu-suu sj3-server-active-p sj3-connection-error 0 t nil sj3-yomi-point sj3-get-yomi* sj3-get-4byte "^ " sj3-put-tanconv sj3-get-yomi 4 2 encode-coding-string euc-japan shift_jis sj3-server-henkan-kouho-suu -1 length p1 len len1 yp0 point mb-str yp1 ll bunsetu-suu str sj3-result-buffer i inhibit-quit bunsetu-length *sj3-current-server-version* sj3-return-code] 9])
(defalias 'sj3-put-tanconv #[(str) "`Æ‰ÇU«†ÈÉ\"ª„ÈÊ\"GË\"‰ÌY«çÆ	qˆÌ±ˆÌU¬†Í\"¬†Î!ˆª±Æ‰	qˆÏÐ!ˆÏÌ!ˆqˆÑ ˆ`Ò ˆÓ ˆ`	qˆÔ#ˆ*	qˆ`ZbˆÏ\n!ˆ`\n\\bˆT),‡" [ksuu sj3-result-buffer offset len mb-str str nil 2 encode-coding-string euc-japan shift_jis sj3-server-henkan-kouho-suu 0 sj3-server-tanconv put-kata-and-hira sj3-put-4byte 1 sj3-get-4byte sj3-get-stdy sj3-get-convert-string insert-buffer-substring point p1 p0 sj3-server-buffer sj3-bunsetu-suu *sj3-current-server-version* sj3-return-code] 7])
(defalias 'sj3-server-tanconv #[(len str) "Æ ¬ƒÇ ‡ÈÉU«†Ê!ˆª„Ê\n!ˆË	!ˆÌ!ˆÍ ˆÎ ˆÏ )‡" [str len SJ3_TANCONV SJ3_TANCONV_EUC *sj3-current-server-version* inhibit-quit sj3-server-active-p sj3-connection-error t 2 sj3-command-start sj3-put-4byte sj3-put-string sj3-command-end sj3-get-result sj3-get-return-code] 2])
(defalias 'put-kata-and-hira #[(str) "ÁÂ!ˆÁÃ!ˆÄ ˆÅ!ˆÃ±‡" [str sj3-put-4byte 2 0 sj3-put-stdy-dmy sj3-put-kata] 2])
(defalias 'sj3-get-yomi #[(offset length) "\n	‰\\O‡" [length offset sj3-henkan-string] 4])
(defalias 'sj3-get-yomi* #[(offset bunsetu-length) "Æ	W«š\n‰TO‰Ç˜«†È\\ªƒTT)ªa\nO*‡" [ch bunsetu-length sj3-henkan-string offset i c 0 "’" 3] 4])
(defalias 'sj3-bunsetu-suu #[nil "‡" [sj3-bunsetu-suu] 1])
(defalias 'sj3-bunsetu-kanji #[(bunsetu-no &optional buffer) "pÆŽ	qˆ\nÇW®„\nX?­ÕÈ\n!ˆÉ ˆÊ ˆÇË ÌZË Í ˆW«‘Ê ˆT‰W«oÍ ˆªj+Î‰`ÏÎwˆ`Ðuˆ¬‡{°ª‹qˆÑ	#ˆÎ**‡" [max sj3-result-buffer bunsetu-no p1 p2 i ((set-buffer savebuffer)) 0 sj3-result-goto-bunsetu sj3-skip-length sj3-skip-yomi sj3-get-4byte 2 sj3-skip-stdy nil "^ " 1 insert-buffer-substring rksuu buffer savebuffer sj3-bunsetu-suu] 5])
(defalias 'sj3-bunsetu-kanji-length #[(bunsetu-no) "ŠqˆÆW®„X?­½Ç!ˆÈ ˆÉ ˆÆÊ ËZÊ Ì ˆ\nW«É ˆT‰	W«pÌ ˆªk+Í‰`ÎÍwˆ`‰Z*)‡" [p3 rksuu max p1 bunsetu-no i 0 sj3-result-goto-bunsetu sj3-skip-length sj3-skip-yomi sj3-get-4byte 2 sj3-skip-stdy nil "^ " sj3-result-buffer sj3-bunsetu-suu] 4])
(defalias 'sj3-bunsetu-yomi-moji-suu #[(bunsetu-no) "Š	qˆ\nÄW®ƒ\nX?­œÅ\n!ˆÆ ˆÄÇÈÄ!Éf\"¬ˆÊuˆTªo))‡" [sj3-bunsetu-suu sj3-result-buffer bunsetu-no c 0 sj3-result-goto-bunsetu sj3-skip-length char-equal int-to-char nil 1] 3])
(defalias 'sj3-yomi-point #[(bunsetu-no) "Å‰Æ‰ebˆ\nW«šÇ `ÈÆwˆ`Z\\	\\bˆ\nT‰ªb,‡" [bunsetu-no length i len point 0 nil sj3-get-4byte "^ "] 5])
(defalias 'sj3-bunsetu-yomi #[(bunsetu-no &optional buffer) "pÆŽ\nqˆÇW®„X?­¦È!ˆÉ ˆÊ‰`ËÊwˆ	¬…`{ªŒ`	qˆÌ\n#ˆÍ**‡" [savebuff buffer sj3-result-buffer p2 bunsetu-no p1 ((set-buffer savebuff)) 0 sj3-result-goto-bunsetu sj3-skip-length nil "^ " insert-buffer-substring t sj3-bunsetu-suu] 4])
(defalias 'sj3-bunsetu-yomi-equal #[(bunsetu-no yomi) "Š\nqˆÄW®ƒ	X?­ŒÅ!ˆÆ ˆÇÈ!!)‡" [yomi sj3-bunsetu-suu sj3-result-buffer bunsetu-no 0 sj3-result-goto-bunsetu sj3-skip-length looking-at regexp-quote] 3])
(defalias 'sj3-bunsetu-kouho-suu #[(bunsetu-no) "Š	qˆ\nÃW®ƒ\nX?­ŒÄ\n!ˆÅ ˆÆ ˆÇ )‡" [sj3-bunsetu-suu sj3-result-buffer bunsetu-no 0 sj3-result-goto-bunsetu sj3-skip-length sj3-skip-yomi sj3-get-4byte] 2])
(defalias 'sj3-bunsetu-kouho-list #[(bunsetu-no) "ŠqˆÆW®„X?­ÁÇ!ˆÈ ˆÉ ˆÊ ÆË‰Ì ˆÍ ˆ	W« `ÎËwˆ\n`{°BÏuˆT‰	ÐZW«`Í ˆª[Ÿ,)‡" [sj3-result-buffer max p0 bunsetu-no i result 0 sj3-result-goto-bunsetu sj3-skip-length sj3-skip-yomi sj3-get-4byte nil sj3-skip-4byte sj3-skip-stdy "^ " 1 2 sj3-bunsetu-suu] 5])
(defalias 'sj3-bunsetu-kouho-number #[(bunsetu-no) "Š	qˆ\nÃW®ƒ\nX?­Ä\n!ˆÅ ˆÆ ˆÇ ˆÈ )‡" [sj3-bunsetu-suu sj3-result-buffer bunsetu-no 0 sj3-result-goto-bunsetu sj3-skip-length sj3-skip-yomi sj3-skip-4byte sj3-get-4byte] 2])
(defalias 'sj3-simple-command #[(op arg) "Ã «”ÄÅ	!ˆÆ!ˆÇ ˆÈ ˆÉ )‡Ê ‡" [arg op inhibit-quit sj3-server-active-p t sj3-command-start sj3-put-4byte sj3-command-end sj3-get-result sj3-get-return-code sj3-connection-error] 2])
(defalias 'sj3-server-open-dict #[(dict-file-name password) "Æ ¬ƒÇ ‡ÈŠÉ!ˆÊ!ˆ;«†Ê!ˆª„ÊË!ˆÌ ˆÍ ˆÎ ˆËU­—Ï ;«ˆÐC\"ª†Ð\nC\")*‡" [SJ3_DICADD inhibit-quit sj3-sys-dict-list sj3-user-dict-list password dict-no sj3-server-active-p sj3-connection-error t sj3-command-start sj3-put-string 0 sj3-command-end sj3-get-result sj3-get-return-code sj3-get-4byte append dict-file-name sj3-return-code] 3])
(defalias 'sj3-server-close-dict #[(dict-no) "Ã ¬ƒÄ ‡ÅŠÆ	!ˆÇ!ˆÈ ˆÉ ˆÊ *‡" [dict-no SJ3_DICDEL inhibit-quit sj3-server-active-p sj3-connection-error t sj3-command-start sj3-put-4byte sj3-command-end sj3-get-result sj3-get-return-code] 2])
(defalias 'sj3-server-make-dict #[(dict-file-name) "Ã ¬ƒÄ ‡ÅŠÆ	!ˆÇ!ˆÈÉ!ˆÈÉ!ˆÈÊ!ˆË ˆÌ ˆÍ *‡" [dict-file-name SJ3_MKDIC inhibit-quit sj3-server-active-p sj3-connection-error t sj3-command-start sj3-put-string sj3-put-4byte 2048 256 sj3-command-end sj3-get-result sj3-get-return-code] 2])
(defalias 'sj3-server-open-stdy #[(stdy-file-name) "Ã ¬ƒÄ ‡ÅŠÆ	!ˆÇ!ˆÇÈ!ˆÉ ˆÊ ˆË *‡" [stdy-file-name SJ3_OPENSTDY inhibit-quit sj3-server-active-p sj3-connection-error t sj3-command-start sj3-put-string 0 sj3-command-end sj3-get-result sj3-get-return-code] 2])
(defalias 'sj3-server-close-stdy #[nil "Á!‡" [SJ3_CLOSESTDY sj3-zero-arg-command] 2])
(defalias 'sj3-server-make-stdy #[(stdy-file-name) "Ã ¬ƒÄ ‡ÅŠÆ	!ˆÇ!ˆÈÉ!ˆÈÊ!ˆÈÉ!ˆË ˆÌ ˆÍ *‡" [stdy-file-name SJ3_MKSTDY inhibit-quit sj3-server-active-p sj3-connection-error t sj3-command-start sj3-put-string sj3-put-4byte 2048 1 sj3-command-end sj3-get-result sj3-get-return-code] 2])
(defalias 'sj3-server-dict-add #[(dictno kanji yomi bunpo) "Æ ¬ƒÇ ‡ÈŠÉU«†Ê!ˆª„Ê\n!ˆË	!ˆÌ!ˆÌ!ˆË!ˆÍ ˆÎ ˆÏ *‡" [yomi dictno SJ3_WREG SJ3_WREG_EUC *sj3-current-server-version* inhibit-quit sj3-server-active-p sj3-connection-error t 2 sj3-command-start sj3-put-4byte sj3-put-string* sj3-command-end sj3-get-result sj3-get-return-code kanji bunpo] 2])
(defalias 'sj3-server-dict-delete #[(dictno kanji yomi bunpo) "Æ ¬ƒÇ ‡ÈŠÉU«†Ê!ˆª„Ê\n!ˆË	!ˆÌ!ˆÌ!ˆË!ˆÍ ˆÎ ˆÏ *‡" [yomi dictno SJ3_WDEL SJ3_WDEL_EUC *sj3-current-server-version* inhibit-quit sj3-server-active-p sj3-connection-error t 2 sj3-command-start sj3-put-4byte sj3-put-string* sj3-command-end sj3-get-result sj3-get-return-code kanji bunpo] 2])
(defalias 'sj3-server-dict-info #[(dict-no) "Æ ¬ƒÇ ‡ÈŠÉqˆÊU«ˆË\"ˆª†Ë\"ˆ\nÌU«ŸÍ Í Î EBÊU«ˆË\"ˆªdË\"ˆª\\\nÏU«ƒÉŸ+‡" [sj3-server-buffer inhibit-quit sj3-return-code *sj3-current-server-version* dict-no result sj3-server-active-p sj3-connection-error t nil 2 sj3-simple-command 0 sj3-get-string* sj3-get-4byte 111 SJ3_WSCH_EUC SJ3_WSCH SJ3_WNSCH_EUC SJ3_WNSCH sj3-error-code] 3])
(defalias 'sj3-server-make-directory #[(dir-name) "Ã ¬ƒÄ ‡ÅŠÆ	!ˆÇ!ˆÈ ˆÉ ˆÊ *‡" [dir-name SJ3_MKDIR inhibit-quit sj3-server-active-p sj3-connection-error t sj3-command-start sj3-put-string sj3-command-end sj3-get-result sj3-get-return-code] 2])
(defalias 'sj3-server-file-access #[(file-name access-mode) "Å ¬ƒÆ ‡ÇŠÈ!ˆÉ\n!ˆÊ	!ˆË ˆÌ ˆÍÎ *‡" [sj3-error-code access-mode file-name SJ3_ACCESS inhibit-quit sj3-server-active-p sj3-connection-error t sj3-command-start sj3-put-string sj3-put-4byte sj3-command-end sj3-get-result nil sj3-get-4byte] 2])
(defalias 'sj3_lock #[nil "Á!‡" [SJ3_LOCK sj3-zero-arg-command] 2])
(defalias 'sj3_unlock #[nil "Á!‡" [SJ3_UNLOCK sj3-zero-arg-command] 2])
(defalias 'sj3_version #[nil "Á!‡" [SJ3_VERSION sj3-zero-arg-command] 2])
(byte-code "À	BÂÀ‡" [*sj3-error-alist* current-load-list ((1 :SJ3_SERVER_DEAD "$(B%5!<%P$,;`$s$G$$$^$9!#(B") (2 :SJ3_SOCK_OPEN_FAIL "socket$(B$N(Bopen$(B$K<:GT$7$^$7$?!#(B") (6 :SJ3_ALLOC_FAIL "$(B%a%b%j(Balloc$(B$G<:GT$7$^$7$?!#(B") (7 :SJ3_ILLEGAL_COMMAND "$(B%3%^%s%I$,4V0c$C$F$$$k(B") (12 :SJ3_BAD_HOST " $(B%[%9%HL>$,$J$$(B ") (13 :SJ3_BAD_USER " $(B%f!<%6L>$,$J$$(B ") (31 :SJ3_NOT_A_DICT "$(B@5$7$$<-=q$G$O$"$j$^$;$s!#(B") (35 :SJ3_NO_EXIST "$(B%U%!%$%k$,B8:_$7$^$;$s!#(B") (37 :SJ3_OPENF_ERR "$(B%U%!%$%k$,%*!<%W%s$G$-$^$;$s!#(B") (39 :SJ3_PARAMR "$(B%U%!%$%k$NFI$_9~$_8"8B$,$"$j$^$;$s!#(B") (40 :SJ3_PARAMW "$(B%U%!%$%k$N=q$-9~$_8"8B$,$"$j$^$;$s!#(B") (71 :SJ3_NOT_A_USERDICT "$(B;XDj$5$l$F<-=q$O!"%f!<%6!<<-=q$G$O$"$j$^$;$s!#(B") (72 :SJ3_RDONLY "$(B%j!<%I%*%s%j!<$N<-=q$KEPO?$7$h$&$H$7$^$7$?!#(B") (74 :SJ3_BAD_YOMI "$(BFI$_$KITE,Ev$JJ8;z$,4^$^$l$F$$$^$9!#(B") (75 :SJ3_BAD_KANJI "$(B4A;z$KITE,Ev$JJ8;z$,4^$^$l$F$$$^$9!#(B") (76 :SJ3_BAD_HINSHI "$(B;XDj$5$l$?IJ;lHV9f$,$"$j$^$;$s!#(B") (82 :SJ3_WORD_ALREADY_EXIST "$(B;XDj$5$l$?C18l$O$9$G$KB8:_$7$F$$$^$9!#(B") (84 :SJ3_JISHOTABLE_FULL "$(B<-=q%F!<%V%k$,0lGU$G$9!#(B") (92 :SJ3_WORD_NO_EXIST "$(B;XDj$5$l$?C18l$,B8:_$7$^$;$s!#(B") (102 :SJ3_MKDIR_FAIL " $(B%G%#%l%/%H%j$r:n$jB;$J$C$?(B "))] 2)
(defalias 'sj3-error-symbol #[(code) "Ã\n\"‰¬…Ä\nDªƒ	A@)‡" [*sj3-error-alist* pair code assoc :sj3-unknown-error-code] 4])