string-split vs 8-bit chars

[Kevin Ryde]

    (length (string-split (string #\a (integer->char 255) #\b)
                          (integer->char 255)))
    => 1

where I think it should be 2.

        * srfi-13.c (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.

--- srfi-13.c.~1.13.~   2005-05-26 09:04:39.000000000 +1000
+++ srfi-13.c   2005-06-05 11:44:55.672651856 +1000
@@ -3224,7 +3224,7 @@
 {
   long idx, last_idx;
   const char * p;
-  int ch;
+  char ch;
   SCM res = SCM_EOL;
 
   SCM_VALIDATE_STRING (1, str);