From 04be39934fa9dc8c14f557ee462ff2cf292ba4b1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 25 Dec 1994 17:49:39 +0000 Subject: [PATCH] (wrong_type_argument): Use Lisp_Type_Limit. --- src/data.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/data.c b/src/data.c index 24ee967d303..5a4c26e017c 100644 --- a/src/data.c +++ b/src/data.c @@ -104,7 +104,7 @@ wrong_type_argument (predicate, value) /* If VALUE is not even a valid Lisp object, abort here where we can get a backtrace showing where it came from. */ - if ((unsigned int) XGCTYPE (value) > Lisp_Window + 2) + if ((unsigned int) XGCTYPE (value) >= Lisp_Type_Limit) abort (); value = Fsignal (Qwrong_type_argument, Fcons (predicate, Fcons (value, Qnil))); -- 2.39.5