changeset 20871:adb8a0943fc1

(RE_TRANSLATE_TYPE): Define as Lisp_Object. (RE_TRANSLATE): Use Faref to examine translate table.
author Richard M. Stallman <rms@gnu.org>
date Sun, 08 Feb 1998 21:35:54 +0000
parents 3b8d9a7be50c
children 431f875501a6
files src/config.in
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/config.in	Sun Feb 08 21:35:14 1998 +0000
+++ b/src/config.in	Sun Feb 08 21:35:54 1998 +0000
@@ -347,8 +347,8 @@
 
 #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.  */