From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 8 Feb 1998 21:35:54 +0000 (+0000)
Subject: (RE_TRANSLATE_TYPE): Define as Lisp_Object.
X-Git-Tag: emacs-20.3~2203
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=11257d6126d9cad0b00f5e3072581147b73f4ceb;p=emacs.git

(RE_TRANSLATE_TYPE): Define as Lisp_Object.
(RE_TRANSLATE): Use Faref to examine translate table.
---

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.  */