Mercurial > hg > xemacs-beta
diff src/objects-tty.c @ 440:8de8e3f6228a r21-2-28
Import from CVS: tag r21-2-28
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:33:38 +0200 |
parents | 3ecd8885ac67 |
children | abe6d1db359e |
line wrap: on
line diff
--- a/src/objects-tty.c Mon Aug 13 11:32:27 2007 +0200 +++ b/src/objects-tty.c Mon Aug 13 11:33:38 2007 +0200 @@ -143,7 +143,7 @@ #endif /* 0 */ static int -tty_initialize_color_instance (struct Lisp_Color_Instance *c, Lisp_Object name, +tty_initialize_color_instance (Lisp_Color_Instance *c, Lisp_Object name, Lisp_Object device, Error_behavior errb) { Lisp_Object result; @@ -168,28 +168,28 @@ } static void -tty_mark_color_instance (struct Lisp_Color_Instance *c) +tty_mark_color_instance (Lisp_Color_Instance *c) { mark_object (COLOR_INSTANCE_TTY_SYMBOL (c)); } static void -tty_print_color_instance (struct Lisp_Color_Instance *c, +tty_print_color_instance (Lisp_Color_Instance *c, Lisp_Object printcharfun, int escapeflag) { } static void -tty_finalize_color_instance (struct Lisp_Color_Instance *c) +tty_finalize_color_instance (Lisp_Color_Instance *c) { if (c->data) xfree (c->data); } static int -tty_color_instance_equal (struct Lisp_Color_Instance *c1, - struct Lisp_Color_Instance *c2, +tty_color_instance_equal (Lisp_Color_Instance *c1, + Lisp_Color_Instance *c2, int depth) { return (EQ (COLOR_INSTANCE_TTY_SYMBOL (c1), @@ -197,7 +197,7 @@ } static unsigned long -tty_color_instance_hash (struct Lisp_Color_Instance *c, int depth) +tty_color_instance_hash (Lisp_Color_Instance *c, int depth) { return LISP_HASH (COLOR_INSTANCE_TTY_SYMBOL (c)); } @@ -214,7 +214,7 @@ static int -tty_initialize_font_instance (struct Lisp_Font_Instance *f, Lisp_Object name, +tty_initialize_font_instance (Lisp_Font_Instance *f, Lisp_Object name, Lisp_Object device, Error_behavior errb) { Bufbyte *str = XSTRING_DATA (name); @@ -255,20 +255,20 @@ } static void -tty_mark_font_instance (struct Lisp_Font_Instance *f) +tty_mark_font_instance (Lisp_Font_Instance *f) { mark_object (FONT_INSTANCE_TTY_CHARSET (f)); } static void -tty_print_font_instance (struct Lisp_Font_Instance *f, +tty_print_font_instance (Lisp_Font_Instance *f, Lisp_Object printcharfun, int escapeflag) { } static void -tty_finalize_font_instance (struct Lisp_Font_Instance *f) +tty_finalize_font_instance (Lisp_Font_Instance *f) { if (f->data) xfree (f->data); @@ -301,7 +301,7 @@ return 0; the_nonreloc++; { - struct Lisp_String *s = symbol_name (XSYMBOL (XCHARSET_NAME (charset))); + Lisp_String *s = symbol_name (XSYMBOL (XCHARSET_NAME (charset))); return !strcmp ((CONST char *) the_nonreloc, (CONST char *) string_data (s)); }