summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/ChangeLog10
-rw-r--r--src/w32fns.c6
-rw-r--r--src/w32font.c2
-rw-r--r--src/w32inevt.c2
-rw-r--r--src/w32menu.c3
-rw-r--r--src/w32proc.c16
-rw-r--r--src/w32term.c2
7 files changed, 26 insertions, 15 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index ca271d8e2a7..639759bf384 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,13 @@
+2010-10-14 Juanma Barranquero <lekktu@gmail.com>
+
+ * w32fns.c (w32_wnd_proc, file_dialog_callback):
+ * w32font.c (w32_generic_family):
+ * w32inevt.c (key_event):
+ * w32menu.c (fill_in_menu):
+ * w32proc.c (reader_thread, w32_executable_type, compare_env)
+ (merge_and_sort_env, int_from_hex, enum_locale_fn, enum_codepage_fn):
+ * w32term.c (w32_read_socket): Make static.
+
2010-10-13 Juanma Barranquero <lekktu@gmail.com>
* image.c (DEF_IMGLIB_FN): Add argument to adapt to strict
diff --git a/src/w32fns.c b/src/w32fns.c
index 5e5f11c813d..b05643821f1 100644
--- a/src/w32fns.c
+++ b/src/w32fns.c
@@ -1900,7 +1900,7 @@ w32_load_cursor (LPCTSTR name)
return cursor;
}
-extern LRESULT CALLBACK w32_wnd_proc (HWND, UINT, WPARAM, LPARAM);
+static LRESULT CALLBACK w32_wnd_proc (HWND, UINT, WPARAM, LPARAM);
static BOOL
w32_init_class (HINSTANCE hinst)
@@ -2672,7 +2672,7 @@ post_character_message (HWND hwnd, UINT msg,
/* Main window procedure */
-LRESULT CALLBACK
+static LRESULT CALLBACK
w32_wnd_proc (HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
struct frame *f;
@@ -5903,7 +5903,7 @@ extern Lisp_Object Qfile_name_history;
read-only when "Directories" is selected in the filter. This
allows us to work around the fact that the standard Open File
dialog does not support directories. */
-UINT CALLBACK
+static UINT CALLBACK
file_dialog_callback (HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
if (msg == WM_NOTIFY)
diff --git a/src/w32font.c b/src/w32font.c
index 46fca5d78d5..8e17093b98d 100644
--- a/src/w32font.c
+++ b/src/w32font.c
@@ -1058,7 +1058,7 @@ w32_enumfont_pattern_entity (Lisp_Object frame,
/* Convert generic families to the family portion of lfPitchAndFamily. */
-BYTE
+static BYTE
w32_generic_family (Lisp_Object name)
{
/* Generic families. */
diff --git a/src/w32inevt.c b/src/w32inevt.c
index 7cf566e91a2..1111f8dfa44 100644
--- a/src/w32inevt.c
+++ b/src/w32inevt.c
@@ -288,7 +288,7 @@ static int faked_key = 0;
/* return code -1 means that event_queue_ptr won't be incremented.
In other word, this event makes two key codes. (by himi) */
-int
+static int
key_event (KEY_EVENT_RECORD *event, struct input_event *emacs_ev, int *isdead)
{
static int mod_key_state = 0;
diff --git a/src/w32menu.c b/src/w32menu.c
index 0ed9bffe70c..6e7da5ad577 100644
--- a/src/w32menu.c
+++ b/src/w32menu.c
@@ -106,6 +106,7 @@ static Lisp_Object simple_dialog_show (FRAME_PTR, Lisp_Object, Lisp_Object);
#endif
static void utf8to16 (unsigned char *, int, WCHAR *);
+static int fill_in_menu (HMENU, widget_value *);
void w32_free_menu_strings (HWND);
@@ -1568,7 +1569,7 @@ add_menu_item (HMENU menu, widget_value *wv, HMENU item)
}
/* Construct native Windows menu(bar) based on widget_value tree. */
-int
+static int
fill_in_menu (HMENU menu, widget_value *wv)
{
int items_added = 0;
diff --git a/src/w32proc.c b/src/w32proc.c
index ae4e725b6ef..c0da124a472 100644
--- a/src/w32proc.c
+++ b/src/w32proc.c
@@ -159,7 +159,7 @@ int child_proc_count = 0;
child_process child_procs[ MAX_CHILDREN ];
child_process *dead_child = NULL;
-DWORD WINAPI reader_thread (void *arg);
+static DWORD WINAPI reader_thread (void *arg);
/* Find an unused process slot. */
child_process *
@@ -279,7 +279,7 @@ find_child_pid (DWORD pid)
is normally blocked until woken by select() to check for input by
reading one char. When the read completes, char_avail is signaled
to wake up the select emulator and the thread blocks itself again. */
-DWORD WINAPI
+static DWORD WINAPI
reader_thread (void *arg)
{
child_process *cp;
@@ -608,7 +608,7 @@ get_result:
# define IMAGE_OPTIONAL_HEADER32 IMAGE_OPTIONAL_HEADER
#endif
-void
+static void
w32_executable_type (char * filename,
int * is_dos_app,
int * is_cygnus_app,
@@ -726,7 +726,7 @@ unwind:
close_file_data (&executable);
}
-int
+static int
compare_env (const void *strp1, const void *strp2)
{
const char *str1 = *(const char **)strp1, *str2 = *(const char **)strp2;
@@ -750,7 +750,7 @@ compare_env (const void *strp1, const void *strp2)
return 1;
}
-void
+static void
merge_and_sort_env (char **envp1, char **envp2, char **new_envp)
{
char **optr, **nptr;
@@ -1999,7 +1999,7 @@ human-readable form. */)
return make_number (GetThreadLocale ());
}
-DWORD
+static DWORD
int_from_hex (char * s)
{
DWORD val = 0;
@@ -2021,7 +2021,7 @@ int_from_hex (char * s)
function isn't given a context pointer. */
Lisp_Object Vw32_valid_locale_ids;
-BOOL CALLBACK
+static BOOL CALLBACK
enum_locale_fn (LPTSTR localeNum)
{
DWORD id = int_from_hex (localeNum);
@@ -2085,7 +2085,7 @@ If successful, the new locale id is returned, otherwise nil. */)
function isn't given a context pointer. */
Lisp_Object Vw32_valid_codepages;
-BOOL CALLBACK
+static BOOL CALLBACK
enum_codepage_fn (LPTSTR codepageNum)
{
DWORD id = atoi (codepageNum);
diff --git a/src/w32term.c b/src/w32term.c
index 20f0dea8572..a082aa32b69 100644
--- a/src/w32term.c
+++ b/src/w32term.c
@@ -3954,7 +3954,7 @@ static char dbcs_lead = 0;
recursively with different messages by the system.
*/
-int
+static int
w32_read_socket (struct terminal *terminal, int expected,
struct input_event *hold_quit)
{