Use INTERNAL_FIELD for symbols.

* src/lisp.h (SVAR): New macro.  Adjust users.
* src/alloc.c, src/bytecode.c, src/cmds.c, src/data.c, src/doc.c, src/eval.c:
* src/fns.c, src/keyboard.c, src/lread.c, src/xterm.c: Users changed.
* admin/coccinelle/symbol.cocci: Semantic patch to replace direct
access to Lisp_Object members of struct Lisp_Symbol to SVAR.

1 files changed, 1 insertions, 1 deletions

diff --git a/src/bytecode.c b/src/bytecode.c
index dca1e552dd0..523d56bc97b 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -818,7 +818,7 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth,
                 && !EQ (val, Qunbound)
                 && !XSYMBOL (sym)->redirect
                 && !SYMBOL_CONSTANT_P (sym))
-              XSYMBOL (sym)->val.value = val;
+              SVAR (XSYMBOL (sym), val.value) = val;
             else
               {
                 BEFORE_POTENTIAL_GC ();