comparison src/keymap.c @ 7184:caac285c072d

(describe_map_tree): gcpro some things.

7183:b96377c0e49d

     Lisp_Object startmap, shadow, prefix;
     int partial;
     char *title;
     int nomenu;
{
  Lisp_Object maps, seen;
  struct gcpro gcpro1, gcpro2;
  int something = 0;
  char *key_heading
    = "\
key             binding\n\
---             -------\n";

  maps = Faccessible_keymaps (startmap, prefix);
  seen = Qnil;
  GCPRO2 (maps, seen);

  if (nomenu)
    {
      Lisp_Object list;

      something = 1;
    }

  for (; !NILP (maps); maps = Fcdr (maps))
    {
      register Lisp_Object elt, prefix, sub_shadows, tail;

      elt = Fcar (maps);
      prefix = Fcar (elt);

      sub_shadows = Qnil;

7184:caac285c072d

     Lisp_Object startmap, shadow, prefix;
     int partial;
     char *title;
     int nomenu;
{
  Lisp_Object maps, seen, sub_shadows;
  struct gcpro gcpro1, gcpro2, gcpro3;
  int something = 0;
  char *key_heading
    = "\
key             binding\n\
---             -------\n";

  maps = Faccessible_keymaps (startmap, prefix);
  seen = Qnil;
  sub_shadows = Qnil;
  GCPRO3 (maps, seen, sub_shadows);

  if (nomenu)
    {
      Lisp_Object list;

      something = 1;
    }

  for (; !NILP (maps); maps = Fcdr (maps))
    {
      register Lisp_Object elt, prefix, tail;

      elt = Fcar (maps);
      prefix = Fcar (elt);

      sub_shadows = Qnil;