*** empty log message ***
[emacs.git] / lib-src / leditcfns.c
blob239db1cd1fab2486095b53a55d39288f2935bd3b
1 #include <sgtty.h>
2 #include <signal.h>
3 #define STRLEN 100
4 static char str[STRLEN+1] = "%?emacs"; /* extra char for the null */
6 switch_to_proc(){
7 char *ptr = str;
8 while (*ptr) ioctl(0, TIOCSTI, ptr++);
9 ioctl(0, TIOCSTI, "\n");
10 kill(getpid(), SIGTSTP);
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);
20 /* arch-tag: eb7ae804-0d6e-4077-ab42-7173821410c3
21 (do not change this comment) */