use dynwind_begin and dynwind_end

[bpt/emacs.git] / src / sysdep.c

diff --git a/src/sysdep.c b/src/sysdep.c
index e440d14..acbd904 100644 (file)
--- a/src/sysdep.c
+++ b/src/sysdep.c
@@ -3069,6 +3069,7 @@ system_process_attributes (Lisp_Object pid)
   if (fd >= 0)
     {
       ptrdiff_t readsize, nread_incr;
+      dynwind_begin ();
       record_unwind_protect_int (close_file_unwind, fd);
       nread = cmdline_size = 0;
 
@@ -3114,7 +3115,7 @@ system_process_attributes (Lisp_Object pid)
       cmd_str = make_unibyte_string (q, nread);
       decoded_cmd = code_convert_string_norecord (cmd_str,
                                                  Vlocale_coding_system, 0);
-      unbind_to (count, Qnil);
+      dynwind_end ();
       attrs = Fcons (Fcons (Qargs, decoded_cmd), attrs);
     }