# HG changeset patch # User Eli Zaretskii # Date 1278611609 -10800 # Node ID 074605ee311ffd97d3747e40214d90921b39eb67 # Parent 01e36ca71747c8dceaa11386e1e22c420ec0d70a# Parent 208ebac6e31ebf202fee6dfbeed6d8f867c4c52e Fix MS-DOS build broken by revno 100745; fix MS-DOS configury. src/process.c (kbd_is_on_hold, hold_keyboard_input) (unhold_keyboard_input, kbd_on_hold_p) [!subprocesses]: Define. msdos/sed1v2.inp (stamp-oldxmenu): Don't edit out in `temacs:' target, which doesn't exist. msdos/sed2v2.inp (HAVE_MEMCPY): Don't edit, already defined on . diff -r 01e36ca71747 -r 074605ee311f msdos/ChangeLog --- a/msdos/ChangeLog Thu Jul 08 12:35:54 2010 +0200 +++ b/msdos/ChangeLog Thu Jul 08 20:53:29 2010 +0300 @@ -1,3 +1,10 @@ +2010-07-08 Eli Zaretskii + + * sed1v2.inp (stamp-oldxmenu): Don't edit out in `temacs:' target, + which doesn't exist. + + * sed2v2.inp (HAVE_MEMCPY): Don't edit, defined on . + 2010-07-08 Dan Nicolaescu * sed1v2.inp: Remove reference to prefix-args. diff -r 01e36ca71747 -r 074605ee311f msdos/sed1v2.inp --- a/msdos/sed1v2.inp Thu Jul 08 12:35:54 2010 +0200 +++ b/msdos/sed1v2.inp Thu Jul 08 20:53:29 2010 +0300 @@ -128,7 +128,6 @@ /^[ ]*$/d /^ if test -f/,/^ fi$/c\ command.com /c if exist .gdbinit rm -f _gdbinit -/^temacs:/s/stamp-oldxmenu// /^ if test "\${CANNOT_DUMP}" =/,/^ else /d /^ fi/d /^ LC_ALL=C \$(RUN_TEMACS)/i\ diff -r 01e36ca71747 -r 074605ee311f msdos/sed2v2.inp --- a/msdos/sed2v2.inp Thu Jul 08 12:35:54 2010 +0200 +++ b/msdos/sed2v2.inp Thu Jul 08 20:53:29 2010 +0300 @@ -38,7 +38,6 @@ /^#undef HAVE_CBRT *$/s/^.*$/#define HAVE_CBRT 1/ /^#undef HAVE_DIFFTIME *$/s/^.*$/#define HAVE_DIFFTIME 1/ /^#undef HAVE_FPATHCONF *$/s/^.*$/#define HAVE_FPATHCONF 1/ -/^#undef HAVE_MEMCPY *$/s/^.*$/#define HAVE_MEMCPY 1/ /^#undef HAVE_MEMSET *$/s/^.*$/#define HAVE_MEMSET 1/ /^#undef HAVE_MEMCMP *$/s/^.*$/#define HAVE_MEMCMP 1/ /^#undef HAVE_MEMMOVE *$/s/^.*$/#define HAVE_MEMMOVE 1/ diff -r 01e36ca71747 -r 074605ee311f src/ChangeLog --- a/src/ChangeLog Thu Jul 08 12:35:54 2010 +0200 +++ b/src/ChangeLog Thu Jul 08 20:53:29 2010 +0300 @@ -1,3 +1,8 @@ +2010-07-08 Eli Zaretskii + + * process.c (kbd_is_on_hold, hold_keyboard_input) + (unhold_keyboard_input, kbd_on_hold_p) [!subprocesses]: Define. + 2010-07-08 Jan Djärv * xmenu.c (set_frame_menubar, create_and_show_popup_menu) diff -r 01e36ca71747 -r 074605ee311f src/process.c --- a/src/process.c Thu Jul 08 12:35:54 2010 +0200 +++ b/src/process.c Thu Jul 08 20:53:29 2010 +0300 @@ -7600,6 +7600,9 @@ Lisp_Object Qcutime, Qpri, Qnice, Qthcount, Qstart, Qvsize, Qrss, Qargs; Lisp_Object Quser, Qgroup, Qetime, Qpcpu, Qpmem, Qtime, Qctime; +/* Non-zero if keyboard input is on hold, zero otherwise. */ +static int kbd_is_on_hold; + /* As described above, except assuming that there are no subprocesses: Wait for timeout to elapse and/or keyboard input to be available. @@ -7860,6 +7863,31 @@ { } + +/* Stop reading input from keyboard sources. */ + +void +hold_keyboard_input (void) +{ + kbd_is_on_hold = 1; +} + +/* Resume reading input from keyboard sources. */ + +void +unhold_keyboard_input (void) +{ + kbd_is_on_hold = 0; +} + +/* Return non-zero if keyboard input is on hold, zero otherwise. */ + +int +kbd_on_hold_p (void) +{ + return kbd_is_on_hold; +} + DEFUN ("list-system-processes", Flist_system_processes, Slist_system_processes, 0, 0, 0, doc: /* Return a list of numerical process IDs of all running processes.