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

[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 61855263cb07
children 3d8143fc88e1
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
305 305
306 /* Functions called only from `gtk_set_frame_properties' to set 306 /* Functions called only from `gtk_set_frame_properties' to set
307 individual properties. */ 307 individual properties. */
308 308
309 static void 309 static void
310 gtk_set_frame_text_value (struct frame *f, Ibyte *value, 310 gtk_set_frame_text_value (struct frame *UNUSED (f), Ibyte *value,
311 void (*func) (gpointer, gchar *), 311 void (*func) (gpointer, gchar *),
312 gpointer arg) 312 gpointer arg)
313 { 313 {
314 gchar *the_text = (gchar *) value; 314 gchar *the_text = (gchar *) value;
315 315
640 640
641 gtk_set_initial_frame_size (f, x, y, w, h); 641 gtk_set_initial_frame_size (f, x, y, w, h);
642 } 642 }
643 643
644 static gboolean 644 static gboolean
645 resize_event_cb (GtkWidget *w, GtkAllocation *allocation, gpointer user_data) 645 resize_event_cb (GtkWidget *UNUSED (w), GtkAllocation *allocation,
646 gpointer user_data)
646 { 647 {
647 struct frame *f = (struct frame *) user_data; 648 struct frame *f = (struct frame *) user_data;
648 649
649 f->pixwidth = allocation->width; 650 f->pixwidth = allocation->width;
650 f->pixheight = allocation->height; 651 f->pixheight = allocation->height;
658 659
659 return (FALSE); 660 return (FALSE);
660 } 661 }
661 662
662 static gboolean 663 static gboolean
663 delete_event_cb (GtkWidget *w, GdkEvent *ev, gpointer user_data) 664 delete_event_cb (GtkWidget *UNUSED (w), GdkEvent *UNUSED (ev),
665 gpointer user_data)
664 { 666 {
665 struct frame *f = (struct frame *) user_data; 667 struct frame *f = (struct frame *) user_data;
666 Lisp_Object frame = wrap_frame (f); 668 Lisp_Object frame = wrap_frame (f);
667 669
668 enqueue_misc_user_event (frame, Qeval, list3 (Qdelete_frame, frame, Qt)); 670 enqueue_misc_user_event (frame, Qeval, list3 (Qdelete_frame, frame, Qt));
711 713
712 Lisp_Object Vcurrent_drag_object; 714 Lisp_Object Vcurrent_drag_object;
713 715
714 #define DRAG_SELECTION_DATA_ERROR "Error converting drag data to external format" 716 #define DRAG_SELECTION_DATA_ERROR "Error converting drag data to external format"
715 static void 717 static void
716 dragndrop_get_drag (GtkWidget *widget, 718 dragndrop_get_drag (GtkWidget *UNUSED (widget),
717 GdkDragContext *drag_context, 719 GdkDragContext *UNUSED (drag_context),
718 GtkSelectionData *data, 720 GtkSelectionData *data,
719 guint info, 721 guint info,
720 guint time, 722 guint UNUSED (time),
721 gpointer user_data) 723 gpointer UNUSED (user_data))
722 { 724 {
723 gtk_selection_data_set (data, GDK_SELECTION_TYPE_STRING, 8, 725 gtk_selection_data_set (data, GDK_SELECTION_TYPE_STRING, 8,
724 DRAG_SELECTION_DATA_ERROR, 726 DRAG_SELECTION_DATA_ERROR,
725 strlen (DRAG_SELECTION_DATA_ERROR)); 727 strlen (DRAG_SELECTION_DATA_ERROR));
726 728
991 /* Lisp functions */ 993 /* Lisp functions */
992 /************************************************************************/ 994 /************************************************************************/
993 995
994 static void 996 static void
995 gtk_init_frame_1 (struct frame *f, Lisp_Object props, 997 gtk_init_frame_1 (struct frame *f, Lisp_Object props,
996 int frame_name_is_defaulted) 998 int UNUSED (frame_name_is_defaulted))
997 { 999 {
998 /* This function can GC */ 1000 /* This function can GC */
999 Lisp_Object initially_unmapped; 1001 Lisp_Object initially_unmapped;
1000 Lisp_Object device = FRAME_DEVICE (f); 1002 Lisp_Object device = FRAME_DEVICE (f);
1001 Lisp_Object lisp_window_id = Fplist_get (props, Qwindow_id, Qnil); 1003 Lisp_Object lisp_window_id = Fplist_get (props, Qwindow_id, Qnil);
1034 UNMAPPED_DATA_IDENTIFIER, (gpointer) 1); 1036 UNMAPPED_DATA_IDENTIFIER, (gpointer) 1);
1035 } 1037 }
1036 } 1038 }
1037 1039
1038 static void 1040 static void
1039 gtk_init_frame_2 (struct frame *f, Lisp_Object props) 1041 gtk_init_frame_2 (struct frame *f, Lisp_Object UNUSED (props))
1040 { 1042 {
1041 /* Set up the values of the widget/frame. A case could be made for putting 1043 /* Set up the values of the widget/frame. A case could be made for putting
1042 this inside of the widget's initialize method. */ 1044 this inside of the widget's initialize method. */
1043 1045
1044 update_frame_face_values (f); 1046 update_frame_face_values (f);