summaryrefslogtreecommitdiff
path: root/src/macros.c
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2003-02-22 22:19:31 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2003-02-22 22:19:31 +0000
commit757824637dca03ae3fbb85c4d4c7b0bd07f8bb31 (patch)
treed3169c814cde9799522a63c1ca75fd853e4bb010 /src/macros.c
parentaaa1501b0dc24c02f108b761bc6a4cd90be21fe0 (diff)
downloademacs-757824637dca03ae3fbb85c4d4c7b0bd07f8bb31.tar.gz
(Fstart_kbd_macro): Remove redundant assignment.
Diffstat (limited to 'src/macros.c')
-rw-r--r--src/macros.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/macros.c b/src/macros.c
index 2b50a491ca4..1b23f4b3c8c 100644
--- a/src/macros.c
+++ b/src/macros.c
@@ -119,8 +119,8 @@ macro before appending to it. */)
{
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;
}