Separate read and write access to Lisp_Object slots of struct window.

* window.h (WGET, WSET): New macros similar to AREF and ASET.
* alloc.c, buffer.c, composite.c, dispextern.h, dispnew.c, editfns.c:
* fileio.c, font.c, fontset.c, frame.c, frame.h, fringe.c, indent.c:
* insdel.c, keyboard.c, keymap.c, lisp.h, minibuf.c, msdos.c, nsfns.m:
* nsmenu.m, nsterm.m, print.c, textprop.c, w32fns.c, w32menu.c:
* w32term.c, window.c, xdisp.c, xfaces.c, xfns.c, xmenu.c, xterm.c:
Adjust users.

1 files changed, 2 insertions, 2 deletions

diff --git a/src/print.c b/src/print.c
index 8db222334e5..d45d3194c55 100644
--- a/src/print.c
+++ b/src/print.c
@@ -1773,10 +1773,10 @@ print_object (Lisp_Object obj, register Lisp_Object printcharfun, int escapeflag
           strout ("#<window ", -1, -1, printcharfun);
           len = sprintf (buf, "%d", XWINDOW (obj)->sequence_number);
           strout (buf, len, len, printcharfun);
-          if (!NILP (WVAR (XWINDOW (obj), buffer)))
+          if (!NILP (WGET (XWINDOW (obj), buffer)))
             {
               strout (" on ", -1, -1, printcharfun);
-              print_string (BVAR (XBUFFER (WVAR (XWINDOW (obj), buffer)), name),
+              print_string (BVAR (XBUFFER (WGET (XWINDOW (obj), buffer)), name),
                             printcharfun);
             }
           PRINTCHAR ('>');