comparison src/glyphs.h @ 288:e11d67e05968 r21-0b42

Import from CVS: tag r21-0b42
author cvs
date Mon, 13 Aug 2007 10:35:54 +0200
parents 7df0dd720c89
children 7347b34c275b
comparison
equal deleted inserted replaced
287:13a0bd77a29d 288:e11d67e05968
23 23
24 #ifndef _XEMACS_GLYPHS_H_ 24 #ifndef _XEMACS_GLYPHS_H_
25 #define _XEMACS_GLYPHS_H_ 25 #define _XEMACS_GLYPHS_H_
26 26
27 #include "specifier.h" 27 #include "specifier.h"
28
29 extern Lisp_Object Qxpm;
30 #ifdef HAVE_XPM
31 extern Lisp_Object Q_color_symbols;
32 Lisp_Object evaluate_xpm_color_symbols (void);
33 Lisp_Object pixmap_to_lisp_data (Lisp_Object name, int ok_if_data_invalid);
34 #endif
35
36 DOESNT_RETURN signal_image_error (CONST char *, Lisp_Object);
37 DOESNT_RETURN signal_image_error_2 (CONST char *, Lisp_Object, Lisp_Object);
38 28
39 /************************************************************************/ 29 /************************************************************************/
40 /* Image Instantiators */ 30 /* Image Instantiators */
41 /************************************************************************/ 31 /************************************************************************/
42 32
205 void check_valid_string (Lisp_Object data); 195 void check_valid_string (Lisp_Object data);
206 void check_valid_int (Lisp_Object data); 196 void check_valid_int (Lisp_Object data);
207 DECLARE_DOESNT_RETURN (incompatible_image_types (Lisp_Object instantiator, 197 DECLARE_DOESNT_RETURN (incompatible_image_types (Lisp_Object instantiator,
208 int given_dest_mask, 198 int given_dest_mask,
209 int desired_dest_mask)); 199 int desired_dest_mask));
200 DECLARE_DOESNT_RETURN (signal_image_error (CONST char *, Lisp_Object));
201 DECLARE_DOESNT_RETURN (signal_image_error_2 (CONST char *, Lisp_Object, Lisp_Object));
210 202
211 /************************************************************************/ 203 /************************************************************************/
212 /* Image Specifier Object */ 204 /* Image Specifier Object */
213 /************************************************************************/ 205 /************************************************************************/
214 206
402 #define XIMAGE_INSTANCE_PIXMAP_FG(i) \ 394 #define XIMAGE_INSTANCE_PIXMAP_FG(i) \
403 IMAGE_INSTANCE_PIXMAP_FG (XIMAGE_INSTANCE (i)) 395 IMAGE_INSTANCE_PIXMAP_FG (XIMAGE_INSTANCE (i))
404 #define XIMAGE_INSTANCE_PIXMAP_BG(i) \ 396 #define XIMAGE_INSTANCE_PIXMAP_BG(i) \
405 IMAGE_INSTANCE_PIXMAP_BG (XIMAGE_INSTANCE (i)) 397 IMAGE_INSTANCE_PIXMAP_BG (XIMAGE_INSTANCE (i))
406 398
399 #ifdef HAVE_XPM
400 Lisp_Object evaluate_xpm_color_symbols (void);
401 Lisp_Object pixmap_to_lisp_data (Lisp_Object name, int ok_if_data_invalid);
402 #endif /* HAVE_XPM */
403 #ifdef HAVE_WINDOW_SYSTEM
404 Lisp_Object bitmap_to_lisp_data (Lisp_Object name, int *xhot, int *yhot,
405 int ok_if_data_invalid);
406 int read_bitmap_data_from_file (CONST char *filename, unsigned int *width,
407 unsigned int *height, unsigned char **datap,
408 int *x_hot, int *y_hot);
409 Lisp_Object xbm_mask_file_munging (Lisp_Object alist, Lisp_Object file,
410 Lisp_Object mask_file,
411 Lisp_Object console_type);
412 #endif
413
407 /************************************************************************/ 414 /************************************************************************/
408 /* Glyph Object */ 415 /* Glyph Object */
409 /************************************************************************/ 416 /************************************************************************/
410 417
411 enum glyph_type 418 enum glyph_type
470 #define XGLYPH_IMAGE(g) GLYPH_IMAGE (XGLYPH (g)) 477 #define XGLYPH_IMAGE(g) GLYPH_IMAGE (XGLYPH (g))
471 #define XGLYPH_CONTRIB_P(g) GLYPH_CONTRIB_P (XGLYPH (g)) 478 #define XGLYPH_CONTRIB_P(g) GLYPH_CONTRIB_P (XGLYPH (g))
472 #define XGLYPH_BASELINE(g) GLYPH_BASELINE (XGLYPH (g)) 479 #define XGLYPH_BASELINE(g) GLYPH_BASELINE (XGLYPH (g))
473 #define XGLYPH_FACE(g) GLYPH_FACE (XGLYPH (g)) 480 #define XGLYPH_FACE(g) GLYPH_FACE (XGLYPH (g))
474 481
475 extern Lisp_Object Q_data, Q_file, Qconst_glyph_variable; 482 extern Lisp_Object Qxpm;
483 extern Lisp_Object Q_data, Q_file, Q_color_symbols, Qconst_glyph_variable;
484 extern Lisp_Object Qxbm;
485 extern Lisp_Object Q_mask_file, Q_mask_data, Q_hotspot_x, Q_hotspot_y;
486 extern Lisp_Object Q_foreground, Q_background;
476 extern Lisp_Object Qimage_conversion_error; 487 extern Lisp_Object Qimage_conversion_error;
477 extern Lisp_Object Vcontinuation_glyph, Vcontrol_arrow_glyph, Vhscroll_glyph; 488 extern Lisp_Object Vcontinuation_glyph, Vcontrol_arrow_glyph, Vhscroll_glyph;
478 extern Lisp_Object Vinvisible_text_glyph, Voctal_escape_glyph, Vtruncation_glyph; 489 extern Lisp_Object Vinvisible_text_glyph, Voctal_escape_glyph, Vtruncation_glyph;
479 extern Lisp_Object Vxemacs_logo; 490 extern Lisp_Object Vxemacs_logo;
480 491