[Emacs-diffs] Changes to emacs/src/dispnew.c

[Kim F . Storm]

Index: emacs/src/dispnew.c
diff -c emacs/src/dispnew.c:1.333 emacs/src/dispnew.c:1.334
*** emacs/src/dispnew.c:1.333   Wed Jul 21 21:08:23 2004
--- emacs/src/dispnew.c Thu Aug 19 13:59:28 2004
***************
*** 6331,6342 ****
    if (sec < 0 || (sec == 0 && usec == 0))
      return Qnil;
  
!   {
!     Lisp_Object zero;
! 
!     XSETFASTINT (zero, 0);
!     wait_reading_process_input (sec, usec, zero, 0);
!   }
  
    /* We should always have wait_reading_process_input; we have a dummy
       implementation for systems which don't support subprocesses.  */
--- 6331,6337 ----
    if (sec < 0 || (sec == 0 && usec == 0))
      return Qnil;
  
!   wait_reading_process_input (sec, usec, 0, 0, Qnil, NULL, 0);
  
    /* We should always have wait_reading_process_input; we have a dummy
       implementation for systems which don't support subprocesses.  */
***************
*** 6386,6393 ****
  sit_for (sec, usec, reading, display, initial_display)
       int sec, usec, reading, display, initial_display;
  {
-   Lisp_Object read_kbd;
- 
    swallow_events (display);
  
    if (detect_input_pending_run_timers (display) || !NILP (Vexecuting_macro))
--- 6381,6386 ----
***************
*** 6403,6410 ****
    gobble_input (0);
  #endif
  
!   XSETINT (read_kbd, reading ? -1 : 1);
!   wait_reading_process_input (sec, usec, read_kbd, display);
  
    return detect_input_pending () ? Qnil : Qt;
  }
--- 6396,6403 ----
    gobble_input (0);
  #endif
  
!   wait_reading_process_input (sec, usec, reading ? -1 : 1, display,
!                             Qnil, NULL, 0);
  
    return detect_input_pending () ? Qnil : Qt;
  }