comparison src/keyboard.c @ 90601:a1a25ac6c88a

Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 427-436) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 134-136) - Merge from emacs--devo--0 - Update from CVS Revision: [e-mail]/emacs--unicode--0--patch-110

90600:84dd84b43e1b

      if (!end_time)
	timer_resume_idle ();
      goto retry;
    }

  if (! reread || this_command_key_count == 0
      || this_command_key_count_reset)
    {

      /* Don't echo mouse motion events.  */
      if ((FLOATP (Vecho_keystrokes) || INTEGERP (Vecho_keystrokes))
	  && NILP (Fzerop (Vecho_keystrokes))

     keybuf with its symbol, or if the sequence starts with a mouse
     click and we need to switch buffers, we jump back here to rebuild
     the initial keymaps from the current buffer.  */
  nmaps = 0;

  if (!NILP (current_kboard->Voverriding_terminal_local_map)
      || !NILP (Voverriding_local_map))
    {
      if (3 > nmaps_allocated)
	{
	  submaps = (Lisp_Object *) alloca (3 * sizeof (submaps[0]));
	  defs    = (Lisp_Object *) alloca (3 * sizeof (defs[0]));
	  nmaps_allocated = 3;
	}
      if (!NILP (current_kboard->Voverriding_terminal_local_map))
	submaps[nmaps++] = current_kboard->Voverriding_terminal_local_map;
      if (!NILP (Voverriding_local_map))
	submaps[nmaps++] = Voverriding_local_map;
    }
  else
    {

       doc: /* Return t if command input is currently available with no wait.
Actually, the value is nil only if we can be sure that no input is available;
if there is a doubt, the value is t.  */)
     ()
{
  if (!NILP (Vunread_command_events) || unread_command_char != -1)
    return (Qt);

  get_input_pending (&input_pending,
		     READABLE_EVENTS_DO_TIMERS_NOW
		     | READABLE_EVENTS_FILTER_EVENTS);

90601:a1a25ac6c88a

      if (!end_time)
	timer_resume_idle ();
      goto retry;
    }

  if ((! reread || this_command_key_count == 0
       || this_command_key_count_reset)
      && !end_time)
    {

      /* Don't echo mouse motion events.  */
      if ((FLOATP (Vecho_keystrokes) || INTEGERP (Vecho_keystrokes))
	  && NILP (Fzerop (Vecho_keystrokes))

     keybuf with its symbol, or if the sequence starts with a mouse
     click and we need to switch buffers, we jump back here to rebuild
     the initial keymaps from the current buffer.  */
  nmaps = 0;

  if (!NILP (current_kboard->Voverriding_terminal_local_map))
    {
      if (2 > nmaps_allocated)
	{
	  submaps = (Lisp_Object *) alloca (2 * sizeof (submaps[0]));
	  defs    = (Lisp_Object *) alloca (2 * sizeof (defs[0]));
	  nmaps_allocated = 2;
	}
      if (!NILP (current_kboard->Voverriding_terminal_local_map))
	submaps[nmaps++] = current_kboard->Voverriding_terminal_local_map;
    }
  else if (!NILP (Voverriding_local_map))
    {
      if (2 > nmaps_allocated)
	{
	  submaps = (Lisp_Object *) alloca (2 * sizeof (submaps[0]));
	  defs    = (Lisp_Object *) alloca (2 * sizeof (defs[0]));
	  nmaps_allocated = 2;
	}
      if (!NILP (Voverriding_local_map))
	submaps[nmaps++] = Voverriding_local_map;
    }
  else
    {

       doc: /* Return t if command input is currently available with no wait.
Actually, the value is nil only if we can be sure that no input is available;
if there is a doubt, the value is t.  */)
     ()
{
  if (!NILP (Vunread_command_events) || unread_command_char != -1
      || !NILP (Vunread_post_input_method_events)
      || !NILP (Vunread_input_method_events))
    return (Qt);

  get_input_pending (&input_pending,
		     READABLE_EVENTS_DO_TIMERS_NOW
		     | READABLE_EVENTS_FILTER_EVENTS);