X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Fobjects.h;h=49036d059d87e9e9b476ca3582fb04e8f3cc81a5;hp=fdce3e892b2b5b9ff7d78df9aace7ad7506fb461;hb=7b241b273a632ab80d7c620b5add28d5f11b0fd3;hpb=ea1ea793fe6e244ef5555ed983423a204101af13 diff --git a/src/objects.h b/src/objects.h index fdce3e8..49036d0 100644 --- a/src/objects.h +++ b/src/objects.h @@ -21,8 +21,8 @@ Boston, MA 02111-1307, USA. */ /* Synched up with: Not in FSF. */ -#ifndef _XEMACS_OBJECTS_H_ -#define _XEMACS_OBJECTS_H_ +#ifndef INCLUDED_objects_h_ +#define INCLUDED_objects_h_ #include "specifier.h" @@ -111,14 +111,6 @@ void set_face_boolean_attached_to (Lisp_Object obj, Lisp_Object face, * Color Instance Object * ****************************************************************************/ -DECLARE_LRECORD (color_instance, struct Lisp_Color_Instance); -#define XCOLOR_INSTANCE(x) \ - XRECORD (x, color_instance, struct Lisp_Color_Instance) -#define XSETCOLOR_INSTANCE(x, p) XSETRECORD (x, p, color_instance) -#define COLOR_INSTANCEP(x) RECORDP (x, color_instance) -#define CHECK_COLOR_INSTANCE(x) CHECK_RECORD (x, color_instance) -#define CONCHECK_COLOR_INSTANCE(x) CONCHECK_RECORD (x, color_instance) - EXFUN (Fmake_color_instance, 3); extern Lisp_Object Vthe_null_color_instance; @@ -133,6 +125,13 @@ struct Lisp_Color_Instance void *data; }; +DECLARE_LRECORD (color_instance, Lisp_Color_Instance); +#define XCOLOR_INSTANCE(x) XRECORD (x, color_instance, Lisp_Color_Instance) +#define XSETCOLOR_INSTANCE(x, p) XSETRECORD (x, p, color_instance) +#define COLOR_INSTANCEP(x) RECORDP (x, color_instance) +#define CHECK_COLOR_INSTANCE(x) CHECK_RECORD (x, color_instance) +#define CONCHECK_COLOR_INSTANCE(x) CONCHECK_RECORD (x, color_instance) + #define COLOR_INSTANCE_NAME(c) ((c)->name) #define COLOR_INSTANCE_DEVICE(c) ((c)->device) @@ -140,8 +139,8 @@ struct Lisp_Color_Instance * Font Instance Object * ****************************************************************************/ -DECLARE_LRECORD (font_instance, struct Lisp_Font_Instance); -#define XFONT_INSTANCE(x) XRECORD (x, font_instance, struct Lisp_Font_Instance) +DECLARE_LRECORD (font_instance, Lisp_Font_Instance); +#define XFONT_INSTANCE(x) XRECORD (x, font_instance, Lisp_Font_Instance) #define XSETFONT_INSTANCE(x, p) XSETRECORD (x, p, font_instance) #define FONT_INSTANCEP(x) RECORDP (x, font_instance) #define CHECK_FONT_INSTANCE(x) CHECK_RECORD (x, font_instance) @@ -149,7 +148,7 @@ DECLARE_LRECORD (font_instance, struct Lisp_Font_Instance); #ifdef MULE int font_spec_matches_charset (struct device *d, Lisp_Object charset, - CONST Bufbyte *nonreloc, + const Bufbyte *nonreloc, Lisp_Object reloc, Bytecount offset, Bytecount length); #endif @@ -184,4 +183,4 @@ struct Lisp_Font_Instance #define FONT_INSTANCE_WIDTH(f) ((f)->width) #define FONT_INSTANCE_HEIGHT(f) ((f)->height) -#endif /* _XEMACS_OBJECTS_H_ */ +#endif /* INCLUDED_objects_h_ */