Mercurial > hg > xemacs-beta

comparison src/fontcolor-msw.c @ 5934:e2fae7783046 cygwin

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
lots of use of EMACS_INT, a few others, to eliminate all pointer truncation warnings
author Henry Thompson <ht@markup.co.uk>
date Sat, 12 Dec 2015 19:08:46 +0000
parents 56144c8593a8
children
comparison
equal deleted inserted replaced
5933:c1e8f3294298 5934:e2fae7783046
1416 } 1416 }
1417 1417
1418 static Hashcode 1418 static Hashcode
1419 mswindows_color_instance_hash (Lisp_Color_Instance *c, int UNUSED (depth)) 1419 mswindows_color_instance_hash (Lisp_Color_Instance *c, int UNUSED (depth))
1420 { 1420 {
1421 return (unsigned long) COLOR_INSTANCE_MSWINDOWS_COLOR (c); 1421 return (uintptr_t) COLOR_INSTANCE_MSWINDOWS_COLOR (c);
1422 } 1422 }
1423 1423
1424 static Lisp_Object 1424 static Lisp_Object
1425 mswindows_color_instance_rgb_components (Lisp_Color_Instance *c) 1425 mswindows_color_instance_rgb_components (Lisp_Color_Instance *c)
1426 { 1426 {
1945 mswindows_print_font_instance (Lisp_Font_Instance *f, 1945 mswindows_print_font_instance (Lisp_Font_Instance *f,
1946 Lisp_Object printcharfun, 1946 Lisp_Object printcharfun,
1947 int UNUSED (escapeflag)) 1947 int UNUSED (escapeflag))
1948 { 1948 {
1949 write_fmt_string (printcharfun, " 0x%lx", 1949 write_fmt_string (printcharfun, " 0x%lx",
1950 (unsigned long) 1950 (uintptr_t)
1951 FONT_INSTANCE_MSWINDOWS_HFONT_VARIANT (f, 0, 0)); 1951 FONT_INSTANCE_MSWINDOWS_HFONT_VARIANT (f, 0, 0));
1952 1952
1953 } 1953 }
1954 1954
1955 static Lisp_Object 1955 static Lisp_Object