Mercurial > emacs
annotate lib-src/leditcfns.c @ 16663:773436c9b680 libc-961211 libc-961212 libc-961213 libc-961214 libc-961215 libc-961216 libc-961217 libc-961218 libc-961219 libc-961220 libc-961221 libc-961222 libc-961223 libc-961224 libc-961225 libc-961226 libc-961227 libc-961228 libc-961229 libc-961230 libc-961231
* config.guess: Recognize machten.
From Eric W. Bates <ericx@vineyard.net>.
| author | David J. MacKenzie <djm@gnu.org> |
|---|---|
| date | Wed, 11 Dec 1996 00:37:52 +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 } |