Mercurial > hg > xemacs-beta

comparison src/console-tty.c @ 384:bbff43aa5eb7 r21-2-7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-7
author cvs
date Mon, 13 Aug 2007 11:08:24 +0200
parents 8626e4521993
children 74fd4e045ea6
comparison
equal deleted inserted replaced
383:6a50c6a581a5 384:bbff43aa5eb7
231 (console)) 231 (console))
232 { 232 {
233 return CONSOLE_TTY_DATA (decode_tty_console (console))->controlling_process; 233 return CONSOLE_TTY_DATA (decode_tty_console (console))->controlling_process;
234 } 234 }
235 235
236 #ifdef MULE 236 #ifdef FILE_CODING
237 237
238 DEFUN ("console-tty-input-coding-system", Fconsole_tty_input_coding_system, 238 DEFUN ("console-tty-input-coding-system", Fconsole_tty_input_coding_system,
239 0, 1, 0, /* 239 0, 1, 0, /*
240 Return the input coding system of tty console CONSOLE. 240 Return the input coding system of tty console CONSOLE.
241 */ 241 */
296 { 296 {
297 Fset_console_tty_input_coding_system (console, codesys); 297 Fset_console_tty_input_coding_system (console, codesys);
298 Fset_console_tty_output_coding_system (console, codesys); 298 Fset_console_tty_output_coding_system (console, codesys);
299 return Qnil; 299 return Qnil;
300 } 300 }
301 #endif /* MULE */ 301 #endif /* FILE_CODING */
302 302
303 303
304 Lisp_Object 304 Lisp_Object
305 tty_semi_canonicalize_console_connection (Lisp_Object connection, 305 tty_semi_canonicalize_console_connection (Lisp_Object connection,
306 Error_behavior errb) 306 Error_behavior errb)
339 { 339 {
340 DEFSUBR (Fconsole_tty_terminal_type); 340 DEFSUBR (Fconsole_tty_terminal_type);
341 DEFSUBR (Fconsole_tty_controlling_process); 341 DEFSUBR (Fconsole_tty_controlling_process);
342 defsymbol (&Qterminal_type, "terminal-type"); 342 defsymbol (&Qterminal_type, "terminal-type");
343 defsymbol (&Qcontrolling_process, "controlling-process"); 343 defsymbol (&Qcontrolling_process, "controlling-process");
344 #ifdef MULE 344 #ifdef FILE_CODING
345 DEFSUBR (Fconsole_tty_output_coding_system); 345 DEFSUBR (Fconsole_tty_output_coding_system);
346 DEFSUBR (Fset_console_tty_output_coding_system); 346 DEFSUBR (Fset_console_tty_output_coding_system);
347 DEFSUBR (Fconsole_tty_input_coding_system); 347 DEFSUBR (Fconsole_tty_input_coding_system);
348 DEFSUBR (Fset_console_tty_input_coding_system); 348 DEFSUBR (Fset_console_tty_input_coding_system);
349 DEFSUBR (Fset_console_tty_coding_system); 349 DEFSUBR (Fset_console_tty_coding_system);
350 #endif /* MULE */ 350 #endif /* FILE_CODING */
351 } 351 }
352 352
353 void 353 void
354 console_type_create_tty (void) 354 console_type_create_tty (void)
355 { 355 {