Mercurial > hg > xemacs-beta

comparison src/frame-msw.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
170 height = Fplist_get (props, Qheight, Qnil); 170 height = Fplist_get (props, Qheight, Qnil);
171 if (!NILP (height)) 171 if (!NILP (height))
172 CHECK_INT (height); 172 CHECK_INT (height);
173 173
174 #ifdef NEW_GC 174 #ifdef NEW_GC
175 f->frame_data = alloc_lrecord_type (struct mswindows_frame, 175 f->frame_data = XMSWINDOWS_FRAME (ALLOC_LISP_OBJECT (mswindows_frame));
176 &lrecord_mswindows_frame);
177 #else /* not NEW_GC */ 176 #else /* not NEW_GC */
178 f->frame_data = xnew_and_zero (struct mswindows_frame); 177 f->frame_data = xnew_and_zero (struct mswindows_frame);
179 #endif /* not NEW_GC */ 178 #endif /* not NEW_GC */
180 FRAME_MSWINDOWS_TARGET_RECT (f) = xnew_and_zero (XEMACS_RECT_WH); 179 FRAME_MSWINDOWS_TARGET_RECT (f) = xnew_and_zero (XEMACS_RECT_WH);
181 180