[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.9-149-g0fc5482

[Mark H Weaver]

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=0fc548287e154349f3365976e6a5854736b651ed

The branch, stable-2.0 has been updated
       via  0fc548287e154349f3365976e6a5854736b651ed (commit)
      from  394449d5d3922cab783d51398b7727ccaf07dd76 (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 0fc548287e154349f3365976e6a5854736b651ed
Author: Mark H Weaver <address@hidden>
Date:   Tue Jan 14 03:13:58 2014 -0500

    read: use 'c_tolower' instead of 'tolower' in 'try_read_ci_chars'.
    
    * libguile/read.c: Include <c-ctype.h>.
      (try_read_ci_chars): Use 'c_tolower' instead of 'tolower'.

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

Summary of changes:
 libguile/read.c |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/libguile/read.c b/libguile/read.c
index eead368..e862c20 100644
--- a/libguile/read.c
+++ b/libguile/read.c
@@ -31,6 +31,7 @@
 #include <unicase.h>
 #include <unictype.h>
 #include <c-strcase.h>
+#include <c-ctype.h>
 
 #include "libguile/_scm.h"
 #include "libguile/bytevectors.h"
@@ -966,7 +967,7 @@ try_read_ci_chars (SCM port, const char *expected_chars)
       c = scm_getc (port);
       if (c == EOF)
         break;
-      else if (tolower (c) != expected_chars[num_chars_read])
+      else if (c_tolower (c) != expected_chars[num_chars_read])
         {
           scm_ungetc (c, port);
           break;


hooks/post-receive
-- 
GNU Guile