Mercurial > hg > xemacs-beta

comparison src/device-x.c @ 5120:d1247f3cc363 ben-lisp-object

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
latest work on lisp-object workspace; more changes eliminating LCRECORD in place of LISP_OBJECT; now compiles and runs.
author Ben Wing <ben@xemacs.org>
date Mon, 28 Dec 2009 01:15:52 -0600
parents e0db3c197671
children b5df3737028a
comparison
equal deleted inserted replaced
5119:d877c14318b3 5120:d1247f3cc363
226 226
227 static void 227 static void
228 allocate_x_device_struct (struct device *d) 228 allocate_x_device_struct (struct device *d)
229 { 229 {
230 #ifdef NEW_GC 230 #ifdef NEW_GC
231 d->device_data = alloc_lrecord_type (struct x_device, &lrecord_x_device); 231 d->device_data = XX_DEVICE (ALLOC_LISP_OBJECT (x_device));
232 #else /* not NEW_GC */ 232 #else /* not NEW_GC */
233 d->device_data = xnew_and_zero (struct x_device); 233 d->device_data = xnew_and_zero (struct x_device);
234 #endif /* not NEW_GC */ 234 #endif /* not NEW_GC */
235 } 235 }
236 236