(code_conversion_restore): GCPRO arg.
authorKenichi Handa <handa@m17n.org>
Tue, 17 Jan 2006 02:38:38 +0000 (02:38 +0000)
committerKenichi Handa <handa@m17n.org>
Tue, 17 Jan 2006 02:38:38 +0000 (02:38 +0000)
src/coding.c

index c283b5a..d5b9e38 100644 (file)
@@ -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;
 }