From a18338601e4a04e90337e1b4143e282a2454fe38 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Sat, 13 Jan 2024 10:18:03 +0100 Subject: [PATCH] Prefer AREF in GET_TRANSLATION_TABLE * src/ccl.c (GET_TRANSLATION_TABLE): Prefer using AREF to depending on vector internals. (cherry picked from commit 1bfc7fd33d78ff29ee62f5a6b7d7769c1f8099c8) --- src/ccl.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/ccl.c b/src/ccl.c index 1d3ad010382..b4dda404b95 100644 --- a/src/ccl.c +++ b/src/ccl.c @@ -873,7 +873,7 @@ static struct ccl_prog_stack ccl_prog_stack_struct[256]; static inline Lisp_Object GET_TRANSLATION_TABLE (int id) { - return XCDR (XVECTOR (Vtranslation_table_vector)->contents[id]); + return XCDR (AREF (Vtranslation_table_vector, id)); } void -- 2.39.5