summaryrefslogtreecommitdiff
path: root/libguile/srfi-13.c
diff options
context:
space:
mode:
authorKevin Ryde <user42@zip.com.au>2005-06-05 21:10:13 +0000
committerKevin Ryde <user42@zip.com.au>2005-06-05 21:10:13 +0000
commit994f151dc3098401dd4402a8b3bac090b17993dc (patch)
treef08e5f616ed617252533e142660badb3fdff502c /libguile/srfi-13.c
parentb8ad7a213af29a699954595d2503ed02309484b2 (diff)
downloadguile-994f151dc3098401dd4402a8b3bac090b17993dc.tar.gz
(scm_string_split): Compare char/char in scan. Mixing an
unsigned int SCM_CHAR and a char string meant an 8-bit char was never matched.
Diffstat (limited to 'libguile/srfi-13.c')
-rw-r--r--libguile/srfi-13.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/srfi-13.c b/libguile/srfi-13.c
index 01e680584..98bcfc2c6 100644
--- a/libguile/srfi-13.c
+++ b/libguile/srfi-13.c
@@ -3224,7 +3224,7 @@ SCM_DEFINE (scm_string_split, "string-split", 2, 0, 0,
{
long idx, last_idx;
const char * p;
- int ch;
+ char ch;
SCM res = SCM_EOL;
SCM_VALIDATE_STRING (1, str);