Commit 69b3a14b authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Fcopy_sequence): Correctly copy the char-table contents.

parent 859f2b3c
......@@ -330,7 +330,7 @@ with the original.")
copy = Fmake_char_table (XCHAR_TABLE (arg)->purpose, Qnil);
/* Copy all the slots, including the extra ones. */
bcopy (XCHAR_TABLE (arg)->contents, XCHAR_TABLE (copy)->contents,
bcopy (XVECTOR (arg)->contents, XVECTOR (copy)->contents,
((XCHAR_TABLE (arg)->size & PSEUDOVECTOR_SIZE_MASK)
* sizeof (Lisp_Object)));
......
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