# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1219999258 0
# Node ID d1e61da65cce96c17ae647923d1e01a3cb4b57c9
# Parent  2fb5b268febbb173cdee8318922b634fa9ca15d3
(uniscribe_shape): Shut up compiler warning in LGLYPH_SET_CODE.

diff -r 2fb5b268febb -r d1e61da65cce src/w32uniscribe.c
--- a/src/w32uniscribe.c	Fri Aug 29 08:40:01 2008 +0000
+++ b/src/w32uniscribe.c	Fri Aug 29 08:40:58 2008 +0000
@@ -339,13 +339,18 @@
 		  int lglyph_index = j + done_glyphs;
 		  Lisp_Object lglyph = LGSTRING_GLYPH (lgstring, lglyph_index);
 		  ABC char_metric;
+		  unsigned gl;
 
 		  if (NILP (lglyph))
 		    {
 		      lglyph = Fmake_vector (make_number (LGLYPH_SIZE), Qnil);
 		      LGSTRING_SET_GLYPH (lgstring, lglyph_index, lglyph);
 		    }
-		  LGLYPH_SET_CODE (lglyph, glyphs[j]);
+		  /* Copy to a 32-bit data type to shut up the
+		     compiler warning in LGLYPH_SET_CODE about
+		     comparison being always false.  */
+		  gl = glyphs[j];
+		  LGLYPH_SET_CODE (lglyph, gl);
 
 		  /* Detect clusters, for linking codes back to characters.  */
 		  if (attributes[j].fClusterStart)