Mercurial > hg > xemacs-beta

comparison src/objects-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
281 } 281 }
282 282
283 static void 283 static void
284 x_print_color_instance (Lisp_Color_Instance *c, 284 x_print_color_instance (Lisp_Color_Instance *c,
285 Lisp_Object printcharfun, 285 Lisp_Object printcharfun,
286 int escapeflag) 286 int UNUSED (escapeflag))
287 { 287 {
288 XColor color = COLOR_INSTANCE_X_COLOR (c); 288 XColor color = COLOR_INSTANCE_X_COLOR (c);
289 write_fmt_string (printcharfun, " %ld=(%X,%X,%X)", 289 write_fmt_string (printcharfun, " %ld=(%X,%X,%X)",
290 color.pixel, color.red, color.green, color.blue); 290 color.pixel, color.red, color.green, color.blue);
291 } 291 }
315 be comparing their names or pixel values instead. */ 315 be comparing their names or pixel values instead. */
316 316
317 static int 317 static int
318 x_color_instance_equal (Lisp_Color_Instance *c1, 318 x_color_instance_equal (Lisp_Color_Instance *c1,
319 Lisp_Color_Instance *c2, 319 Lisp_Color_Instance *c2,
320 int depth) 320 int UNUSED (depth))
321 { 321 {
322 XColor color1 = COLOR_INSTANCE_X_COLOR (c1); 322 XColor color1 = COLOR_INSTANCE_X_COLOR (c1);
323 XColor color2 = COLOR_INSTANCE_X_COLOR (c2); 323 XColor color2 = COLOR_INSTANCE_X_COLOR (c2);
324 return ((color1.red == color2.red) && 324 return ((color1.red == color2.red) &&
325 (color1.green == color2.green) && 325 (color1.green == color2.green) &&
326 (color1.blue == color2.blue)); 326 (color1.blue == color2.blue));
327 } 327 }
328 328
329 static unsigned long 329 static unsigned long
330 x_color_instance_hash (Lisp_Color_Instance *c, int depth) 330 x_color_instance_hash (Lisp_Color_Instance *c, int UNUSED (depth))
331 { 331 {
332 XColor color = COLOR_INSTANCE_X_COLOR (c); 332 XColor color = COLOR_INSTANCE_X_COLOR (c);
333 return HASH3 (color.red, color.green, color.blue); 333 return HASH3 (color.red, color.green, color.blue);
334 } 334 }
335 335
359 /************************************************************************/ 359 /************************************************************************/
360 /* font instances */ 360 /* font instances */
361 /************************************************************************/ 361 /************************************************************************/
362 362
363 static int 363 static int
364 x_initialize_font_instance (Lisp_Font_Instance *f, Lisp_Object name, 364 x_initialize_font_instance (Lisp_Font_Instance *f, Lisp_Object UNUSED (name),
365 Lisp_Object device, Error_Behavior errb) 365 Lisp_Object device, Error_Behavior errb)
366 { 366 {
367 Display *dpy = DEVICE_X_DISPLAY (XDEVICE (device)); 367 Display *dpy = DEVICE_X_DISPLAY (XDEVICE (device));
368 XFontStruct *xf; 368 XFontStruct *xf;
369 const Extbyte *extname; 369 const Extbyte *extname;
454 } 454 }
455 455
456 static void 456 static void
457 x_print_font_instance (Lisp_Font_Instance *f, 457 x_print_font_instance (Lisp_Font_Instance *f,
458 Lisp_Object printcharfun, 458 Lisp_Object printcharfun,
459 int escapeflag) 459 int UNUSED (escapeflag))
460 { 460 {
461 write_fmt_string (printcharfun, " 0x%lx", 461 write_fmt_string (printcharfun, " 0x%lx",
462 (unsigned long) FONT_INSTANCE_X_FONT (f)->fid); 462 (unsigned long) FONT_INSTANCE_X_FONT (f)->fid);
463 } 463 }
464 464
879 } 879 }
880 880
881 #ifdef MULE 881 #ifdef MULE
882 882
883 static int 883 static int
884 x_font_spec_matches_charset (struct device *d, Lisp_Object charset, 884 x_font_spec_matches_charset (struct device *UNUSED (d), Lisp_Object charset,
885 const Ibyte *nonreloc, Lisp_Object reloc, 885 const Ibyte *nonreloc, Lisp_Object reloc,
886 Bytecount offset, Bytecount length, 886 Bytecount offset, Bytecount length,
887 int stage) 887 int stage)
888 { 888 {
889 if (stage) 889 if (stage)