Mercurial > hg > xemacs-beta

comparison src/select-x.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 a8d8f419b459
children ecf1ebac70d8
comparison
equal deleted inserted replaced
2285:914c5afaac33 2286:04bc9d2f42c7
201 #undef PROCESSING_X_CODE 201 #undef PROCESSING_X_CODE
202 202
203 /* Do protocol to assert ourself as a selection owner. 203 /* Do protocol to assert ourself as a selection owner.
204 */ 204 */
205 static Lisp_Object 205 static Lisp_Object
206 x_own_selection (Lisp_Object selection_name, Lisp_Object selection_value, 206 x_own_selection (Lisp_Object selection_name,
207 Lisp_Object how_to_add, Lisp_Object selection_type, 207 #ifdef MOTIF_CLIPBOARDS
208 int owned_p) 208 Lisp_Object selection_value,
209 #else
210 Lisp_Object UNUSED (selection_value),
211 #endif
212 Lisp_Object UNUSED (how_to_add),
213 Lisp_Object UNUSED (selection_type),
214 #ifdef MOTIF_CLIPBOARDS
215 int owned_p
216 #else
217 int UNUSED (owned_p)
218 #endif
219 )
209 { 220 {
210 struct device *d = decode_x_device (Qnil); 221 struct device *d = decode_x_device (Qnil);
211 Display *display = DEVICE_X_DISPLAY (d); 222 Display *display = DEVICE_X_DISPLAY (d);
212 struct frame *sel_frame = selected_frame (); 223 struct frame *sel_frame = selected_frame ();
213 Window selecting_window = XtWindow (FRAME_X_TEXT_WIDGET (sel_frame)); 224 Window selecting_window = XtWindow (FRAME_X_TEXT_WIDGET (sel_frame));
879 static Window reading_selection_reply; 890 static Window reading_selection_reply;
880 static Atom reading_which_selection; 891 static Atom reading_which_selection;
881 static int selection_reply_timed_out; 892 static int selection_reply_timed_out;
882 893
883 static int 894 static int
884 selection_reply_done (void *ignore) 895 selection_reply_done (void *UNUSED (unused))
885 { 896 {
886 return !reading_selection_reply; 897 return !reading_selection_reply;
887 } 898 }
888 899
889 static Lisp_Object Qx_selection_reply_timeout_internal; 900 static Lisp_Object Qx_selection_reply_timeout_internal;
890 901
891 DEFUN ("x-selection-reply-timeout-internal", Fx_selection_reply_timeout_internal, 902 DEFUN ("x-selection-reply-timeout-internal", Fx_selection_reply_timeout_internal,
892 1, 1, 0, /* 903 1, 1, 0, /*
893 */ 904 */
894 (arg)) 905 (UNUSED (arg)))
895 { 906 {
896 selection_reply_timed_out = 1; 907 selection_reply_timed_out = 1;
897 reading_selection_reply = 0; 908 reading_selection_reply = 0;
898 return Qnil; 909 return Qnil;
899 } 910 }
1026 1037
1027 1038
1028 static void 1039 static void
1029 receive_incremental_selection (Display *display, Window window, Atom property, 1040 receive_incremental_selection (Display *display, Window window, Atom property,
1030 /* this one is for error messages only */ 1041 /* this one is for error messages only */
1031 Lisp_Object target_type, 1042 Lisp_Object UNUSED (target_type),
1032 Bytecount min_size_bytes, 1043 Bytecount min_size_bytes,
1033 UChar_Binary **data_ret, 1044 UChar_Binary **data_ret,
1034 Bytecount *size_bytes_ret, 1045 Bytecount *size_bytes_ret,
1035 Atom *type_ret, int *format_ret, 1046 Atom *type_ret, int *format_ret,
1036 unsigned long *size_ret) 1047 unsigned long *size_ret)
1201 XSetSelectionOwner (display, selection_atom, None, timestamp); 1212 XSetSelectionOwner (display, selection_atom, None, timestamp);
1202 } 1213 }
1203 1214
1204 static Lisp_Object 1215 static Lisp_Object
1205 x_selection_exists_p (Lisp_Object selection, 1216 x_selection_exists_p (Lisp_Object selection,
1206 Lisp_Object selection_type) 1217 Lisp_Object UNUSED (selection_type))
1207 { 1218 {
1208 struct device *d = decode_x_device (Qnil); 1219 struct device *d = decode_x_device (Qnil);
1209 Display *dpy = DEVICE_X_DISPLAY (d); 1220 Display *dpy = DEVICE_X_DISPLAY (d);
1210 return XGetSelectionOwner (dpy, symbol_to_x_atom (d, selection, 0)) != None ? 1221 return XGetSelectionOwner (dpy, symbol_to_x_atom (d, selection, 0)) != None ?
1211 Qt : Qnil; 1222 Qt : Qnil;