changeset 49913:eabc4e7986e9

(Fstart_kbd_macro): Remove redundant assignment.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sat, 22 Feb 2003 22:19:31 +0000
parents e9f8f5a9cef6
children b4b6ede28a6f
files src/macros.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/macros.c	Sat Feb 22 22:18:42 2003 +0000
+++ b/src/macros.c	Sat Feb 22 22:19:31 2003 +0000
@@ -119,8 +119,8 @@
 	{
 	  Lisp_Object c;
 	  c = Faref (current_kboard->Vlast_kbd_macro, make_number (i));
-	  if (cvt && INTEGERP (c) && (XINT (c) & 0x80))
-	    c = XSETFASTINT (c, CHAR_META | (XINT (c) & ~0x80));
+	  if (cvt && NATNUMP (c) && (XFASTINT (c) & 0x80))
+	    XSETFASTINT (c, CHAR_META | (XFASTINT (c) & ~0x80));
 	  current_kboard->kbd_macro_buffer[i] = c;
 	}