1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-23 12:00:21 +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:22:47 +00:00
parent 7d81830dd2
commit 2e4b615a10

View file

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