Mercurial > hg > xemacs-beta
diff src/console.c @ 110:fe104dbd9147 r20-1b7
Import from CVS: tag r20-1b7
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:19:45 +0200 |
parents | 360340f9fd5f |
children | cca96a509cfe |
line wrap: on
line diff
--- a/src/console.c Mon Aug 13 09:18:41 2007 +0200 +++ b/src/console.c Mon Aug 13 09:19:45 2007 +0200 @@ -315,7 +315,7 @@ Return the type of the specified console (e.g. `x' or `tty'). Value is `tty' for a tty console (a character-only terminal), `x' for a console that is an X display, -`ns' for a console that is a NeXTstep connection (not yet implemeted), +`ns' for a console that is a NeXTstep connection (not yet implemented), `win32' for a console that is a Windows or Windows NT connection (not yet implemented), `pc' for a console that is a direct-write MS-DOS connection (not yet @@ -903,6 +903,9 @@ # endif #endif /* BSD */ } +#ifdef HAVE_TTY +extern Lisp_Object Fconsole_tty_controlling_process(Lisp_Object console); +#endif DEFUN ("suspend-console", Fsuspend_console, 0, 1, "", /* Suspend a console. For tty consoles, it sends a signal to suspend @@ -922,6 +925,7 @@ struct console *c; struct gcpro gcpro1; +#ifdef HAVE_TTY if (NILP (console)) console=Fselected_console(); @@ -944,6 +948,7 @@ } UNGCPRO; +#endif return Qnil; } @@ -958,6 +963,7 @@ struct console *c; struct gcpro gcpro1, gcpro2, gcpro3; +#ifdef HAVE_TTY GCPRO2 (console, devcons); c = decode_console(console); @@ -976,6 +982,7 @@ } UNGCPRO; +#endif return Qnil; }