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

* frame.h (FGET, FSET): New macros similar to AREF and ASET.
* buffer.c, data.c, dispnew.c, dosfns.c, eval.c, fontset.c, frame.c:
* fringe.c, gtkutil.c, minibuf.c, msdos.c, nsfns.m, nsmenu.m, nsterm.m:
* print.c, term.c, w32fns.c, w32menu.c, w32term.c, window.c, window.h:
* xdisp.c, xfaces.c, xfns.c, xmenu.c, xterm.c: Adjust users.

1 files changed, 1 insertions, 1 deletions

diff --git a/src/eval.c b/src/eval.c
index 5eb144eb0b2..e6d4a4ceac9 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -3254,7 +3254,7 @@ unbind_to (ptrdiff_t count, Lisp_Object value)
              local binding, but only if that binding still exists.  */
           else if (BUFFERP (where)
                    ? !NILP (Flocal_variable_p (symbol, where))
-                   : !NILP (Fassq (symbol, FVAR (XFRAME (where), param_alist))))
+                   : !NILP (Fassq (symbol, FGET (XFRAME (where), param_alist))))
             set_internal (symbol, this_binding.old_value, where, 1);
         }
       /* If variable has a trivial value (no forwarding), we can