Commit 2ee7863a authored by Karl Heuer's avatar Karl Heuer
Browse files

(store_function_docstring): Don't use XFASTINT as an lvalue.

parent a5d8b611
...@@ -262,7 +262,7 @@ store_function_docstring (fun, offset) ...@@ -262,7 +262,7 @@ store_function_docstring (fun, offset)
{ {
tem = Fcdr (Fcdr (fun)); tem = Fcdr (Fcdr (fun));
if (CONSP (tem) && INTEGERP (XCONS (tem)->car)) if (CONSP (tem) && INTEGERP (XCONS (tem)->car))
XFASTINT (XCONS (tem)->car) = offset; XSETFASTINT (XCONS (tem)->car, offset);
} }
else if (EQ (tem, Qmacro)) else if (EQ (tem, Qmacro))
store_function_docstring (XCONS (fun)->cdr, offset); store_function_docstring (XCONS (fun)->cdr, offset);
...@@ -274,7 +274,7 @@ store_function_docstring (fun, offset) ...@@ -274,7 +274,7 @@ store_function_docstring (fun, offset)
/* This bytecode object must have a slot for the /* This bytecode object must have a slot for the
docstring, since we've found a docstring for it. */ docstring, since we've found a docstring for it. */
if (XVECTOR (fun)->size > COMPILED_DOC_STRING) if (XVECTOR (fun)->size > COMPILED_DOC_STRING)
XFASTINT (XVECTOR (fun)->contents[COMPILED_DOC_STRING]) = offset; XSETFASTINT (XVECTOR (fun)->contents[COMPILED_DOC_STRING], offset);
} }
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment