Mercurial > hg > xemacs-beta
comparison src/mule-canna.c @ 398:74fd4e045ea6 r21-2-29
Import from CVS: tag r21-2-29
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:13:30 +0200 |
parents | 8626e4521993 |
children | 2f8bb876ab1d |
comparison
equal
deleted
inserted
replaced
397:f4aeb21a5bad | 398:74fd4e045ea6 |
---|---|
1020 1996/6/7 */ | 1020 1996/6/7 */ |
1021 | 1021 |
1022 void | 1022 void |
1023 syms_of_mule_canna (void) | 1023 syms_of_mule_canna (void) |
1024 { | 1024 { |
1025 DEFVAR_LISP ("CANNA", &VCANNA); /* hir@nec, 1992.5.21 */ | |
1026 VCANNA = Qt; /* hir@nec, 1992.5.21 */ | |
1027 | |
1028 DEFSUBR (Fcanna_key_proc); | 1025 DEFSUBR (Fcanna_key_proc); |
1029 DEFSUBR (Fcanna_initialize); | 1026 DEFSUBR (Fcanna_initialize); |
1030 DEFSUBR (Fcanna_finalize); | 1027 DEFSUBR (Fcanna_finalize); |
1031 DEFSUBR (Fcanna_touroku_string); | 1028 DEFSUBR (Fcanna_touroku_string); |
1032 DEFSUBR (Fcanna_set_width); | 1029 DEFSUBR (Fcanna_set_width); |
1046 } | 1043 } |
1047 | 1044 |
1048 void | 1045 void |
1049 vars_of_mule_canna (void) | 1046 vars_of_mule_canna (void) |
1050 { | 1047 { |
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 /* | 1051 DEFVAR_LISP ("canna-kakutei-string", &Vcanna_kakutei_string /* |
1052 | 1052 |
1053 */ ); | 1053 */ ); |
1054 Vcanna_kakutei_string = Qnil; | 1054 Vcanna_kakutei_string = Qnil; |
1055 | 1055 |