Mercurial > hg > xemacs-beta
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); |