Mercurial > hg > xemacs-beta

comparison src/events.c @ 2039:fd0cbe945410

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-04-22 03:24:00 by james] Change VALBITS to INT_VALBITS in a number of places.
author james
date Thu, 22 Apr 2004 03:24:02 +0000
parents e22b0213b713
children 04bc9d2f42c7
comparison
equal deleted inserted replaced
2038:c6190a5b1ece 2039:fd0cbe945410
1742 { 1742 {
1743 CHECK_LIVE_EVENT (event); 1743 CHECK_LIVE_EVENT (event);
1744 /* This junk is so that timestamps don't get to be negative, but contain 1744 /* This junk is so that timestamps don't get to be negative, but contain
1745 as many bits as this particular emacs will allow. 1745 as many bits as this particular emacs will allow.
1746 */ 1746 */
1747 return make_int (((1L << (VALBITS - 1)) - 1) & 1747 return make_int (EMACS_INT_MAX & XEVENT_TIMESTAMP (event));
1748 XEVENT_TIMESTAMP (event)); 1748 }
1749 } 1749
1750 1750 #define TIMESTAMP_HALFSPACE (1L << (INT_VALBITS - 2))
1751 #define TIMESTAMP_HALFSPACE (1L << (VALBITS - 2))
1752 1751
1753 DEFUN ("event-timestamp<", Fevent_timestamp_lessp, 2, 2, 0, /* 1752 DEFUN ("event-timestamp<", Fevent_timestamp_lessp, 2, 2, 0, /*
1754 Return true if timestamp TIME1 is earlier than timestamp TIME2. 1753 Return true if timestamp TIME1 is earlier than timestamp TIME2.
1755 This correctly handles timestamp wrap. 1754 This correctly handles timestamp wrap.
1756 See also `event-timestamp' and `current-event-timestamp'. 1755 See also `event-timestamp' and `current-event-timestamp'.