comparison src/coding.c @ 100135:0e17542db552

(detect_coding_system): Initialize utf_16_le_eol to -1, val to Qnil. (produce_chars): Initialize consumed_chars to 0.

100134:c48d4114962b

      if (coding->src_multibyte != coding->dst_multibyte)
	{
	  if (coding->src_multibyte)
	    {
	      int multibytep = 1;
	      EMACS_INT consumed_chars;

	      while (1)
		{
		  const unsigned char *src_base = src;
		  int c;

     int multibytep;
     Lisp_Object coding_system;
{
  const unsigned char *src_end = src + src_bytes;
  Lisp_Object attrs, eol_type;
  Lisp_Object val;
  struct coding_system coding;
  int id;
  struct coding_detection_info detect_info;
  enum coding_category base_category;
  int null_byte_found = 0, eight_bit_found = 0;

	}
      else
	{
	  int mask = detect_info.rejected | detect_info.found;
	  int found = 0;
	  val = Qnil;

	  for (i = coding_category_raw_text - 1; i >= 0; i--)
	    {
	      category = coding_priorities[i];
	      if (! (mask & (1 << category)))

      val = Fcons (make_number (coding.id), Qnil);
    }

  /* Then, detect eol-format if necessary.  */
  {
    int normal_eol = -1, utf_16_be_eol = -1, utf_16_le_eol;
    Lisp_Object tail;

    if (VECTORP (eol_type))
      {
	if (detect_info.found & ~CATEGORY_MASK_UTF_16)

	else
	  XSETCAR (tail, CODING_ID_NAME (id));
      }
  }

  return (highest ? XCAR (val) : val);
}


DEFUN ("detect-coding-region", Fdetect_coding_region, Sdetect_coding_region,
       2, 3, 0,

100135:0e17542db552

      if (coding->src_multibyte != coding->dst_multibyte)
	{
	  if (coding->src_multibyte)
	    {
	      int multibytep = 1;
	      EMACS_INT consumed_chars = 0;

	      while (1)
		{
		  const unsigned char *src_base = src;
		  int c;

     int multibytep;
     Lisp_Object coding_system;
{
  const unsigned char *src_end = src + src_bytes;
  Lisp_Object attrs, eol_type;
  Lisp_Object val = Qnil;
  struct coding_system coding;
  int id;
  struct coding_detection_info detect_info;
  enum coding_category base_category;
  int null_byte_found = 0, eight_bit_found = 0;

	}
      else
	{
	  int mask = detect_info.rejected | detect_info.found;
	  int found = 0;

	  for (i = coding_category_raw_text - 1; i >= 0; i--)
	    {
	      category = coding_priorities[i];
	      if (! (mask & (1 << category)))

      val = Fcons (make_number (coding.id), Qnil);
    }

  /* Then, detect eol-format if necessary.  */
  {
    int normal_eol = -1, utf_16_be_eol = -1, utf_16_le_eol = -1;
    Lisp_Object tail;

    if (VECTORP (eol_type))
      {
	if (detect_info.found & ~CATEGORY_MASK_UTF_16)

	else
	  XSETCAR (tail, CODING_ID_NAME (id));
      }
  }

  return (highest ? (CONSP (val) ? XCAR (val) : Qnil) : val);
}


DEFUN ("detect-coding-region", Fdetect_coding_region, Sdetect_coding_region,
       2, 3, 0,