procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* systime.h (EMACS_TIME_CMP): Don't cast time_t values to long.

Browse source 
Fixes: debbugs:11712
This commit is contained in:
Ulrich Mueller 2012-08-14 14:58:01 +08:00 • committed by Chong Yidong
parent 45e7ed7165
commit 7f654971e0
2 changed files with 9 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/ChangeLog
View file

@ -1,3 +1,8 @@
2012-08-14 Ulrich Mueller <ulm@gentoo.org>
* systime.h (EMACS_TIME_CMP): Don't cast time_t values to long
(Bug#11712).
2012-08-13 Eli Zaretskii <eliz@gnu.org>
* w32menu.c: Include w32heap.h.

11
src/systime.h
View file

@ -147,15 +147,12 @@ extern int lisp_time_argument (Lisp_Object, time_t *, int *);
#endif
/* Compare times T1 and T2. Value is 0 if T1 and T2 are the same.
Value is < 0 if T1 is less than T2. Value is > 0 otherwise. (Cast
to long is for those platforms where time_t is an unsigned
type, and where otherwise T1 will always be grater than T2.) */
Value is < 0 if T1 is less than T2. Value is > 0 otherwise. */
#define EMACS_TIME_CMP(T1, T2) \
((long)EMACS_SECS (T1) - (long)EMACS_SECS (T2) \
+ (EMACS_SECS (T1) == EMACS_SECS (T2) \
? EMACS_USECS (T1) - EMACS_USECS (T2) \
: 0))
(EMACS_SECS (T1) == EMACS_SECS (T2) \
? EMACS_USECS (T1) - EMACS_USECS (T2) \
: (EMACS_SECS (T1) < EMACS_SECS (T2) ? -1 : 1))
/* Compare times T1 and T2 for equality, inequality etc. */