aboutsummaryrefslogtreecommitdiffstats
path: root/src/syntax.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/syntax.c')
-rw-r--r--src/syntax.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/syntax.c b/src/syntax.c
index 1aba174f7bb..14187b1d8cd 100644
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -111,7 +111,7 @@ Any vector of 256 elements will do.")
111 (obj) 111 (obj)
112 Lisp_Object obj; 112 Lisp_Object obj;
113{ 113{
114 if (XTYPE (obj) == Lisp_Vector && XVECTOR (obj)->size == 0400) 114 if (VECTORP (obj) && XVECTOR (obj)->size == 0400)
115 return Qt; 115 return Qt;
116 return Qnil; 116 return Qnil;
117} 117}
@@ -355,7 +355,7 @@ describe_syntax (value)
355 355
356 Findent_to (make_number (16), make_number (1)); 356 Findent_to (make_number (16), make_number (1));
357 357
358 if (XTYPE (value) != Lisp_Int) 358 if (!INTEGERP (value))
359 { 359 {
360 insert_string ("invalid"); 360 insert_string ("invalid");
361 return; 361 return;