diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/fns.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -585,7 +585,7 @@ concat (nargs, args, target_type, last_special) | |||
| 585 | wrong_type_argument (Qcharacterp, ch); | 585 | wrong_type_argument (Qcharacterp, ch); |
| 586 | this_len_byte = CHAR_BYTES (XINT (ch)); | 586 | this_len_byte = CHAR_BYTES (XINT (ch)); |
| 587 | result_len_byte += this_len_byte; | 587 | result_len_byte += this_len_byte; |
| 588 | if (!SINGLE_BYTE_CHAR_P (XINT (ch))) | 588 | if (!ASCII_CHAR_P (XINT (ch))) |
| 589 | some_multibyte = 1; | 589 | some_multibyte = 1; |
| 590 | } | 590 | } |
| 591 | else if (BOOL_VECTOR_P (this) && XBOOL_VECTOR (this)->size > 0) | 591 | else if (BOOL_VECTOR_P (this) && XBOOL_VECTOR (this)->size > 0) |
| @@ -598,7 +598,7 @@ concat (nargs, args, target_type, last_special) | |||
| 598 | wrong_type_argument (Qcharacterp, ch); | 598 | wrong_type_argument (Qcharacterp, ch); |
| 599 | this_len_byte = CHAR_BYTES (XINT (ch)); | 599 | this_len_byte = CHAR_BYTES (XINT (ch)); |
| 600 | result_len_byte += this_len_byte; | 600 | result_len_byte += this_len_byte; |
| 601 | if (!SINGLE_BYTE_CHAR_P (XINT (ch))) | 601 | if (!ASCII_CHAR_P (XINT (ch))) |
| 602 | some_multibyte = 1; | 602 | some_multibyte = 1; |
| 603 | } | 603 | } |
| 604 | else if (STRINGP (this)) | 604 | else if (STRINGP (this)) |