Use an unsigned type for sizes.

Fixes this crash http://drdr.racket-lang.org/32121/pkgs/racket-test/tests/racket/stress/fuzz.rkt
found by fuzz testing.
This commit is contained in:
Sam Tobin-Hochstadt 2015-10-14 15:27:13 -04:00
parent 297fb75009
commit a4d292b21a

View File

@ -5447,7 +5447,7 @@ Scheme_Object *scheme_string_to_submodule_path(char *_s, intptr_t len)
{
unsigned char *s = (unsigned char *)_s;
char *e, buffer[32];
intptr_t pos = 0, l;
uintptr_t pos = 0, l;
Scheme_Object *first = NULL, *last = NULL, *pr;
while (pos < len) {