Re: Regexp bytecode disassembler

[Andreas Schwab]

On Mär 20 2020, Mattias Engdegård wrote:

> +    (while (< i len)
> +      (let* ((opcode (aref bc i))
> +             (entry-and-size
> +               (pcase opcode
> +                 (0 (cons 'no-op 1))
> +                 (1 (cons 'succeed 1))

This loop would create less garbage if you used '(no-op . 1) instead of
(cons 'no-op 1).

Andreas.

-- 
Andreas Schwab, address@hidden
GPG Key fingerprint = 7578 EB47 D4E5 4D69 2510  2552 DF73 E780 A9DA AEC1
"And now for something completely different."