Mercurial > emacs

changeset 8103:b0d56b9856c4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fx_create_frame): Add GC protection for local var `f'.
author Paul Reilly <pmr@pajato.com>
date Fri, 01 Jul 1994 07:17:43 +0000
parents 4a3738525ffd
children 5434ea918f34
files src/xfns.c
diffstat 1 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/xfns.c	Fri Jul 01 06:19:16 1994 +0000
+++ b/src/xfns.c	Fri Jul 01 07:17:43 1994 +0000
@@ -2264,6 +2264,7 @@
   long window_prompting = 0;
   int width, height;
   int count = specpdl_ptr - specpdl;
+  struct gcpro gcpro1;
 
   check_x ();
 
@@ -2305,6 +2306,8 @@
     }
 
   XSET (frame, Lisp_Frame, f);
+  GCPRO1 (frame);
+
   f->output_method = output_x_window;
   f->display.x = (struct x_display *) xmalloc (sizeof (struct x_display));
   bzero (f->display.x, sizeof (struct x_display));
@@ -2436,6 +2439,8 @@
   tem = x_get_arg (parms, Qunsplittable, 0, 0, boolean);
   f->no_split = minibuffer_only || EQ (tem, Qt);
 
+  UNGCPRO;
+
   /* It is now ok to make the frame official
      even if we get an error below.
      And the frame needs to be on Vframe_list