[Guile-commits] GNU Guile branch, master, updated. release_1-9-1-59-g744c872

[Michael Gran]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=744c8724a7060abb7ad749f4db7eadb342184572

The branch, master has been updated
       via  744c8724a7060abb7ad749f4db7eadb342184572 (commit)
      from  9909c3956ae653488657c5909547dfd4b97557cc (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 744c8724a7060abb7ad749f4db7eadb342184572
Author: Michael Gran <address@hidden>
Date:   Tue Aug 11 22:52:49 2009 -0700

    Quiet signed/unsigned comparison warnings in chars.[ch]
    
    * libguile/chars.h (SCM_MAKE_CHAR): quiet signed/unsigned
      comparison warnings
    
    * libguile/chars.c (scm_i_charname):
      (scm_i_charname_to_char): quiet signed/unsigned comparison
      warnings

-----------------------------------------------------------------------

Summary of changes:
 libguile/chars.c |    4 ++--
 libguile/chars.h |    6 +++---
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/libguile/chars.c b/libguile/chars.c
index 56239f5..552a2d9 100644
--- a/libguile/chars.c
+++ b/libguile/chars.c
@@ -363,7 +363,7 @@ static const scm_t_uint32 const scm_alt_charnums[] = {
 const char *
 scm_i_charname (SCM chr)
 {
-  int c;
+  size_t c;
   scm_t_uint32 i = SCM_CHAR (chr);
 
   for (c = 0; c < SCM_N_R5RS_CHARNAMES; c++)
@@ -385,7 +385,7 @@ scm_i_charname (SCM chr)
 SCM
 scm_i_charname_to_char (const char *charname, size_t charname_len)
 {
-  int c;
+  size_t c;
 
   /* The R5RS charnames.  These are supposed to be case
      insensitive. */
diff --git a/libguile/chars.h b/libguile/chars.h
index e016cb2..51adc21 100644
--- a/libguile/chars.h
+++ b/libguile/chars.h
@@ -32,9 +32,9 @@
 #define SCM_CHARP(x) (SCM_ITAG8(x) == scm_tc8_char)
 #define SCM_CHAR(x) ((scm_t_wchar)SCM_ITAG8_DATA(x))
 
-#define SCM_MAKE_CHAR(x)                                              \
-  ((x) < 0                                                            \
-   ? SCM_MAKE_ITAG8 ((scm_t_bits) (unsigned char) (x), scm_tc8_char)  \
+#define SCM_MAKE_CHAR(x)                                               \
+  ((scm_t_int32) (x) < 0                                               \
+   ? SCM_MAKE_ITAG8 ((scm_t_bits) (unsigned char) (x), scm_tc8_char)   \
    : SCM_MAKE_ITAG8 ((scm_t_bits) (x), scm_tc8_char))
 
 #define SCM_CODEPOINT_MAX (0x10ffff)


hooks/post-receive
-- 
GNU Guile