/[emacs]/emacs/src/fns.c
ViewVC logotype

Diff of /emacs/src/fns.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.303.2.9 by fx, Mon Oct 14 17:13:49 2002 UTC revision 1.303.2.10 by handa, Tue Oct 15 01:18:25 2002 UTC
# Line 585  concat (nargs, args, target_type, last_s Line 585  concat (nargs, args, target_type, last_s
585                    wrong_type_argument (Qcharacterp, ch);                    wrong_type_argument (Qcharacterp, ch);
586                  this_len_byte = CHAR_BYTES (XINT (ch));                  this_len_byte = CHAR_BYTES (XINT (ch));
587                  result_len_byte += this_len_byte;                  result_len_byte += this_len_byte;
588                  if (!SINGLE_BYTE_CHAR_P (XINT (ch)))                  if (!ASCII_CHAR_P (XINT (ch)))
589                    some_multibyte = 1;                    some_multibyte = 1;
590                }                }
591            else if (BOOL_VECTOR_P (this) && XBOOL_VECTOR (this)->size > 0)            else if (BOOL_VECTOR_P (this) && XBOOL_VECTOR (this)->size > 0)
# Line 598  concat (nargs, args, target_type, last_s Line 598  concat (nargs, args, target_type, last_s
598                    wrong_type_argument (Qcharacterp, ch);                    wrong_type_argument (Qcharacterp, ch);
599                  this_len_byte = CHAR_BYTES (XINT (ch));                  this_len_byte = CHAR_BYTES (XINT (ch));
600                  result_len_byte += this_len_byte;                  result_len_byte += this_len_byte;
601                  if (!SINGLE_BYTE_CHAR_P (XINT (ch)))                  if (!ASCII_CHAR_P (XINT (ch)))
602                    some_multibyte = 1;                    some_multibyte = 1;
603                }                }
604            else if (STRINGP (this))            else if (STRINGP (this))

Legend:
Removed from v.1.303.2.9  
changed lines
  Added in v.1.303.2.10

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26