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)
{
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 @@ store_function_docstring (fun, offset)
/* 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);
}
}
......
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