aboutsummaryrefslogtreecommitdiffstats
path: root/src/composite.c
diff options
context:
space:
mode:
authorPaul Eggert2014-09-10 17:48:57 -0700
committerPaul Eggert2014-09-10 17:48:57 -0700
commitb3ed13e84d591eeb2f0dde2e7c2558e7abcc66ca (patch)
tree747ac2d7805b50b1c83be62888a367b2f13061e2 /src/composite.c
parentfe252976a18bf7bb66009fa80c1c6f02b124404f (diff)
downloademacs-b3ed13e84d591eeb2f0dde2e7c2558e7abcc66ca.tar.gz
emacs-b3ed13e84d591eeb2f0dde2e7c2558e7abcc66ca.zip
Pacify --enable-gcc-warnings when no window system is used.
These warnings found that subscript error, so they seem worthwhile. * composite.c (char_composable_p): Simplify a bit. * frame.c (x_set_frame_parameters): Add an IF_LINT. * frame.c (x_set_horizontal_scroll_bars, x_set_scroll_bar_height): * frame.h (FRAME_HAS_HORIZONTAL_SCROLL_BARS): * window.c (set_window_scroll_bars): Use USE_HORIZONTAL_SCROLL_BARS for simplicity. * frame.h [! USE_HORIZONTAL_SCROLL_BARS]: Ignore -Wsuggest-attribute=const. * window.h (USE_HORIZONTAL_SCROLL_BARS): New macro. (WINDOW_HAS_HORIZONTAL_SCROLL_BAR): Use it.
Diffstat (limited to 'src/composite.c')
-rw-r--r--src/composite.c25
1 files changed, 10 insertions, 15 deletions
diff --git a/src/composite.c b/src/composite.c
index 66a20759ec6..1b1960d1c4d 100644
--- a/src/composite.c
+++ b/src/composite.c
@@ -928,7 +928,7 @@ static bool
928char_composable_p (int c) 928char_composable_p (int c)
929{ 929{
930 Lisp_Object val; 930 Lisp_Object val;
931 return (c > ' ' 931 return (c > ' '
932 && (c == 0x200C || c == 0x200D 932 && (c == 0x200C || c == 0x200D
933 || (val = CHAR_TABLE_REF (Vunicode_category_table, c), 933 || (val = CHAR_TABLE_REF (Vunicode_category_table, c),
934 (INTEGERP (val) && (XINT (val) <= UNICODE_CATEGORY_So))))); 934 (INTEGERP (val) && (XINT (val) <= UNICODE_CATEGORY_So)))));
@@ -1016,24 +1016,19 @@ composition_compute_stop_pos (struct composition_it *cmp_it, ptrdiff_t charpos,
1016 val = CHAR_TABLE_REF (Vcomposition_function_table, c); 1016 val = CHAR_TABLE_REF (Vcomposition_function_table, c);
1017 if (! NILP (val)) 1017 if (! NILP (val))
1018 { 1018 {
1019 Lisp_Object elt; 1019 for (int ridx = 0; CONSP (val); val = XCDR (val), ridx++)
1020 int ridx;
1021
1022 for (ridx = 0; CONSP (val); val = XCDR (val), ridx++)
1023 { 1020 {
1024 elt = XCAR (val); 1021 Lisp_Object elt = XCAR (val);
1025 if (VECTORP (elt) && ASIZE (elt) == 3 1022 if (VECTORP (elt) && ASIZE (elt) == 3
1026 && NATNUMP (AREF (elt, 1)) 1023 && NATNUMP (AREF (elt, 1))
1027 && charpos - 1 - XFASTINT (AREF (elt, 1)) >= start) 1024 && charpos - 1 - XFASTINT (AREF (elt, 1)) >= start)
1028 break; 1025 {
1029 } 1026 cmp_it->rule_idx = ridx;
1030 if (CONSP (val)) 1027 cmp_it->lookback = XFASTINT (AREF (elt, 1));
1031 { 1028 cmp_it->stop_pos = charpos - 1 - cmp_it->lookback;
1032 cmp_it->rule_idx = ridx; 1029 cmp_it->ch = c;
1033 cmp_it->lookback = XFASTINT (AREF (elt, 1)); 1030 return;
1034 cmp_it->stop_pos = charpos - 1 - cmp_it->lookback; 1031 }
1035 cmp_it->ch = c;
1036 return;
1037 } 1032 }
1038 } 1033 }
1039 } 1034 }