(code_convert_region_unwind): GCPRO arg.

2 files changed, 9 insertions, 0 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 2139b4f8311..90d782faa20 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2005-12-14  Kyotaro HORIGUCHI  <horiguti@meadowy.org>  (tiny change)
+
+        * coding.c (code_convert_region_unwind): GCPRO arg.
+
 2005-12-12  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>
 
         * xfns.c (compute_tip_xy): Calculate root_y the same way as root_x,
diff --git a/src/coding.c b/src/coding.c
index fa9a37b9452..8f4fbc9637e 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -5360,10 +5360,15 @@ static Lisp_Object
 code_convert_region_unwind (arg)
      Lisp_Object arg;
 {
+  struct gcpro gcpro1;
+  GCPRO1 (arg);
+
   inhibit_pre_post_conversion = 0;
   Vlast_coding_system_used = XCAR (arg);
   for (arg = XCDR (arg); ! NILP (arg); arg = XCDR (arg))
     Fkill_buffer (XCAR (arg));
+
+  UNGCPRO;
   return Qnil;
 }