Mercurial > emacs
annotate lib-src/leditcfns.c @ 16306:450f26426101 libc-960925 libc-960926 libc-960927 libc-960928 libc-960929 libc-961001 libc-961004 libc-961005 libc-961006 libc-961007 libc-961008 libc-961009 libc-961010 libc-961011 libc-961012 libc-961013 libc-961014 libc-961015 libc-961016 libc-961017 libc-961018 libc-961019 libc-961020 libc-961021 libc-961022 libc-961023 libc-961024 libc-961025 libc-961026 libc-961027 libc-961028
(-vxsim*): New operating system.
author | Richard Kenner <kenner@gnu.org> |
---|---|
date | Tue, 24 Sep 1996 02:44:17 +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 } |