comparison src/events.c @ 122:d2f30a177268 r20-1b14

Import from CVS: tag r20-1b14
author cvs
date Mon, 13 Aug 2007 09:26:03 +0200
parents cca96a509cfe
children 9b50b4588a93
comparison
equal deleted inserted replaced
121:419db647c998 122:d2f30a177268
1095 motion The mouse moved. 1095 motion The mouse moved.
1096 process Input is available from a subprocess. 1096 process Input is available from a subprocess.
1097 timeout A timeout has expired. 1097 timeout A timeout has expired.
1098 eval This causes a specified action to occur when dispatched. 1098 eval This causes a specified action to occur when dispatched.
1099 magic Some window-system-specific event has occurred. 1099 magic Some window-system-specific event has occurred.
1100 dead The event has been deallocated.
1101 empty The event has been allocated but not assigned.
1102
1100 */ 1103 */
1101 (event)) 1104 (event))
1102 { 1105 {
1103 CHECK_LIVE_EVENT (event); 1106 CHECK_LIVE_EVENT (event);
1104 switch (XEVENT (event)->event_type) 1107 switch (XEVENT (event)->event_type)
1128 return Qeval; 1131 return Qeval;
1129 1132
1130 case magic_event: 1133 case magic_event:
1131 case magic_eval_event: 1134 case magic_eval_event:
1132 return Qmagic; 1135 return Qmagic;
1136
1137 case empty_event:
1138 return Qempty;
1139
1140 case dead_event:
1141 return Qdead;
1133 1142
1134 default: 1143 default:
1135 abort (); 1144 abort ();
1136 return Qnil; 1145 return Qnil;
1137 } 1146 }
1839 props = Fcons (Qfunction, Fcons (Fevent_function (event), props)); 1848 props = Fcons (Qfunction, Fcons (Fevent_function (event), props));
1840 break; 1849 break;
1841 1850
1842 case magic_eval_event: 1851 case magic_eval_event:
1843 case magic_event: 1852 case magic_event:
1853 case dead_event:
1854 case empty_event:
1844 break; 1855 break;
1845 1856
1846 default: 1857 default:
1847 abort (); 1858 abort ();
1848 break; /* not reached; warning suppression */ 1859 break; /* not reached; warning suppression */