Commit 325dfdae authored by Eli Zaretskii's avatar Eli Zaretskii
Browse files

Avoid compilation warnings in optimized builds

* src/process.c (Fmake_network_process):
* src/image.c (xbm_scan, gif_load):
* src/fileio.c (Frename_file):
* src/data.c (Fmake_local_variable):
* src/buffer.c (fix_start_end_in_overlays):
* lib-src/etags.c (process_file_name): Mark variables with UNINIT
to avoid compiler warnings in optimized builds.
parent f7938281
......@@ -1530,7 +1530,7 @@ process_file_name (char *file, language *lang)
fdesc *fdp;
compressor *compr;
char *compressed_name, *uncompressed_name;
char *ext, *real_name UNINIT, *tmp_name;
char *ext, *real_name UNINIT, *tmp_name UNINIT;
int retval;
canonicalize_filename (file);
......@@ -3616,8 +3616,8 @@ void
fix_start_end_in_overlays (register ptrdiff_t start, register ptrdiff_t end)
Lisp_Object overlay;
struct Lisp_Overlay *before_list;
struct Lisp_Overlay *after_list;
struct Lisp_Overlay *before_list UNINIT;
struct Lisp_Overlay *after_list UNINIT;
/* These are either nil, indicating that before_list or after_list
should be assigned, or the cons cell the cdr of which should be
assigned. */
......@@ -1888,7 +1888,7 @@ Instead, use `add-hook' and specify t for the LOCAL argument. */)
(Lisp_Object variable)
Lisp_Object tem;
bool forwarded;
bool forwarded UNINIT;
union Lisp_Val_Fwd valcontents;
struct Lisp_Symbol *sym;
struct Lisp_Buffer_Local_Value *blv = NULL;
......@@ -2296,7 +2296,7 @@ This is what happens in interactive use with M-x. */)
bool plain_rename = (case_only_rename
|| (!NILP (ok_if_already_exists)
&& !INTEGERP (ok_if_already_exists)));
int rename_errno;
int rename_errno UNINIT;
if (!plain_rename)
if (renameat_noreplace (AT_FDCWD, SSDATA (encoded_file),
......@@ -2574,7 +2574,7 @@ xbm_image_p (Lisp_Object object)
static int
xbm_scan (char **s, char *end, char *sval, int *ival)
unsigned char c;
unsigned char c UNINIT;
......@@ -7839,7 +7839,7 @@ gif_load (struct frame *f, struct image *img)
init_color_table ();
#ifndef USE_CAIRO
unsigned long bgcolor;
unsigned long bgcolor UNINIT;
if (STRINGP (specified_bg))
bgcolor = x_alloc_image_color (f, img, specified_bg,
......@@ -3830,7 +3830,7 @@ usage: (make-network-process &rest ARGS) */)
Lisp_Object proc;
Lisp_Object contact;
struct Lisp_Process *p;
const char *portstring;
const char *portstring UNINIT;
ptrdiff_t portstringlen ATTRIBUTE_UNUSED;
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