/[emacs]/emacs/src/keyboard.c
ViewVC logotype

Diff of /emacs/src/keyboard.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.749 by jasonr, Sun Jun 1 21:48:53 2003 UTC revision 1.749.2.1 by fx, Wed Jun 11 11:45:08 2003 UTC
# Line 22  Boston, MA 02111-1307, USA.  */ Line 22  Boston, MA 02111-1307, USA.  */
22  #include <config.h>  #include <config.h>
23  #include <signal.h>  #include <signal.h>
24  #include <stdio.h>  #include <stdio.h>
25    #ifdef BOEHM_GC
26    #include <gc.h>
27    #endif
28  #include "termchar.h"  #include "termchar.h"
29  #include "termopts.h"  #include "termopts.h"
30  #include "lisp.h"  #include "lisp.h"
# Line 2732  read_char (commandflag, nmaps, maps, pre Line 2735  read_char (commandflag, nmaps, maps, pre
2735                /* If we have auto-saved and there is still no input                /* If we have auto-saved and there is still no input
2736                   available, garbage collect if there has been enough                   available, garbage collect if there has been enough
2737                   consing going on to make it worthwhile.  */                   consing going on to make it worthwhile.  */
2738    #ifndef BOEHM_GC
2739                if (!detect_input_pending_run_timers (0)                if (!detect_input_pending_run_timers (0)
2740                    && consing_since_gc > gc_cons_threshold / 2)                    && consing_since_gc > gc_cons_threshold / 2)
2741                  Fgarbage_collect ();                  Fgarbage_collect ();
2742    #else
2743                  /* Fixme: move this out with its own (shorter) wait time
2744                     (a second or two).  */
2745                  while (!detect_input_pending_run_timers (0)
2746                         && GC_collect_a_little ())
2747                    ;
2748                  extra_gc_work ();
2749    #endif
2750    
2751                redisplay ();                redisplay ();
2752              }              }
# Line 10670  wipe_kboard (kb) Line 10682  wipe_kboard (kb)
10682       KBOARD *kb;       KBOARD *kb;
10683  {  {
10684    if (kb->kbd_macro_buffer)    if (kb->kbd_macro_buffer)
10685      xfree (kb->kbd_macro_buffer);      XGC_FREE (kb->kbd_macro_buffer);
10686  }  }
10687    
10688  #ifdef MULTI_KBOARD  #ifdef MULTI_KBOARD
# Line 10699  delete_kboard (kb) Line 10711  delete_kboard (kb)
10711      }      }
10712    
10713    wipe_kboard (kb);    wipe_kboard (kb);
10714    xfree (kb);    XGC_FREE (kb);
10715  }  }
10716    
10717  #endif /* MULTI_KBOARD */  #endif /* MULTI_KBOARD */

Legend:
Removed from v.1.749  
changed lines
  Added in v.1.749.2.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26