Mercurial > hg > xemacs-beta

comparison src/event-gtk.c @ 2286:04bc9d2f42c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-09-20 19:18:55 by james] Mark all unused parameters as unused. Also eliminate some unneeded local variables.
author james
date Mon, 20 Sep 2004 19:20:08 +0000
parents e8db6a10ad42
children ecf1ebac70d8
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
706 tty_events_occurred++; 706 tty_events_occurred++;
707 } 707 }
708 } 708 }
709 709
710 static void 710 static void
711 gtk_what_callback (gpointer closure, gint source, GdkInputCondition why) 711 gtk_what_callback (gpointer closure, gint UNUSED (source),
712 GdkInputCondition UNUSED (why))
712 { 713 {
713 /* If closure is 0, then we got a fake event from a signal handler. 714 /* If closure is 0, then we got a fake event from a signal handler.
714 The only purpose of this is to make XtAppProcessEvent() stop 715 The only purpose of this is to make XtAppProcessEvent() stop
715 blocking. */ 716 blocking. */
716 if (closure) 717 if (closure)
848 849
849 /* This is called from GC when a process object is about to be freed. 850 /* This is called from GC when a process object is about to be freed.
850 If we've still got pointers to it in this file, we're gonna lose hard. 851 If we've still got pointers to it in this file, we're gonna lose hard.
851 */ 852 */
852 void 853 void
853 debug_process_finalization (struct Lisp_Process *p) 854 debug_process_finalization (struct Lisp_Process *UNUSED (p))
854 { 855 {
855 #if 0 /* #### */ 856 #if 0 /* #### */
856 int i; 857 int i;
857 Lisp_Object instr, outstr; 858 Lisp_Object instr, outstr;
858 859
966 dragndrop_data_received (GtkWidget *widget, 967 dragndrop_data_received (GtkWidget *widget,
967 GdkDragContext *context, 968 GdkDragContext *context,
968 gint x, 969 gint x,
969 gint y, 970 gint y,
970 GtkSelectionData *data, 971 GtkSelectionData *data,
971 guint info, 972 guint UNUSED (info),
972 guint time) 973 guint time)
973 { 974 {
974 Lisp_Object event = Fmake_event (Qnil, Qnil); 975 Lisp_Object event = Fmake_event (Qnil, Qnil);
975 struct device *d = gtk_any_window_to_device (widget->window); 976 struct device *d = gtk_any_window_to_device (widget->window);
976 struct frame *f = gtk_any_widget_or_parent_to_frame (d, widget); 977 struct frame *f = gtk_any_widget_or_parent_to_frame (d, widget);
1054 gtk_drag_finish (context, TRUE, FALSE, time); 1055 gtk_drag_finish (context, TRUE, FALSE, time);
1055 enqueue_dispatch_event (event); 1056 enqueue_dispatch_event (event);
1056 } 1057 }
1057 1058
1058 gboolean 1059 gboolean
1059 dragndrop_dropped (GtkWidget *widget, 1060 dragndrop_dropped (GtkWidget *UNUSED (widget),
1060 GdkDragContext *drag_context, 1061 GdkDragContext *drag_context,
1061 gint x, 1062 gint UNUSED (x),
1062 gint y, 1063 gint UNUSED (y),
1063 guint time, 1064 guint time,
1064 gpointer user_data) 1065 gpointer user_data)
1065 { 1066 {
1066 /* Netscape drops things like: 1067 /* Netscape drops things like:
1067 STRING 1068 STRING
1513 { 1514 {
1514 return (generic_event_handler (widget, (GdkEvent *) event)); 1515 return (generic_event_handler (widget, (GdkEvent *) event));
1515 } 1516 }
1516 1517
1517 gboolean 1518 gboolean
1518 emacs_shell_event_handler (GtkWidget *wid /* unused */, 1519 emacs_shell_event_handler (GtkWidget *UNUSED (wid),
1519 GdkEvent *event, 1520 GdkEvent *event,
1520 gpointer closure) 1521 gpointer closure)
1521 { 1522 {
1522 struct frame *frame = (struct frame *) closure; 1523 struct frame *frame = (struct frame *) closure;
1523 Lisp_Object lisp_event = Fmake_event (Qnil, Qnil); 1524 Lisp_Object lisp_event = Fmake_event (Qnil, Qnil);
1596 drain_tty_devices (); 1597 drain_tty_devices ();
1597 #endif 1598 #endif
1598 } 1599 }
1599 1600
1600 static void 1601 static void
1601 emacs_gtk_force_event_pending (struct frame* f) 1602 emacs_gtk_force_event_pending (struct frame* UNUSED (f))
1602 { 1603 {
1603 #if 0 1604 #if 0
1604 stderr_out ("Force event pending called on frame %p!\n", f); 1605 stderr_out ("Force event pending called on frame %p!\n", f);
1605 #endif 1606 #endif
1606 } 1607 }