Mercurial > hg > xemacs-beta

comparison src/mule-wnnfns.c @ 179:9ad43877534d r20-3b16

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b16
author cvs
date Mon, 13 Aug 2007 09:52:19 +0200
parents 8eaf7971accc
children e45d5e7c476e
comparison
equal deleted inserted replaced
178:e703507b8a00 179:9ad43877534d
700 DEFUN ("wnn-server-bunsetu-henkou", Fwnn_bunsetu_henkou, 3, 3, 0, /* 700 DEFUN ("wnn-server-bunsetu-henkou", Fwnn_bunsetu_henkou, 3, 3, 0, /*
701 Change length of BUN-NUMBER bunsetu to LEN. DAI is T if dai-bunsetsu. 701 Change length of BUN-NUMBER bunsetu to LEN. DAI is T if dai-bunsetsu.
702 */ 702 */
703 (bunNo, len, dai)) 703 (bunNo, len, dai))
704 { 704 {
705 Lisp_Object val;
706 int cnt, no; 705 int cnt, no;
707 int snum; 706 int snum;
708 CHECK_INT (bunNo); 707 CHECK_INT (bunNo);
709 CHECK_INT (len); 708 CHECK_INT (len);
710 if ((snum = check_wnn_server_type ()) == -1) return Qnil; 709 if ((snum = check_wnn_server_type ()) == -1) return Qnil;
726 Get bunsetsu information specified by BUN-NUMBER. 725 Get bunsetsu information specified by BUN-NUMBER.
727 */ 726 */
728 (bunNo)) 727 (bunNo))
729 { 728 {
730 Lisp_Object val; 729 Lisp_Object val;
731 struct wnn_jdata *info_buf;
732 unsigned char cbuf[512]; 730 unsigned char cbuf[512];
733 w_char wbuf[256]; 731 w_char wbuf[256];
734 int bun_no, yomilen, jirilen, i; 732 int bun_no, yomilen, jirilen, i;
735 int snum; 733 int snum;
736 unsigned char lb; 734 unsigned char lb;
831 Update frequency of bunsetsu specified by NUM-NUMBER. 829 Update frequency of bunsetsu specified by NUM-NUMBER.
832 */ 830 */
833 (bunNo)) 831 (bunNo))
834 { 832 {
835 int no; 833 int no;
836 Lisp_Object val;
837 int snum; 834 int snum;
838 if ((snum = check_wnn_server_type ()) == -1) return Qnil; 835 if ((snum = check_wnn_server_type ()) == -1) return Qnil;
839 if (EQ(bunNo, Qnil)) no = -1; 836 if (EQ(bunNo, Qnil)) no = -1;
840 else 837 else
841 { 838 {
976 Lisp_Object val; 973 Lisp_Object val;
977 struct wnn_jdata *wordinfo; 974 struct wnn_jdata *wordinfo;
978 int i, count; 975 int i, count;
979 w_char wbuf[256]; 976 w_char wbuf[256];
980 unsigned char kanji_buf[256]; 977 unsigned char kanji_buf[256];
981 int kanji_len;
982 int snum; 978 int snum;
983 unsigned char lb; 979 unsigned char lb;
984 CHECK_STRING (yomi); 980 CHECK_STRING (yomi);
985 if ((snum = check_wnn_server_type ()) == -1) return Qnil; 981 if ((snum = check_wnn_server_type ()) == -1) return Qnil;
986 lb = lb_wnn_server_type[snum]; 982 lb = lb_wnn_server_type[snum];