summaryrefslogtreecommitdiff
path: root/src/data.c
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-12-25 17:49:39 +0000
committerRichard M. Stallman <rms@gnu.org>1994-12-25 17:49:39 +0000
commitf317b4e563fad075fb73cbf77fa773ed171c65f1 (patch)
treec390297c01631b4dc3f48d23d60f5d68f1ff53b0 /src/data.c
parenta89848618e3e3ea192d6c50f4bcdb1ef5e6c72bc (diff)
downloademacs-f317b4e563fad075fb73cbf77fa773ed171c65f1.tar.gz
(wrong_type_argument): Use Lisp_Type_Limit.
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c2
1 files changed, 1 insertions, 1 deletions
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)));