use dynwind_begin and dynwind_end

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

diff --git a/src/image.c b/src/image.c
index a741815..7fa2884 100644 (file)
--- a/src/image.c
+++ b/src/image.c
@@ -2263,7 +2263,7 @@ slurp_file (char *file, ptrdiff_t *size)
 
   if (fp)
     {
-      ptrdiff_t count = SPECPDL_INDEX ();
+      dynwind_begin ();
       record_unwind_protect_ptr (fclose_unwind, fp);
 
       if (fstat (fileno (fp), &st) == 0
@@ -2282,7 +2282,7 @@ slurp_file (char *file, ptrdiff_t *size)
            }
        }
 
-      unbind_to (count, Qnil);
+      dynwind_end ();
     }
 
   return buf;