1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 17:20:29 +02:00

(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.
This commit is contained in:
Kevin Ryde 2005-06-05 21:10:13 +00:00
parent b8ad7a213a
commit 994f151dc3

View file

@ -3224,7 +3224,7 @@ SCM_DEFINE (scm_string_split, "string-split", 2, 0, 0,
{ {
long idx, last_idx; long idx, last_idx;
const char * p; const char * p;
int ch; char ch;
SCM res = SCM_EOL; SCM res = SCM_EOL;
SCM_VALIDATE_STRING (1, str); SCM_VALIDATE_STRING (1, str);