# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 1002275379 0
# Node ID 6d9fa06012a6a2edbcd77f34c55f6c2e40934d67
# Parent  ee9c4218a600ebc93f908849b9f6a39414e88820
Use SYMBOL_VALUE/SET_SYMBOL_VALUE macros instead of accessing
symbols' value directly.

diff -r ee9c4218a600 -r 6d9fa06012a6 src/buffer.c
--- a/src/buffer.c	Fri Oct 05 09:49:16 2001 +0000
+++ b/src/buffer.c	Fri Oct 05 09:49:39 2001 +0000
@@ -1683,7 +1683,7 @@
 
   for (tail = b->local_var_alist; !NILP (tail); tail = XCDR (tail))
     {
-      valcontents = XSYMBOL (XCAR (XCAR (tail)))->value;
+      valcontents = SYMBOL_VALUE (XCAR (XCAR (tail)));
       if ((BUFFER_LOCAL_VALUEP (valcontents)
 	   || SOME_BUFFER_LOCAL_VALUEP (valcontents))
 	  && (tem = XBUFFER_LOCAL_VALUE (valcontents)->realvalue,
@@ -1698,7 +1698,7 @@
   if (old_buf)
     for (tail = old_buf->local_var_alist; !NILP (tail); tail = XCDR (tail))
       {
-	valcontents = XSYMBOL (XCAR (XCAR (tail)))->value;
+	valcontents = SYMBOL_VALUE (XCAR (XCAR (tail)));
 	if ((BUFFER_LOCAL_VALUEP (valcontents)
 	     || SOME_BUFFER_LOCAL_VALUEP (valcontents))
 	    && (tem = XBUFFER_LOCAL_VALUE (valcontents)->realvalue,
@@ -2260,26 +2260,26 @@
       sym = XCAR (XCAR (alist));
 
       /* Need not do anything if some other buffer's binding is now encached.  */
-      tem = XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->buffer;
+      tem = XBUFFER_LOCAL_VALUE (SYMBOL_VALUE (sym))->buffer;
       if (BUFFERP (tem) && XBUFFER (tem) == current_buffer)
 	{
 	  /* Symbol is set up for this buffer's old local value.
 	     Set it up for the current buffer with the default value.  */
 
-	  tem = XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->cdr;
+	  tem = XBUFFER_LOCAL_VALUE (SYMBOL_VALUE (sym))->cdr;
 	  /* Store the symbol's current value into the alist entry
 	     it is currently set up for.  This is so that, if the
 	     local is marked permanent, and we make it local again
 	     later in Fkill_all_local_variables, we don't lose the value.  */
 	  XCDR (XCAR (tem))
-	    = do_symval_forwarding (XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->realvalue);
+	    = do_symval_forwarding (XBUFFER_LOCAL_VALUE (SYMBOL_VALUE (sym))->realvalue);
 	  /* Switch to the symbol's default-value alist entry.  */
 	  XCAR (tem) = tem;
 	  /* Mark it as current for buffer B.  */
-	  XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->buffer = buffer;
+	  XBUFFER_LOCAL_VALUE (SYMBOL_VALUE (sym))->buffer = buffer;
 	  /* Store the current value into any forwarding in the symbol.  */
 	  store_symval_forwarding (sym,
-				   XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->realvalue,
+				   XBUFFER_LOCAL_VALUE (SYMBOL_VALUE (sym))->realvalue,
 				   XCDR (tem), NULL);
 	}
     }
diff -r ee9c4218a600 -r 6d9fa06012a6 src/coding.c
--- a/src/coding.c	Fri Oct 05 09:49:16 2001 +0000
+++ b/src/coding.c	Fri Oct 05 09:49:39 2001 +0000
@@ -4110,7 +4110,7 @@
   if (! mask)
     idx = CODING_CATEGORY_IDX_RAW_TEXT;
 
-  val = XSYMBOL (XVECTOR (Vcoding_category_table)->contents[idx])->value;
+  val = SYMBOL_VALUE (XVECTOR (Vcoding_category_table)->contents[idx]);
 
   if (coding->eol_type != CODING_EOL_UNDECIDED)
     {
@@ -6881,7 +6881,7 @@
     {
       Lisp_Object val;
 
-      val = XSYMBOL (XVECTOR (Vcoding_category_table)->contents[i])->value;
+      val = SYMBOL_VALUE (XVECTOR (Vcoding_category_table)->contents[i]);
       if (!NILP (val))
 	{
 	  if (! coding_system_table[i])
diff -r ee9c4218a600 -r 6d9fa06012a6 src/fns.c
--- a/src/fns.c	Fri Oct 05 09:49:16 2001 +0000
+++ b/src/fns.c	Fri Oct 05 09:49:39 2001 +0000
@@ -5020,7 +5020,7 @@
 
 	  if (STRING_MULTIBYTE (object))
 	    /* use default, we can't guess correct value */
-	    coding_system = XSYMBOL (XCAR (Vcoding_category_list))->value;
+	    coding_system = SYMBOL_VALUE (XCAR (Vcoding_category_list));
 	  else 
 	    coding_system = Qraw_text;
 	}
diff -r ee9c4218a600 -r 6d9fa06012a6 src/frame.c
--- a/src/frame.c	Fri Oct 05 09:49:16 2001 +0000
+++ b/src/frame.c	Fri Oct 05 09:49:39 2001 +0000
@@ -1915,7 +1915,7 @@
   if (SYMBOLP (prop))
     {
       Lisp_Object valcontents;
-      valcontents = XSYMBOL (prop)->value;
+      valcontents = SYMBOL_VALUE (prop);
       if ((BUFFER_LOCAL_VALUEP (valcontents)
   	   || SOME_BUFFER_LOCAL_VALUEP (valcontents))
 	  && XBUFFER_LOCAL_VALUE (valcontents)->check_frame
diff -r ee9c4218a600 -r 6d9fa06012a6 src/minibuf.c
--- a/src/minibuf.c	Fri Oct 05 09:49:16 2001 +0000
+++ b/src/minibuf.c	Fri Oct 05 09:49:39 2001 +0000
@@ -602,7 +602,7 @@
       Lisp_Object histval;
 
       /* If variable is unbound, make it nil.  */
-      if (EQ (XSYMBOL (Vminibuffer_history_variable)->value, Qunbound))
+      if (EQ (SYMBOL_VALUE (Vminibuffer_history_variable), Qunbound))
 	Fset (Vminibuffer_history_variable, Qnil);
 
       histval = Fsymbol_value (Vminibuffer_history_variable);