Mercurial > emacs

diff src/macros.c @ 49913:eabc4e7986e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fstart_kbd_macro): Remove redundant assignment.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sat, 22 Feb 2003 22:19:31 +0000
parents 282c490f6cd4
children 695cf19ef79e
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;
 	}