Commit 6e0fca1d authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Fgarbage_collect): Block input around most of the function.

parent fadfb77f
......@@ -1730,6 +1730,8 @@ Garbage collection happens automatically if you cons more than\n\
if (garbage_collection_messages)
message1_nolog ("Garbage collecting...");
BLOCK_INPUT;
shrink_regexp_cache ();
/* Don't keep undo information around forever. */
......@@ -1873,6 +1875,8 @@ Garbage collection happens automatically if you cons more than\n\
XUNMARK (buffer_defaults.name);
XUNMARK (buffer_local_symbols.name);
UNBLOCK_INPUT;
/* clear_marks (); */
gc_in_progress = 0;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment