Function: set-terminal-coding-system-internal

set-terminal-coding-system-internal is a function defined in coding.c.

Signature

(set-terminal-coding-system-internal CODING-SYSTEM &optional TERMINAL)

Documentation

Internal use only.

Source Code

// Defined in /usr/src/emacs/src/coding.c
{
  struct terminal *term = decode_live_terminal (terminal);
  struct coding_system *terminal_coding = TERMINAL_TERMINAL_CODING (term);
  CHECK_SYMBOL (coding_system);
  setup_coding_system (Fcheck_coding_system (coding_system), terminal_coding);
  /* We had better not send unsafe characters to terminal.  */
  terminal_coding->mode |= CODING_MODE_SAFE_ENCODING;
  /* Character composition should be disabled.  */
  terminal_coding->common_flags &= ~CODING_ANNOTATE_COMPOSITION_MASK;
  terminal_coding->src_multibyte = 1;
  terminal_coding->dst_multibyte = 0;
  tset_charset_list
    (term, (terminal_coding->common_flags & CODING_REQUIRE_ENCODING_MASK
	    ? coding_charset_list (terminal_coding)
	    : list1i (charset_ascii)));
  return Qnil;
}