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 */