Mercurial > hg > xemacs-beta

comparison src/console.c @ 3146:7c45a748ff54

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2005-12-18 11:44:26 by malcolmp] console.c (stuff_buffered_input): Compile body only if HAVE_TTY.
author malcolmp
date Sun, 18 Dec 2005 11:44:28 +0000
parents 141c2920ea48
children d674024a8674
comparison
equal deleted inserted replaced
3145:d830788d6a2c 3146:7c45a748ff54
988 /* If STUFFSTRING is a string, stuff its contents as pending terminal input. 988 /* If STUFFSTRING is a string, stuff its contents as pending terminal input.
989 Then in any case stuff anything Emacs has read ahead and not used. */ 989 Then in any case stuff anything Emacs has read ahead and not used. */
990 990
991 void 991 void
992 stuff_buffered_input ( 992 stuff_buffered_input (
993 #ifdef BSD 993 #if defined(BSD) && defined(HAVE_TTY)
994 Lisp_Object stuffstring 994 Lisp_Object stuffstring
995 #else 995 #else
996 Lisp_Object UNUSED (stuffstring) 996 Lisp_Object UNUSED (stuffstring)
997 #endif 997 #endif
998 ) 998 )
999 { 999 {
1000 /* stuff_char works only in BSD, versions 4.2 and up. */ 1000 /* stuff_char works only in BSD, versions 4.2 and up. */
1001 #if defined (BSD) 1001 #if defined(BSD) && defined(HAVE_TTY)
1002 if (!CONSOLEP (Vcontrolling_terminal) || 1002 if (!CONSOLEP (Vcontrolling_terminal) ||
1003 !CONSOLE_LIVE_P (XCONSOLE (Vcontrolling_terminal))) 1003 !CONSOLE_LIVE_P (XCONSOLE (Vcontrolling_terminal)))
1004 return; 1004 return;
1005 1005
1006 if (STRINGP (stuffstring)) 1006 if (STRINGP (stuffstring))
1022 if (kbd_fetch_ptr == kbd_buffer + KBD_BUFFER_SIZE) 1022 if (kbd_fetch_ptr == kbd_buffer + KBD_BUFFER_SIZE)
1023 kbd_fetch_ptr = kbd_buffer; 1023 kbd_fetch_ptr = kbd_buffer;
1024 stuff_char (XCONSOLE (Vcontrolling_terminal), *kbd_fetch_ptr++); 1024 stuff_char (XCONSOLE (Vcontrolling_terminal), *kbd_fetch_ptr++);
1025 } 1025 }
1026 # endif 1026 # endif
1027 #endif /* BSD */ 1027 #endif /* BSD && HAVE_TTY */
1028 } 1028 }
1029 1029
1030 DEFUN ("suspend-console", Fsuspend_console, 0, 1, "", /* 1030 DEFUN ("suspend-console", Fsuspend_console, 0, 1, "", /*
1031 Suspend a console. For tty consoles, it sends a signal to suspend 1031 Suspend a console. For tty consoles, it sends a signal to suspend
1032 the process in charge of the tty, and removes the devices and 1032 the process in charge of the tty, and removes the devices and