aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorPaul Eggert2014-08-01 08:12:01 -0700
committerPaul Eggert2014-08-01 08:12:01 -0700
commit3ee7618cf19fc8334e8fccdcf2eff01786426a64 (patch)
tree70d424b004d23990f8d82ef5e645d024cfbe19d9 /src
parentf0316e9c5de6efb8b9b18721696d23722466aa62 (diff)
downloademacs-3ee7618cf19fc8334e8fccdcf2eff01786426a64.tar.gz
emacs-3ee7618cf19fc8334e8fccdcf2eff01786426a64.zip
Make functions static that no longer need to be extern.
* frame.c, frame.h (set_menu_bar_lines): * keyboard.c (Qleftmost, Qrightmost): * xfns.c, frame.h, menu.h (x_set_menu_bar_lines, x_set_tool_bar_lines) (x_set_internal_border_width): Now static.
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog9
-rw-r--r--src/frame.c2
-rw-r--r--src/frame.h16
-rw-r--r--src/keyboard.c3
-rw-r--r--src/menu.h4
-rw-r--r--src/xfns.c8
6 files changed, 22 insertions, 20 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index c28f8a607aa..d9f974cce5d 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,12 @@
12014-08-01 Paul Eggert <eggert@cs.ucla.edu>
2
3 Make functions static that no longer need to be extern.
4 * frame.c, frame.h (set_menu_bar_lines):
5 * keyboard.c (Qleftmost, Qrightmost):
6 * xfns.c, frame.h, menu.h (x_set_menu_bar_lines, x_set_tool_bar_lines)
7 (x_set_internal_border_width):
8 Now static.
9
12014-08-01 Eli Zaretskii <eliz@gnu.org> 102014-08-01 Eli Zaretskii <eliz@gnu.org>
2 11
3 Fix display of R2L lines when the last character fits only partially. 12 Fix display of R2L lines when the last character fits only partially.
diff --git a/src/frame.c b/src/frame.c
index 5dea57aece8..457024f3ca2 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -256,7 +256,7 @@ set_menu_bar_lines_1 (Lisp_Object window, int n)
256 } 256 }
257} 257}
258 258
259void 259static void
260set_menu_bar_lines (struct frame *f, Lisp_Object value, Lisp_Object oldval) 260set_menu_bar_lines (struct frame *f, Lisp_Object value, Lisp_Object oldval)
261{ 261{
262 int nlines; 262 int nlines;
diff --git a/src/frame.h b/src/frame.h
index 51597c4bcdb..5d45dbfb268 100644
--- a/src/frame.h
+++ b/src/frame.h
@@ -45,9 +45,9 @@ enum fullscreen_type
45 FULLSCREEN_HEIGHT = 0x2, 45 FULLSCREEN_HEIGHT = 0x2,
46 FULLSCREEN_BOTH = 0x3, /* Not a typo but means "width and height". */ 46 FULLSCREEN_BOTH = 0x3, /* Not a typo but means "width and height". */
47 FULLSCREEN_MAXIMIZED = 0x4, 47 FULLSCREEN_MAXIMIZED = 0x4,
48#ifdef HAVE_NTGUI 48#ifdef HAVE_NTGUI
49 FULLSCREEN_WAIT = 0x8 49 FULLSCREEN_WAIT = 0x8
50#endif 50#endif
51}; 51};
52 52
53#endif /* HAVE_WINDOW_SYSTEM */ 53#endif /* HAVE_WINDOW_SYSTEM */
@@ -161,7 +161,7 @@ struct frame
161 /* Desired and current tool-bar items. */ 161 /* Desired and current tool-bar items. */
162 Lisp_Object tool_bar_items; 162 Lisp_Object tool_bar_items;
163 163
164#ifdef USE_GTK 164#ifdef USE_GTK
165 /* Where tool bar is, can be left, right, top or bottom. 165 /* Where tool bar is, can be left, right, top or bottom.
166 Except with GTK, the only supported position is `top'. */ 166 Except with GTK, the only supported position is `top'. */
167 Lisp_Object tool_bar_position; 167 Lisp_Object tool_bar_position;
@@ -185,7 +185,7 @@ struct frame
185 /* Number of elements in `menu_bar_vector' that have meaningful data. */ 185 /* Number of elements in `menu_bar_vector' that have meaningful data. */
186 int menu_bar_items_used; 186 int menu_bar_items_used;
187 187
188#if defined (USE_X_TOOLKIT) || defined (HAVE_NTGUI) 188#if defined (USE_X_TOOLKIT) || defined (HAVE_NTGUI)
189 /* A buffer to hold the frame's name. Since this is used by the 189 /* A buffer to hold the frame's name. Since this is used by the
190 window system toolkit, we can't use the Lisp string's pointer 190 window system toolkit, we can't use the Lisp string's pointer
191 (`name', above) because it might get relocated. */ 191 (`name', above) because it might get relocated. */
@@ -1089,7 +1089,6 @@ extern Lisp_Object Qtty_color_mode;
1089extern Lisp_Object Qterminal; 1089extern Lisp_Object Qterminal;
1090extern Lisp_Object Qnoelisp; 1090extern Lisp_Object Qnoelisp;
1091 1091
1092extern void set_menu_bar_lines (struct frame *, Lisp_Object, Lisp_Object);
1093extern struct frame *decode_window_system_frame (Lisp_Object); 1092extern struct frame *decode_window_system_frame (Lisp_Object);
1094extern struct frame *decode_live_frame (Lisp_Object); 1093extern struct frame *decode_live_frame (Lisp_Object);
1095extern struct frame *decode_any_frame (Lisp_Object); 1094extern struct frame *decode_any_frame (Lisp_Object);
@@ -1108,7 +1107,7 @@ extern void check_window_system (struct frame *);
1108extern void frame_make_pointer_invisible (struct frame *); 1107extern void frame_make_pointer_invisible (struct frame *);
1109extern void frame_make_pointer_visible (struct frame *); 1108extern void frame_make_pointer_visible (struct frame *);
1110extern Lisp_Object delete_frame (Lisp_Object, Lisp_Object); 1109extern Lisp_Object delete_frame (Lisp_Object, Lisp_Object);
1111extern bool frame_inhibit_resize (struct frame *, bool); 1110extern bool frame_inhibit_resize (struct frame *, bool);
1112extern void adjust_frame_size (struct frame *, int, int, int, bool); 1111extern void adjust_frame_size (struct frame *, int, int, int, bool);
1113 1112
1114extern Lisp_Object Vframe_list; 1113extern Lisp_Object Vframe_list;
@@ -1309,7 +1308,7 @@ extern Lisp_Object Vframe_list;
1309 ((height) \ 1308 ((height) \
1310 - FRAME_TOP_MARGIN_HEIGHT (f) \ 1309 - FRAME_TOP_MARGIN_HEIGHT (f) \
1311 - FRAME_SCROLL_BAR_AREA_HEIGHT (f) \ 1310 - FRAME_SCROLL_BAR_AREA_HEIGHT (f) \
1312 - 2 * FRAME_INTERNAL_BORDER_WIDTH (f)) 1311 - 2 * FRAME_INTERNAL_BORDER_WIDTH (f))
1313 1312
1314/* Return the width/height reserved for the windows of frame F. */ 1313/* Return the width/height reserved for the windows of frame F. */
1315#define FRAME_WINDOWS_WIDTH(f) \ 1314#define FRAME_WINDOWS_WIDTH(f) \
@@ -1393,8 +1392,6 @@ extern void x_set_font_backend (struct frame *, Lisp_Object, Lisp_Object);
1393extern void x_set_left_fringe (struct frame *, Lisp_Object, Lisp_Object); 1392extern void x_set_left_fringe (struct frame *, Lisp_Object, Lisp_Object);
1394extern void x_set_right_fringe (struct frame *, Lisp_Object, Lisp_Object); 1393extern void x_set_right_fringe (struct frame *, Lisp_Object, Lisp_Object);
1395extern void x_set_border_width (struct frame *, Lisp_Object, Lisp_Object); 1394extern void x_set_border_width (struct frame *, Lisp_Object, Lisp_Object);
1396extern void x_set_internal_border_width (struct frame *, Lisp_Object,
1397 Lisp_Object);
1398extern void x_set_right_divider_width (struct frame *, Lisp_Object, 1395extern void x_set_right_divider_width (struct frame *, Lisp_Object,
1399 Lisp_Object); 1396 Lisp_Object);
1400extern void x_set_bottom_divider_width (struct frame *, Lisp_Object, 1397extern void x_set_bottom_divider_width (struct frame *, Lisp_Object,
@@ -1429,7 +1426,6 @@ extern void x_make_frame_visible (struct frame *f);
1429extern void x_make_frame_invisible (struct frame *f); 1426extern void x_make_frame_invisible (struct frame *f);
1430extern void x_iconify_frame (struct frame *f); 1427extern void x_iconify_frame (struct frame *f);
1431extern void x_set_frame_alpha (struct frame *f); 1428extern void x_set_frame_alpha (struct frame *f);
1432extern void x_set_tool_bar_lines (struct frame *, Lisp_Object, Lisp_Object);
1433extern void x_activate_menubar (struct frame *); 1429extern void x_activate_menubar (struct frame *);
1434extern void x_real_positions (struct frame *, int *, int *); 1430extern void x_real_positions (struct frame *, int *, int *);
1435extern void free_frame_menubar (struct frame *); 1431extern void free_frame_menubar (struct frame *);
diff --git a/src/keyboard.c b/src/keyboard.c
index a684f18c756..81b68ab343c 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -5164,7 +5164,8 @@ static const char *const lispy_drag_n_drop_names[] =
5164static Lisp_Object Qabove_handle, Qhandle, Qbelow_handle; 5164static Lisp_Object Qabove_handle, Qhandle, Qbelow_handle;
5165static Lisp_Object Qbefore_handle, Qhorizontal_handle, Qafter_handle; 5165static Lisp_Object Qbefore_handle, Qhorizontal_handle, Qafter_handle;
5166Lisp_Object Qup, Qdown, Qtop, Qbottom; 5166Lisp_Object Qup, Qdown, Qtop, Qbottom;
5167Lisp_Object Qleft, Qright, Qleftmost, Qrightmost; 5167Lisp_Object Qleft, Qright;
5168static Lisp_Object Qleftmost, Qrightmost;
5168static Lisp_Object Qend_scroll; 5169static Lisp_Object Qend_scroll;
5169static Lisp_Object Qratio; 5170static Lisp_Object Qratio;
5170 5171
diff --git a/src/menu.h b/src/menu.h
index 30a89bead26..4dd7f17dca6 100644
--- a/src/menu.h
+++ b/src/menu.h
@@ -34,10 +34,6 @@ enum {
34 MENU_KBD_NAVIGATION = 0x4 34 MENU_KBD_NAVIGATION = 0x4
35}; 35};
36 36
37extern void x_set_menu_bar_lines (struct frame *f,
38 Lisp_Object value,
39 Lisp_Object oldval);
40
41extern void init_menu_items (void); 37extern void init_menu_items (void);
42extern void finish_menu_items (void) ATTRIBUTE_CONST; 38extern void finish_menu_items (void) ATTRIBUTE_CONST;
43extern void discard_menu_items (void); 39extern void discard_menu_items (void);
diff --git a/src/xfns.c b/src/xfns.c
index 1787d0297e6..0c07d6cb03d 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -965,7 +965,7 @@ x_set_icon_name (struct frame *f, Lisp_Object arg, Lisp_Object oldval)
965} 965}
966 966
967 967
968void 968static void
969x_set_menu_bar_lines (struct frame *f, Lisp_Object value, Lisp_Object oldval) 969x_set_menu_bar_lines (struct frame *f, Lisp_Object value, Lisp_Object oldval)
970{ 970{
971 int nlines; 971 int nlines;
@@ -1060,7 +1060,7 @@ x_set_menu_bar_lines (struct frame *f, Lisp_Object value, Lisp_Object oldval)
1060 height of all windows on frame F to match the new tool bar height. 1060 height of all windows on frame F to match the new tool bar height.
1061 The frame's height doesn't change. */ 1061 The frame's height doesn't change. */
1062 1062
1063void 1063static void
1064x_set_tool_bar_lines (struct frame *f, Lisp_Object value, Lisp_Object oldval) 1064x_set_tool_bar_lines (struct frame *f, Lisp_Object value, Lisp_Object oldval)
1065{ 1065{
1066 int nlines; 1066 int nlines;
@@ -1149,7 +1149,7 @@ x_change_tool_bar_height (struct frame *f, int height)
1149} 1149}
1150 1150
1151 1151
1152void 1152static void
1153x_set_internal_border_width (struct frame *f, Lisp_Object arg, Lisp_Object oldval) 1153x_set_internal_border_width (struct frame *f, Lisp_Object arg, Lisp_Object oldval)
1154{ 1154{
1155 int border; 1155 int border;
@@ -1172,7 +1172,7 @@ x_set_internal_border_width (struct frame *f, Lisp_Object arg, Lisp_Object oldva
1172 1172
1173#ifdef USE_GTK 1173#ifdef USE_GTK
1174 xg_clear_under_internal_border (f); 1174 xg_clear_under_internal_border (f);
1175#else 1175#else
1176 x_clear_under_internal_border (f); 1176 x_clear_under_internal_border (f);
1177#endif 1177#endif
1178 } 1178 }