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));
         }