aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorEli Zaretskii2012-06-30 18:55:27 +0300
committerEli Zaretskii2012-06-30 18:55:27 +0300
commitc9240d7a6eb3d8aaca76cd3abc8f099b6ecaff0a (patch)
treec230c2d0e84580f38fe44803b46e149e4149b739 /lisp
parentb3218de111201a7b19592f4176057b03749d55a0 (diff)
parent0d23c240ea378d9a29042266216f4cf25151a04d (diff)
downloademacs-c9240d7a6eb3d8aaca76cd3abc8f099b6ecaff0a.tar.gz
emacs-c9240d7a6eb3d8aaca76cd3abc8f099b6ecaff0a.zip
Adapt the MS-DOS build to the latest changes.
msdos/mainmake.v2 (bootstrap-clean): Do a maintainer-clean in lib, not bootstrap-clean (which doesn't exist). msdos/inttypes.h (PRIuMAX) [__DJGPP__ < 2.04]: Define to "llu". msdos/sedleim.inp (MKDIR_P): Edit to DOS "md" command. msdos/sed1v2.inp: (LIB_CLOCK_GETTIME): Edit to empty. Remove lines that invoke PAXCTL. (clean): Fix recipe not to run Unixy shell commands. msdos/sed2v2.inp (GETTIMEOFDAY_TIMEZONE): Edit to 'struct timezone'. (HAVE_STRNCASECMP): Edit to 1. msdos/sed3v2.inp (LIB_CLOCK_GETTIME): Edit to empty. (C_SWITCH_SYSTEM): Add "-I../msdos". msdos/sedlibmk.inp (GNULIB_GETTIMEOFDAY, GNULIB_PSELECT) (GNULIB_SELECT, HAVE_STRUCT_TIMEVAL, HAVE_SYS_SELECT_H) (HAVE_SYS_TIME_H, NEXT_AS_FIRST_DIRECTIVE_SYS_SELECT_H) (NEXT_AS_FIRST_DIRECTIVE_SYS_TIME_H, NEXT_SYS_SELECT_H) (NEXT_SYS_TIME_H, REPLACE_GETTIMEOFDAY, REPLACE_PSELECT) (REPLACE_STRUCT_TIMEVAL): Edit to appropriate values. (BUILT_SOURCES): Edit out sys/select.h and sys/time.h. (mostlyclean-local, distclean-generic): Fix recipe not to run Unixy shell commands. src/sysselect.h [DOS_NT]: Don't include sys/select.h. src/sysselect.h (pselect) [!HAVE_PSELECT]: Redirect to sys_select. src/sysdep.c: Don't include dos.h and dosfns.h. src/process.c (sys_select): src/msdos.c (sys_select): Accept one more argument and ignore it. src/msdos.c (event_timestamp, sys_select): Use gnulib's gettime; adapt data types and code to that. src/dosfns.c: src/msdos.c (gettime, settime): Define away the prototypes in dos.h, which clashes with the gnulib function of the same name. src/ w32proc.c (sys_select): Accept and ignore one more argument. src/w32.c (emacs_gnutls_pull): Call select with one more argument. lisp/emacs-lisp/timer.el (timer-until): Subtract results of float-time, instead of taking float-time of the result of time-subtract, since float-time signals an error for negative time arguments.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/emacs-lisp/timer.el2
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4d0f1e5afeb..ca425d5b5ea 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
12012-06-30 Eli Zaretskii <eliz@gnu.org>
2
3 * emacs-lisp/timer.el (timer-until): Subtract results of
4 float-time, instead of taking float-time of the result of
5 time-subtract, since float-time signals an error for negative time
6 arguments.
7
12012-06-30 Chong Yidong <cyd@gnu.org> 82012-06-30 Chong Yidong <cyd@gnu.org>
2 9
3 * xml.el (xml-*-re): Convert defvars into defconsts, and 10 * xml.el (xml-*-re): Convert defvars into defconsts, and
diff --git a/lisp/emacs-lisp/timer.el b/lisp/emacs-lisp/timer.el
index eab96fe202a..a66d5972d82 100644
--- a/lisp/emacs-lisp/timer.el
+++ b/lisp/emacs-lisp/timer.el
@@ -268,7 +268,7 @@ how many will really happen."
268 "Calculate number of seconds from when TIMER will run, until TIME. 268 "Calculate number of seconds from when TIMER will run, until TIME.
269TIMER is a timer, and stands for the time when its next repeat is scheduled. 269TIMER is a timer, and stands for the time when its next repeat is scheduled.
270TIME is a time-list." 270TIME is a time-list."
271 (float-time (time-subtract time (timer--time timer)))) 271 (- (float-time time) (float-time (timer--time timer))))
272 272
273(defun timer-event-handler (timer) 273(defun timer-event-handler (timer)
274 "Call the handler for the timer TIMER. 274 "Call the handler for the timer TIMER.