diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2022-02-07 17:36:11 +0100 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2022-02-07 18:18:32 +0100 |
| commit | 6f3c62ff07e671dff1741ae580b9a761a3bfd361 (patch) | |
| tree | 199708fe0f21147bfbc7aae5e99e040d5fb3f2ac /src/eval.c | |
| parent | 6e403efc9bcf6e212d656bcc049a790dcebff451 (diff) | |
| download | emacs-6f3c62ff07e671dff1741ae580b9a761a3bfd361.tar.gz emacs-6f3c62ff07e671dff1741ae580b9a761a3bfd361.tar.bz2 emacs-6f3c62ff07e671dff1741ae580b9a761a3bfd361.zip | |
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.
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c index c87b1bc704c..ae9b18da0bd 100644 --- a/src/eval.c +++ b/src/eval.c @@ -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)); } |