From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 2 Aug 1993 07:29:53 +0000 (+0000)
Subject: (read_key_sequence): Use XFASTINT to convert value
X-Git-Tag: emacs-19.34~11434
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2e864a763bb79b47b520e426d6282d2ffa2d8420;p=emacs.git

(read_key_sequence): Use XFASTINT to convert value
of Flength to an int.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index 9614a967b89..c8e9e824b34 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -4212,7 +4212,7 @@ read_key_sequence (keybuf, bufsize, prompt)
 	      if ((VECTORP (fkey_next) || STRINGP (fkey_next))
 		  && fkey_end == t)
 		{
-		  int len = Flength (fkey_next);
+		  int len = XFASTINT (Flength (fkey_next));
 
 		  t = fkey_start + len;
 		  if (t >= bufsize)
@@ -4284,7 +4284,7 @@ read_key_sequence (keybuf, bufsize, prompt)
 	    if ((VECTORP (keytran_next) || STRINGP (keytran_next))
 		&& keytran_end == t)
 	      {
-		int len = Flength (keytran_next);
+		int len = XFASTINT (Flength (keytran_next));
 
 		t = keytran_start + len;
 		if (t >= bufsize)