aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/charset.c2
-rw-r--r--src/coding.c6
-rw-r--r--src/frame.c2
-rw-r--r--src/lisp.h12
-rw-r--r--src/window.c2
5 files changed, 12 insertions, 12 deletions
diff --git a/src/charset.c b/src/charset.c
index ff937bc5a13..09520ccc2ad 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -241,7 +241,7 @@ struct charset_map_entries
241static void 241static void
242load_charset_map (struct charset *charset, struct charset_map_entries *entries, int n_entries, int control_flag) 242load_charset_map (struct charset *charset, struct charset_map_entries *entries, int n_entries, int control_flag)
243{ 243{
244 Lisp_Object vec; 244 Lisp_Object vec UNINIT;
245 Lisp_Object table UNINIT; 245 Lisp_Object table UNINIT;
246 unsigned max_code = CHARSET_MAX_CODE (charset); 246 unsigned max_code = CHARSET_MAX_CODE (charset);
247 bool ascii_compatible_p = charset->ascii_compatible_p; 247 bool ascii_compatible_p = charset->ascii_compatible_p;
diff --git a/src/coding.c b/src/coding.c
index feed9c8274c..f2a92c940b7 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -8028,12 +8028,12 @@ decode_coding_object (struct coding_system *coding,
8028 Lisp_Object dst_object) 8028 Lisp_Object dst_object)
8029{ 8029{
8030 ptrdiff_t count = SPECPDL_INDEX (); 8030 ptrdiff_t count = SPECPDL_INDEX ();
8031 unsigned char *destination; 8031 unsigned char *destination UNINIT;
8032 ptrdiff_t dst_bytes; 8032 ptrdiff_t dst_bytes UNINIT;
8033 ptrdiff_t chars = to - from; 8033 ptrdiff_t chars = to - from;
8034 ptrdiff_t bytes = to_byte - from_byte; 8034 ptrdiff_t bytes = to_byte - from_byte;
8035 Lisp_Object attrs; 8035 Lisp_Object attrs;
8036 ptrdiff_t saved_pt = -1, saved_pt_byte; 8036 ptrdiff_t saved_pt = -1, saved_pt_byte UNINIT;
8037 bool need_marker_adjustment = 0; 8037 bool need_marker_adjustment = 0;
8038 Lisp_Object old_deactivate_mark; 8038 Lisp_Object old_deactivate_mark;
8039 8039
diff --git a/src/frame.c b/src/frame.c
index 652d58440fa..70ae309fe20 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -611,7 +611,7 @@ make_frame (bool mini_p)
611{ 611{
612 Lisp_Object frame; 612 Lisp_Object frame;
613 struct frame *f; 613 struct frame *f;
614 struct window *rw, *mw; 614 struct window *rw, *mw UNINIT;
615 Lisp_Object root_window; 615 Lisp_Object root_window;
616 Lisp_Object mini_window; 616 Lisp_Object mini_window;
617 617
diff --git a/src/lisp.h b/src/lisp.h
index 061cf179f96..79b208a333b 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1837,19 +1837,19 @@ INLINE Lisp_Object
1837INLINE struct Lisp_Symbol * 1837INLINE struct Lisp_Symbol *
1838SYMBOL_ALIAS (struct Lisp_Symbol *sym) 1838SYMBOL_ALIAS (struct Lisp_Symbol *sym)
1839{ 1839{
1840 eassert (sym->redirect == SYMBOL_VARALIAS); 1840 eassume (sym->redirect == SYMBOL_VARALIAS && sym->val.alias);
1841 return sym->val.alias; 1841 return sym->val.alias;
1842} 1842}
1843INLINE struct Lisp_Buffer_Local_Value * 1843INLINE struct Lisp_Buffer_Local_Value *
1844SYMBOL_BLV (struct Lisp_Symbol *sym) 1844SYMBOL_BLV (struct Lisp_Symbol *sym)
1845{ 1845{
1846 eassert (sym->redirect == SYMBOL_LOCALIZED); 1846 eassume (sym->redirect == SYMBOL_LOCALIZED && sym->val.blv);
1847 return sym->val.blv; 1847 return sym->val.blv;
1848} 1848}
1849INLINE union Lisp_Fwd * 1849INLINE union Lisp_Fwd *
1850SYMBOL_FWD (struct Lisp_Symbol *sym) 1850SYMBOL_FWD (struct Lisp_Symbol *sym)
1851{ 1851{
1852 eassert (sym->redirect == SYMBOL_FORWARDED); 1852 eassume (sym->redirect == SYMBOL_FORWARDED && sym->val.fwd);
1853 return sym->val.fwd; 1853 return sym->val.fwd;
1854} 1854}
1855 1855
@@ -1862,19 +1862,19 @@ INLINE void
1862INLINE void 1862INLINE void
1863SET_SYMBOL_ALIAS (struct Lisp_Symbol *sym, struct Lisp_Symbol *v) 1863SET_SYMBOL_ALIAS (struct Lisp_Symbol *sym, struct Lisp_Symbol *v)
1864{ 1864{
1865 eassert (sym->redirect == SYMBOL_VARALIAS); 1865 eassume (sym->redirect == SYMBOL_VARALIAS && v);
1866 sym->val.alias = v; 1866 sym->val.alias = v;
1867} 1867}
1868INLINE void 1868INLINE void
1869SET_SYMBOL_BLV (struct Lisp_Symbol *sym, struct Lisp_Buffer_Local_Value *v) 1869SET_SYMBOL_BLV (struct Lisp_Symbol *sym, struct Lisp_Buffer_Local_Value *v)
1870{ 1870{
1871 eassert (sym->redirect == SYMBOL_LOCALIZED); 1871 eassume (sym->redirect == SYMBOL_LOCALIZED && v);
1872 sym->val.blv = v; 1872 sym->val.blv = v;
1873} 1873}
1874INLINE void 1874INLINE void
1875SET_SYMBOL_FWD (struct Lisp_Symbol *sym, union Lisp_Fwd *v) 1875SET_SYMBOL_FWD (struct Lisp_Symbol *sym, union Lisp_Fwd *v)
1876{ 1876{
1877 eassert (sym->redirect == SYMBOL_FORWARDED); 1877 eassume (sym->redirect == SYMBOL_FORWARDED && v);
1878 sym->val.fwd = v; 1878 sym->val.fwd = v;
1879} 1879}
1880 1880
diff --git a/src/window.c b/src/window.c
index c3e693182c6..6cfba084493 100644
--- a/src/window.c
+++ b/src/window.c
@@ -5683,7 +5683,7 @@ and redisplay normally--don't erase and redraw the frame. */)
5683 struct buffer *buf = XBUFFER (w->contents); 5683 struct buffer *buf = XBUFFER (w->contents);
5684 bool center_p = false; 5684 bool center_p = false;
5685 ptrdiff_t charpos, bytepos; 5685 ptrdiff_t charpos, bytepos;
5686 EMACS_INT iarg; 5686 EMACS_INT iarg UNINIT;
5687 int this_scroll_margin; 5687 int this_scroll_margin;
5688 5688
5689 if (buf != current_buffer) 5689 if (buf != current_buffer)