; Avoid compilation warnings under -Og

* src/w32.c (w32_read_registry):
* src/font.c (font_parse_fcname):
* src/fns.c (Fnconc):
* src/editfns.c (tzlookup):
* src/frame.c (x_set_frame_parameters): Avoid compiler warnings
about maybe-uninitialized variables.

diff --git a/src/editfns.c b/src/editfns.c
index 92566fe3bbedddb0aa27b6e02cc6a3de606528d5..71eb2a880900a3f1eeee0b928335664def593750 100644 (file)
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -174,7 +174,7 @@ tzlookup (Lisp_Object zone, bool settz)
       else if (plain_integer || (CONSP (zone) && FIXNUMP (XCAR (zone))
                                 && CONSP (XCDR (zone))))
        {
-         Lisp_Object abbr;
+         Lisp_Object abbr = Qnil;
          if (!plain_integer)
            {
              abbr = XCAR (XCDR (zone));

diff --git a/src/fns.c b/src/fns.c
index ac5edc2cdbdf2b86b11836ecc7ccef040381fb8a..7af2273f7e9e4e647e00a9c05e923e84fdb33156 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -2522,7 +2522,7 @@ usage: (nconc &rest LISTS)  */)
 
       CHECK_CONS (tem);
 
-      Lisp_Object tail;
+      Lisp_Object tail = Qnil;
       FOR_EACH_TAIL (tem)
        tail = tem;
 

diff --git a/src/font.c b/src/font.c
index f31d9c21e71bf63410dfe894b5c49b952ac76328..9a0a9babd2769aeb1061d9b51eb12a94874dcd08 100644 (file)
--- a/src/font.c
+++ b/src/font.c
@@ -1468,7 +1468,7 @@ font_parse_fcname (char *name, ptrdiff_t len, Lisp_Object font)
              else
                {
                  /* KEY=VAL pairs  */
-                 Lisp_Object key;
+                 Lisp_Object key = Qnil;
                  int prop;
 
                  if (q - p == 10 && memcmp (p + 1, "pixelsize", 9) == 0)

diff --git a/src/frame.c b/src/frame.c
index f9a73c8ffeff76925611c20ecbbc448c3754b713..81642ccded31581955a3a2b58347b85dc5b24b60 100644 (file)
--- a/src/frame.c
+++ b/src/frame.c
@@ -3798,7 +3798,7 @@ x_set_frame_parameters (struct frame *f, Lisp_Object alist)
   Lisp_Object icon_left, icon_top;
 
   /* And with this.  */
-  Lisp_Object fullscreen;
+  Lisp_Object fullscreen = Qnil;
   bool fullscreen_change = false;
 
   /* Record in these vectors all the parms specified.  */

diff --git a/src/w32.c b/src/w32.c
index 299bba7be4ae61cb880bc1f3597492ffc1a586b5..ef6047580e6421bea8c787d81df83d03625cfd8e 100644 (file)
--- a/src/w32.c
+++ b/src/w32.c
@@ -9358,7 +9358,7 @@ w32_read_registry (HKEY rootkey, Lisp_Object lkey, Lisp_Object lname)
   DWORD vsize, vtype;
   LPBYTE pvalue;
   Lisp_Object val, retval;
-  const char *key, *value_name;
+  const char *key, *value_name = NULL;
   /* The following sizes are according to size limitations
      documented in MSDN.  */
   wchar_t key_w[255+1];