aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorEli Zaretskii2012-06-30 18:32:51 +0300
committerEli Zaretskii2012-06-30 18:32:51 +0300
commit0d23c240ea378d9a29042266216f4cf25151a04d (patch)
treedc3d25374540cc607085f405c4692d976ec14834 /lisp
parent3cfbebba71090f6ea0c2ca4a6056a3e645cee2e8 (diff)
downloademacs-0d23c240ea378d9a29042266216f4cf25151a04d.tar.gz
emacs-0d23c240ea378d9a29042266216f4cf25151a04d.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/s/ms-w32.h (select, pselect): Don't define here, they are defined in sysselect.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. 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 f2fa5a37ac7..975478e1732 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 Stefan Monnier <monnier@iro.umontreal.ca> 82012-06-30 Stefan Monnier <monnier@iro.umontreal.ca>
2 9
3 * emacs-lisp/cl-lib.el (cl-pushnew): Use macroexp-let2. 10 * emacs-lisp/cl-lib.el (cl-pushnew): Use macroexp-let2.
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.