Mercurial > emacs

changeset 7184:caac285c072d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(describe_map_tree): gcpro some things.
author Karl Heuer <kwzh@gnu.org>
date Fri, 29 Apr 1994 02:51:44 +0000
parents b96377c0e49d
children 3d155f671ac2
files src/keymap.c
diffstat 1 files changed, 5 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/keymap.c	Fri Apr 29 01:10:33 1994 +0000
+++ b/src/keymap.c	Fri Apr 29 02:51:44 1994 +0000
@@ -1881,8 +1881,8 @@
      char *title;
      int nomenu;
 {
-  Lisp_Object maps, seen;
-  struct gcpro gcpro1, gcpro2;
+  Lisp_Object maps, seen, sub_shadows;
+  struct gcpro gcpro1, gcpro2, gcpro3;
   int something = 0;
   char *key_heading
     = "\
@@ -1891,7 +1891,8 @@
 
   maps = Faccessible_keymaps (startmap, prefix);
   seen = Qnil;
-  GCPRO2 (maps, seen);
+  sub_shadows = Qnil;
+  GCPRO3 (maps, seen, sub_shadows);
 
   if (nomenu)
     {
@@ -1931,7 +1932,7 @@
 
   for (; !NILP (maps); maps = Fcdr (maps))
     {
-      register Lisp_Object elt, prefix, sub_shadows, tail;
+      register Lisp_Object elt, prefix, tail;
 
       elt = Fcar (maps);
       prefix = Fcar (elt);