Move unblock_input out of catch handler

diff --git a/src/pdumper.c b/src/pdumper.c
index 2fa02183b21bea7c9a2ad489e46b474aab5000f0..efccafb07b76d74ba8145f52c5c2c57dcd4d9374 100644 (file)
--- a/src/pdumper.c
+++ b/src/pdumper.c
@@ -3483,7 +3483,6 @@ dump_unwind_cleanup (void *data)
     r_alloc_inhibit_buffer_relocation (0);
 #endif
   Vpurify_flag = ctx->old_purify_flag;
-  unblock_input ();
 }
 
 static void
@@ -3987,9 +3986,8 @@ types.  */)
            number_hot_relocations,
            number_discardable_relocations);
 
+  unblock_input ();
   return unbind_to (count, Qnil);
-
-
 }
 
 DEFUN ("dump-emacs-portable--sort-predicate",