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)));