Re: Returning argument string (regexp-quote)

[Andreas Schwab]

On Sep 24 2019, Mattias Engdegård <address@hidden> wrote:

> diff --git a/src/search.c b/src/search.c
> index 1e57d2ecbe..fc9b85f413 100644
> --- a/src/search.c
> +++ b/src/search.c
> @@ -3138,10 +3138,12 @@ DEFUN ("regexp-quote", Fregexp_quote, Sregexp_quote, 
> 1, 1, 0,
>      }
>  
>    Lisp_Object result
> -    = make_specified_string (temp,
> -                          SCHARS (string) + backslashes_added,
> -                          out - temp,
> -                          STRING_MULTIBYTE (string));
> +    = (out - temp > SBYTES (string)

          backslashes_added > 0

Andreas.

-- 
Andreas Schwab, SUSE Labs, address@hidden
GPG Key fingerprint = 0196 BAD8 1CE9 1970 F4BE  1748 E4D4 88E3 0EEA B9D7
"And now for something completely different."