Pin lazily read bytecode (bug#53809)

* src/eval.c (Ffetch_bytecode): Bytecode strings read lazily weren't
pinned as they must be.  Do so.

Bug reported by Gregor Zattler.
This commit is contained in:
Mattias Engdegård 2022-02-07 17:36:11 +01:00
parent 6e403efc9b
commit 6f3c62ff07

View file

@ -3495,6 +3495,7 @@ DEFUN ("fetch-bytecode", Ffetch_bytecode, Sfetch_bytecode,
bytecode = Fstring_as_unibyte (bytecode);
}
pin_string (bytecode);
ASET (object, COMPILED_BYTECODE, bytecode);
ASET (object, COMPILED_CONSTANTS, XCDR (tem));
}