(code_conversion_restore): GCPRO arg.

1 files changed, 3 insertions, 0 deletions

diff --git a/src/coding.c b/src/coding.c
index c283b5a4369..d5b9e3875ec 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -6596,7 +6596,9 @@ code_conversion_restore (arg)
      Lisp_Object arg;
 {
   Lisp_Object current, workbuf;
+  struct gcpro gcpro1;
 
+  GCPRO1 (arg);
   current = XCAR (arg);
   workbuf = XCDR (arg);
   if (! NILP (workbuf))
@@ -6607,6 +6609,7 @@ code_conversion_restore (arg)
         Fkill_buffer (workbuf);
     }
   set_buffer_internal (XBUFFER (current));
+  UNGCPRO;
   return Qnil;
 }