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

fix missing initialization

Browse Source
This commit is contained in:
Matthew Flatt 2011-12-28 20:40:18 -06:00
parent f4b4e00c55
commit 12baa07e7e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1022,7 +1022,7 @@ Scheme_Object *optimize_for_inline(Optimize_Info *info, Scheme_Object *le, int a
iv = scheme_hash_get(iv_ht, scheme_false); iv = scheme_hash_get(iv_ht, scheme_false);
} }
if (SAME_TYPE(SCHEME_TYPE(iv), scheme_inline_variant_type)) { if (SAME_TYPE(SCHEME_TYPE(iv), scheme_inline_variant_type)) {
int has_cases; int has_cases = 0;
Scheme_Object *orig_iv = iv; Scheme_Object *orig_iv = iv;
iv = scheme_unresolve(iv, argc, &has_cases); iv = scheme_unresolve(iv, argc, &has_cases);
if (has_cases) { if (has_cases) {