Mercurial > hg > xemacs-beta

comparison src/events.h @ 943:345b7d75cab4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-08-01 08:28:18 by michaels] 2002-08-01 Mike Sperber <mike@xemacs.org> * event-stream.c: * event-Xt.c: * events.h: * events.c: * alloc.c: Fix various kkcc-related nits that show up in MULE and union-type builds.
author michaels
date Thu, 01 Aug 2002 08:28:38 +0000
parents 4a2ad9252ff5
children e22b0213b713
comparison
equal deleted inserted replaced
942:d90decf21e71 943:345b7d75cab4
814 #define EVENT_CHANNEL(a) ((a)->channel) 814 #define EVENT_CHANNEL(a) ((a)->channel)
815 #define EVENT_TYPE(a) ((a)->event_type) 815 #define EVENT_TYPE(a) ((a)->event_type)
816 #define XEVENT_TYPE(a) (XEVENT (a)->event_type) 816 #define XEVENT_TYPE(a) (XEVENT (a)->event_type)
817 #define EVENT_NEXT(a) ((a)->next) 817 #define EVENT_NEXT(a) ((a)->next)
818 #define XEVENT_NEXT(e) (XEVENT (e)->next) 818 #define XEVENT_NEXT(e) (XEVENT (e)->next)
819 #ifdef USE_KKCC
820 #else /* not USE_KKCC */
821 #define XSET_EVENT_NEXT(e, n) do { (XEVENT (e)->next = (n)); } while (0)
822 #endif /* not USE_KKCC */
823 819
824 #ifdef USE_KKCC 820 #ifdef USE_KKCC
825 #define XEVENT_DATA(ev) (XEVENT (ev)->event_data) 821 #define XEVENT_DATA(ev) (XEVENT (ev)->event_data)
826 #define EVENT_DATA(ev) ((ev)->event_data) 822 #define EVENT_DATA(ev) ((ev)->event_data)
827 #define XEVENT_CHANNEL(ev) (XEVENT (ev)->channel) 823 #define XEVENT_CHANNEL(ev) (XEVENT (ev)->channel)
828 #define EVENT_CHANNEL(ev) ((ev)->channel)
829 #define EVENT_TIMESTAMP(ev) \ 824 #define EVENT_TIMESTAMP(ev) \
830 ((ev)->timestamp) 825 ((ev)->timestamp)
831 #define XEVENT_TIMESTAMP(ev) EVENT_TIMESTAMP (XEVENT (ev)) 826 #define XEVENT_TIMESTAMP(ev) EVENT_TIMESTAMP (XEVENT (ev))
832 827
833 #define SET_EVENT_TIMESTAMP_ZERO(ev) \ 828 #define SET_EVENT_TIMESTAMP_ZERO(ev) \
834 ((ev)->timestamp = Qzero) 829 ((ev)->timestamp = 0)
835 #define SET_EVENT_TIMESTAMP(ev, t) \ 830 #define SET_EVENT_TIMESTAMP(ev, t) \
836 (ev)->timestamp = (t) 831 (ev)->timestamp = (t)
837 #define XSET_EVENT_TIMESTAMP(ev, t) SET_EVENT_TIMESTAMP (XEVENT (ev), t) 832 #define XSET_EVENT_TIMESTAMP(ev, t) SET_EVENT_TIMESTAMP (XEVENT (ev), t)
838 833
839 834
899 Lisp_Event *mac_event = (ev); \ 894 Lisp_Event *mac_event = (ev); \
900 mac_event->next = (n); \ 895 mac_event->next = (n); \
901 } while (0) 896 } while (0)
902 #define XSET_EVENT_NEXT(ev, n) SET_EVENT_NEXT (XEVENT (ev), n) 897 #define XSET_EVENT_NEXT(ev, n) SET_EVENT_NEXT (XEVENT (ev), n)
903 898
904 #endif /* USE_KKCC */ 899 #else /* NOT USE_KKCC */
905 900 #define XSET_EVENT_NEXT(e, n) do { (XEVENT (e)->next = (n)); } while (0)
901 #endif
906 902
907 #define EVENT_CHAIN_LOOP(event, chain) \ 903 #define EVENT_CHAIN_LOOP(event, chain) \
908 for (event = chain; !NILP (event); event = XEVENT_NEXT (event)) 904 for (event = chain; !NILP (event); event = XEVENT_NEXT (event))
909 905
910 #define EVENT_LIVE_P(a) (EVENT_TYPE (a) != dead_event) 906 #define EVENT_LIVE_P(a) (EVENT_TYPE (a) != dead_event)