annotate lib-src/leditcfns.c @ 29453:22f8105a7dc7
Remove eval-when-compile.
(cyrillic-koi8-r-nonascii-translation-table): Define it as a
translation table made from cyrillic-koi8-r-decode-table.
(cyrillic-koi8-r-encode-table): Define it as a translation table
made from the reverse map of above.
(ccl-decode-koi8): Use translate-character.
(ccl-encode-koi8, ccl-encode-koi8-font): Likewize
(cyrillic-alternativnyj-nonascii-translation-table): Define it as
a translation table made from cyrillic-alternativnyj-decode-table.
(cyrillic-alternativnyj-encode-table): Define it as a translation
table made from the reverse map of above.
(ccl-decode-alternativnyj): Use translate-character.
(ccl-encode-alternativnyj, ccl-encode-alternativnyj-font):
Likewize
author |
Kenichi Handa <handa@m17n.org> |
date |
Tue, 06 Jun 2000 02:10:04 +0000 |
parents |
da530eb93c1a |
children |
695cf19ef79e |
rev |
line source |
0
|
1 #include <sgtty.h>
|
|
2 #include <signal.h>
|
|
3 #define STRLEN 100
|
|
4 static char str[STRLEN+1] = "%?emacs"; /* extra char for the null */
|
|
5
|
|
6 switch_to_proc(){
|
|
7 char *ptr = str;
|
|
8 while (*ptr) ioctl(0, TIOCSTI, ptr++);
|
|
9 ioctl(0, TIOCSTI, "\n");
|
|
10 kill(getpid(), SIGTSTP);
|
|
11 }
|
|
12
|
|
13 set_proc_str(ptr) char *ptr; {
|
|
14 if (strlen(ptr) <= STRLEN)
|
|
15 strcpy(str, ptr);
|
|
16 else
|
|
17 printf("string too long for set-proc-str: %s\n", ptr);
|
|
18 }
|