Mercurial > hg > xemacs-beta

comparison src/frame-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
2040 static void 2040 static void
2041 allocate_x_frame_struct (struct frame *f) 2041 allocate_x_frame_struct (struct frame *f)
2042 { 2042 {
2043 /* zero out all slots. */ 2043 /* zero out all slots. */
2044 #ifdef NEW_GC 2044 #ifdef NEW_GC
2045 f->frame_data = alloc_lrecord_type (struct x_frame, &lrecord_x_frame); 2045 f->frame_data = XX_FRAME (ALLOC_LISP_OBJECT (x_frame));
2046 #else /* not NEW_GC */ 2046 #else /* not NEW_GC */
2047 f->frame_data = xnew_and_zero (struct x_frame); 2047 f->frame_data = xnew_and_zero (struct x_frame);
2048 #endif /* not NEW_GC */ 2048 #endif /* not NEW_GC */
2049 2049
2050 /* yeah, except the lisp ones */ 2050 /* yeah, except the lisp ones */