Mercurial > emacs
changeset 9111:b2596f9e624c
(Fsyntax_table_p, describe_syntax): Use type test macros.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Tue, 27 Sep 1994 01:20:25 +0000 |
| parents | c0eefdfd11f4 |
| children | 85182997b9c9 |
| files | src/syntax.c |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/syntax.c Tue Sep 27 01:18:46 1994 +0000 +++ b/src/syntax.c Tue Sep 27 01:20:25 1994 +0000 @@ -111,7 +111,7 @@ (obj) Lisp_Object obj; { - if (XTYPE (obj) == Lisp_Vector && XVECTOR (obj)->size == 0400) + if (VECTORP (obj) && XVECTOR (obj)->size == 0400) return Qt; return Qnil; } @@ -355,7 +355,7 @@ Findent_to (make_number (16), make_number (1)); - if (XTYPE (value) != Lisp_Int) + if (!INTEGERP (value)) { insert_string ("invalid"); return;