Mercurial > emacs
changeset 6519:22c56514eeb3
(x_set_frame_parameters, x_get_arg, x_window, Fx_create_frame,
Fx_create_frame): Use assignment, not initialization.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Fri, 25 Mar 1994 00:41:56 +0000 |
| parents | 07ecb7a5c916 |
| children | bbde44df8b9d |
| files | src/xfns.c |
| diffstat | 1 files changed, 15 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xfns.c Fri Mar 25 00:41:29 1994 +0000 +++ b/src/xfns.c Fri Mar 25 00:41:56 1994 +0000 @@ -460,9 +460,10 @@ left = val; else { - register Lisp_Object param_index = Fget (prop, Qx_frame_parameter); - register Lisp_Object old_value = get_frame_param (f, prop); - + register Lisp_Object param_index, old_value; + + param_index = Fget (prop, Qx_frame_parameter); + old_value = get_frame_param (f, prop); store_frame_param (f, prop, val); if (XTYPE (param_index) == Lisp_Int && XINT (param_index) >= 0 @@ -1432,7 +1433,8 @@ /* As a special case, we map the values `true' and `on' to Qt, and `false' and `off' to Qnil. */ { - Lisp_Object lower = Fdowncase (tem); + Lisp_Object lower; + lower = Fdowncase (tem); if (!strcmp (XSTRING (tem)->data, "on") || !strcmp (XSTRING (tem)->data, "true")) return Qt; @@ -1833,11 +1835,12 @@ place where that assumption isn't correct; f->name is set, but the X server hasn't been told. */ { - Lisp_Object name = f->name; + Lisp_Object name; int explicit = f->explicit_name; + f->explicit_name = 0; + name = f->name; f->name = Qnil; - f->explicit_name = 0; x_set_name (f, name, explicit); } @@ -2144,8 +2147,9 @@ /* Make the window appear on the frame and enable display, unless the caller says not to. */ { - Lisp_Object visibility = x_get_arg (parms, Qvisibility, 0, 0, symbol); - + Lisp_Object visibility; + + visibility = x_get_arg (parms, Qvisibility, 0, 0, symbol); if (EQ (visibility, Qunbound)) visibility = Qt; @@ -2384,8 +2388,9 @@ /* Make the window appear on the frame and enable display. */ { - Lisp_Object visibility = x_get_arg (parms, Qvisibility, 0, 0, symbol); - + Lisp_Object visibility; + + visibility = x_get_arg (parms, Qvisibility, 0, 0, symbol); if (EQ (visibility, Qunbound)) visibility = Qt;