From 11257d6126d9cad0b00f5e3072581147b73f4ceb Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 8 Feb 1998 21:35:54 +0000 Subject: [PATCH] (RE_TRANSLATE_TYPE): Define as Lisp_Object. (RE_TRANSLATE): Use Faref to examine translate table. --- src/config.in | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/config.in b/src/config.in index 007f24ead5b..e986344ec24 100644 --- a/src/config.in +++ b/src/config.in @@ -347,8 +347,8 @@ Boston, MA 02111-1307, USA. */ #ifdef emacs /* Don't do this for lib-src. */ /* Tell regex.c to use a type compatible with Emacs. */ -#define RE_TRANSLATE_TYPE Lisp_Object * -#define RE_TRANSLATE(TBL, C) XINT ((TBL)[C]) +#define RE_TRANSLATE_TYPE Lisp_Object +#define RE_TRANSLATE(TBL, C) XINT (Faref (TBL, make_number (C))) #endif /* Avoid link-time collision with system mktime if we will use our own. */ -- 2.39.5