Mercurial > hg > xemacs-beta
diff src/objects-msw.c @ 647:b39c14581166
[xemacs-hg @ 2001-08-13 04:45:47 by ben]
removal of unsigned, size_t, etc.
| author | ben |
|---|---|
| date | Mon, 13 Aug 2001 04:46:48 +0000 |
| parents | 5fd7ba8b56e7 |
| children | fdefd0186b75 |
line wrap: on
line diff
--- a/src/objects-msw.c Wed Aug 08 12:15:04 2001 +0000 +++ b/src/objects-msw.c Mon Aug 13 04:46:48 2001 +0000 @@ -806,7 +806,7 @@ or "rgb:rrrr/gggg/bbbb" */ unsigned int r, g, b; - for (i=1; i<strlen(name); i++) + for (i=1; i< (int) strlen(name); i++) { if (!isxdigit ((int)name[i])) return (COLORREF) -1; @@ -1169,7 +1169,7 @@ static int mswindows_initialize_color_instance (Lisp_Color_Instance *c, Lisp_Object name, - Lisp_Object device, Error_Behavior errb) + Lisp_Object device, Error_Behavior errb) { const char *extname; COLORREF color; @@ -1177,8 +1177,8 @@ TO_EXTERNAL_FORMAT (LISP_STRING, name, C_STRING_ALLOCA, extname, Qctext); - color = mswindows_string_to_color(extname); - if (color != -1) + color = mswindows_string_to_color (extname); + if (color != (COLORREF) -1) { c->data = xnew (struct mswindows_color_instance_data); COLOR_INSTANCE_MSWINDOWS_COLOR (c) = color; @@ -1249,7 +1249,7 @@ TO_EXTERNAL_FORMAT (LISP_STRING, color, C_STRING_ALLOCA, extname, Qctext); - return (mswindows_string_to_color(extname)!=-1); + return (mswindows_string_to_color (extname) != (COLORREF) -1); }