changeset 9304:1fbc46670cb0

(store_function_docstring): Don't use XFASTINT as an lvalue.
author Karl Heuer <kwzh@gnu.org>
date Tue, 04 Oct 1994 15:48:16 +0000
parents 3115ae493c30
children ac077e2a75f1
files src/doc.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/doc.c	Tue Oct 04 15:47:28 1994 +0000
+++ b/src/doc.c	Tue Oct 04 15:48:16 1994 +0000
@@ -262,7 +262,7 @@
 	{
 	  tem = Fcdr (Fcdr (fun));
 	  if (CONSP (tem) && INTEGERP (XCONS (tem)->car))
-	    XFASTINT (XCONS (tem)->car) = offset;
+	    XSETFASTINT (XCONS (tem)->car, offset);
 	}
       else if (EQ (tem, Qmacro))
 	store_function_docstring (XCONS (fun)->cdr, offset);
@@ -274,7 +274,7 @@
       /* This bytecode object must have a slot for the
 	 docstring, since we've found a docstring for it.  */
       if (XVECTOR (fun)->size > COMPILED_DOC_STRING)
-	XFASTINT (XVECTOR (fun)->contents[COMPILED_DOC_STRING]) = offset;
+	XSETFASTINT (XVECTOR (fun)->contents[COMPILED_DOC_STRING], offset);
     }
 }