From 69b3a14b48dc9b30c6f1a7e44f0ea906e0e93278 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 15 May 1997 18:39:33 +0000 Subject: [PATCH] (Fcopy_sequence): Correctly copy the char-table contents. --- src/fns.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/fns.c b/src/fns.c index 96ce2dafa05..75ece5bf81d 100644 --- a/src/fns.c +++ b/src/fns.c @@ -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))); -- 2.39.2