# HG changeset patch # User Jim Blandy # Date 691120030 0 # Node ID ab8836c672bdb5cb2df4745249798a9c30b69dd0 # Parent 1c6c6382f1d782c8e07ff2028b663ee63ea46375 *** empty log message *** diff -r 1c6c6382f1d7 -r ab8836c672bd src/alloc.c --- a/src/alloc.c Sat Nov 16 00:15:15 1991 +0000 +++ b/src/alloc.c Tue Nov 26 01:47:10 1991 +0000 @@ -24,12 +24,9 @@ #ifndef standalone #include "buffer.h" #include "window.h" -#ifdef HAVE_X_WINDOWS -#include "xterm.h" #ifdef MULTI_SCREEN #include "screen.h" #endif /* MULTI_SCREEN */ -#endif /* HAVE_X_WINDOWS */ #endif #define max(A,B) ((A) > (B) ? (A) : (B)) @@ -753,7 +750,7 @@ arguments, are allowed. */ Lisp_Object -make_sequence (nargs, args) +make_array (nargs, args) register int nargs; Lisp_Object *args; { @@ -1042,8 +1039,6 @@ char stack_top_variable; register int i; - BLOCK_INPUT; - /* Save a copy of the contents of the stack, for debugging. */ #if MAX_SAVE_STACK > 0 if (NULL (Vpurify_flag)) @@ -1181,10 +1176,6 @@ else if (!noninteractive) message1 ("Garbage collecting...done"); -#ifdef HAVE_X_WINDOWS - UNBLOCK_INPUT; -#endif - return Fcons (Fcons (make_number (total_conses), make_number (total_free_conses)), Fcons (Fcons (make_number (total_symbols), diff -r 1c6c6382f1d7 -r ab8836c672bd src/macros.c --- a/src/macros.c Sat Nov 16 00:15:15 1991 +0000 +++ b/src/macros.c Tue Nov 26 01:47:10 1991 +0000 @@ -106,8 +106,8 @@ { defining_kbd_macro = 0; update_mode_lines++; - Vlast_kbd_macro = make_sequence (kbd_macro_end - kbd_macro_buffer, - kbd_macro_buffer); + Vlast_kbd_macro = make_array (kbd_macro_end - kbd_macro_buffer, + kbd_macro_buffer); message("Keyboard macro defined"); }