From f9d83955380ffdca070609971e4fc4a9517dde49 Mon Sep 17 00:00:00 2001 From: tomo Date: Tue, 28 Nov 2000 03:43:34 +0000 Subject: [PATCH] (XCHAR_OR_CHAR_INT): Always use inline function. Remove redundant type checking assert() - XINT will abort quite nicely. --- src/character.h | 9 --------- 1 file changed, 9 deletions(-) diff --git a/src/character.h b/src/character.h index 26bf1cc..94fa286 100644 --- a/src/character.h +++ b/src/character.h @@ -72,22 +72,13 @@ Functions/macros when MULE is defined: #define CHAR_OR_CHAR_INTP(x) (CHARP (x) || CHAR_INTP (x)) -#ifdef ERROR_CHECK_TYPECHECK - INLINE_HEADER Emchar XCHAR_OR_CHAR_INT (Lisp_Object obj); INLINE_HEADER Emchar XCHAR_OR_CHAR_INT (Lisp_Object obj) { - assert (CHAR_OR_CHAR_INTP (obj)); return CHARP (obj) ? XCHAR (obj) : XINT (obj); } -#else - -#define XCHAR_OR_CHAR_INT(obj) (CHARP ((obj)) ? XCHAR ((obj)) : XINT ((obj))) - -#endif - #define CHECK_CHAR_COERCE_INT(x) do { \ if (CHARP (x)) \ ; \ -- 1.7.10.4