Mercurial > hg > xemacs-beta
annotate lib-src/leditcfns.c @ 1411:9d77c73d4103
[xemacs-hg @ 2003-04-14 04:11:55 by youngs]
2003-04-14 Steve Youngs <youngs@xemacs.org>
* glyphs.c:
* glyphs.c (nothing_instantiate):
* glyphs.c (Fmake_glyph_internal):
* glyphs.c (Fglyphp):
* glyphs.c (glyph_image_instance):
* glyphs.c (glyph_image_instance_maybe):
* glyphs.c (glyph_width):
Work around a problem compiling with --use-union-type using
Intel's ICC compiler.
From Martin Buchholz <martin@xemacs.org>
See
<http://list-archive.xemacs.org/xemacs-patches/200301/msg00132.html>
| author | youngs |
|---|---|
| date | Mon, 14 Apr 2003 04:11:57 +0000 |
| parents | 376386a54a3c |
| children |
| rev | line source |
|---|---|
| 0 | 1 /* Synched up with: FSF 19.28. */ |
| 2 | |
| 3 #include <sgtty.h> | |
| 4 #include <signal.h> | |
| 5 #define STRLEN 100 | |
| 6 static char str[STRLEN+1] = "%?emacs"; /* extra char for the null */ | |
| 7 | |
| 8 switch_to_proc(){ | |
| 9 char *ptr = str; | |
| 10 while (*ptr) ioctl(0, TIOCSTI, ptr++); | |
| 11 ioctl(0, TIOCSTI, "\n"); | |
| 12 kill(getpid(), SIGTSTP); | |
| 13 } | |
| 14 | |
| 15 set_proc_str(ptr) char *ptr; { | |
| 16 if (strlen(ptr) <= STRLEN) | |
| 17 strcpy(str, ptr); | |
| 18 else | |
| 19 printf("string too long for set-proc-str: %s\n", ptr); | |
| 20 } |