Mercurial > hg > xemacs-beta

changeset 4993:c0934cef10c6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
convert some source files to utf-8 -------------------- ChangeLog entries follow: -------------------- lisp/ChangeLog addition: 2010-02-06 Ben Wing <ben@xemacs.org> * unicode.el: * unicode.el (for): Convert file to utf-8. modules/ChangeLog addition: 2010-02-06 Ben Wing <ben@xemacs.org> * canna/canna_api.c: * canna/canna_api.c (storeResults): * canna/canna_api.c (Fcanna_set_bunsetsu): * canna/canna_api.c (Fcanna_initialize): * canna/canna_api.c (Fcanna_store_yomi): * canna/canna_api.c (Fcanna_henkan_end): Convert file to utf-8. src/ChangeLog addition: 2010-02-06 Ben Wing <ben@xemacs.org> * mule-wnnfns.c: Convert file to utf-8.
author Ben Wing <ben@xemacs.org>
date Sat, 06 Feb 2010 04:26:09 -0600
parents 4cfb6aeb989d
children 76af7fc13e81
files lisp/ChangeLog lisp/unicode.el modules/ChangeLog modules/canna/canna_api.c src/ChangeLog src/mule-wnnfns.c
diffstat 6 files changed, 105 insertions(+), 84 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Fri Feb 05 23:22:59 2010 -0600
+++ b/lisp/ChangeLog	Sat Feb 06 04:26:09 2010 -0600
@@ -1,3 +1,9 @@
+2010-02-06  Ben Wing  <ben@xemacs.org>
+
+	* unicode.el:
+	* unicode.el (for):
+	Convert file to utf-8.
+
 2010-01-28  Ben Wing  <ben@xemacs.org>
 
 	* lisp-mode.el: Finish documenting `lisp-indent-specform',
--- a/lisp/unicode.el	Fri Feb 05 23:22:59 2010 -0600
+++ b/lisp/unicode.el	Sat Feb 06 04:26:09 2010 -0600
@@ -1,4 +1,4 @@
-;;; unicode.el --- Unicode support -*- coding: iso-2022-7bit; -*-
+;;; unicode.el --- Unicode support -*- coding: utf-8; -*-
 
 ;; Copyright (C) 2001, 2002 Ben Wing.
 
@@ -424,14 +424,14 @@
        (#x2534 ?|) ;; U+2534 BOX DRAWINGS LIGHT UP AND HORIZONTAL
        (#x253c ?|) ;; U+253C BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL
        (#x02da ?^) ;; U+02DA RING ABOVE
-       (#x2122 ?\xa9) ;; U+2122 TRADE MARK SIGN, ?,A)(B
+       (#x2122 ?\xa9) ;; U+2122 TRADE MARK SIGN, ?©
 
-       (#x0132 ?\xe6) ;; U+0132 LATIN CAPITAL LIGATURE IJ, ?,Af(B
-       (#x013f ?\xe6) ;; U+013F LATIN CAPITAL LETTER L WITH MIDDLE DOT, ?,Af(B
+       (#x0132 ?\xe6) ;; U+0132 LATIN CAPITAL LIGATURE IJ, ?æ
+       (#x013f ?\xe6) ;; U+013F LATIN CAPITAL LETTER L WITH MIDDLE DOT, ?æ
 
-       (#x0133 ?\xe6) ;; U+0133 LATIN SMALL LIGATURE IJ, ?,Af(B
-       (#x0140 ?\xe6) ;; U+0140 LATIN SMALL LETTER L WITH MIDDLE DOT, ?,Af(B
-       (#x0149 ?\xe6) ;; U+0149 LATIN SMALL LETTER N PRECEDED BY APOSTROPH,?,Af(B
+       (#x0133 ?\xe6) ;; U+0133 LATIN SMALL LIGATURE IJ, ?æ
+       (#x0140 ?\xe6) ;; U+0140 LATIN SMALL LETTER L WITH MIDDLE DOT, ?æ
+       (#x0149 ?\xe6) ;; U+0149 LATIN SMALL LETTER N PRECEDED BY APOSTROPH,?æ
 
        (#x2194 ?|) ;; U+2194 LEFT RIGHT ARROW
        (#x2660 ?*) ;; U+2660 BLACK SPADE SUIT
@@ -440,12 +440,12 @@
        (#x2592 ?|) ;; U+2592 MEDIUM SHADE
        (#x2195 ?|) ;; U+2195 UP DOWN ARROW
 
-       (#x2113 ?\xb9) ;; U+2113 SCRIPT SMALL L, ?,A9(B
-       (#x215b ?\xbe) ;; U+215B VULGAR FRACTION ONE EIGHTH, ?,A>(B
-       (#x215c ?\xbe) ;; U+215C VULGAR FRACTION THREE EIGHTHS, ?,A>(B
-       (#x215d ?\xbe) ;; U+215D VULGAR FRACTION FIVE EIGHTHS, ?,A>(B
-       (#x215e ?\xbe) ;; U+215E VULGAR FRACTION SEVEN EIGHTHS, ?,A>(B
-       (#x207f ?\xbe) ;; U+207F SUPERSCRIPT LATIN SMALL LETTER N, ?,A>(B
+       (#x2113 ?\xb9) ;; U+2113 SCRIPT SMALL L, ?¹
+       (#x215b ?\xbe) ;; U+215B VULGAR FRACTION ONE EIGHTH, ?¾
+       (#x215c ?\xbe) ;; U+215C VULGAR FRACTION THREE EIGHTHS, ?¾
+       (#x215d ?\xbe) ;; U+215D VULGAR FRACTION FIVE EIGHTHS, ?¾
+       (#x215e ?\xbe) ;; U+215E VULGAR FRACTION SEVEN EIGHTHS, ?¾
+       (#x207f ?\xbe) ;; U+207F SUPERSCRIPT LATIN SMALL LETTER N, ?¾
   
        ;; These are not in WGL 4, but are IPA characters that should not
        ;; be double width. They are the only IPA characters that both
@@ -455,7 +455,7 @@
        (#x2197 ?|) ;; U+2197 NORTH EAST ARROW
        (#x2199 ?|) ;; U+2199 SOUTH WEST ARROW
        (#x2191 ?|) ;; U+2191 UPWARDS ARROW
-       (#x207f ?\xb9)) ;; U+207F SUPERSCRIPT LATIN SMALL LETTER N, ?,A9(B
+       (#x207f ?\xb9)) ;; U+207F SUPERSCRIPT LATIN SMALL LETTER N, ?¹
   with decoded = nil
   with syntax-table = (standard-syntax-table)
   initially (unless (featurep 'mule) (return))
--- a/modules/ChangeLog	Fri Feb 05 23:22:59 2010 -0600
+++ b/modules/ChangeLog	Sat Feb 06 04:26:09 2010 -0600
@@ -1,3 +1,13 @@
+2010-02-06  Ben Wing  <ben@xemacs.org>
+
+	* canna/canna_api.c:
+	* canna/canna_api.c (storeResults):
+	* canna/canna_api.c (Fcanna_set_bunsetsu):
+	* canna/canna_api.c (Fcanna_initialize):
+	* canna/canna_api.c (Fcanna_store_yomi):
+	* canna/canna_api.c (Fcanna_henkan_end):
+	Convert file to utf-8.
+
 2010-02-05  Ben Wing  <ben@xemacs.org>
 
 	* postgresql/postgresql.c:
--- a/modules/canna/canna_api.c	Fri Feb 05 23:22:59 2010 -0600
+++ b/modules/canna/canna_api.c	Sat Feb 06 04:26:09 2010 -0600
@@ -1,4 +1,4 @@
-/* CANNA interface -*- coding: euc-jp -*-
+/* CANNA interface -*- coding: utf-8 -*-
 
    Copyright (C) 1995 Free Software Foundation, Inc.
    Copyright (C) 1995 Sun Microsystems, Inc.
@@ -237,10 +237,10 @@
     }
   else
     {
-      /* ꤷʸ (the confirmed string) */
+      /* 確定した文字列 (the confirmed string) */
       Vcanna_kakutei_string = make_euc_string (buf, len);
       val = make_int (len);
-      /* ꤷʸɤߤξ...
+      /* 確定した文字列の読みの情報...
 	 (info about the reading of the confirmed string) */
       Vcanna_kakutei_yomi = Vcanna_kakutei_romaji = Qnil;
       if (ks->info & KanjiYomiInfo)
@@ -253,20 +253,20 @@
 	      int yomilen2;
 
 	      Vcanna_kakutei_yomi =
-		make_euc_string (p, yomilen); /* ɤ (reading) */
+		make_euc_string (p, yomilen); /* 読み (reading) */
 	      p += yomilen + 1;
 	      yomilen2 = strlen (p);
 	      if (len + yomilen + yomilen2 + 2 < KEYTOSTRSIZE)
 		{
 		  Vcanna_kakutei_romaji =
 		    make_euc_string (p, yomilen2);
-				/* ޻ (romanization) */
+				/* ローマ字 (romanization) */
 		}
 	    }
 	}
 
 
-      /* ɽʸǤ
+      /* 候補表示の文字列です。
 	 (string for displaying candidate translations) */
       Vcanna_henkan_string = Qnil;
       if (ks->length >= 0)
@@ -293,7 +293,7 @@
 #endif /* CANNA_MULE */
 	}
 
-      /* ξ (information about the echo area menu) */
+      /* 一覧の情報 (information about the echo area menu) */
       Vcanna_ichiran_string = Qnil;
       if (ks->info & KanjiGLineInfo && ks->gline.length >= 0)
 	{
@@ -311,14 +311,14 @@
 #endif /* CANNA_MULE */
 	}
 
-      /* ⡼ɤξ (mode information) */
+      /* モードの情報 (mode information) */
       Vcanna_mode_string = Qnil;
       if (ks->info & KanjiModeInfo)
 	{
 	  Vcanna_mode_string = build_euc_string ((Extbyte *) ks->mode);
 	}
 
-      /* ¾ξ (other information) */
+      /* その他の情報 (other information) */
       canna_empty_info = (ks->info & KanjiEmptyInfo) ? 1 : 0;
       canna_through_info = (ks->info & KanjiThroughInfo) ? 1 : 0;
     }
@@ -334,7 +334,7 @@
        (num))
 {
   /* This is actually a Boolean! */
-  char *kugiri; /* ʸڤ򤹤뤫 (display clause separator?) */
+  char *kugiri; /* 文節区切りをするか？ (display clause separator?) */
 
   kugiri = NILP (num) ? (char *) 0 : (char *) 1;
 
@@ -367,7 +367,7 @@
   char **p, **q;
 
   /* This is actually a Boolean! */
-  char *kugiri; /* ʸڤ򤹤뤫 (display clause separator?) */
+  char *kugiri; /* 文節区切りをするか？ (display clause separator?) */
 
   IRCP_context = -1;
 
@@ -424,7 +424,7 @@
   if (res == -1)
     {
       val = Fcons (build_euc_string (jrKanjiError), val);
-      /* ˥饤ǼԤ硣 (on initialization failure) */
+      /* イニシャライズで失敗した場合。 (on initialization failure) */
       return Fcons (Qnil, val);
     }
   else
@@ -444,12 +444,12 @@
 #ifndef CANNA_MULE
       jrKanjiControl (0, KC_INHIBITHANKAKUKANA, (char *) 1);
 #else
-      /* mule äȾѥʤȤ
+      /* mule だったら半角カタカナも使える
 	 (Mule can use half-width katakana) */
       if (canna_inhibit_hankakukana)
 	jrKanjiControl (0, KC_INHIBITHANKAKUKANA, (char *) 1);
 #endif
-      jrKanjiControl (0, KC_YOMIINFO, (char *) 2); /* : ޻ޤ֤
+      jrKanjiControl (0, KC_YOMIINFO, (char *) 2); /* ※２: ローマ字まで返す
 						      (*2: return to
 						      romanized form) */
       val = Fcons (Qnil, val);
@@ -581,7 +581,7 @@
     }
 
   ks.echoStr = (unsigned char *) key_buffer;
-  ksv.buffer = (unsigned char *) key_buffer; /*  (return value) */
+  ksv.buffer = (unsigned char *) key_buffer; /* 返値用 (return value) */
   ksv.bytes_buffer = KEYTOSTRSIZE;
   ksv.ks = &ks;
 
@@ -836,7 +836,7 @@
     {
       return Qnil;
     }
-  RkEndBun (IRCP_context, 1); /* ؽϤĤǤԤäɤΤʤΤ
+  RkEndBun (IRCP_context, 1); /* 学習はいつでも行って良いものなのか？
 				 (is it OK to invoke learning function
 				 at arbitrary times?) */
   return Qt;
--- a/src/ChangeLog	Fri Feb 05 23:22:59 2010 -0600
+++ b/src/ChangeLog	Sat Feb 06 04:26:09 2010 -0600
@@ -1,3 +1,8 @@
+2010-02-06  Ben Wing  <ben@xemacs.org>
+
+	* mule-wnnfns.c:
+	Convert file to utf-8.
+
 2010-02-05  Ben Wing  <ben@xemacs.org>
 
 	* syswindows.h (LOCAL_FILE_FORMAT_TO_TSTR):
--- a/src/mule-wnnfns.c	Fri Feb 05 23:22:59 2010 -0600
+++ b/src/mule-wnnfns.c	Sat Feb 06 04:26:09 2010 -0600
@@ -1,4 +1,4 @@
-/* -*- coding: iso-2022-jp -*-
+/* -*- coding: utf-8 -*-
    Copyright (C) 1995 Free Software Foundation, Inc.
    Copyright (C) 1995 Sun Microsystems, Inc.
 
@@ -35,13 +35,13 @@
  *		login-name: STRING
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		jserver $B$H@\B3$7!"%5!<%P!<FbIt$K@5JQ49!?5UJQ49#2$D$N4D6-$r(B
- *		$B:n$k!#%(%i!<$N;~$O(B nil $B$rJV$9!#(B
+ *		jserver と接続し、サーバー内部に正変換／逆変換２つの環境を
+ *		作る。エラーの時は nil を返す。
  *
  *	   (wnn-server-close)
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		jserver $B$H$N@\B3$r@Z$k!#<-=q!"IQEY$O%;!<%V$5$l$J$$!#(B
+ *		jserver との接続を切る。辞書、頻度はセーブされない。
  *
  *	   (wnn-server-dict-add dict-file-name hindo-file-name priority
  *		dict-file-mode hindo-file-mode pw1 pw2)
@@ -53,79 +53,79 @@
  *		pw1: STRING or NIL
  *		pw2: STRING or NIL
  *		DESCRIPTION:
- *		$B<-=q%U%!%$%kL>!"IQEY%U%!%$%kL>!"M%@hEY!"<-=q%U%!%$%k%b!<%I(B
- *		$BIQEY%U%!%$%k%b!<%I$G;XDj$7$?<-=q$r%P%C%U%!$KDI2C$9$k!#(B
- *		pw1, pw2 $B$O<-=q%U%!%$%k!"IQEY%U%!%$%k$N%Q%9%o!<%I!#(B
+ *		辞書ファイル名、頻度ファイル名、優先度、辞書ファイルモード
+ *		頻度ファイルモードで指定した辞書をバッファに追加する。
+ *		pw1, pw2 は辞書ファイル、頻度ファイルのパスワード。
  *
  *	   (wnn-server-dict-delete dic-no)
  *		dic-no: INTEGER
- *		RETURNS: $B%(%i!<$N;~(B nil
- *		DESCRIPTION: dic-no $B$N<-=qHV9f$N<-=q$r!"%P%C%U%!$+$i(B
- *		$B:o=|$9$k!#(B
+ *		RETURNS: エラーの時 nil
+ *		DESCRIPTION: dic-no の辞書番号の辞書を、バッファから
+ *		削除する。
  *
  *	   (wnn-server-dict-list)
  *		RETURNS: ((dic-no1 file-name1 comment1 word-no1 nice1)
  *			  (dic-no2 file-name2 comment2 word-no2 nice2)...)
- *		DESCRIPTION: $B%P%C%U%!>e$N<-=q$N%j%9%H$rF@$k!#(B
+ *		DESCRIPTION: バッファ上の辞書のリストを得る。
  *
  *	   (wnn-server-dict-comment dic-no comment)
- *		RETURNS: $B%(%i!<$N;~(B nil
- *		DESCRIPTION: dic-no $B$N<-=q$K%3%a%s%H$r$D$1$k!#(B
+ *		RETURNS: エラーの時 nil
+ *		DESCRIPTION: dic-no の辞書にコメントをつける。
  *
  *	   (wnn-server-set-rev rev)
  *		rev: BOOLEAN
- *		rev $B$,(B nil $B$N;~$O@5JQ49!"$=$l0J30$N;~$O5UJQ49(B
+ *		rev が nil の時は正変換、それ以外の時は逆変換
  *
  *	   (wnn-server-henkan-begin henkan-string)
  *		henkan-string: STRING
  *		RETURNS: bunsetu-suu
  *		DESCRIPTION:
- *		$B2>L>4A;zJQ49$r$7!"Bh0l8uJd$NJ8@a?t$rJV$9!#(B
+ *		仮名漢字変換をし、第一候補の文節数を返す。
  *
  *	   (wnn-server-zenkouho bunsetu-no dai)
  *		bunsetu-no: INTEGER
  *		dai: BOOLEAN
  *		RETURNS: offset
  *		DESCRIPTION:
- *		$BJ8@aHV9f$G;XDj$5$l$?J8@a$NA48uJd$r$H$j$@$7(B
- *		$B!"8=:_$N%*%U%;%C%H$rJV$9!#(B
+ *		文節番号で指定された文節の全候補をとりだし
+ *		、現在のオフセットを返す。
  *
  *	   (wnn-server-get-zenkouho offset)
  *		bunsetu-no: INTEGER
  *		dai: BOOLEAN
  *		RETURNS: list of zenkouho
  *		DESCRIPTION:
- *		$B%*%U%;%C%H$G;XDj$5$l$?8uJd$rF@$k!#(B
+ *		オフセットで指定された候補を得る。
  *
  *	   (wnn-server-zenkouho-bun)
  *		RETURNS: INTEGER
  *		DESCRIPTION:
- *		$BA48uJd$rI=<($7$F$$$kJ8@aHV9f$rF@$k!#(B
+ *		全候補を表示している文節番号を得る。
  *
  *	   (wnn-server-zenkouho-suu)
  *		RETURNS: INTEGER
  *		DESCRIPTION:
- *		$BA48uJd$rI=<($7$F$$$kJ8@a$NA48uJd?t$rF@$k!#(B
+ *		全候補を表示している文節の全候補数を得る。
  *
  *	   (wnn-server-dai-top bun-no)
  *		bun-no: INTEGER
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		$BJ8@a$,BgJ8@a$N@hF,$J$i(B t
+ *		文節が大文節の先頭なら t
  *
  *	   (wnn-server-dai-end bun-no)
  *		bun-no: INTEGER
  *		RETURNS: INTEGER
  *		DESCRIPTION:
- *		$B<!$NBgJ8@a$NJ8@aHV9f$rF@$k!#(B
+ *		次の大文節の文節番号を得る。
  *
  *	   (wnn-server-henkan-kakutei kouho-no dai)
  *		kouho-no: INTEGER
  *		dai: BOOLEAN
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		$B8uJdHV9f$G<($5$l$?8uJd$rA*Br$9$k!#(B
- *		(wnn-server-zenkouho) $B$r8F$s$F$+$i$G$J$$$H$$$1$J$$!#(B
+ *		候補番号で示された候補を選択する。
+ *		(wnn-server-zenkouho) を呼んてからでないといけない。
  *
  *	   (wnn-server-bunsetu-henkou bunsetu-no bunsetu-length dai)
  *		bunsetu-no: INTEGER
@@ -133,19 +133,19 @@
  *		dai: BOOLEAN
  *		RETURNS:
  *		DESCRIPTION:
- *		$BJ8@a$ND9$5$rJQ99$9$k!#(B
+ *		文節の長さを変更する。
  *
  *         (wnn-bunsetu-kouho-inspect bunsetu-no)
  *              bunsetu-no: INTEGER
  *              RETURNS: (kanji yomi jisho-no serial-no hinsi hindo
  *		ima hyoka daihyoka kangovect)
  *		DESCRIPTION:
- *		$BJ8@a$N?'!9$J>pJs$rJQ49%P%C%U%!$+$i$H$j=P$9!#(B
+ *		文節の色々な情報を変換バッファからとり出す。
  *
  *	   (wnn-server-henkan-quit)
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		$B2?$b$7$J$$!#(B
+ *		何もしない。
  *
  *	   (wnn-server-bunsetu-kanji bun-no)
  *		RETURNS: (bunsetu-kanji length)
@@ -163,7 +163,7 @@
  *              bunsetu-no: INTEGER
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		$BIQEY>pJs$r99?7$9$k!#(B
+ *		頻度情報を更新する。
  *
  *	   (wnn-server-word-add dic-no tango yomi comment hinsi)
  *		dic-no: INTEGER
@@ -173,28 +173,28 @@
  *		hinsi: INTEGER
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		$B<-=q$KC18l$rEPO?$9$k!#(B
+ *		辞書に単語を登録する。
  *
  *	   (wnn-server-word-delete dic-no entry)
  *		dic-no: INTEGER
  *		entry: INTEGER
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		$B<-=q$+$i%(%s%H%jHV9f$G<($5$l$kC18l$r:o=|$9$k!#(B
+ *		辞書からエントリ番号で示される単語を削除する。
  *
  *	   (wnn-server-word-use dic-no entry)
  *		dic-no: INTEGER
  *		entry: INTEGER
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		$B<-=q$+$i%(%s%H%jHV9f$G<($5$l$kC18l$NM-8z!?L58z$r%H%0%k$9$k!#(B
+ *		辞書からエントリ番号で示される単語の有効／無効をトグルする。
   *
  *	   (wnn-server-word-info dic-no entry)
  *		dic-no: INTEGER
  *		entry: INTEGER
  *		RETURNS: (yomi kanji comment hindo hinsi)
  *		DESCRIPTION:
- *		$B<-=q$+$i%(%s%H%jHV9f$G<($5$l$kC18l$N>pJs$rF@$k!#(B
+ *		辞書からエントリ番号で示される単語の情報を得る。
  *
  *	   (wnn-server-word-hindo-set dic-no entry hindo)
  *		dic-no: INTEGER
@@ -202,61 +202,61 @@
  *		hindo: INTEGER
  *		RETURNS: BOOLEAN
  *		DESCRIPTION:
- *		$B<-=q$+$i%(%s%H%jHV9f$G<($5$l$kC18l$NIQEY$r@_Dj$9$k!#(B
+ *		辞書からエントリ番号で示される単語の頻度を設定する。
  *
  *	   (wnn-server-word-search yomi)
  *		yomi: STRING
  *		RETURNS: a LIST of dict-joho
  *		DESCRIPTION:
- *		$BA4$F$N<-=q$+$iC18l8!:w$r9T$J$&!#(B
+ *		全ての辞書から単語検索を行なう。
  *
  *         (wnn-server-dict-save)
  *              RETURNS: BOOLEAN
  *              DESCRIPTION:
- *		$BA4$F$N<-=q$HIQEY%U%!%$%k$r%;!<%V$9$k!#(B
+ *		全ての辞書と頻度ファイルをセーブする。
  *
  *	   (wnn-server-get-param)
  *		RETURNS: (n nsho p1 p2 p3 ... p15)
- *		DESCRIPTION: $BJQ49%Q%i%a!<%?$rF@$k!#(B
+ *		DESCRIPTION: 変換パラメータを得る。
  *
  *	   (wnn-server-set-param n sho p1 ... p15)
- *		RETURNS: $B%(%i!<$N;~(B nil
- *		DESCRIPTION: $BJQ49%Q%i%a!<%?$r@_Dj$9$k!#(B
+ *		RETURNS: エラーの時 nil
+ *		DESCRIPTION: 変換パラメータを設定する。
  *
  *	   (wnn-server-get-msg error-no)
- *		RETURNS: $B%(%i!<%a225;!<%8(B
- *		DESCRIPTION: $B%(%i!<HV9f$+$i%a%C%;!<%8$rF@$k!#(B
+ *		RETURNS: エラーメ臆技ージ
+ *		DESCRIPTION: エラー番号からメッセージを得る。
  *
  *	   (wnn-server-fuzokugo-set fname)
- *		RETURNS: $B%(%i!<$N;~(B nil
- *		DESCRIPTION: $B%P%C%U%!$KImB08l%U%!%$%k$rFI$_9~$`!#(B
+ *		RETURNS: エラーの時 nil
+ *		DESCRIPTION: バッファに附属語ファイルを読み込む。
  *
  *	   (wnn-server-fuzokugo-get)
- *		RETURNS: $B%U%!%$%kL>(B
- *		DESCRIPTION: $B%P%C%U%!$NImB08l%U%!%$%kL>$rF@$k!#(B
+ *		RETURNS: ファイル名
+ *		DESCRIPTION: バッファの附属語ファイル名を得る。
  *
  *	   (wnn-server-isconnect)
- *		RETURNS: $B%3%M%/%H$7$F$l$P(B t, $B$7$F$J$1$l$P(B nil
- *		DESCRIPTION: $B%5!<%P$H7Q$C$F$$$k$+D4$Y$k!#(B
+ *		RETURNS: コネクトしてれば t, してなければ nil
+ *		DESCRIPTION: サーバと継っているか調べる。
  *
  *	   (wnn-server-hinsi-dicts hinsi-no)
  *		RETURNS: (dic-no1 dic-no2 ...)
- *		DESCRIPTION: hinsi-no $B$NIJ;l$,EPO?$G$-$k<-=q$N%j%9%H$rF@$k!#(B
- *		hinsi-no = -1 $B$N$H$-$K$O!"EPO?2DG=$JA4<-=q$rF@$k!#(B
+ *		DESCRIPTION: hinsi-no の品詞が登録できる辞書のリストを得る。
+ *		hinsi-no = -1 のときには、登録可能な全辞書を得る。
  *
  *	   (wnn-server-hinsi-list dic-no name)
  *		RETURNS: (name1 name2 ... )
- *		DESCRIPTION: dic-no $B$N<-=q$G!"IJ;l%N!<%I$KB0$9$k(B
- *		$BIJ;l%N!<%I!JL>!K$N%j%9%H$rF@$k!#(B
- *		$BIJ;lL>$rM?$($?;~$O!"#0$rJV$9!#(B
+ *		DESCRIPTION: dic-no の辞書で、品詞ノードに属する
+ *		品詞ノード（名）のリストを得る。
+ *		品詞名を与えた時は、０を返す。
  *
  *	   (wnn-server-hinsi-name hinsi-no)
  *		RETURNS: hinsi-name
- *		DESCRIPTION: $BIJ;lHV9f$+$iL>A0$r<h$k!#(B
+ *		DESCRIPTION: 品詞番号から名前を取る。
  *
  *	   (wnn-server-hinsi-number hinsi-name)
  *		RETURNS: hinsi-no
- *		DESCRIPTION: $BIJ;lL>$rIJ;lHV9f$KJQ49$9$k!#(B
+ *		DESCRIPTION: 品詞名を品詞番号に変換する。
  *
  *         (wnn-server-version)
  *              RETURNS: version ID(int)
@@ -275,7 +275,7 @@
 #include "wnn/jllib.h"
 #include "wnn/cplib.h"
 
-/* UCHAR $B$,Fs=EDj5A$5$l$k$N$G(B */
+/* UCHAR が二重定義されるので */
 #define _UCHAR_T
 
 #define EGG_TIMEOUT 5