Mercurial > hg > xemacs-beta

diff src/window.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 623d57b7fbe8
line wrap: on
line diff
--- a/src/window.c	Sat Dec 26 21:22:48 2009 -0600
+++ b/src/window.c	Mon Dec 28 01:15:52 2009 -0600
@@ -3857,7 +3857,7 @@
   Lisp_Object obj = ALLOC_LISP_OBJECT (window);
   struct window *p = XWINDOW (obj);
 
-  COPY_LCRECORD (p, o);
+  COPY_LISP_OBJECT (p, o);
 
   /* Don't copy the pointers to the line start cache or the face
      instances. */
@@ -5165,7 +5165,7 @@
 {
   if (!mir)
     return;
-  stats->other += LISPOBJ_STORAGE_SIZE (mir, sizeof (*mir), ovstats);
+  stats->other += LISP_OBJECT_STORAGE_SIZE (mir, sizeof (*mir), ovstats);
 #ifdef HAVE_SCROLLBARS
   {
     struct device *d = XDEVICE (FRAME_DEVICE (mir->frame));
@@ -5189,7 +5189,7 @@
 		      struct overhead_stats *ovstats)
 {
   xzero (*stats);
-  stats->other += LISPOBJ_STORAGE_SIZE (w, sizeof (*w), ovstats);
+  stats->other += LISP_OBJECT_STORAGE_SIZE (w, sizeof (*w), ovstats);
   stats->face += compute_face_cachel_usage (w->face_cachels, ovstats);
   stats->glyph += compute_glyph_cachel_usage (w->glyph_cachels, ovstats);
   stats->line_start +=