# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 719520066 0
# Node ID 9294095953127a782bd1b93f6106ba7f58460221
# Parent  8c27b145955aabc4791dba8b24d5212a516304b4
	* keymap.c (store_in_keymap): Don't forget to QUIT in the
	keymap-scanning loop.  Don't treat vectors as binding tables if
	they're the wrong length.

	* keymap.c (store_in_keymap): Don't forget to QUIT in the
	keymap-scanning loop.  Don't treat vectors as binding tables if
	they're the wrong length.

diff -r 8c27b145955a -r 929409595312 src/keymap.c
--- a/src/keymap.c	Mon Oct 19 18:39:37 1992 +0000
+++ b/src/keymap.c	Mon Oct 19 18:41:06 1992 +0000
@@ -355,6 +355,8 @@
 	switch (XTYPE (elt))
 	  {
 	  case Lisp_Vector:
+	    if (XVECTOR (elt)->size != DENSE_TABLE_SIZE)
+	      break;
 	    if (XTYPE (idx) == Lisp_Int)
 	      {
 		XVECTOR (elt)->contents[XFASTINT (idx)] = def;
@@ -380,6 +382,8 @@
 	      goto keymap_end;
 	    break;
 	  }
+
+	QUIT;
       }
 
   keymap_end: