Mercurial > emacs

changeset 9112:85182997b9c9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(sun_item_create): Use type test macros.
author Karl Heuer <kwzh@gnu.org>
date Tue, 27 Sep 1994 01:21:05 +0000
parents b2596f9e624c
children 766b6288e0f2
files src/sunfns.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/sunfns.c	Tue Sep 27 01:20:25 1994 +0000
+++ b/src/sunfns.c	Tue Sep 27 01:21:05 1994 +0000
@@ -364,9 +364,9 @@
   String = Fcar(Pair);
   CHECK_STRING(String, 0);
   Value = Fcdr(Pair);
-  if(XTYPE(Value) == Lisp_Symbol)
+  if (SYMBOLP (Value))
     Value = XSYMBOL(Value)->value;
-  if(XTYPE(Value) == Lisp_Vector) {
+  if (VECTORP (Value)) {
     submenu = sun_menu_create (Value);
     menu_item = menu_create_item
       (MENU_RELEASE, MENU_PULLRIGHT_ITEM, XSTRING(String)->data, submenu, 0);