From: Eli Zaretskii <eliz@gnu.org>
Date: Sun, 12 Aug 2018 16:02:32 +0000 (+0300)
Subject: ; Avoid compilation warnings under -Og
X-Git-Tag: emacs-27.0.90~4584
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d9806a55a05157165dceb48727791954c1656ab1;p=emacs.git

; 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 92566fe3bbe..71eb2a88090 100644
--- 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 ac5edc2cdbd..7af2273f7e9 100644
--- 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 f31d9c21e71..9a0a9babd27 100644
--- 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 f9a73c8ffef..81642ccded3 100644
--- 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 299bba7be4a..ef6047580e6 100644
--- 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];