changeset 7871:11fae1619e42

(single_keymap_panes): gcpro some things.
author Karl Heuer <kwzh@gnu.org>
date Mon, 13 Jun 1994 20:56:30 +0000
parents 537930034e73
children 00d9f3adb17b
files src/xmenu.c
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/xmenu.c	Mon Jun 13 20:41:21 1994 +0000
+++ b/src/xmenu.c	Mon Jun 13 20:56:30 1994 +0000
@@ -490,7 +490,9 @@
 		  else
 		    {
 		      Lisp_Object submap;
+		      GCPRO4 (keymap, pending_maps, descrip, item_string);
 		      submap = get_keymap_1 (def, 0, 1);
+		      UNGCPRO;
 #ifndef USE_X_TOOLKIT
 		      /* Indicate visually that this is a submenu.  */
 		      if (!NILP (submap))
@@ -555,7 +557,9 @@
 		      else
 			{
 			  Lisp_Object submap;
+			  GCPRO4 (keymap, pending_maps, descrip, item_string);
 			  submap = get_keymap_1 (def, 0, 1);
+			  UNGCPRO;
 #ifndef USE_X_TOOLKIT
 			  if (!NILP (submap))
 			    item_string = concat2 (item_string,