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=06fc34c23f2c6987ba1dc8cbf5a084ff24a83e53 The branch, stable-2.0 has been updated via 06fc34c23f2c6987ba1dc8cbf5a084ff24a83e53 (commit) from 514642d3c7b5406952e5461918b718e13a06a2c1 (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 06fc34c23f2c6987ba1dc8cbf5a084ff24a83e53 Author: Mark H Weaver <m...@netris.org> Date: Thu Mar 10 17:35:19 2011 -0500 Fix bug to make `string=' much faster * libguile/srfi-13.c (scm_string_eq): Fix a bug which caused the slow general string_compare function to be used for strings of unequal lengths. ----------------------------------------------------------------------- Summary of changes: libguile/srfi-13.c | 4 +++- 1 files changed, 3 insertions(+), 1 deletions(-) diff --git a/libguile/srfi-13.c b/libguile/srfi-13.c index ab933c2..06d7f3b 100644 --- a/libguile/srfi-13.c +++ b/libguile/srfi-13.c @@ -1181,7 +1181,9 @@ SCM_DEFINE (scm_string_eq, "string=", 2, 4, 0, len1 = scm_i_string_length (s1); len2 = scm_i_string_length (s2); - if (SCM_LIKELY (len1 == len2)) + if (len1 != len2) + return SCM_BOOL_F; + else { if (!scm_i_is_narrow_string (s1)) len1 *= 4; hooks/post-receive -- GNU Guile
