suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Use an unsigned type for sizes.

Browse Source 
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
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/racket/src/read.c
View File

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