# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 780635300 0
# Node ID 551c9e4fa12a098d9e425808fbfc08c61c96b803
# Parent  37d46d623ed9eacd7dfbeafac7561aa06f65dd41
(Fself_insert_command): Use type test macros.

diff -r 37d46d623ed9 -r 551c9e4fa12a src/cmds.c
--- a/src/cmds.c	Tue Sep 27 03:07:54 1994 +0000
+++ b/src/cmds.c	Tue Sep 27 03:08:20 1994 +0000
@@ -217,7 +217,7 @@
   CHECK_NUMBER (arg, 0);
 
   /* Barf if the key that invoked this was not a character.  */
-  if (XTYPE (last_command_char) != Lisp_Int)
+  if (!INTEGERP (last_command_char))
     bitch_at_user ();
   else
     while (XINT (arg) > 0)