# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 781551650 0
# Node ID 6061a432881f676b3cf0301e5df151d34d704a5b
# Parent  a7c6e2858f8b265c61264fecf683b648e379c2b3
(make_gap): Keep input blocked till after we set BEG_ADDR.

diff -r a7c6e2858f8b -r 6061a432881f src/insdel.c
--- a/src/insdel.c	Fri Oct 07 17:38:03 1994 +0000
+++ b/src/insdel.c	Fri Oct 07 17:40:50 1994 +0000
@@ -271,11 +271,16 @@
 
   BLOCK_INPUT;
   result = BUFFER_REALLOC (BEG_ADDR, (Z - BEG + GAP_SIZE + increment));
-  UNBLOCK_INPUT;
 
   if (result == 0)
-    memory_full ();
+    {
+      UNBLOCK_INPUT;
+      memory_full ();
+    }
+
+  /* We can't unblock until the new address is properly stored.  */
   BEG_ADDR = result;
+  UNBLOCK_INPUT;
 
   /* Prevent quitting in move_gap.  */
   tem = Vinhibit_quit;