Commit 5878523b authored by Richard M. Stallman's avatar Richard M. Stallman

(x_set_frame_parameters): gcpro as needed.

parent 35fc36a1
......@@ -688,6 +688,8 @@ x_set_frame_parameters (f, alist)
int left_no_change = 0, top_no_change = 0;
int icon_left_no_change = 0, icon_top_no_change = 0;
struct gcpro gcpro1, gcpro2;
i = 0;
for (tail = alist; CONSP (tail); tail = Fcdr (tail))
i++;
......@@ -708,6 +710,15 @@ x_set_frame_parameters (f, alist)
i++;
}
/* TAIL and ALIST are not used again below here. */
alist = tail = Qnil;
GCPRO2 (*parms, *values);
gcpro1.nvars = i;
gcpro2.nvars = i;
/* There is no need to gcpro LEFT, TOP, ICON_LEFT, or ICON_TOP,
because their values appear in VALUES and strings are not valid. */
top = left = Qunbound;
icon_left = icon_top = Qunbound;
......@@ -871,6 +882,8 @@ x_set_frame_parameters (f, alist)
&& ! (icon_left_no_change && icon_top_no_change))
x_wm_set_icon_position (f, XINT (icon_left), XINT (icon_top));
}
UNGCPRO;
}
/* Store the screen positions of frame F into XPTR and YPTR.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment