comparison src/mule-canna.c @ 371:cc15677e0335 r21-2b1

Import from CVS: tag r21-2b1
author cvs
date Mon, 13 Aug 2007 11:03:08 +0200
parents 7c94d56991e1
children 6240c7796c7a
comparison
equal deleted inserted replaced
370:bd866891f083 371:cc15677e0335
167 167
168 #define KEYTOSTRSIZE 2048 168 #define KEYTOSTRSIZE 2048
169 static unsigned char buf[KEYTOSTRSIZE]; 169 static unsigned char buf[KEYTOSTRSIZE];
170 static char **warning; 170 static char **warning;
171 171
172 static int canna_empty_info, canna_through_info; 172 static int Vcanna_empty_info, Vcanna_through_info;
173 static int canna_underline; 173 static int Vcanna_underline;
174 static int canna_inhibit_hankakukana; 174 static int Vcanna_inhibit_hankakukana;
175 175
176 static Lisp_Object Vcanna_kakutei_string; 176 static Lisp_Object Vcanna_kakutei_string;
177 static Lisp_Object Vcanna_kakutei_yomi; 177 static Lisp_Object Vcanna_kakutei_yomi;
178 static Lisp_Object Vcanna_kakutei_romaji; 178 static Lisp_Object Vcanna_kakutei_romaji;
179 static Lisp_Object Vcanna_henkan_string; 179 static Lisp_Object Vcanna_henkan_string;
180 static int canna_henkan_length; 180 static int Vcanna_henkan_length;
181 static int canna_henkan_revPos; 181 static int Vcanna_henkan_revPos;
182 static int canna_henkan_revLen; 182 static int Vcanna_henkan_revLen;
183 static Lisp_Object Vcanna_ichiran_string; 183 static Lisp_Object Vcanna_ichiran_string;
184 static int canna_ichiran_length; 184 static int Vcanna_ichiran_length;
185 static int canna_ichiran_revPos; 185 static int Vcanna_ichiran_revPos;
186 static int canna_ichiran_revLen; 186 static int Vcanna_ichiran_revLen;
187 static Lisp_Object Vcanna_mode_string; 187 static Lisp_Object Vcanna_mode_string;
188 188
189 static int IRCP_context; 189 static int IRCP_context;
190 190
191 static Lisp_Object storeResults (unsigned char *, int, jrKanjiStatus *); 191 static Lisp_Object storeResults (unsigned char *, int, jrKanjiStatus *);
257 Vcanna_henkan_string = Qnil; 257 Vcanna_henkan_string = Qnil;
258 if (ks->length >= 0) 258 if (ks->length >= 0)
259 { 259 {
260 Vcanna_henkan_string = make_string (ks->echoStr, ks->length); 260 Vcanna_henkan_string = make_string (ks->echoStr, ks->length);
261 #ifndef CANNA_MULE 261 #ifndef CANNA_MULE
262 canna_henkan_length = ks->length; 262 Vcanna_henkan_length = ks->length;
263 canna_henkan_revPos = ks->revPos; 263 Vcanna_henkan_revPos = ks->revPos;
264 canna_henkan_revLen = ks->revLen; 264 Vcanna_henkan_revLen = ks->revLen;
265 #else /* CANNA_MULE */ 265 #else /* CANNA_MULE */
266 if (canna_underline) 266 if (Vcanna_underline)
267 { 267 {
268 canna_henkan_length = mule_strlen (ks->echoStr,ks->length); 268 Vcanna_henkan_length = mule_strlen (ks->echoStr,ks->length);
269 canna_henkan_revPos = mule_strlen (ks->echoStr,ks->revPos); 269 Vcanna_henkan_revPos = mule_strlen (ks->echoStr,ks->revPos);
270 canna_henkan_revLen = mule_strlen (ks->echoStr+ks->revPos,ks->revLen); 270 Vcanna_henkan_revLen = mule_strlen (ks->echoStr+ks->revPos,ks->revLen);
271 } 271 }
272 else 272 else
273 { 273 {
274 count_char (ks->echoStr, ks->length, ks->revPos, ks->revLen, 274 count_char (ks->echoStr, ks->length, ks->revPos, ks->revLen,
275 &canna_henkan_length, &canna_henkan_revPos, 275 &Vcanna_henkan_length, &Vcanna_henkan_revPos,
276 &canna_henkan_revLen); 276 &Vcanna_henkan_revLen);
277 } 277 }
278 #endif /* CANNA_MULE */ 278 #endif /* CANNA_MULE */
279 } 279 }
280 280
281 /* 一覧の情報 */ 281 /* 一覧の情報 */
282 Vcanna_ichiran_string = Qnil; 282 Vcanna_ichiran_string = Qnil;
283 if (ks->info & KanjiGLineInfo && ks->gline.length >= 0) 283 if (ks->info & KanjiGLineInfo && ks->gline.length >= 0)
284 { 284 {
285 Vcanna_ichiran_string = make_string (ks->gline.line, ks->gline.length); 285 Vcanna_ichiran_string = make_string (ks->gline.line, ks->gline.length);
286 #ifndef CANNA_MULE 286 #ifndef CANNA_MULE
287 canna_ichiran_length = ks->gline.length; 287 Vcanna_ichiran_length = ks->gline.length;
288 canna_ichiran_revPos = ks->gline.revPos; 288 Vcanna_ichiran_revPos = ks->gline.revPos;
289 canna_ichiran_revLen = ks->gline.revLen; 289 Vcanna_ichiran_revLen = ks->gline.revLen;
290 #else /* CANNA_MULE */ 290 #else /* CANNA_MULE */
291 count_char (ks->gline.line, ks->gline.length, 291 count_char (ks->gline.line, ks->gline.length,
292 ks->gline.revPos, ks->gline.revLen, &canna_ichiran_length, 292 ks->gline.revPos, ks->gline.revLen, &Vcanna_ichiran_length,
293 &canna_ichiran_revPos, &canna_ichiran_revLen); 293 &Vcanna_ichiran_revPos, &Vcanna_ichiran_revLen);
294 #endif /* CANNA_MULE */ 294 #endif /* CANNA_MULE */
295 } 295 }
296 296
297 /* モードの情報 */ 297 /* モードの情報 */
298 Vcanna_mode_string = Qnil; 298 Vcanna_mode_string = Qnil;
300 { 300 {
301 Vcanna_mode_string = make_string (ks->mode, strlen (ks->mode)); 301 Vcanna_mode_string = make_string (ks->mode, strlen (ks->mode));
302 } 302 }
303 303
304 /* その他の情報 */ 304 /* その他の情報 */
305 canna_empty_info = (ks->info & KanjiEmptyInfo) ? 1 : 0; 305 Vcanna_empty_info = (ks->info & KanjiEmptyInfo) ? 1 : 0;
306 canna_through_info = (ks->info & KanjiThroughInfo) ? 1 : 0; 306 Vcanna_through_info = (ks->info & KanjiThroughInfo) ? 1 : 0;
307 } 307 }
308 308
309 return val; 309 return val;
310 } 310 }
311 311
438 jrKanjiControl (0, KC_SETWIDTH, (char *) 78); 438 jrKanjiControl (0, KC_SETWIDTH, (char *) 78);
439 #ifndef CANNA_MULE 439 #ifndef CANNA_MULE
440 jrKanjiControl (0, KC_INHIBITHANKAKUKANA, (char *) 1); 440 jrKanjiControl (0, KC_INHIBITHANKAKUKANA, (char *) 1);
441 #else 441 #else
442 /* mule だったら半角カタカナも使える */ 442 /* mule だったら半角カタカナも使える */
443 if (canna_inhibit_hankakukana) 443 if (Vcanna_inhibit_hankakukana)
444 jrKanjiControl (0, KC_INHIBITHANKAKUKANA, (char *) 1); 444 jrKanjiControl (0, KC_INHIBITHANKAKUKANA, (char *) 1);
445 #endif 445 #endif
446 jrKanjiControl (0, KC_YOMIINFO, (char *) 2); /* ※2: ローマ字まで返す */ 446 jrKanjiControl (0, KC_YOMIINFO, (char *) 2); /* ※2: ローマ字まで返す */
447 val = Fcons (Qnil, val); 447 val = Fcons (Qnil, val);
448 return Fcons (CANNA_mode_keys (), val); 448 return Fcons (CANNA_mode_keys (), val);
870 return Qt; 870 return Qt;
871 } 871 }
872 872
873 /* variables below this line is constants of Canna */ 873 /* variables below this line is constants of Canna */
874 874
875 static int canna_mode_AlphaMode; 875 static int Vcanna_mode_AlphaMode = IROHA_MODE_AlphaMode;
876 static int canna_mode_EmptyMode; 876 static int Vcanna_mode_EmptyMode = IROHA_MODE_EmptyMode;
877 static int canna_mode_KigoMode; 877 static int Vcanna_mode_KigoMode = IROHA_MODE_KigoMode;
878 static int canna_mode_YomiMode; 878 static int Vcanna_mode_YomiMode = IROHA_MODE_YomiMode;
879 static int canna_mode_JishuMode; 879 static int Vcanna_mode_JishuMode = IROHA_MODE_JishuMode;
880 static int canna_mode_TankouhoMode; 880 static int Vcanna_mode_TankouhoMode = IROHA_MODE_TankouhoMode;
881 static int canna_mode_IchiranMode; 881 static int Vcanna_mode_IchiranMode = IROHA_MODE_IchiranMode;
882 static int canna_mode_YesNoMode; 882 static int Vcanna_mode_YesNoMode = IROHA_MODE_YesNoMode;
883 static int canna_mode_OnOffMode; 883 static int Vcanna_mode_OnOffMode = IROHA_MODE_OnOffMode;
884 #ifdef CANNA_MODE_AdjustBunsetsuMode 884 #ifdef CANNA_MODE_AdjustBunsetsuMode
885 static int canna_mode_AdjustBunsetsuMode; 885 static int Vcanna_mode_AdjustBunsetsuMode = CANNA_MODE_AdjustBunsetsuMode;
886 #endif 886 #endif
887 #ifdef CANNA_MODE_ChikujiYomiMode 887 #ifdef CANNA_MODE_ChikujiYomiMode
888 static int canna_mode_ChikujiYomiMode; 888 static int Vcanna_mode_ChikujiYomiMode = CANNA_MODE_ChikujiYomiMode;
889 static int canna_mode_ChikujiTanMode; 889 static int Vcanna_mode_ChikujiTanMode = CANNA_MODE_ChikujiTanMode;
890 #endif 890 #endif
891 891
892 static int canna_mode_HenkanMode; 892 static int Vcanna_mode_HenkanMode = IROHA_MODE_HenkanMode;
893 #ifdef CANNA_MODE_HenkanNyuryokuMode 893 #ifdef CANNA_MODE_HenkanNyuryokuMode
894 static int canna_mode_HenkanNyuryokuMode; 894 static int Vcanna_mode_HenkanNyuryokuMode = CANNA_MODE_HenkanNyuryokuMode;
895 #endif 895 #endif
896 #ifdef CANNA_MODE_ZenHiraHenkanMode 896 #ifdef CANNA_MODE_ZenHiraHenkanMode
897 static int canna_mode_ZenHiraHenkanMode; 897 static int Vcanna_mode_ZenHiraHenkanMode = CANNA_MODE_ZenHiraHenkanMode;
898 #ifdef CANNA_MODE_HanHiraHenkanMode 898 #ifdef CANNA_MODE_HanHiraHenkanMode
899 static int canna_mode_HanHiraHenkanMode; 899 static int Vcanna_mode_HanHiraHenkanMode = CANNA_MODE_HanHiraHenkanMode;
900 #endif 900 #endif
901 static int canna_mode_ZenKataHenkanMode; 901 static int Vcanna_mode_ZenKataHenkanMode = CANNA_MODE_ZenKataHenkanMode;
902 static int canna_mode_HanKataHenkanMode; 902 static int Vcanna_mode_HanKataHenkanMode = CANNA_MODE_HanKataHenkanMode;
903 static int canna_mode_ZenAlphaHenkanMode; 903 static int Vcanna_mode_ZenAlphaHenkanMode = CANNA_MODE_ZenAlphaHenkanMode;
904 static int canna_mode_HanAlphaHenkanMode; 904 static int Vcanna_mode_HanAlphaHenkanMode = CANNA_MODE_HanAlphaHenkanMode;
905 #endif 905 #endif
906 static int canna_mode_ZenHiraKakuteiMode; 906 static int Vcanna_mode_ZenHiraKakuteiMode = IROHA_MODE_ZenHiraKakuteiMode;
907 #ifdef CANNA_MODE_HanHiraKakuteiMode 907 #ifdef CANNA_MODE_HanHiraKakuteiMode
908 static int canna_mode_HanHiraKakuteiMode; 908 static int Vcanna_mode_HanHiraKakuteiMode = CANNA_MODE_HanHiraKakuteiMode;
909 #endif 909 #endif
910 static int canna_mode_ZenKataKakuteiMode; 910 static int Vcanna_mode_ZenKataKakuteiMode = IROHA_MODE_ZenKataKakuteiMode;
911 static int canna_mode_HanKataKakuteiMode; 911 static int Vcanna_mode_HanKataKakuteiMode = IROHA_MODE_HanKataKakuteiMode;
912 static int canna_mode_ZenAlphaKakuteiMode; 912 static int Vcanna_mode_ZenAlphaKakuteiMode = IROHA_MODE_ZenAlphaKakuteiMode;
913 static int canna_mode_HanAlphaKakuteiMode; 913 static int Vcanna_mode_HanAlphaKakuteiMode = IROHA_MODE_HanAlphaKakuteiMode;
914 static int canna_mode_HexMode; 914 static int Vcanna_mode_HexMode = IROHA_MODE_HexMode;
915 static int canna_mode_BushuMode; 915 static int Vcanna_mode_BushuMode = IROHA_MODE_BushuMode;
916 static int canna_mode_ExtendMode; 916 static int Vcanna_mode_ExtendMode = IROHA_MODE_ExtendMode;
917 static int canna_mode_RussianMode; 917 static int Vcanna_mode_RussianMode = IROHA_MODE_RussianMode;
918 static int canna_mode_GreekMode; 918 static int Vcanna_mode_GreekMode = IROHA_MODE_GreekMode;
919 static int canna_mode_LineMode; 919 static int Vcanna_mode_LineMode = IROHA_MODE_LineMode;
920 static int canna_mode_ChangingServerMode; 920 static int Vcanna_mode_ChangingServerMode = IROHA_MODE_ChangingServerMode;
921 static int canna_mode_HenkanMethodMode; 921 static int Vcanna_mode_HenkanMethodMode = IROHA_MODE_HenkanMethodMode;
922 static int canna_mode_DeleteDicMode; 922 static int Vcanna_mode_DeleteDicMode = IROHA_MODE_DeleteDicMode;
923 static int canna_mode_TourokuMode; 923 static int Vcanna_mode_TourokuMode = IROHA_MODE_TourokuMode;
924 static int canna_mode_TourokuEmptyMode; 924 static int Vcanna_mode_TourokuEmptyMode = IROHA_MODE_TourokuEmptyMode;
925 static int canna_mode_TourokuHinshiMode; 925 static int Vcanna_mode_TourokuHinshiMode = IROHA_MODE_TourokuHinshiMode;
926 static int canna_mode_TourokuDicMode; 926 static int Vcanna_mode_TourokuDicMode = IROHA_MODE_TourokuDicMode;
927 static int canna_mode_QuotedInsertMode; 927 static int Vcanna_mode_QuotedInsertMode = IROHA_MODE_QuotedInsertMode;
928 static int canna_mode_BubunMuhenkanMode; 928 static int Vcanna_mode_BubunMuhenkanMode = IROHA_MODE_BubunMuhenkanMode;
929 static int canna_mode_MountDicMode; 929 static int Vcanna_mode_MountDicMode = IROHA_MODE_MountDicMode;
930 930
931 static int canna_fn_SelfInsert; 931 static int Vcanna_fn_SelfInsert = IROHA_FN_SelfInsert;
932 static int canna_fn_FunctionalInsert; 932 static int Vcanna_fn_FunctionalInsert = IROHA_FN_FunctionalInsert;
933 static int canna_fn_QuotedInsert; 933 static int Vcanna_fn_QuotedInsert = IROHA_FN_QuotedInsert;
934 static int canna_fn_JapaneseMode; 934 static int Vcanna_fn_JapaneseMode = IROHA_FN_JapaneseMode;
935 static int canna_fn_AlphaMode; 935 static int Vcanna_fn_AlphaMode = IROHA_FN_AlphaMode;
936 static int canna_fn_HenkanNyuryokuMode; 936 static int Vcanna_fn_HenkanNyuryokuMode = IROHA_FN_HenkanNyuryokuMode;
937 static int canna_fn_Forward; 937 static int Vcanna_fn_Forward = IROHA_FN_Forward;
938 static int canna_fn_Backward; 938 static int Vcanna_fn_Backward = IROHA_FN_Backward;
939 static int canna_fn_Next; 939 static int Vcanna_fn_Next = IROHA_FN_Next;
940 static int canna_fn_Prev; 940 static int Vcanna_fn_Prev = IROHA_FN_Prev;
941 static int canna_fn_BeginningOfLine; 941 static int Vcanna_fn_BeginningOfLine = IROHA_FN_BeginningOfLine;
942 static int canna_fn_EndOfLine; 942 static int Vcanna_fn_EndOfLine = IROHA_FN_EndOfLine;
943 static int canna_fn_DeleteNext; 943 static int Vcanna_fn_DeleteNext = IROHA_FN_DeleteNext;
944 static int canna_fn_DeletePrevious; 944 static int Vcanna_fn_DeletePrevious = IROHA_FN_DeletePrevious;
945 static int canna_fn_KillToEndOfLine; 945 static int Vcanna_fn_KillToEndOfLine = IROHA_FN_KillToEndOfLine;
946 static int canna_fn_Henkan; 946 static int Vcanna_fn_Henkan = IROHA_FN_Henkan;
947 static int canna_fn_Kakutei; 947 static int Vcanna_fn_Kakutei = IROHA_FN_Kakutei;
948 static int canna_fn_Extend; 948 static int Vcanna_fn_Extend = IROHA_FN_Extend;
949 static int canna_fn_Shrink; 949 static int Vcanna_fn_Shrink = IROHA_FN_Shrink;
950 #ifdef CANNA_FN_AdjustBunsetsu 950 #ifdef CANNA_FN_AdjustBunsetsu
951 static int canna_fn_AdjustBunsetsu; 951 static int Vcanna_fn_AdjustBunsetsu = CANNA_FN_AdjustBunsetsu;
952 #endif 952 #endif
953 static int canna_fn_Quit; 953 static int Vcanna_fn_Quit = IROHA_FN_Quit;
954 static int canna_fn_ConvertAsHex; 954 static int Vcanna_fn_ConvertAsHex = IROHA_FN_ConvertAsHex;
955 static int canna_fn_ConvertAsBushu; 955 static int Vcanna_fn_ConvertAsBushu = IROHA_FN_ConvertAsBushu;
956 static int canna_fn_KouhoIchiran; 956 static int Vcanna_fn_KouhoIchiran = IROHA_FN_KouhoIchiran;
957 static int canna_fn_BubunMuhenkan; 957 static int Vcanna_fn_BubunMuhenkan = IROHA_FN_BubunMuhenkan;
958 static int canna_fn_Zenkaku; 958 static int Vcanna_fn_Zenkaku = IROHA_FN_Zenkaku;
959 static int canna_fn_Hankaku; 959 static int Vcanna_fn_Hankaku = IROHA_FN_Hankaku;
960 static int canna_fn_ToUpper; 960 static int Vcanna_fn_ToUpper = IROHA_FN_ToUpper;
961 static int canna_fn_Capitalize; 961 static int Vcanna_fn_Capitalize = IROHA_FN_Capitalize;
962 static int canna_fn_ToLower; 962 static int Vcanna_fn_ToLower = IROHA_FN_ToLower;
963 static int canna_fn_Hiragana; 963 static int Vcanna_fn_Hiragana = IROHA_FN_Hiragana;
964 static int canna_fn_Katakana; 964 static int Vcanna_fn_Katakana = IROHA_FN_Katakana;
965 static int canna_fn_Romaji; 965 static int Vcanna_fn_Romaji = IROHA_FN_Romaji;
966 #ifdef CANNA_FN_BaseHiragana 966 #ifdef CANNA_FN_BaseHiragana
967 static int canna_fn_BaseHiragana; 967 static int Vcanna_fn_BaseHiragana = CANNA_FN_BaseHiragana;
968 static int canna_fn_BaseKatakana; 968 static int Vcanna_fn_BaseKatakana = CANNA_FN_BaseKatakana;
969 static int canna_fn_BaseEisu; 969 static int Vcanna_fn_BaseEisu = CANNA_FN_BaseEisu;
970 static int canna_fn_BaseZenkaku; 970 static int Vcanna_fn_BaseZenkaku = CANNA_FN_BaseZenkaku;
971 static int canna_fn_BaseHankaku; 971 static int Vcanna_fn_BaseHankaku = CANNA_FN_BaseHankaku;
972 static int canna_fn_BaseKana; 972 static int Vcanna_fn_BaseKana = CANNA_FN_BaseKana;
973 static int canna_fn_BaseKakutei; 973 static int Vcanna_fn_BaseKakutei = CANNA_FN_BaseKakutei;
974 static int canna_fn_BaseHenkan; 974 static int Vcanna_fn_BaseHenkan = CANNA_FN_BaseHenkan;
975 static int canna_fn_BaseHiraKataToggle; 975 static int Vcanna_fn_BaseHiraKataToggle = CANNA_FN_BaseHiraKataToggle;
976 static int canna_fn_BaseZenHanToggle; 976 static int Vcanna_fn_BaseZenHanToggle = CANNA_FN_BaseZenHanToggle;
977 static int canna_fn_BaseKanaEisuToggle; 977 static int Vcanna_fn_BaseKanaEisuToggle = CANNA_FN_BaseKanaEisuToggle;
978 static int canna_fn_BaseKakuteiHenkanToggle; 978 static int Vcanna_fn_BaseKakuteiHenkanToggle =
979 static int canna_fn_BaseRotateForward; 979 CANNA_FN_BaseKakuteiHenkanToggle;
980 static int canna_fn_BaseRotateBackward; 980 static int Vcanna_fn_BaseRotateForward = CANNA_FN_BaseRotateForward;
981 #endif 981 static int Vcanna_fn_BaseRotateBackward = CANNA_FN_BaseRotateBackward;
982 static int canna_fn_ExtendMode; 982 #endif
983 static int canna_fn_Touroku; 983 static int Vcanna_fn_ExtendMode = IROHA_FN_ExtendMode;
984 static int canna_fn_HexMode; 984 static int Vcanna_fn_Touroku = IROHA_FN_Touroku;
985 static int canna_fn_BushuMode; 985 static int Vcanna_fn_HexMode = IROHA_FN_HexMode;
986 static int canna_fn_KigouMode; 986 static int Vcanna_fn_BushuMode = IROHA_FN_BushuMode;
987 static int Vcanna_fn_KigouMode = IROHA_FN_KigouMode;
987 #ifdef CANNA_FN_Mark 988 #ifdef CANNA_FN_Mark
988 static int canna_fn_Mark; 989 static int Vcanna_fn_Mark = CANNA_FN_Mark;
989 #endif 990 #endif
990 #ifdef CANNA_FN_TemporalMode 991 #ifdef CANNA_FN_TemporalMode
991 static int canna_fn_TemporalMode; 992 static int Vcanna_fn_TemporalMode = CANNA_FN_TemporalMode;
992 #endif 993 #endif
993 994
994 static int canna_key_Nfer; 995 static int Vcanna_key_Nfer = IROHA_KEY_Nfer;
995 static int canna_key_Xfer; 996 static int Vcanna_key_Xfer = IROHA_KEY_Xfer;
996 static int canna_key_Up; 997 static int Vcanna_key_Up = IROHA_KEY_Up;
997 static int canna_key_Left; 998 static int Vcanna_key_Left = IROHA_KEY_Left;
998 static int canna_key_Right; 999 static int Vcanna_key_Right = IROHA_KEY_Right;
999 static int canna_key_Down; 1000 static int Vcanna_key_Down = IROHA_KEY_Down;
1000 static int canna_key_Insert; 1001 static int Vcanna_key_Insert = IROHA_KEY_Insert;
1001 static int canna_key_Rollup; 1002 static int Vcanna_key_Rollup = IROHA_KEY_Rollup;
1002 static int canna_key_Rolldown; 1003 static int Vcanna_key_Rolldown = IROHA_KEY_Rolldown;
1003 static int canna_key_Home; 1004 static int Vcanna_key_Home = IROHA_KEY_Home;
1004 static int canna_key_Help; 1005 static int Vcanna_key_Help = IROHA_KEY_Help;
1005 static int canna_key_KP_Key; 1006 static int Vcanna_key_KP_Key = IROHA_KEY_KP_Key;
1006 static int canna_key_Shift_Nfer; 1007 static int Vcanna_key_Shift_Nfer = IROHA_KEY_Shift_Nfer;
1007 static int canna_key_Shift_Xfer; 1008 static int Vcanna_key_Shift_Xfer = IROHA_KEY_Shift_Xfer;
1008 static int canna_key_Shift_Up; 1009 static int Vcanna_key_Shift_Up = IROHA_KEY_Shift_Up;
1009 static int canna_key_Shift_Left; 1010 static int Vcanna_key_Shift_Left = IROHA_KEY_Shift_Left;
1010 static int canna_key_Shift_Right; 1011 static int Vcanna_key_Shift_Right = IROHA_KEY_Shift_Right;
1011 static int canna_key_Shift_Down; 1012 static int Vcanna_key_Shift_Down = IROHA_KEY_Shift_Down;
1012 static int canna_key_Cntrl_Nfer; 1013 static int Vcanna_key_Cntrl_Nfer = IROHA_KEY_Cntrl_Nfer;
1013 static int canna_key_Cntrl_Xfer; 1014 static int Vcanna_key_Cntrl_Xfer = IROHA_KEY_Cntrl_Xfer;
1014 static int canna_key_Cntrl_Up; 1015 static int Vcanna_key_Cntrl_Up = IROHA_KEY_Cntrl_Up;
1015 static int canna_key_Cntrl_Left; 1016 static int Vcanna_key_Cntrl_Left = IROHA_KEY_Cntrl_Left;
1016 static int canna_key_Cntrl_Right; 1017 static int Vcanna_key_Cntrl_Right = IROHA_KEY_Cntrl_Right;
1017 static int canna_key_Cntrl_Down; 1018 static int Vcanna_key_Cntrl_Down = IROHA_KEY_Cntrl_Down;
1018 1019
1019 Lisp_Object VCANNA; /* by MORIOKA Tomohiko <morioka@jaist.ac.jp> 1020 Lisp_Object VCANNA; /* by MORIOKA Tomohiko <morioka@jaist.ac.jp>
1020 1996/6/7 */ 1021 1996/6/7 */
1021 1022
1022 void 1023 void
1023 syms_of_mule_canna (void) 1024 syms_of_mule_canna (void)
1024 { 1025 {
1026 DEFVAR_LISP ("CANNA", &VCANNA); /* hir@nec, 1992.5.21 */
1027 VCANNA = Qt; /* hir@nec, 1992.5.21 */
1028
1025 DEFSUBR (Fcanna_key_proc); 1029 DEFSUBR (Fcanna_key_proc);
1026 DEFSUBR (Fcanna_initialize); 1030 DEFSUBR (Fcanna_initialize);
1027 DEFSUBR (Fcanna_finalize); 1031 DEFSUBR (Fcanna_finalize);
1028 DEFSUBR (Fcanna_touroku_string); 1032 DEFSUBR (Fcanna_touroku_string);
1029 DEFSUBR (Fcanna_set_width); 1033 DEFSUBR (Fcanna_set_width);
1043 } 1047 }
1044 1048
1045 void 1049 void
1046 vars_of_mule_canna (void) 1050 vars_of_mule_canna (void)
1047 { 1051 {
1048 DEFVAR_LISP ("CANNA", &VCANNA); /* hir@nec, 1992.5.21 */
1049 VCANNA = Qt; /* hir@nec, 1992.5.21 */
1050
1051 DEFVAR_LISP ("canna-kakutei-string", &Vcanna_kakutei_string /* 1052 DEFVAR_LISP ("canna-kakutei-string", &Vcanna_kakutei_string /*
1052 1053
1053 */ ); 1054 */ );
1054 Vcanna_kakutei_string = Qnil;
1055
1056 DEFVAR_LISP ("canna-kakutei-yomi", &Vcanna_kakutei_yomi /* 1055 DEFVAR_LISP ("canna-kakutei-yomi", &Vcanna_kakutei_yomi /*
1057 1056
1058 */ ); 1057 */ );
1059 Vcanna_kakutei_yomi = Qnil;
1060
1061 DEFVAR_LISP ("canna-kakutei-romaji", &Vcanna_kakutei_romaji /* 1058 DEFVAR_LISP ("canna-kakutei-romaji", &Vcanna_kakutei_romaji /*
1062 1059
1063 */ ); 1060 */ );
1064 Vcanna_kakutei_romaji = Qnil;
1065
1066 DEFVAR_LISP ("canna-henkan-string", &Vcanna_henkan_string /* 1061 DEFVAR_LISP ("canna-henkan-string", &Vcanna_henkan_string /*
1067 1062
1068 */ ); 1063 */ );
1069 Vcanna_henkan_string = Qnil; 1064 DEFVAR_INT ("canna-henkan-length", &Vcanna_henkan_length /*
1070 1065
1071 DEFVAR_INT ("canna-henkan-length", &canna_henkan_length /* 1066 */ );
1072 1067 DEFVAR_INT ("canna-henkan-revpos", &Vcanna_henkan_revPos /*
1073 */ ); 1068
1074 canna_henkan_length = 0; 1069 */ );
1075 1070 DEFVAR_INT ("canna-henkan-revlen", &Vcanna_henkan_revLen /*
1076 DEFVAR_INT ("canna-henkan-revpos", &canna_henkan_revPos /* 1071
1077 1072 */ );
1078 */ );
1079 canna_henkan_revPos = 0;
1080
1081 DEFVAR_INT ("canna-henkan-revlen", &canna_henkan_revLen /*
1082
1083 */ );
1084 canna_henkan_revLen = 0;
1085
1086 DEFVAR_LISP ("canna-ichiran-string", &Vcanna_ichiran_string /* 1073 DEFVAR_LISP ("canna-ichiran-string", &Vcanna_ichiran_string /*
1087 1074
1088 */ ); 1075 */ );
1089 Vcanna_ichiran_string = Qnil; 1076 DEFVAR_INT ("canna-ichiran-length", &Vcanna_ichiran_length /*
1090 1077
1091 DEFVAR_INT ("canna-ichiran-length", &canna_ichiran_length /* 1078 */ );
1092 1079 DEFVAR_INT ("canna-ichiran-revpos", &Vcanna_ichiran_revPos /*
1093 */ ); 1080
1094 canna_ichiran_length = 0; 1081 */ );
1095 1082 DEFVAR_INT ("canna-ichiran-revlen", &Vcanna_ichiran_revLen /*
1096 DEFVAR_INT ("canna-ichiran-revpos", &canna_ichiran_revPos /* 1083
1097 1084 */ );
1098 */ );
1099 canna_ichiran_revPos = 0;
1100
1101 DEFVAR_INT ("canna-ichiran-revlen", &canna_ichiran_revLen /*
1102
1103 */ );
1104 canna_ichiran_revLen = 0;
1105
1106 DEFVAR_LISP ("canna-mode-string", &Vcanna_mode_string /* 1085 DEFVAR_LISP ("canna-mode-string", &Vcanna_mode_string /*
1107 1086
1108 */ ); 1087 */ );
1109 Vcanna_mode_string = Qnil; 1088
1110 1089 DEFVAR_BOOL ("canna-empty-info", &Vcanna_empty_info /*
1111 DEFVAR_BOOL ("canna-empty-info", &canna_empty_info /*
1112 For canna 1090 For canna
1113 */ ); 1091 */ );
1114 canna_empty_info = 0; 1092 DEFVAR_BOOL ("canna-through-info", &Vcanna_through_info /*
1115
1116 DEFVAR_BOOL ("canna-through-info", &canna_through_info /*
1117 For canna 1093 For canna
1118 */ ); 1094 */ );
1119 canna_through_info = 0; 1095 DEFVAR_BOOL ("canna-underline", &Vcanna_underline /*
1120
1121 DEFVAR_BOOL ("canna-underline", &canna_underline /*
1122 For canna 1096 For canna
1123 */ ); 1097 */ );
1124 canna_underline = 0; 1098 DEFVAR_BOOL ("canna-inhibit-hankakukana", &Vcanna_inhibit_hankakukana /*
1125
1126 DEFVAR_BOOL ("canna-inhibit-hankakukana", &canna_inhibit_hankakukana /*
1127 For canna 1099 For canna
1128 */ ); 1100 */ );
1129 canna_inhibit_hankakukana = 0; 1101
1130 1102 DEFVAR_INT ("canna-mode-alpha-mode", &Vcanna_mode_AlphaMode /*
1131 DEFVAR_INT ("canna-mode-alpha-mode", &canna_mode_AlphaMode /* 1103
1132 1104 */ );
1133 */ ); 1105 DEFVAR_INT ("canna-mode-empty-mode", &Vcanna_mode_EmptyMode /*
1134 canna_mode_AlphaMode = IROHA_MODE_AlphaMode; 1106
1135 1107 */ );
1136 DEFVAR_INT ("canna-mode-empty-mode", &canna_mode_EmptyMode /* 1108 DEFVAR_INT ("canna-mode-kigo-mode", &Vcanna_mode_KigoMode /*
1137 1109
1138 */ ); 1110 */ );
1139 canna_mode_EmptyMode = IROHA_MODE_EmptyMode; 1111 DEFVAR_INT ("canna-mode-yomi-mode", &Vcanna_mode_YomiMode /*
1140 1112
1141 DEFVAR_INT ("canna-mode-kigo-mode", &canna_mode_KigoMode /* 1113 */ );
1142 1114 DEFVAR_INT ("canna-mode-jishu-mode", &Vcanna_mode_JishuMode /*
1143 */ ); 1115
1144 canna_mode_KigoMode = IROHA_MODE_KigoMode; 1116 */ );
1145 1117 DEFVAR_INT ("canna-mode-tankouho-mode", &Vcanna_mode_TankouhoMode /*
1146 DEFVAR_INT ("canna-mode-yomi-mode", &canna_mode_YomiMode /* 1118
1147 1119 */ );
1148 */ ); 1120 DEFVAR_INT ("canna-mode-ichiran-mode", &Vcanna_mode_IchiranMode /*
1149 canna_mode_YomiMode = IROHA_MODE_YomiMode; 1121
1150 1122 */ );
1151 DEFVAR_INT ("canna-mode-jishu-mode", &canna_mode_JishuMode /* 1123 DEFVAR_INT ("canna-mode-yes-no-mode", &Vcanna_mode_YesNoMode /*
1152 1124
1153 */ ); 1125 */ );
1154 canna_mode_JishuMode = IROHA_MODE_JishuMode; 1126 DEFVAR_INT ("canna-mode-on-off-mode", &Vcanna_mode_OnOffMode /*
1155 1127
1156 DEFVAR_INT ("canna-mode-tankouho-mode", &canna_mode_TankouhoMode /* 1128 */ );
1157
1158 */ );
1159 canna_mode_TankouhoMode = IROHA_MODE_TankouhoMode;
1160
1161 DEFVAR_INT ("canna-mode-ichiran-mode", &canna_mode_IchiranMode /*
1162
1163 */ );
1164 canna_mode_IchiranMode = IROHA_MODE_IchiranMode;
1165
1166 DEFVAR_INT ("canna-mode-yes-no-mode", &canna_mode_YesNoMode /*
1167
1168 */ );
1169 canna_mode_YesNoMode = IROHA_MODE_YesNoMode;
1170
1171 DEFVAR_INT ("canna-mode-on-off-mode", &canna_mode_OnOffMode /*
1172
1173 */ );
1174 canna_mode_OnOffMode = IROHA_MODE_OnOffMode;
1175
1176 #ifdef CANNA_MODE_AdjustBunsetsuMode 1129 #ifdef CANNA_MODE_AdjustBunsetsuMode
1177 DEFVAR_INT ("canna-mode-adjust-bunsetsu-mode", 1130 DEFVAR_INT ("canna-mode-adjust-bunsetsu-mode",
1178 &canna_mode_AdjustBunsetsuMode /* 1131 &Vcanna_mode_AdjustBunsetsuMode /*
1179 1132
1180 */ ); 1133 */ );
1181 canna_mode_AdjustBunsetsuMode = CANNA_MODE_AdjustBunsetsuMode;
1182 #endif 1134 #endif
1183 #ifdef CANNA_MODE_ChikujiYomiMode 1135 #ifdef CANNA_MODE_ChikujiYomiMode
1184 DEFVAR_INT ("canna-mode-chikuji-yomi-mode", &canna_mode_ChikujiYomiMode /* 1136 DEFVAR_INT ("canna-mode-chikuji-yomi-mode", &Vcanna_mode_ChikujiYomiMode /*
1185 1137
1186 */ ); 1138 */ );
1187 canna_mode_ChikujiYomiMode = CANNA_MODE_ChikujiYomiMode;
1188
1189 DEFVAR_INT ("canna-mode-chikuji-bunsetsu-mode", 1139 DEFVAR_INT ("canna-mode-chikuji-bunsetsu-mode",
1190 &canna_mode_ChikujiTanMode /* 1140 &Vcanna_mode_ChikujiTanMode /*
1191 1141
1192 */ ); 1142 */ );
1193 canna_mode_ChikujiTanMode = CANNA_MODE_ChikujiTanMode; 1143 #endif
1194 #endif 1144
1195 1145 DEFVAR_INT ("canna-mode-henkan-mode", &Vcanna_mode_HenkanMode /*
1196 DEFVAR_INT ("canna-mode-henkan-mode", &canna_mode_HenkanMode /* 1146
1197 1147 */ );
1198 */ );
1199 canna_mode_HenkanMode = IROHA_MODE_HenkanMode;
1200
1201 #ifdef CANNA_MODE_HenkanNyuryokuMode 1148 #ifdef CANNA_MODE_HenkanNyuryokuMode
1202 DEFVAR_INT ("canna-mode-henkan-nyuuryoku-mode", 1149 DEFVAR_INT ("canna-mode-henkan-nyuuryoku-mode",
1203 &canna_mode_HenkanNyuryokuMode /* 1150 &Vcanna_mode_HenkanNyuryokuMode /*
1204 1151
1205 */ ); 1152 */ );
1206 canna_mode_HenkanNyuryokuMode = CANNA_MODE_HenkanNyuryokuMode;
1207 #endif 1153 #endif
1208 #ifdef CANNA_MODE_ZenHiraHenkanMode 1154 #ifdef CANNA_MODE_ZenHiraHenkanMode
1209 DEFVAR_INT ("canna-mode-zen-hira-henkan-mode", 1155 DEFVAR_INT ("canna-mode-zen-hira-henkan-mode",
1210 &canna_mode_ZenHiraHenkanMode /* 1156 &Vcanna_mode_ZenHiraHenkanMode /*
1211 1157
1212 */ ); 1158 */ );
1213 canna_mode_ZenHiraHenkanMode = CANNA_MODE_ZenHiraHenkanMode;
1214 #ifdef CANNA_MODE_HanHiraHenkanMode 1159 #ifdef CANNA_MODE_HanHiraHenkanMode
1215 DEFVAR_INT ("canna-mode-han-hira-henkan-mode", 1160 DEFVAR_INT ("canna-mode-han-hira-henkan-mode",
1216 &canna_mode_HanHiraHenkanMode /* 1161 &Vcanna_mode_HanHiraHenkanMode /*
1217 1162
1218 */ ); 1163 */ );
1219 canna_mode_HanHiraHenkanMode = CANNA_MODE_HanHiraHenkanMode;
1220 #endif 1164 #endif
1221 DEFVAR_INT ("canna-mode-zen-kata-henkan-mode", 1165 DEFVAR_INT ("canna-mode-zen-kata-henkan-mode",
1222 &canna_mode_ZenKataHenkanMode /* 1166 &Vcanna_mode_ZenKataHenkanMode /*
1223 1167
1224 */ ); 1168 */ );
1225 canna_mode_ZenKataHenkanMode = CANNA_MODE_ZenKataHenkanMode;
1226
1227 DEFVAR_INT ("canna-mode-han-kata-henkan-mode", 1169 DEFVAR_INT ("canna-mode-han-kata-henkan-mode",
1228 &canna_mode_HanKataHenkanMode /* 1170 &Vcanna_mode_HanKataHenkanMode /*
1229 1171
1230 */ ); 1172 */ );
1231 canna_mode_HanKataHenkanMode = CANNA_MODE_HanKataHenkanMode;
1232
1233 DEFVAR_INT ("canna-mode-zen-alpha-henkan-mode", 1173 DEFVAR_INT ("canna-mode-zen-alpha-henkan-mode",
1234 &canna_mode_ZenAlphaHenkanMode /* 1174 &Vcanna_mode_ZenAlphaHenkanMode /*
1235 1175
1236 */ ); 1176 */ );
1237 canna_mode_ZenAlphaHenkanMode = CANNA_MODE_ZenAlphaHenkanMode;
1238
1239 DEFVAR_INT ("canna-mode-han-alpha-henkan-mode", 1177 DEFVAR_INT ("canna-mode-han-alpha-henkan-mode",
1240 &canna_mode_HanAlphaHenkanMode /* 1178 &Vcanna_mode_HanAlphaHenkanMode /*
1241 1179
1242 */ ); 1180 */ );
1243 canna_mode_HanAlphaHenkanMode = CANNA_MODE_HanAlphaHenkanMode;
1244 #endif 1181 #endif
1245 DEFVAR_INT ("canna-mode-zen-hira-kakutei-mode", 1182 DEFVAR_INT ("canna-mode-zen-hira-kakutei-mode",
1246 &canna_mode_ZenHiraKakuteiMode /* 1183 &Vcanna_mode_ZenHiraKakuteiMode /*
1247 1184
1248 */ ); 1185 */ );
1249 canna_mode_ZenHiraKakuteiMode = IROHA_MODE_ZenHiraKakuteiMode;
1250 #ifdef CANNA_MODE_HanHiraKakuteiMode 1186 #ifdef CANNA_MODE_HanHiraKakuteiMode
1251 DEFVAR_INT ("canna-mode-han-hira-kakutei-mode", 1187 DEFVAR_INT ("canna-mode-han-hira-kakutei-mode",
1252 &canna_mode_HanHiraKakuteiMode /* 1188 &Vcanna_mode_HanHiraKakuteiMode /*
1253 1189
1254 */ ); 1190 */ );
1255 canna_mode_HanHiraKakuteiMode = CANNA_MODE_HanHiraKakuteiMode;
1256 #endif 1191 #endif
1257 DEFVAR_INT ("canna-mode-zen-kata-kakutei-mode", 1192 DEFVAR_INT ("canna-mode-zen-kata-kakutei-mode",
1258 &canna_mode_ZenKataKakuteiMode /* 1193 &Vcanna_mode_ZenKataKakuteiMode /*
1259 1194
1260 */ ); 1195 */ );
1261 canna_mode_ZenKataKakuteiMode = IROHA_MODE_ZenKataKakuteiMode;
1262
1263 DEFVAR_INT ("canna-mode-han-kata-kakutei-mode", 1196 DEFVAR_INT ("canna-mode-han-kata-kakutei-mode",
1264 &canna_mode_HanKataKakuteiMode /* 1197 &Vcanna_mode_HanKataKakuteiMode /*
1265 1198
1266 */ ); 1199 */ );
1267 canna_mode_HanKataKakuteiMode = IROHA_MODE_HanKataKakuteiMode;
1268
1269 DEFVAR_INT ("canna-mode-zen-alpha-kakutei-mode", 1200 DEFVAR_INT ("canna-mode-zen-alpha-kakutei-mode",
1270 &canna_mode_ZenAlphaKakuteiMode /* 1201 &Vcanna_mode_ZenAlphaKakuteiMode /*
1271 1202
1272 */ ); 1203 */ );
1273 canna_mode_ZenAlphaKakuteiMode = IROHA_MODE_ZenAlphaKakuteiMode;
1274
1275 DEFVAR_INT ("canna-mode-han-alpha-kakutei-mode", 1204 DEFVAR_INT ("canna-mode-han-alpha-kakutei-mode",
1276 &canna_mode_HanAlphaKakuteiMode /* 1205 &Vcanna_mode_HanAlphaKakuteiMode /*
1277 1206
1278 */ ); 1207 */ );
1279 canna_mode_HanAlphaKakuteiMode = IROHA_MODE_HanAlphaKakuteiMode; 1208 DEFVAR_INT ("canna-mode-hex-mode", &Vcanna_mode_HexMode /*
1280 1209
1281 DEFVAR_INT ("canna-mode-hex-mode", &canna_mode_HexMode /* 1210 */ );
1282 1211 DEFVAR_INT ("canna-mode-bushu-mode", &Vcanna_mode_BushuMode /*
1283 */ ); 1212
1284 canna_mode_HexMode = IROHA_MODE_HexMode; 1213 */ );
1285 1214 DEFVAR_INT ("canna-mode-extend-mode", &Vcanna_mode_ExtendMode /*
1286 DEFVAR_INT ("canna-mode-bushu-mode", &canna_mode_BushuMode /* 1215
1287 1216 */ );
1288 */ ); 1217 DEFVAR_INT ("canna-mode-russian-mode", &Vcanna_mode_RussianMode /*
1289 canna_mode_BushuMode = IROHA_MODE_BushuMode; 1218
1290 1219 */ );
1291 DEFVAR_INT ("canna-mode-extend-mode", &canna_mode_ExtendMode /* 1220 DEFVAR_INT ("canna-mode-greek-mode", &Vcanna_mode_GreekMode /*
1292 1221
1293 */ ); 1222 */ );
1294 canna_mode_ExtendMode = IROHA_MODE_ExtendMode; 1223 DEFVAR_INT ("canna-mode-line-mode", &Vcanna_mode_LineMode /*
1295 1224
1296 DEFVAR_INT ("canna-mode-russian-mode", &canna_mode_RussianMode /* 1225 */ );
1297
1298 */ );
1299 canna_mode_RussianMode = IROHA_MODE_RussianMode;
1300
1301 DEFVAR_INT ("canna-mode-greek-mode", &canna_mode_GreekMode /*
1302
1303 */ );
1304 canna_mode_GreekMode = IROHA_MODE_GreekMode;
1305
1306 DEFVAR_INT ("canna-mode-line-mode", &canna_mode_LineMode /*
1307
1308 */ );
1309 canna_mode_LineMode = IROHA_MODE_LineMode;
1310
1311 DEFVAR_INT ("canna-mode-changing-server-mode", 1226 DEFVAR_INT ("canna-mode-changing-server-mode",
1312 &canna_mode_ChangingServerMode /* 1227 &Vcanna_mode_ChangingServerMode /*
1313 1228
1314 */ ); 1229 */ );
1315 canna_mode_ChangingServerMode = IROHA_MODE_ChangingServerMode;
1316
1317 DEFVAR_INT ("canna-mode-henkan-method-mode", 1230 DEFVAR_INT ("canna-mode-henkan-method-mode",
1318 &canna_mode_HenkanMethodMode /* 1231 &Vcanna_mode_HenkanMethodMode /*
1319 1232
1320 */ ); 1233 */ );
1321 canna_mode_HenkanMethodMode = IROHA_MODE_HenkanMethodMode; 1234 DEFVAR_INT ("canna-mode-delete-dic-mode", &Vcanna_mode_DeleteDicMode /*
1322 1235
1323 DEFVAR_INT ("canna-mode-delete-dic-mode", &canna_mode_DeleteDicMode /* 1236 */ );
1324 1237 DEFVAR_INT ("canna-mode-touroku-mode", &Vcanna_mode_TourokuMode /*
1325 */ ); 1238
1326 canna_mode_DeleteDicMode = IROHA_MODE_DeleteDicMode; 1239 */ );
1327
1328 DEFVAR_INT ("canna-mode-touroku-mode", &canna_mode_TourokuMode /*
1329
1330 */ );
1331 canna_mode_TourokuMode = IROHA_MODE_TourokuMode;
1332
1333 DEFVAR_INT ("canna-mode-touroku-empty-mode", 1240 DEFVAR_INT ("canna-mode-touroku-empty-mode",
1334 &canna_mode_TourokuEmptyMode /* 1241 &Vcanna_mode_TourokuEmptyMode /*
1335 1242
1336 */ ); 1243 */ );
1337 canna_mode_TourokuEmptyMode = IROHA_MODE_TourokuEmptyMode;
1338
1339 DEFVAR_INT ("canna-mode-touroku-hinshi-mode", 1244 DEFVAR_INT ("canna-mode-touroku-hinshi-mode",
1340 &canna_mode_TourokuHinshiMode /* 1245 &Vcanna_mode_TourokuHinshiMode /*
1341 1246
1342 */ ); 1247 */ );
1343 canna_mode_TourokuHinshiMode = IROHA_MODE_TourokuHinshiMode; 1248 DEFVAR_INT ("canna-mode-touroku-dic-mode", &Vcanna_mode_TourokuDicMode /*
1344 1249
1345 DEFVAR_INT ("canna-mode-touroku-dic-mode", &canna_mode_TourokuDicMode /* 1250 */ );
1346
1347 */ );
1348 canna_mode_TourokuDicMode = IROHA_MODE_TourokuDicMode;
1349
1350 DEFVAR_INT ("canna-mode-quoted-insert-mode", 1251 DEFVAR_INT ("canna-mode-quoted-insert-mode",
1351 &canna_mode_QuotedInsertMode /* 1252 &Vcanna_mode_QuotedInsertMode /*
1352 1253
1353 */ ); 1254 */ );
1354 canna_mode_QuotedInsertMode = IROHA_MODE_QuotedInsertMode;
1355
1356 DEFVAR_INT ("canna-mode-bubun-muhenkan-mode", 1255 DEFVAR_INT ("canna-mode-bubun-muhenkan-mode",
1357 &canna_mode_BubunMuhenkanMode /* 1256 &Vcanna_mode_BubunMuhenkanMode /*
1358 1257
1359 */ ); 1258 */ );
1360 canna_mode_BubunMuhenkanMode = IROHA_MODE_BubunMuhenkanMode; 1259 DEFVAR_INT ("canna-mode-mount-dic-mode", &Vcanna_mode_MountDicMode /*
1361 1260
1362 DEFVAR_INT ("canna-mode-mount-dic-mode", &canna_mode_MountDicMode /* 1261 */ );
1363 1262
1364 */ ); 1263 DEFVAR_INT ("canna-func-self-insert", &Vcanna_fn_SelfInsert /*
1365 canna_mode_MountDicMode = IROHA_MODE_MountDicMode; 1264
1366 1265 */ );
1367 DEFVAR_INT ("canna-func-self-insert", &canna_fn_SelfInsert /* 1266 DEFVAR_INT ("canna-func-functional-insert", &Vcanna_fn_FunctionalInsert /*
1368 1267
1369 */ ); 1268 */ );
1370 canna_fn_SelfInsert = IROHA_FN_SelfInsert; 1269 DEFVAR_INT ("canna-func-quoted-insert", &Vcanna_fn_QuotedInsert /*
1371 1270
1372 DEFVAR_INT ("canna-func-functional-insert", &canna_fn_FunctionalInsert /* 1271 */ );
1373 1272 DEFVAR_INT ("canna-func-japanese-mode", &Vcanna_fn_JapaneseMode /*
1374 */ ); 1273
1375 canna_fn_FunctionalInsert = IROHA_FN_FunctionalInsert; 1274 */ );
1376 1275 DEFVAR_INT ("canna-func-alpha-mode", &Vcanna_fn_AlphaMode /*
1377 DEFVAR_INT ("canna-func-quoted-insert", &canna_fn_QuotedInsert /* 1276
1378 1277 */ );
1379 */ );
1380 canna_fn_QuotedInsert = IROHA_FN_QuotedInsert;
1381
1382 DEFVAR_INT ("canna-func-japanese-mode", &canna_fn_JapaneseMode /*
1383
1384 */ );
1385 canna_fn_JapaneseMode = IROHA_FN_JapaneseMode;
1386
1387 DEFVAR_INT ("canna-func-alpha-mode", &canna_fn_AlphaMode /*
1388
1389 */ );
1390 canna_fn_AlphaMode = IROHA_FN_AlphaMode;
1391
1392 DEFVAR_INT ("canna-func-henkan-nyuryoku-mode", 1278 DEFVAR_INT ("canna-func-henkan-nyuryoku-mode",
1393 &canna_fn_HenkanNyuryokuMode /* 1279 &Vcanna_fn_HenkanNyuryokuMode /*
1394 1280
1395 */ ); 1281 */ );
1396 canna_fn_HenkanNyuryokuMode = IROHA_FN_HenkanNyuryokuMode; 1282 DEFVAR_INT ("canna-func-forward", &Vcanna_fn_Forward /*
1397 1283
1398 DEFVAR_INT ("canna-func-forward", &canna_fn_Forward /* 1284 */ );
1399 1285 DEFVAR_INT ("canna-func-backward", &Vcanna_fn_Backward /*
1400 */ ); 1286
1401 canna_fn_Forward = IROHA_FN_Forward; 1287 */ );
1402 1288 DEFVAR_INT ("canna-func-next", &Vcanna_fn_Next /*
1403 DEFVAR_INT ("canna-func-backward", &canna_fn_Backward /* 1289
1404 1290 */ );
1405 */ ); 1291 DEFVAR_INT ("canna-func-previous", &Vcanna_fn_Prev /*
1406 canna_fn_Backward = IROHA_FN_Backward; 1292
1407 1293 */ );
1408 DEFVAR_INT ("canna-func-next", &canna_fn_Next /* 1294 DEFVAR_INT ("canna-func-beginning-of-line", &Vcanna_fn_BeginningOfLine /*
1409 1295
1410 */ ); 1296 */ );
1411 canna_fn_Next = IROHA_FN_Next; 1297 DEFVAR_INT ("canna-func-end-of-line", &Vcanna_fn_EndOfLine /*
1412 1298
1413 DEFVAR_INT ("canna-func-previous", &canna_fn_Prev /* 1299 */ );
1414 1300 DEFVAR_INT ("canna-func-delete-next", &Vcanna_fn_DeleteNext /*
1415 */ ); 1301
1416 canna_fn_Prev = IROHA_FN_Prev; 1302 */ );
1417 1303 DEFVAR_INT ("canna-func-delete_previous", &Vcanna_fn_DeletePrevious /*
1418 DEFVAR_INT ("canna-func-beginning-of-line", &canna_fn_BeginningOfLine /* 1304
1419 1305 */ );
1420 */ ); 1306 DEFVAR_INT ("canna-func-kill-to-end-of-line", &Vcanna_fn_KillToEndOfLine /*
1421 canna_fn_BeginningOfLine = IROHA_FN_BeginningOfLine; 1307
1422 1308 */ );
1423 DEFVAR_INT ("canna-func-end-of-line", &canna_fn_EndOfLine /* 1309 DEFVAR_INT ("canna-func-henkan", &Vcanna_fn_Henkan /*
1424 1310
1425 */ ); 1311 */ );
1426 canna_fn_EndOfLine = IROHA_FN_EndOfLine; 1312 DEFVAR_INT ("canna-func-kakutei", &Vcanna_fn_Kakutei /*
1427 1313
1428 DEFVAR_INT ("canna-func-delete-next", &canna_fn_DeleteNext /* 1314 */ );
1429 1315 DEFVAR_INT ("canna-func-extend", &Vcanna_fn_Extend /*
1430 */ ); 1316
1431 canna_fn_DeleteNext = IROHA_FN_DeleteNext; 1317 */ );
1432 1318 DEFVAR_INT ("canna-func-shrink", &Vcanna_fn_Shrink /*
1433 DEFVAR_INT ("canna-func-delete_previous", &canna_fn_DeletePrevious /* 1319
1434 1320 */ );
1435 */ );
1436 canna_fn_DeletePrevious = IROHA_FN_DeletePrevious;
1437
1438 DEFVAR_INT ("canna-func-kill-to-end-of-line", &canna_fn_KillToEndOfLine /*
1439
1440 */ );
1441 canna_fn_KillToEndOfLine = IROHA_FN_KillToEndOfLine;
1442
1443 DEFVAR_INT ("canna-func-henkan", &canna_fn_Henkan /*
1444
1445 */ );
1446 canna_fn_Henkan = IROHA_FN_Henkan;
1447
1448 DEFVAR_INT ("canna-func-kakutei", &canna_fn_Kakutei /*
1449
1450 */ );
1451 canna_fn_Kakutei = IROHA_FN_Kakutei;
1452
1453 DEFVAR_INT ("canna-func-extend", &canna_fn_Extend /*
1454
1455 */ );
1456 canna_fn_Extend = IROHA_FN_Extend;
1457
1458 DEFVAR_INT ("canna-func-shrink", &canna_fn_Shrink /*
1459
1460 */ );
1461 canna_fn_Shrink = IROHA_FN_Shrink;
1462
1463 #ifdef CANNA_FN_AdjustBunsetsu 1321 #ifdef CANNA_FN_AdjustBunsetsu
1464 DEFVAR_INT ("canna-func-adjust-bunsetsu", &canna_fn_AdjustBunsetsu /* 1322 DEFVAR_INT ("canna-func-adjust-bunsetsu", &Vcanna_fn_AdjustBunsetsu /*
1465 1323
1466 */ ); 1324 */ );
1467 canna_fn_AdjustBunsetsu = CANNA_FN_AdjustBunsetsu; 1325 #endif
1468 #endif 1326 DEFVAR_INT ("canna-func-quit", &Vcanna_fn_Quit /*
1469 DEFVAR_INT ("canna-func-quit", &canna_fn_Quit /* 1327
1470 1328 */ );
1471 */ ); 1329 DEFVAR_INT ("canna-func-convert-as-hex", &Vcanna_fn_ConvertAsHex /*
1472 canna_fn_Quit = IROHA_FN_Quit; 1330
1473 1331 */ );
1474 DEFVAR_INT ("canna-func-convert-as-hex", &canna_fn_ConvertAsHex /* 1332 DEFVAR_INT ("canna-func-convert-as-bushu", &Vcanna_fn_ConvertAsBushu /*
1475 1333
1476 */ ); 1334 */ );
1477 canna_fn_ConvertAsHex = IROHA_FN_ConvertAsHex; 1335 DEFVAR_INT ("canna-func-kouho-ichiran", &Vcanna_fn_KouhoIchiran /*
1478 1336
1479 DEFVAR_INT ("canna-func-convert-as-bushu", &canna_fn_ConvertAsBushu /* 1337 */ );
1480 1338 DEFVAR_INT ("canna-func-bubun-muhenkan", &Vcanna_fn_BubunMuhenkan /*
1481 */ ); 1339
1482 canna_fn_ConvertAsBushu = IROHA_FN_ConvertAsBushu; 1340 */ );
1483 1341 DEFVAR_INT ("canna-func-zenkaku", &Vcanna_fn_Zenkaku /*
1484 DEFVAR_INT ("canna-func-kouho-ichiran", &canna_fn_KouhoIchiran /* 1342
1485 1343 */ );
1486 */ ); 1344 DEFVAR_INT ("canna-func-hankaku", &Vcanna_fn_Hankaku /*
1487 canna_fn_KouhoIchiran = IROHA_FN_KouhoIchiran; 1345
1488 1346 */ );
1489 DEFVAR_INT ("canna-func-bubun-muhenkan", &canna_fn_BubunMuhenkan /* 1347 DEFVAR_INT ("canna-func-to-upper", &Vcanna_fn_ToUpper /*
1490 1348
1491 */ ); 1349 */ );
1492 canna_fn_BubunMuhenkan = IROHA_FN_BubunMuhenkan; 1350 DEFVAR_INT ("canna-func-capitalize", &Vcanna_fn_Capitalize /*
1493 1351
1494 DEFVAR_INT ("canna-func-zenkaku", &canna_fn_Zenkaku /* 1352 */ );
1495 1353 DEFVAR_INT ("canna-func-to-lower", &Vcanna_fn_ToLower /*
1496 */ ); 1354
1497 canna_fn_Zenkaku = IROHA_FN_Zenkaku; 1355 */ );
1498 1356 DEFVAR_INT ("canna-func-hiragana", &Vcanna_fn_Hiragana /*
1499 DEFVAR_INT ("canna-func-hankaku", &canna_fn_Hankaku /* 1357
1500 1358 */ );
1501 */ ); 1359 DEFVAR_INT ("canna-func-katakana", &Vcanna_fn_Katakana /*
1502 canna_fn_Hankaku = IROHA_FN_Hankaku; 1360
1503 1361 */ );
1504 DEFVAR_INT ("canna-func-to-upper", &canna_fn_ToUpper /* 1362 DEFVAR_INT ("canna-func-romaji", &Vcanna_fn_Romaji /*
1505 1363
1506 */ ); 1364 */ );
1507 canna_fn_ToUpper = IROHA_FN_ToUpper;
1508
1509 DEFVAR_INT ("canna-func-capitalize", &canna_fn_Capitalize /*
1510
1511 */ );
1512 canna_fn_Capitalize = IROHA_FN_Capitalize;
1513
1514 DEFVAR_INT ("canna-func-to-lower", &canna_fn_ToLower /*
1515
1516 */ );
1517 canna_fn_ToLower = IROHA_FN_ToLower;
1518
1519 DEFVAR_INT ("canna-func-hiragana", &canna_fn_Hiragana /*
1520
1521 */ );
1522 canna_fn_Hiragana = IROHA_FN_Hiragana;
1523
1524 DEFVAR_INT ("canna-func-katakana", &canna_fn_Katakana /*
1525
1526 */ );
1527 canna_fn_Katakana = IROHA_FN_Katakana;
1528
1529 DEFVAR_INT ("canna-func-romaji", &canna_fn_Romaji /*
1530
1531 */ );
1532 canna_fn_Romaji = IROHA_FN_Romaji;
1533
1534 #ifdef CANNA_FN_BaseHiragana 1365 #ifdef CANNA_FN_BaseHiragana
1535 DEFVAR_INT ("canna-func-base-hiragana", &canna_fn_BaseHiragana /* 1366 DEFVAR_INT ("canna-func-base-hiragana", &Vcanna_fn_BaseHiragana /*
1536 1367
1537 */ ); 1368 */ );
1538 canna_fn_BaseHiragana = CANNA_FN_BaseHiragana; 1369 DEFVAR_INT ("canna-func-base-katakana", &Vcanna_fn_BaseKatakana /*
1539 1370
1540 DEFVAR_INT ("canna-func-base-katakana", &canna_fn_BaseKatakana /* 1371 */ );
1541 1372 DEFVAR_INT ("canna-func-base-eisu", &Vcanna_fn_BaseEisu /*
1542 */ ); 1373
1543 canna_fn_BaseKatakana = CANNA_FN_BaseKatakana; 1374 */ );
1544 1375 DEFVAR_INT ("canna-func-base-zenkaku", &Vcanna_fn_BaseZenkaku /*
1545 DEFVAR_INT ("canna-func-base-eisu", &canna_fn_BaseEisu /* 1376
1546 1377 */ );
1547 */ ); 1378 DEFVAR_INT ("canna-func-base-hankaku", &Vcanna_fn_BaseHankaku /*
1548 canna_fn_BaseEisu = CANNA_FN_BaseEisu; 1379
1549 1380 */ );
1550 DEFVAR_INT ("canna-func-base-zenkaku", &canna_fn_BaseZenkaku /* 1381 DEFVAR_INT ("canna-func-base-kana", &Vcanna_fn_BaseKana /*
1551 1382
1552 */ ); 1383 */ );
1553 canna_fn_BaseZenkaku = CANNA_FN_BaseZenkaku; 1384 DEFVAR_INT ("canna-func-base-kakutei", &Vcanna_fn_BaseKakutei /*
1554 1385
1555 DEFVAR_INT ("canna-func-base-hankaku", &canna_fn_BaseHankaku /* 1386 */ );
1556 1387 DEFVAR_INT ("canna-func-base-henkan", &Vcanna_fn_BaseHenkan /*
1557 */ ); 1388
1558 canna_fn_BaseHankaku = CANNA_FN_BaseHankaku; 1389 */ );
1559
1560 DEFVAR_INT ("canna-func-base-kana", &canna_fn_BaseKana /*
1561
1562 */ );
1563 canna_fn_BaseKana = CANNA_FN_BaseKana;
1564
1565 DEFVAR_INT ("canna-func-base-kakutei", &canna_fn_BaseKakutei /*
1566
1567 */ );
1568 canna_fn_BaseKakutei = CANNA_FN_BaseKakutei;
1569
1570 DEFVAR_INT ("canna-func-base-henkan", &canna_fn_BaseHenkan /*
1571
1572 */ );
1573 canna_fn_BaseHenkan = CANNA_FN_BaseHenkan;
1574
1575 DEFVAR_INT ("canna-func-base-hiragana-katakana-toggle", 1390 DEFVAR_INT ("canna-func-base-hiragana-katakana-toggle",
1576 &canna_fn_BaseHiraKataToggle /* 1391 &Vcanna_fn_BaseHiraKataToggle /*
1577 1392
1578 */ ); 1393 */ );
1579 canna_fn_BaseHiraKataToggle = CANNA_FN_BaseHiraKataToggle;
1580
1581 DEFVAR_INT ("canna-func-base-zenkaku-hankaku-toggle", 1394 DEFVAR_INT ("canna-func-base-zenkaku-hankaku-toggle",
1582 &canna_fn_BaseZenHanToggle /* 1395 &Vcanna_fn_BaseZenHanToggle /*
1583 1396
1584 */ ); 1397 */ );
1585 canna_fn_BaseZenHanToggle = CANNA_FN_BaseZenHanToggle;
1586
1587 DEFVAR_INT ("canna-func-base-kana-eisu-toggle", 1398 DEFVAR_INT ("canna-func-base-kana-eisu-toggle",
1588 &canna_fn_BaseKanaEisuToggle /* 1399 &Vcanna_fn_BaseKanaEisuToggle /*
1589 1400
1590 */ ); 1401 */ );
1591 canna_fn_BaseKanaEisuToggle = CANNA_FN_BaseKanaEisuToggle;
1592
1593 DEFVAR_INT ("canna-func-base-kakutei-henkan-toggle", 1402 DEFVAR_INT ("canna-func-base-kakutei-henkan-toggle",
1594 &canna_fn_BaseKakuteiHenkanToggle /* 1403 &Vcanna_fn_BaseKakuteiHenkanToggle /*
1595 1404
1596 */ ); 1405 */ );
1597 canna_fn_BaseKakuteiHenkanToggle = CANNA_FN_BaseKakuteiHenkanToggle;
1598
1599 DEFVAR_INT ("canna-func-base-rotate-forward", 1406 DEFVAR_INT ("canna-func-base-rotate-forward",
1600 &canna_fn_BaseRotateForward /* 1407 &Vcanna_fn_BaseRotateForward /*
1601 1408
1602 */ ); 1409 */ );
1603 canna_fn_BaseRotateForward = CANNA_FN_BaseRotateForward;
1604
1605 DEFVAR_INT ("canna-func-base-rotate-backward", 1410 DEFVAR_INT ("canna-func-base-rotate-backward",
1606 &canna_fn_BaseRotateBackward /* 1411 &Vcanna_fn_BaseRotateBackward /*
1607 1412
1608 */ ); 1413 */ );
1609 canna_fn_BaseRotateBackward = CANNA_FN_BaseRotateBackward; 1414 #endif
1610 1415 DEFVAR_INT ("canna-func-extend-mode", &Vcanna_fn_ExtendMode /*
1611 #endif 1416
1612 DEFVAR_INT ("canna-func-extend-mode", &canna_fn_ExtendMode /* 1417 */ );
1613 1418 DEFVAR_INT ("canna-func-touroku", &Vcanna_fn_Touroku /*
1614 */ ); 1419
1615 canna_fn_ExtendMode = IROHA_FN_ExtendMode; 1420 */ );
1616 1421 DEFVAR_INT ("canna-func-hex-mode", &Vcanna_fn_HexMode /*
1617 DEFVAR_INT ("canna-func-touroku", &canna_fn_Touroku /* 1422
1618 1423 */ );
1619 */ ); 1424 DEFVAR_INT ("canna-func-bushu-mode", &Vcanna_fn_BushuMode /*
1620 canna_fn_Touroku = IROHA_FN_Touroku; 1425
1621 1426 */ );
1622 DEFVAR_INT ("canna-func-hex-mode", &canna_fn_HexMode /* 1427 DEFVAR_INT ("canna-func-kigo-mode", &Vcanna_fn_KigouMode /*
1623 1428
1624 */ ); 1429 */ );
1625 canna_fn_HexMode = IROHA_FN_HexMode;
1626
1627 DEFVAR_INT ("canna-func-bushu-mode", &canna_fn_BushuMode /*
1628
1629 */ );
1630 canna_fn_BushuMode = IROHA_FN_BushuMode;
1631
1632 DEFVAR_INT ("canna-func-kigo-mode", &canna_fn_KigouMode /*
1633
1634 */ );
1635 canna_fn_KigouMode = IROHA_FN_KigouMode;
1636
1637 #ifdef CANNA_FN_Mark 1430 #ifdef CANNA_FN_Mark
1638 DEFVAR_INT ("canna-func-mark", &canna_fn_Mark /* 1431 DEFVAR_INT ("canna-func-mark", &Vcanna_fn_Mark /*
1639 1432
1640 */ ); 1433 */ );
1641 canna_fn_Mark = CANNA_FN_Mark;
1642 #endif 1434 #endif
1643 #ifdef CANNA_FN_TemporalMode 1435 #ifdef CANNA_FN_TemporalMode
1644 DEFVAR_INT ("canna-func-temporal-mode", &canna_fn_TemporalMode /* 1436 DEFVAR_INT ("canna-func-temporal-mode", &Vcanna_fn_TemporalMode /*
1645 1437
1646 */ ); 1438 */ );
1647 canna_fn_TemporalMode = CANNA_FN_TemporalMode; 1439 #endif
1648 #endif 1440
1649 1441 DEFVAR_INT ("canna-key-nfer", &Vcanna_key_Nfer /*
1650 DEFVAR_INT ("canna-key-nfer", &canna_key_Nfer /* 1442
1651 1443 */ );
1652 */ ); 1444 DEFVAR_INT ("canna-key-xfer", &Vcanna_key_Xfer /*
1653 canna_key_Nfer = IROHA_KEY_Nfer; 1445
1654 1446 */ );
1655 DEFVAR_INT ("canna-key-xfer", &canna_key_Xfer /* 1447 DEFVAR_INT ("canna-key-up", &Vcanna_key_Up /*
1656 1448
1657 */ ); 1449 */ );
1658 canna_key_Xfer = IROHA_KEY_Xfer; 1450 DEFVAR_INT ("canna-key-left", &Vcanna_key_Left /*
1659 1451
1660 DEFVAR_INT ("canna-key-up", &canna_key_Up /* 1452 */ );
1661 1453 DEFVAR_INT ("canna-key-right", &Vcanna_key_Right /*
1662 */ ); 1454
1663 canna_key_Up = IROHA_KEY_Up; 1455 */ );
1664 1456 DEFVAR_INT ("canna-key-down", &Vcanna_key_Down /*
1665 DEFVAR_INT ("canna-key-left", &canna_key_Left /* 1457
1666 1458 */ );
1667 */ ); 1459 DEFVAR_INT ("canna-key-insert", &Vcanna_key_Insert /*
1668 canna_key_Left = IROHA_KEY_Left; 1460
1669 1461 */ );
1670 DEFVAR_INT ("canna-key-right", &canna_key_Right /* 1462 DEFVAR_INT ("canna-key-rollup", &Vcanna_key_Rollup /*
1671 1463
1672 */ ); 1464 */ );
1673 canna_key_Right = IROHA_KEY_Right; 1465 DEFVAR_INT ("canna-key-rolldown", &Vcanna_key_Rolldown /*
1674 1466
1675 DEFVAR_INT ("canna-key-down", &canna_key_Down /* 1467 */ );
1676 1468 DEFVAR_INT ("canna-key-home", &Vcanna_key_Home /*
1677 */ ); 1469
1678 canna_key_Down = IROHA_KEY_Down; 1470 */ );
1679 1471 DEFVAR_INT ("canna-key-help", &Vcanna_key_Help /*
1680 DEFVAR_INT ("canna-key-insert", &canna_key_Insert /* 1472
1681 1473 */ );
1682 */ ); 1474 DEFVAR_INT ("canna-key-kp-key", &Vcanna_key_KP_Key /*
1683 canna_key_Insert = IROHA_KEY_Insert; 1475
1684 1476 */ );
1685 DEFVAR_INT ("canna-key-rollup", &canna_key_Rollup /* 1477 DEFVAR_INT ("canna-key-shift-nfer", &Vcanna_key_Shift_Nfer /*
1686 1478
1687 */ ); 1479 */ );
1688 canna_key_Rollup = IROHA_KEY_Rollup; 1480 DEFVAR_INT ("canna-key-shift-xfer", &Vcanna_key_Shift_Xfer /*
1689 1481
1690 DEFVAR_INT ("canna-key-rolldown", &canna_key_Rolldown /* 1482 */ );
1691 1483 DEFVAR_INT ("canna-key-shift-up", &Vcanna_key_Shift_Up /*
1692 */ ); 1484
1693 canna_key_Rolldown = IROHA_KEY_Rolldown; 1485 */ );
1694 1486 DEFVAR_INT ("canna-key-shift-left", &Vcanna_key_Shift_Left /*
1695 DEFVAR_INT ("canna-key-home", &canna_key_Home /* 1487
1696 1488 */ );
1697 */ ); 1489 DEFVAR_INT ("canna-key-shift-right", &Vcanna_key_Shift_Right /*
1698 canna_key_Home = IROHA_KEY_Home; 1490
1699 1491 */ );
1700 DEFVAR_INT ("canna-key-help", &canna_key_Help /* 1492 DEFVAR_INT ("canna-key-shift-down", &Vcanna_key_Shift_Down /*
1701 1493
1702 */ ); 1494 */ );
1703 canna_key_Help = IROHA_KEY_Help; 1495 DEFVAR_INT ("canna-key-control-nfer", &Vcanna_key_Cntrl_Nfer /*
1704 1496
1705 DEFVAR_INT ("canna-key-kp-key", &canna_key_KP_Key /* 1497 */ );
1706 1498 DEFVAR_INT ("canna-key-control-xfer", &Vcanna_key_Cntrl_Xfer /*
1707 */ ); 1499
1708 canna_key_KP_Key = IROHA_KEY_KP_Key; 1500 */ );
1709 1501 DEFVAR_INT ("canna-key-control-up", &Vcanna_key_Cntrl_Up /*
1710 DEFVAR_INT ("canna-key-shift-nfer", &canna_key_Shift_Nfer /* 1502
1711 1503 */ );
1712 */ ); 1504 DEFVAR_INT ("canna-key-control-left", &Vcanna_key_Cntrl_Left /*
1713 canna_key_Shift_Nfer = IROHA_KEY_Shift_Nfer; 1505
1714 1506 */ );
1715 DEFVAR_INT ("canna-key-shift-xfer", &canna_key_Shift_Xfer /* 1507 DEFVAR_INT ("canna-key-control-right", &Vcanna_key_Cntrl_Right /*
1716 1508
1717 */ ); 1509 */ );
1718 canna_key_Shift_Xfer = IROHA_KEY_Shift_Xfer; 1510 DEFVAR_INT ("canna-key-control-down", &Vcanna_key_Cntrl_Down /*
1719 1511
1720 DEFVAR_INT ("canna-key-shift-up", &canna_key_Shift_Up /* 1512 */ );
1721
1722 */ );
1723 canna_key_Shift_Up = IROHA_KEY_Shift_Up;
1724
1725 DEFVAR_INT ("canna-key-shift-left", &canna_key_Shift_Left /*
1726
1727 */ );
1728 canna_key_Shift_Left = IROHA_KEY_Shift_Left;
1729
1730 DEFVAR_INT ("canna-key-shift-right", &canna_key_Shift_Right /*
1731
1732 */ );
1733 canna_key_Shift_Right = IROHA_KEY_Shift_Right;
1734
1735 DEFVAR_INT ("canna-key-shift-down", &canna_key_Shift_Down /*
1736
1737 */ );
1738 canna_key_Shift_Down = IROHA_KEY_Shift_Down;
1739
1740 DEFVAR_INT ("canna-key-control-nfer", &canna_key_Cntrl_Nfer /*
1741
1742 */ );
1743 canna_key_Cntrl_Nfer = IROHA_KEY_Cntrl_Nfer;
1744
1745 DEFVAR_INT ("canna-key-control-xfer", &canna_key_Cntrl_Xfer /*
1746
1747 */ );
1748 canna_key_Cntrl_Xfer = IROHA_KEY_Cntrl_Xfer;
1749
1750 DEFVAR_INT ("canna-key-control-up", &canna_key_Cntrl_Up /*
1751
1752 */ );
1753 canna_key_Cntrl_Up = IROHA_KEY_Cntrl_Up;
1754
1755 DEFVAR_INT ("canna-key-control-left", &canna_key_Cntrl_Left /*
1756
1757 */ );
1758 canna_key_Cntrl_Left = IROHA_KEY_Cntrl_Left;
1759
1760 DEFVAR_INT ("canna-key-control-right", &canna_key_Cntrl_Right /*
1761
1762 */ );
1763 canna_key_Cntrl_Right = IROHA_KEY_Cntrl_Right;
1764
1765 DEFVAR_INT ("canna-key-control-down", &canna_key_Cntrl_Down /*
1766
1767 */ );
1768 canna_key_Cntrl_Down = IROHA_KEY_Cntrl_Down;
1769 1513
1770 Fprovide(intern("CANNA")); 1514 Fprovide(intern("CANNA"));
1771 } 1515 }
1772 1516
1773 #ifdef CANNA_MULE 1517 #ifdef CANNA_MULE