Mercurial > hg > xemacs-beta

comparison src/frame-gtk.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
971 { 971 {
972 int i; 972 int i;
973 973
974 /* zero out all slots. */ 974 /* zero out all slots. */
975 #ifdef NEW_GC 975 #ifdef NEW_GC
976 f->frame_data = alloc_lrecord_type (struct gtk_frame, &lrecord_gtk_frame); 976 f->frame_data = XGTK_FRAME (ALLOC_LISP_OBJECT (gtk_frame));
977 #else /* not NEW_GC */ 977 #else /* not NEW_GC */
978 f->frame_data = xnew_and_zero (struct gtk_frame); 978 f->frame_data = xnew_and_zero (struct gtk_frame);
979 #endif /* not NEW_GC */ 979 #endif /* not NEW_GC */
980 980
981 /* yeah, except the lisp ones */ 981 /* yeah, except the lisp ones */