aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
authorPaul Eggert2016-05-30 16:09:25 -0700
committerPaul Eggert2016-05-30 16:13:04 -0700
commit237244bbd5ce753bcdf79634561de515bd76c687 (patch)
treefa395a0e84b27c4755d3fc3ff0f06b1bfdd2b693 /src/data.c
parentcb379cbb7fc617f897e7dbc3ce45bf99ea3d1f87 (diff)
downloademacs-237244bbd5ce753bcdf79634561de515bd76c687.tar.gz
emacs-237244bbd5ce753bcdf79634561de515bd76c687.zip
Omit IF_LINT code that no longer seems needed
Nowadays GCC is smarter, or the Emacs code has mutated, or both, and now is as good a time as any to remove uses of IF_LINT that now seem to be unnecessary. * lib-src/emacsclient.c (set_local_socket): * lib-src/movemail.c (main) [MAIL_USE_MAILLOCK && HAVE_TOUCHLOCK]: * src/buffer.c (fix_start_end_in_overlays, fix_overlays_before): * src/casefiddle.c (casify_region): * src/charset.c (load_charset_map): * src/coding.c (decode_coding_object, encode_coding_object): * src/data.c (Fmake_variable_buffer_local, Fmake_local_variable) (cons_to_unsigned, cons_to_signed): * src/frame.c (make_frame, x_set_frame_parameters): * src/keyboard.c (read_event_from_main_queue): * src/regex.c (regex_compile): * src/syntax.c (back_comment): * src/window.c (Frecenter): * src/xfaces.c (Fx_list_fonts): Remove IF_LINT that no longer seems necessary. * src/image.c (png_load_body, jpeg_load_body): Simplify use of IF_LINT. * src/keyboard.c (read_char): Use IF_LINT (volatile) rather than a pragma dance to pacify GCC -Wclobbered. * src/xdisp.c (x_produce_glyphs): Rewrite to avoid need for IF_LINT. * src/xterm.c (x_connection_closed): Now _Noreturn, which should mean we do not need IF_LINT any more. (x_io_error_quitter): Now _Noreturn. Put an 'assume (false)’ at the end, to forestall warnings from older compilers.
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/src/data.c b/src/data.c
index 2574cbbd764..71da916ae74 100644
--- a/src/data.c
+++ b/src/data.c
@@ -1614,8 +1614,8 @@ The function `default-value' gets the default value and `set-default' sets it.
1614{ 1614{
1615 struct Lisp_Symbol *sym; 1615 struct Lisp_Symbol *sym;
1616 struct Lisp_Buffer_Local_Value *blv = NULL; 1616 struct Lisp_Buffer_Local_Value *blv = NULL;
1617 union Lisp_Val_Fwd valcontents IF_LINT (= {LISP_INITIALLY_ZERO}); 1617 union Lisp_Val_Fwd valcontents;
1618 bool forwarded IF_LINT (= 0); 1618 bool forwarded;
1619 1619
1620 CHECK_SYMBOL (variable); 1620 CHECK_SYMBOL (variable);
1621 sym = XSYMBOL (variable); 1621 sym = XSYMBOL (variable);
@@ -1692,8 +1692,8 @@ Instead, use `add-hook' and specify t for the LOCAL argument. */)
1692 (Lisp_Object variable) 1692 (Lisp_Object variable)
1693{ 1693{
1694 Lisp_Object tem; 1694 Lisp_Object tem;
1695 bool forwarded IF_LINT (= 0); 1695 bool forwarded;
1696 union Lisp_Val_Fwd valcontents IF_LINT (= {LISP_INITIALLY_ZERO}); 1696 union Lisp_Val_Fwd valcontents;
1697 struct Lisp_Symbol *sym; 1697 struct Lisp_Symbol *sym;
1698 struct Lisp_Buffer_Local_Value *blv = NULL; 1698 struct Lisp_Buffer_Local_Value *blv = NULL;
1699 1699
@@ -2458,7 +2458,7 @@ uintmax_t
2458cons_to_unsigned (Lisp_Object c, uintmax_t max) 2458cons_to_unsigned (Lisp_Object c, uintmax_t max)
2459{ 2459{
2460 bool valid = 0; 2460 bool valid = 0;
2461 uintmax_t val IF_LINT (= 0); 2461 uintmax_t val;
2462 if (INTEGERP (c)) 2462 if (INTEGERP (c))
2463 { 2463 {
2464 valid = 0 <= XINT (c); 2464 valid = 0 <= XINT (c);
@@ -2511,7 +2511,7 @@ intmax_t
2511cons_to_signed (Lisp_Object c, intmax_t min, intmax_t max) 2511cons_to_signed (Lisp_Object c, intmax_t min, intmax_t max)
2512{ 2512{
2513 bool valid = 0; 2513 bool valid = 0;
2514 intmax_t val IF_LINT (= 0); 2514 intmax_t val;
2515 if (INTEGERP (c)) 2515 if (INTEGERP (c))
2516 { 2516 {
2517 val = XINT (c); 2517 val = XINT (c);