Mercurial > hg > xemacs-beta
diff src/glyphs-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 | 4ec724310f33 |
children | ecf1ebac70d8 |
line wrap: on
line diff
--- a/src/glyphs-gtk.c Mon Sep 20 19:11:29 2004 +0000 +++ b/src/glyphs-gtk.c Mon Sep 20 19:20:08 2004 +0000 @@ -350,7 +350,7 @@ static void gtk_print_image_instance (struct Lisp_Image_Instance *p, Lisp_Object printcharfun, - int escapeflag) + int UNUSED (escapeflag)) { switch (IMAGE_INSTANCE_TYPE (p)) { @@ -460,7 +460,7 @@ static int gtk_image_instance_equal (struct Lisp_Image_Instance *p1, - struct Lisp_Image_Instance *p2, int depth) + struct Lisp_Image_Instance *p2, int UNUSED (depth)) { switch (IMAGE_INSTANCE_TYPE (p1)) { @@ -483,7 +483,7 @@ } static unsigned long -gtk_image_instance_hash (struct Lisp_Image_Instance *p, int depth) +gtk_image_instance_hash (struct Lisp_Image_Instance *p, int UNUSED (depth)) { switch (IMAGE_INSTANCE_TYPE (p)) { @@ -599,8 +599,8 @@ message. */ static void -check_pointer_sizes (unsigned int width, unsigned int height, - Lisp_Object instantiator) +check_pointer_sizes (unsigned int UNUSED (width), unsigned int UNUSED (height), + Lisp_Object UNUSED (instantiator)) { /* #### BILL!!! There is no way to call XQueryBestCursor from Gdk! */ #if 0 @@ -649,8 +649,9 @@ } static void -maybe_recolor_cursor (Lisp_Object image_instance, Lisp_Object foreground, - Lisp_Object background) +maybe_recolor_cursor (Lisp_Object UNUSED (image_instance), + Lisp_Object UNUSED (foreground), + Lisp_Object UNUSED (background)) { #if 0 /* #### BILL!!! */ @@ -830,7 +831,7 @@ unsigned char *eimage, int dest_mask, Lisp_Object instantiator, - Lisp_Object domain) + Lisp_Object UNUSED (domain)) { Lisp_Object device = IMAGE_INSTANCE_DEVICE (ii); GdkColormap *cmap = DEVICE_GTK_COLORMAP (XDEVICE(device)); @@ -892,7 +893,7 @@ Lisp_Object pointer_bg, int dest_mask, GdkPixmap *mask, - Lisp_Object mask_filename) + Lisp_Object UNUSED (mask_filename)) { Lisp_Object device = IMAGE_INSTANCE_DEVICE (ii); Lisp_Object foreground = find_keyword_in_vector (instantiator, Q_foreground); @@ -1048,7 +1049,7 @@ static void gtk_xbm_instantiate (Lisp_Object image_instance, Lisp_Object instantiator, Lisp_Object pointer_fg, Lisp_Object pointer_bg, - int dest_mask, Lisp_Object domain) + int dest_mask, Lisp_Object UNUSED (domain)) { Lisp_Object data = find_keyword_in_vector (instantiator, Q_data); const char *gcc_go_home; @@ -1335,8 +1336,8 @@ static void gtk_xface_instantiate (Lisp_Object image_instance, Lisp_Object instantiator, - Lisp_Object pointer_fg, Lisp_Object pointer_bg, - int dest_mask, Lisp_Object domain) + Lisp_Object pointer_fg, Lisp_Object pointer_bg, + int dest_mask, Lisp_Object UNUSED (domain)) { Lisp_Object data = find_keyword_in_vector (instantiator, Q_data); int i, stattis; @@ -1455,8 +1456,9 @@ static void gtk_resource_instantiate (Lisp_Object image_instance, Lisp_Object instantiator, - Lisp_Object pointer_fg, Lisp_Object pointer_bg, - int dest_mask, Lisp_Object domain) + Lisp_Object UNUSED (pointer_fg), + Lisp_Object UNUSED (pointer_bg), + int UNUSED (dest_mask), Lisp_Object UNUSED (domain)) { struct Lisp_Image_Instance *ii = XIMAGE_INSTANCE (image_instance); GdkCursor *c = NULL; @@ -1537,7 +1539,7 @@ static Lisp_Object autodetect_normalize (Lisp_Object instantiator, Lisp_Object console_type, - Lisp_Object dest_mask) + Lisp_Object UNUSED (dest_mask)) { Lisp_Object file = find_keyword_in_vector (instantiator, Q_data); Lisp_Object filename = Qnil; @@ -1691,7 +1693,7 @@ static void font_instantiate (Lisp_Object image_instance, Lisp_Object instantiator, Lisp_Object pointer_fg, Lisp_Object pointer_bg, - int dest_mask, Lisp_Object domain) + int dest_mask, Lisp_Object UNUSED (domain)) { /* This function can GC */ Lisp_Object data = find_keyword_in_vector (instantiator, Q_data); @@ -1876,7 +1878,7 @@ static void cursor_font_instantiate (Lisp_Object image_instance, Lisp_Object instantiator, Lisp_Object pointer_fg, Lisp_Object pointer_bg, - int dest_mask, Lisp_Object domain) + int dest_mask, Lisp_Object UNUSED (domain)) { /* This function can GC */ Lisp_Object data = find_keyword_in_vector (instantiator, Q_data); @@ -2132,9 +2134,11 @@ /* instantiate and gtk type subwindow */ static void -gtk_subwindow_instantiate (Lisp_Object image_instance, Lisp_Object instantiator, - Lisp_Object pointer_fg, Lisp_Object pointer_bg, - int dest_mask, Lisp_Object domain) +gtk_subwindow_instantiate (Lisp_Object image_instance, + Lisp_Object UNUSED (instantiator), + Lisp_Object UNUSED (pointer_fg), + Lisp_Object UNUSED (pointer_bg), + int UNUSED (dest_mask), Lisp_Object UNUSED (domain)) { /* This function can GC */ Lisp_Image_Instance *ii = XIMAGE_INSTANCE (image_instance); @@ -2285,7 +2289,7 @@ static void gtk_widget_instantiate (Lisp_Object image_instance, Lisp_Object instantiator, Lisp_Object pointer_fg, Lisp_Object pointer_bg, - int dest_mask, Lisp_Object domain) + int UNUSED (dest_mask), Lisp_Object domain) { call_with_suspended_errors ((lisp_fn_t) gtk_widget_instantiate_1, Qnil, Qimage, @@ -2298,7 +2302,7 @@ /* get properties of a control */ static Lisp_Object -gtk_widget_property (Lisp_Object image_instance, Lisp_Object prop) +gtk_widget_property (Lisp_Object UNUSED (image_instance), Lisp_Object prop) { /* Lisp_Image_Instance *ii = XIMAGE_INSTANCE (image_instance); */ @@ -2348,7 +2352,8 @@ static void gtk_widget_query_geometry (Lisp_Object image_instance, int* width, int* height, - enum image_instance_geometry disp, Lisp_Object domain) + enum image_instance_geometry UNUSED (disp), + Lisp_Object UNUSED (domain)) { Lisp_Image_Instance *p = XIMAGE_INSTANCE (image_instance); @@ -2463,7 +2468,7 @@ static void gtk_add_tab_item(Lisp_Object image_instance, GtkNotebook* nb, Lisp_Object item, - Lisp_Object domain, int i) + Lisp_Object domain, int UNUSED (i)) { Lisp_Object name; int hash_id = 0; @@ -2515,8 +2520,8 @@ /* Signal handler for the switch-page signal. */ static void gtk_tab_control_callback(GtkNotebook *notebook, GtkNotebookPage *page, - gint page_num, - gpointer user_data) + gint UNUSED (page_num), + gpointer UNUSED (user_data)) { /* This callback is called for every selection, not just user selection.