diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index d0b07ae27d..49012e3e17 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2002-09-10  Stephane Carrez  <stcarrez@nerim.fr>
+
+	* event-loop.c (gdb_do_one_event): Make public.
+	* event-loop.h (gdb_do_one_event): Declare.
+
 2002-09-10  Jeff Law  <law@redhat.com>
 
 	* infttrace.c (child_resume): Simplify and rework to avoid
diff --git a/gdb/event-loop.c b/gdb/event-loop.c
index 4e42d7e2b6..03eb41c6b1 100644
--- a/gdb/event-loop.c
+++ b/gdb/event-loop.c
@@ -210,7 +210,6 @@ static void create_file_handler (int fd, int mask, handler_func * proc, gdb_clie
 static void invoke_async_signal_handler (void);
 static void handle_file_event (int event_file_desc);
 static int gdb_wait_for_event (void);
-static int gdb_do_one_event (void *data);
 static int check_async_ready (void);
 static void async_queue_event (gdb_event * event_ptr, queue_position position);
 static gdb_event *create_file_event (int fd);
@@ -346,7 +345,7 @@ process_event (void)
    can happen if there are no event sources to wait for).  If an error
    occurs catch_errors() which calls this function returns zero. */
 
-static int
+int
 gdb_do_one_event (void *data)
 {
   /* Any events already waiting in the queue? */
diff --git a/gdb/event-loop.h b/gdb/event-loop.h
index 2f2ff003f6..748f48605d 100644
--- a/gdb/event-loop.h
+++ b/gdb/event-loop.h
@@ -85,6 +85,7 @@ queue_position;
 /* Exported functions from event-loop.c */
 
 extern void start_event_loop (void);
+extern int gdb_do_one_event (void *data);
 extern void delete_file_handler (int fd);
 extern void add_file_handler (int fd, handler_func * proc, gdb_client_data client_data);
 extern void mark_async_signal_handler (struct async_signal_handler *async_handler_ptr);