Drop FGET and revert read access to Lisp_Objects slots of struct frame.

* frame.h (FGET): Remove.
(struct frame): Do not use INTERNAL_FIELD.
* 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, 2 insertions, 3 deletions

diff --git a/src/data.c b/src/data.c
index 0803cecf5ee..3a8e0b11d6a 100644
--- a/src/data.c
+++ b/src/data.c
@@ -1006,8 +1006,7 @@ swap_in_symval_forwarding (struct Lisp_Symbol *symbol, struct Lisp_Buffer_Local_
         XSETSYMBOL (var, symbol);
         if (blv->frame_local)
           {
-            tem1 = assq_no_quit (var, FGET (XFRAME (selected_frame),
-                                           param_alist));
+            tem1 = assq_no_quit (var, XFRAME (selected_frame)->param_alist);
             blv->where = selected_frame;
           }
         else
@@ -1180,7 +1179,7 @@ set_internal (register Lisp_Object symbol, register Lisp_Object newval, register
             XSETSYMBOL (symbol, sym); /* May have changed via aliasing.  */
             tem1 = Fassq (symbol,
                           (blv->frame_local
-                           ? FGET (XFRAME (where), param_alist)
+                           ? XFRAME (where)->param_alist
                            : BVAR (XBUFFER (where), local_var_alist)));
             blv->where = where;
             blv->found = 1;