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

Avoid uninitialized-variable warning.

Browse Source
This commit is contained in:
Sam Tobin-Hochstadt 2016-12-05 09:59:07 -05:00
parent 25dc89a238
commit 8b915ea977
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -921,6 +921,8 @@ static Scheme_Object *optimize_ignored(Scheme_Object *e, Optimize_Info *info,
int i;
body = head->body;
if (0 == head->num_clauses)
lv = (Scheme_IR_Let_Value *)body;
for (i = head->num_clauses; i--; ) {
lv = (Scheme_IR_Let_Value *)body;
body = lv->body;