Mercurial > hg > xemacs-beta

comparison src/gutter.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 e809f7e2883c
children ecf1ebac70d8
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
550 550
551 /* This is called by extent_changed_for_redisplay, so that redisplay 551 /* This is called by extent_changed_for_redisplay, so that redisplay
552 knows exactly what extents have changed. */ 552 knows exactly what extents have changed. */
553 void 553 void
554 gutter_extent_signal_changed_region_maybe (Lisp_Object obj, 554 gutter_extent_signal_changed_region_maybe (Lisp_Object obj,
555 Charbpos start, Charbpos end) 555 Charbpos UNUSED (start),
556 Charbpos UNUSED (end))
556 { 557 {
557 /* #### Start and end are currently ignored but could be used by a 558 /* #### Start and end are currently ignored but could be used by a
558 more optimal gutter redisplay. We currently loop over all frames 559 more optimal gutter redisplay. We currently loop over all frames
559 here, this could be optimized. */ 560 here, this could be optimized. */
560 Lisp_Object frmcons, devcons, concons; 561 Lisp_Object frmcons, devcons, concons;
830 } 831 }
831 832
832 DEFINE_SPECIFIER_TYPE (gutter); 833 DEFINE_SPECIFIER_TYPE (gutter);
833 834
834 static void 835 static void
835 gutter_after_change (Lisp_Object specifier, Lisp_Object locale) 836 gutter_after_change (Lisp_Object UNUSED (specifier),
837 Lisp_Object UNUSED (locale))
836 { 838 {
837 MARK_GUTTER_CHANGED; 839 MARK_GUTTER_CHANGED;
838 } 840 }
839 841
840 static void 842 static void
946 { 948 {
947 gutter_specs_changed (specifier, w, oldval, RIGHT_GUTTER); 949 gutter_specs_changed (specifier, w, oldval, RIGHT_GUTTER);
948 } 950 }
949 951
950 static void 952 static void
951 default_gutter_specs_changed (Lisp_Object specifier, struct window *w, 953 default_gutter_specs_changed (Lisp_Object UNUSED (specifier),
952 Lisp_Object oldval) 954 struct window *UNUSED (w),
955 Lisp_Object UNUSED (oldval))
953 { 956 {
954 recompute_overlaying_specifier (Vgutter); 957 recompute_overlaying_specifier (Vgutter);
955 } 958 }
956 959
957 static void gutter_geometry_changed_in_window (Lisp_Object specifier, 960 static void gutter_geometry_changed_in_window (Lisp_Object specifier,
992 MARK_WINDOWS_CHANGED (w); 995 MARK_WINDOWS_CHANGED (w);
993 } 996 }
994 } 997 }
995 998
996 static void 999 static void
997 default_gutter_size_changed_in_window (Lisp_Object specifier, struct window *w, 1000 default_gutter_size_changed_in_window (Lisp_Object UNUSED (specifier),
998 Lisp_Object oldval) 1001 struct window *UNUSED (w),
1002 Lisp_Object UNUSED (oldval))
999 { 1003 {
1000 recompute_overlaying_specifier (Vgutter_size); 1004 recompute_overlaying_specifier (Vgutter_size);
1001 } 1005 }
1002 1006
1003 static void 1007 static void
1004 default_gutter_border_width_changed_in_window (Lisp_Object specifier, 1008 default_gutter_border_width_changed_in_window (Lisp_Object UNUSED (specifier),
1005 struct window *w, 1009 struct window *UNUSED (w),
1006 Lisp_Object oldval) 1010 Lisp_Object UNUSED (oldval))
1007 { 1011 {
1008 recompute_overlaying_specifier (Vgutter_border_width); 1012 recompute_overlaying_specifier (Vgutter_border_width);
1009 } 1013 }
1010 1014
1011 static void 1015 static void
1012 default_gutter_visible_p_changed_in_window (Lisp_Object specifier, 1016 default_gutter_visible_p_changed_in_window (Lisp_Object UNUSED (specifier),
1013 struct window *w, 1017 struct window *UNUSED (w),
1014 Lisp_Object oldval) 1018 Lisp_Object UNUSED (oldval))
1015 { 1019 {
1016 recompute_overlaying_specifier (Vgutter_visible_p); 1020 recompute_overlaying_specifier (Vgutter_visible_p);
1017 /* Need to reconstruct the gutter specifier as it is affected by the 1021 /* Need to reconstruct the gutter specifier as it is affected by the
1018 visibility. */ 1022 visibility. */
1019 recompute_overlaying_specifier (Vgutter); 1023 recompute_overlaying_specifier (Vgutter);