Mercurial > hg > xemacs-beta
comparison src/event-stream.c @ 5143:186aebf7f6c6
merge
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Sat, 13 Mar 2010 11:38:54 -0600 |
parents | e5380fdaf8f1 f965e31a35f0 |
children | 71ee43b8a74d |
comparison
equal
deleted
inserted
replaced
5140:e5380fdaf8f1 | 5143:186aebf7f6c6 |
---|---|
1119 | 1119 |
1120 assert (!NILP (rest)); | 1120 assert (!NILP (rest)); |
1121 op = XCAR (rest); | 1121 op = XCAR (rest); |
1122 timeout = XTIMEOUT (op); | 1122 timeout = XTIMEOUT (op); |
1123 /* We make sure to snarf the data out of the timeout object before | 1123 /* We make sure to snarf the data out of the timeout object before |
1124 we free it with free_managed_lcrecord(). */ | 1124 we free it with free_normal_lisp_object(). */ |
1125 id = timeout->id; | 1125 id = timeout->id; |
1126 *function = timeout->function; | 1126 *function = timeout->function; |
1127 *object = timeout->object; | 1127 *object = timeout->object; |
1128 | 1128 |
1129 /* Remove this one from the list of pending timeouts */ | 1129 /* Remove this one from the list of pending timeouts */ |